80       int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_M2N()  local
81       int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_M2N()
82       int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_M2N()
99       for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_M2N()
119       for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_M2N()
139       for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_M2N()
159       for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_M2N()
232        int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_M2N_SolOnly()  local
233        int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_M2N_SolOnly()
234        int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_M2N_SolOnly()
253        for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_M2N_SolOnly()
349       int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_M2N_Field()  local
350       int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_M2N_Field()
351       int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_M2N_Field()
365       for ( i = 0; i < nppp; i++  ) {  in Write_M2N_Field()
477        int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_M2N_PhAvg2()  local
478        int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_M2N_PhAvg2()
479        int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_M2N_PhAvg2()
491        for ( i = 0; i < nppp; i++  ) {  in Write_M2N_PhAvg2()
556     int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_Restart()  local
557     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Restart()
558     int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_Restart()
578      for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_Restart()
598      for ( i = 0; i < nppp; i++) {  in Write_Restart()
664     int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_Error()  local
665     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Error()
666     int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_Error()
673     for ( i = 0; i < nppp; i++  ) {  in Write_Error()
807     int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_Field()  local
808     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_Field()
809     int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_Field()
823     for ( i = 0; i < nppp; i++  ) {  in Write_Field()
1019     int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_PhAvg2()  local
1020     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_PhAvg2()
1021     int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_PhAvg2()
1033     for ( i = 0; i < nppp; i++  ) {  in Write_PhAvg2()
1089     int nppp = numparts/nprocs;// nppp : Number of parts per proc ...  in Write_d2wall()  local
1090     int startpart = irank * nppp +1;// Part id from which I (myrank) start ...  in Write_d2wall()
1091     int endpart = startpart + nppp - 1;// Part id to which I (myrank) end ...  in Write_d2wall()
1111      for ( i = 0; i < nppp; i++) { //This loop is useful only if several parts per processor  in Write_d2wall()