50     int irank;  in Write_AcuStat()  local
54     irank = *pid;  in Write_AcuStat()
67     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_AcuStat()
76 …sprintf(filename,"restartAcuStat.%d.%d.%d.%d",*stepstart,*stepend,*steptot,((int)(irank/(nprocs/nf…  in Write_AcuStat()
147     int irank;  in Write_AcuStat2()  local
151     irank = *pid;  in Write_AcuStat2()
164     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_AcuStat2()
172 …sprintf(filename,"restartAcuStat.%d.%d.%d.%d",*stepstart,*stepend,*steptot,((int)(irank/(nprocs/nf…  in Write_AcuStat2()
302     int irank;  in Write_Ybar()  local
313     irank = *pid; //workfc.myrank;  in Write_Ybar()
320     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Ybar()
329 …sprintf(filename,"restartAcuStat.%d.%d.%d.%d",*stepstart,*stepend,*steptot,((int)(irank/(nprocs/nf…  in Write_Ybar()
391     int irank;  in Write_Restart()  local
401     irank = *pid; //workfc.myrank;  in Write_Restart()
408     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Restart()
416     sprintf(filename,"restart-dat.%d.%d",*stepno,((int)(irank/(nprocs/nfiles))+1));  in Write_Restart()
502     int irank;  in Write_Error()  local
508     irank = *pid; //workfc.myrank;  in Write_Error()
516     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Error()
641     int irank;  in Write_Field()  local
651     irank = *pid; //workfc.myrank;  in Write_Field()
659     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Field()
857     int irank;  in Write_PhAvg2()  local
863     irank = *pid; //workfc.myrank;  in Write_PhAvg2()
871     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_PhAvg2()
924     int irank;  in Write_d2wall()  local
934     irank = *pid; //workfc.myrank;  in Write_d2wall()
941     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_d2wall()
949     sprintf(filename,"d2wall.%d",((int)(irank/(nprocs/nfiles))+1));  in Write_d2wall()
951     if (irank==0) {  in Write_d2wall()
984       if (irank==0) {  in Write_d2wall()