544   double mycost,totalcost;  in imbalance_factor()  local
556   MPI_Allreduce(&mycost,&totalcost,1,MPI_DOUBLE,MPI_SUM,world);  in imbalance_factor()
559   if (maxcost > 0.0) imbalance = maxcost / (totalcost/nprocs);  in imbalance_factor()
776   double mycost,totalcost,boxsize;  in shift()  local
828     MPI_Allreduce(&mycost,&totalcost,1,MPI_DOUBLE,MPI_SUM,world);  in shift()
830     for (i = 0; i < np; i++) target[i] = totalcost/np * i;  in shift()
831     target[np] = totalcost;  in shift()
839     losum[np] = hisum[np] = totalcost;  in shift()
1153   double totalcost = 0.0;  in imbalance_splits()  local
1156     totalcost += allproccost[i];  in imbalance_splits()
1160   if (maxcost > 0.0) imbalance = maxcost / (totalcost/nprocs);  in imbalance_splits()