xref: /petsc/src/benchmarks/PetscGetTime.c (revision abdd934af67c1cc360c4d0cfcf2de16e188d627e) 
1c6db04a5SJed Brown #include <petscsys.h>
28563dfccSBarry Smith #include <petsctime.h>
3173c0623SSatish Balay 
main(int argc,char ** argv)4173c0623SSatish Balay int main(int argc, char **argv)
5173c0623SSatish Balay {
6b0a32e0cSBarry Smith   PetscLogDouble x, y;
7a438ae71SBarry Smith   PetscInt       i;
8173c0623SSatish Balay 
9*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc, &argv, 0, 0));
1098d6af09SSatish Balay   /* To take care of paging effects */
11*9566063dSJacob Faibussowitsch   PetscCall(PetscTime(&y));
12173c0623SSatish Balay 
1377c4ece6SBarry Smith   for (i = 0; i < 2; i++) {
14*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&x));
15*9566063dSJacob Faibussowitsch     PetscCall(PetscTime(&y));
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));
258563dfccSBarry Smith     fprintf(stdout, "%-15s : %e sec\n", "PetscTime", (y - x) / 10.0);
2677c4ece6SBarry Smith   }
2777c4ece6SBarry Smith 
28*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
29b122ec5aSJacob Faibussowitsch   return 0;
30173c0623SSatish Balay }
31