xref: /petsc/src/benchmarks/PetscTime.c (revision 70baa948e42e6bb1660071283af10f413c9269b6)
1 
2 #include <petscsys.h>
3 #include <petsctime.h>
4 
5 #undef __FUNCT__
6 #define __FUNCT__ "main"
7 int main(int argc,char **argv)
8 {
9   PetscLogDouble x,y;
10   int            i;
11   PetscErrorCode ierr;
12 
13   ierr = PetscInitialize(&argc,&argv,0,0);if (ierr) return ierr;
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     fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0);
30   }
31   PetscTime(&x);
32   ierr = PetscSleep(10);CHKERRQ(ierr);
33   PetscTime(&y);
34   fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","PetscTime",(y-x));
35   ierr = PetscFinalize();
36   return ierr;
37 }
38