xref: /petsc/src/benchmarks/PetscTime.c (revision 5f80ce2ab25dff0f4601e710601cbbcecf323266)
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;
9a438ae71SBarry Smith   PetscErrorCode ierr;
10173c0623SSatish Balay 
11a438ae71SBarry Smith   ierr = PetscInitialize(&argc,&argv,0,0);if (ierr) return ierr;
1298d6af09SSatish Balay   /* To take care of paging effects */
138563dfccSBarry Smith   PetscTime(&y);
14173c0623SSatish Balay 
1577c4ece6SBarry Smith   for (i=0; i<2; i++) {
168563dfccSBarry Smith     PetscTime(&x);
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);
268563dfccSBarry Smith     PetscTime(&y);
2735d8aa7fSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
2877c4ece6SBarry Smith   }
298563dfccSBarry Smith   PetscTime(&x);
30*5f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscSleep(10));
318563dfccSBarry Smith   PetscTime(&y);
3235d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
33f3fe499bSBarry Smith   ierr = PetscFinalize();
3426f47effSBarry Smith   return ierr;
35173c0623SSatish Balay }
36