xref: /petsc/src/benchmarks/MPI_Wtime.c (revision 173c062396e103eb3d1a3e577383b37e38b301ab)
1 #include "stdio.h"
2 #include "petsc.h"
3 
4 int main( int argc, char **argv)
5 {
6   double x, y;
7 
8   PetscInitialize(&argc, &argv,0,0,0);
9 
10   x = MPI_Wtime();
11   y = MPI_Wtime();
12   y = MPI_Wtime();
13   y = MPI_Wtime();
14   y = MPI_Wtime();
15   y = MPI_Wtime();
16   y = MPI_Wtime();
17   y = MPI_Wtime();
18   y = MPI_Wtime();
19   y = MPI_Wtime();
20   y = MPI_Wtime();
21 
22   fprintf(stderr,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0);
23   PetscFinalize();
24   return 0;
25 }
26