xref: /petsc/src/benchmarks/PetscGetTime.c (revision 2b7fea2a9991bf5a64900aaa80f2645ded1d7a90)
1*2b7fea2aSSatish Balay /*$Id: PetscGetTime.c,v 1.15 2001/01/17 22:28:38 bsmith Exp balay $*/
2d8e9fea7SSatish Balay 
3173c0623SSatish Balay #include "petsc.h"
4173c0623SSatish Balay 
55a655dc6SBarry Smith #undef __FUNC__
65a655dc6SBarry Smith #define __FUNC__ "main"
7173c0623SSatish Balay int main(int argc,char **argv)
8173c0623SSatish Balay {
9b0a32e0cSBarry Smith   PetscLogDouble x,y;
10d3093643SSatish Balay   int        i,ierr;
11173c0623SSatish Balay 
1277c4ece6SBarry Smith   PetscInitialize(&argc,&argv,0,0);
1398d6af09SSatish Balay  /* To take care of paging effects */
14ac355199SBarry Smith   ierr = PetscGetTime(&y);CHKERRQ(ierr);
15173c0623SSatish Balay 
1677c4ece6SBarry Smith   for (i=0; i<2; i++) {
17ac355199SBarry Smith     ierr = PetscGetTime(&x);CHKERRQ(ierr);
18ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
19ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
20ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
21ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
22ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
23ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
24ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
25ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
26ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
27ac355199SBarry Smith     ierr = PetscGetTime(&y);CHKERRQ(ierr);
28173c0623SSatish Balay 
2935d8aa7fSBarry Smith     fprintf(stdout,"%-15s : %e sec\n","PetscGetTime",(y-x)/10.0);
3077c4ece6SBarry Smith   }
3177c4ece6SBarry Smith 
32*2b7fea2aSSatish Balay   ierr = PetscFinalize();CHKERRQ(ierr);
333a40ed3dSBarry Smith   PetscFunctionReturn(0);
34173c0623SSatish Balay }
35