xref: /petsc/src/benchmarks/MPI_Wtime.c (revision abdd934af67c1cc360c4d0cfcf2de16e188d627e)
1c6db04a5SJed Brown #include <petscsys.h>
2173c0623SSatish Balay 
main(int argc,char ** argv)3173c0623SSatish Balay int main(int argc, char **argv)
4173c0623SSatish Balay {
5173c0623SSatish Balay   double x, y;
69ae0b57aSSatish Balay   int    ierr;
7173c0623SSatish Balay 
8*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc, &argv, 0, 0));
998d6af09SSatish Balay   /* To take care of paging effects */
1098d6af09SSatish Balay   y = MPI_Wtime();
11173c0623SSatish Balay 
12173c0623SSatish Balay   x = MPI_Wtime();
13173c0623SSatish Balay   y = MPI_Wtime();
14173c0623SSatish Balay   y = MPI_Wtime();
15173c0623SSatish Balay   y = MPI_Wtime();
16173c0623SSatish Balay   y = MPI_Wtime();
17173c0623SSatish Balay   y = MPI_Wtime();
18173c0623SSatish Balay   y = MPI_Wtime();
19173c0623SSatish Balay   y = MPI_Wtime();
20173c0623SSatish Balay   y = MPI_Wtime();
21173c0623SSatish Balay   y = MPI_Wtime();
22173c0623SSatish Balay   y = MPI_Wtime();
23173c0623SSatish Balay 
2435d8aa7fSBarry Smith   fprintf(stdout, "%-15s : %e sec\n", "MPI_Wtime", (y - x) / 10.0);
25b860a41fSSatish Balay   y = MPI_Wtick();
26b4d8b9abSSatish Balay   fprintf(stdout, "%-15s : %e sec\n", "MPI_Wtick", y);
27b860a41fSSatish Balay 
2823fede2cSSatish Balay   x = MPI_Wtime();
29*9566063dSJacob Faibussowitsch   PetscCall(PetscSleep(10));
3023fede2cSSatish Balay   y = MPI_Wtime();
3135d8aa7fSBarry Smith   fprintf(stdout, "%-15s : %e sec - Slept for 10 sec \n", "MPI_Wtime", (y - x));
32b860a41fSSatish Balay 
33*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
34b122ec5aSJacob Faibussowitsch   return 0;
35173c0623SSatish Balay }
36