xref: /petsc/src/benchmarks/MPI_Wtime.c (revision b122ec5aa1bd4469eb4e0673542fb7de3f411254)
1d8e9fea7SSatish Balay 
2c6db04a5SJed Brown #include <petscsys.h>
3173c0623SSatish Balay 
4173c0623SSatish Balay int main(int argc,char **argv)
5173c0623SSatish Balay {
6173c0623SSatish Balay   double x,y;
79ae0b57aSSatish Balay   int    ierr;
8173c0623SSatish Balay 
9*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscInitialize(&argc,&argv,0,0));
1098d6af09SSatish Balay   /* To take care of paging effects */
1198d6af09SSatish Balay   y = MPI_Wtime();
12173c0623SSatish Balay 
13173c0623SSatish Balay   x = 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   y = MPI_Wtime();
24173c0623SSatish Balay 
2535d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0);
26b860a41fSSatish Balay   y = MPI_Wtick();
27b4d8b9abSSatish Balay   fprintf(stdout,"%-15s : %e sec\n","MPI_Wtick",y);
28b860a41fSSatish Balay 
2923fede2cSSatish Balay   x    = MPI_Wtime();
305f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscSleep(10));
3123fede2cSSatish Balay   y    = MPI_Wtime();
3235d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","MPI_Wtime",(y-x));
33b860a41fSSatish Balay 
34*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscFinalize());
35*b122ec5aSJacob Faibussowitsch   return 0;
36173c0623SSatish Balay }
37