xref: /petsc/src/benchmarks/PetscTime.c (revision f3fe499b4cc4d64bf04aa4f5e4963dcc4eb56541)
1d8e9fea7SSatish Balay 
2d382aafbSBarry Smith #include "petscsys.h"
34e528672SMatthew Knepley #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 */
1498d6af09SSatish Balay   PetscTime(y);
15173c0623SSatish Balay 
1677c4ece6SBarry Smith   for (i=0; i<2; i++) {
17173c0623SSatish Balay     PetscTime(x);
18173c0623SSatish Balay     PetscTime(y);
19173c0623SSatish Balay     PetscTime(y);
20173c0623SSatish Balay     PetscTime(y);
21173c0623SSatish Balay     PetscTime(y);
22173c0623SSatish Balay     PetscTime(y);
23173c0623SSatish Balay     PetscTime(y);
24173c0623SSatish Balay     PetscTime(y);
25173c0623SSatish Balay     PetscTime(y);
26173c0623SSatish Balay     PetscTime(y);
27173c0623SSatish Balay     PetscTime(y);
28173c0623SSatish Balay 
2935d8aa7fSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
3077c4ece6SBarry Smith   }
315176a447SSatish Balay   PetscTime(x);
32ac355199SBarry Smith   ierr = PetscSleep(10);CHKERRQ(ierr);
335176a447SSatish Balay   PetscTime(y);
3435d8aa7fSBarry Smith   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
355176a447SSatish Balay 
36*f3fe499bSBarry Smith   ierr = PetscFinalize();
373a40ed3dSBarry Smith   PetscFunctionReturn(0);
38173c0623SSatish Balay }
39