xref: /petsc/src/benchmarks/MPI_Wtime.c (revision 26f47eff063a7233c2b7037a486dfc0255a5559a)
1d8e9fea7SSatish Balay 
2c6db04a5SJed Brown #include <petscsys.h>
3173c0623SSatish Balay 
44a2ae208SSatish Balay #undef __FUNCT__
54a2ae208SSatish Balay #define __FUNCT__ "main"
6173c0623SSatish Balay int main(int argc,char **argv)
7173c0623SSatish Balay {
8173c0623SSatish Balay   double x,y;
99ae0b57aSSatish Balay   int    ierr;
10173c0623SSatish Balay 
1177c4ece6SBarry Smith   PetscInitialize(&argc,&argv,0,0);
1298d6af09SSatish Balay   /* To take care of paging effects */
1398d6af09SSatish Balay   y = MPI_Wtime();
14173c0623SSatish Balay 
15173c0623SSatish Balay   x = 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   y = MPI_Wtime();
25173c0623SSatish Balay   y = MPI_Wtime();
26173c0623SSatish Balay 
2735d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0);
28b860a41fSSatish Balay   y = MPI_Wtick();
29b4d8b9abSSatish Balay   fprintf(stdout,"%-15s : %e sec\n","MPI_Wtick",y);
30b860a41fSSatish Balay 
3123fede2cSSatish Balay   x    = MPI_Wtime();
32ac355199SBarry Smith   ierr = PetscSleep(10);CHKERRQ(ierr);
3323fede2cSSatish Balay   y    = MPI_Wtime();
3435d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","MPI_Wtime",(y-x));
35b860a41fSSatish Balay 
36f3fe499bSBarry Smith   ierr = PetscFinalize();
37*26f47effSBarry Smith   return ierr;
38173c0623SSatish Balay }
39