xref: /petsc/src/benchmarks/PetscGetTime.c (revision b122ec5aa1bd4469eb4e0673542fb7de3f411254)
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*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscInitialize(&argc,&argv,0,0));
1198d6af09SSatish Balay   /* To take care of paging effects */
125f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscTime(&y));
13173c0623SSatish Balay 
1477c4ece6SBarry Smith   for (i=0; i<2; i++) {
155f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&x));
165f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
175f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
185f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
195f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
205f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
215f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
225f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
235f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
245f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
255f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscTime(&y));
268563dfccSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
2777c4ece6SBarry Smith   }
2877c4ece6SBarry Smith 
29*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscFinalize());
30*b122ec5aSJacob Faibussowitsch   return 0;
31173c0623SSatish Balay }
32