xref: /petsc/src/benchmarks/PetscGetTime.c (revision 9566063d113dddea24716c546802770db7481bc0)
1d8e9fea7SSatish Balay 
2c6db04a5SJed Brown #include <petscsys.h>
38563dfccSBarry Smith #include <petsctime.h>
4173c0623SSatish Balay 
5173c0623SSatish Balay int main(int argc,char **argv)
6173c0623SSatish Balay {
7b0a32e0cSBarry Smith   PetscLogDouble x,y;
8a438ae71SBarry Smith   PetscInt       i;
9173c0623SSatish Balay 
10*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc,&argv,0,0));
1198d6af09SSatish Balay   /* To take care of paging effects */
12*9566063dSJacob Faibussowitsch   PetscCall(PetscTime(&y));
13173c0623SSatish Balay 
1477c4ece6SBarry Smith   for (i=0; i<2; i++) {
15*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&x));
16*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
17*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
18*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
19*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
20*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
21*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
22*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
23*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
24*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
25*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
268563dfccSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
2777c4ece6SBarry Smith   }
2877c4ece6SBarry Smith 
29*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
30b122ec5aSJacob Faibussowitsch   return 0;
31173c0623SSatish Balay }
32