146 static bool wasSummed =
false;
151 for (i = t->first; i < t->last; ++i)
153 t->time[t->last] = total;
154 sprintf (t->desc[t->last],
"========== totals, and reset ==========\n");
157 MPI_Allreduce (t->time, timeMax, t->last, MPI_DOUBLE, MPI_MAX,
comm_dh);
158 MPI_Allreduce (t->time, timeMin, t->last, MPI_DOUBLE, MPI_MIN,
comm_dh);
167 "\n----------------------------------------- timing report\n");
168 fprintf (fp,
"\n self max min\n");
169 for (i = 0; i < t->last; ++i)
171 fprintf (fp,
"%7.3f %7.3f %7.3f #%s\n", t->time[i],
172 timeMax[i], timeMin[i], t->desc[i]);