xref: /petsc/src/benchmarks/PetscTime.c (revision 9566063d113dddea24716c546802770db7481bc0)
1d8e9fea7SSatish Balay 
2c6db04a5SJed Brown #include <petscsys.h>
3c6db04a5SJed Brown #include <petsctime.h>
4173c0623SSatish Balay 
5173c0623SSatish Balay int main(int argc,char **argv)
6173c0623SSatish Balay {
7b0a32e0cSBarry Smith   PetscLogDouble x,y;
8a438ae71SBarry Smith   int            i;
9173c0623SSatish Balay 
10*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc,&argv,0,0));
1198d6af09SSatish Balay   /* To take care of paging effects */
128563dfccSBarry Smith   PetscTime(&y);
13173c0623SSatish Balay 
1477c4ece6SBarry Smith   for (i=0; i<2; i++) {
158563dfccSBarry Smith     PetscTime(&x);
168563dfccSBarry Smith     PetscTime(&y);
178563dfccSBarry Smith     PetscTime(&y);
188563dfccSBarry Smith     PetscTime(&y);
198563dfccSBarry Smith     PetscTime(&y);
208563dfccSBarry Smith     PetscTime(&y);
218563dfccSBarry Smith     PetscTime(&y);
228563dfccSBarry Smith     PetscTime(&y);
238563dfccSBarry Smith     PetscTime(&y);
248563dfccSBarry Smith     PetscTime(&y);
258563dfccSBarry Smith     PetscTime(&y);
2635d8aa7fSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
2777c4ece6SBarry Smith   }
288563dfccSBarry Smith   PetscTime(&x);
29*9566063dSJacob Faibussowitsch   PetscCall(PetscSleep(10));
308563dfccSBarry Smith   PetscTime(&y);
3135d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
32*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
33b122ec5aSJacob Faibussowitsch   return 0;
34173c0623SSatish Balay }
35