integer indstart_pmf(0:MaxProcs),indend_pmf(0:MaxProcs),
     &  scount_pmf(0:MaxProcs),idispl_pmf(0:MaxProcs)
      common /rownia/ indstart_pmf,indend_pmf,scount_pmf,idispl_pmf