xref: /petsc/src/benchmarks/PetscTime.c (revision c6db04a5321582041def2b1e244c75985478b3ef)
1d8e9fea7SSatish Balay 
2*c6db04a5SJed Brown #include <petscsys.h>
3*c6db04a5SJed 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 */
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 
36f3fe499bSBarry Smith   ierr = PetscFinalize();
373a40ed3dSBarry Smith   PetscFunctionReturn(0);
38173c0623SSatish Balay }
39