xref: /petsc/src/benchmarks/PetscTime.c (revision 9596e0b48258fba4fca4f68feb5185896facfe69)
1 
2 #include "petsc.h"
3 #include "petscfix.h"
4 #include "petsctime.h"
5 
6 #undef __FUNCT__
7 #define __FUNCT__ "main"
8 int main(int argc,char **argv)
9 {
10   PetscLogDouble x,y;
11   int            i,ierr;
12 
13   PetscInitialize(&argc,&argv,0,0);
14   /* To take care of paging effects */
15   PetscTime(y);
16 
17   for (i=0; i<2; i++) {
18     PetscTime(x);
19     PetscTime(y);
20     PetscTime(y);
21     PetscTime(y);
22     PetscTime(y);
23     PetscTime(y);
24     PetscTime(y);
25     PetscTime(y);
26     PetscTime(y);
27     PetscTime(y);
28     PetscTime(y);
29 
30     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
31   }
32   PetscTime(x);
33   ierr = PetscSleep(10);CHKERRQ(ierr);
34   PetscTime(y);
35   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
36 
37   ierr = PetscFinalize();CHKERRQ(ierr);
38   PetscFunctionReturn(0);
39 }
40