1d8e9fea7SSatish Balay 2c6db04a5SJed Brown #include <petscsys.h> 38563dfccSBarry Smith #include <petsctime.h> 4173c0623SSatish Balay 5173c0623SSatish Balay int main(int argc,char **argv) 6173c0623SSatish Balay { 7b0a32e0cSBarry Smith PetscLogDouble x,y; 8a438ae71SBarry Smith PetscInt i; 9a438ae71SBarry Smith PetscErrorCode ierr; 10173c0623SSatish Balay 11a438ae71SBarry Smith ierr = PetscInitialize(&argc,&argv,0,0);if (ierr) return ierr; 1298d6af09SSatish Balay /* To take care of paging effects */ 13*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 14173c0623SSatish Balay 1577c4ece6SBarry Smith for (i=0; i<2; i++) { 16*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&x)); 17*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 18*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 19*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 20*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 21*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 22*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 23*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 24*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 25*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 26*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscTime(&y)); 278563dfccSBarry Smith fprintf(stdout,"%-15s : %e sec\n","PetscTime",(y-x)/10.0); 2877c4ece6SBarry Smith } 2977c4ece6SBarry Smith 30f3fe499bSBarry Smith ierr = PetscFinalize(); 3126f47effSBarry Smith return ierr; 32173c0623SSatish Balay } 33