xref: /petsc/src/benchmarks/PetscTime.c (revision 8563dfcc547dae59d5e1dc6b8e602db41cb72b14)
1d8e9fea7SSatish Balay 
2c6db04a5SJed Brown #include <petscsys.h>
3c6db04a5SJed Brown #include <petsctime.h>
4173c0623SSatish Balay 
54a2ae208SSatish Balay #undef __FUNCT__
64a2ae208SSatish Balay #define __FUNCT__ "main"
7173c0623SSatish Balay int main(int argc,char **argv)
8173c0623SSatish Balay {
9b0a32e0cSBarry Smith   PetscLogDouble x,y;
109ae0b57aSSatish Balay   int            i,ierr;
11173c0623SSatish Balay 
1277c4ece6SBarry Smith   PetscInitialize(&argc,&argv,0,0);
1398d6af09SSatish Balay   /* To take care of paging effects */
14*8563dfccSBarry Smith   PetscTime(&y);
15173c0623SSatish Balay 
1677c4ece6SBarry Smith   for (i=0; i<2; i++) {
17*8563dfccSBarry Smith     PetscTime(&x);
18*8563dfccSBarry Smith     PetscTime(&y);
19*8563dfccSBarry Smith     PetscTime(&y);
20*8563dfccSBarry Smith     PetscTime(&y);
21*8563dfccSBarry Smith     PetscTime(&y);
22*8563dfccSBarry Smith     PetscTime(&y);
23*8563dfccSBarry Smith     PetscTime(&y);
24*8563dfccSBarry Smith     PetscTime(&y);
25*8563dfccSBarry Smith     PetscTime(&y);
26*8563dfccSBarry Smith     PetscTime(&y);
27*8563dfccSBarry Smith     PetscTime(&y);
28173c0623SSatish Balay 
2935d8aa7fSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
3077c4ece6SBarry Smith   }
31*8563dfccSBarry Smith   PetscTime(&x);
32ac355199SBarry Smith   ierr = PetscSleep(10);CHKERRQ(ierr);
33*8563dfccSBarry Smith   PetscTime(&y);
3435d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
355176a447SSatish Balay 
36f3fe499bSBarry Smith   ierr = PetscFinalize();
373a40ed3dSBarry Smith   PetscFunctionReturn(0);
38173c0623SSatish Balay }
39