1*b4d8b9abSSatish Balay /*$Id: MPI_Wtime.c,v 1.17 2001/08/29 20:23:41 balay Exp balay $*/ 2d8e9fea7SSatish Balay 3173c0623SSatish Balay #include "petsc.h" 4173c0623SSatish Balay 54a2ae208SSatish Balay #undef __FUNCT__ 64a2ae208SSatish Balay #define __FUNCT__ "main" 7173c0623SSatish Balay int main(int argc,char **argv) 8173c0623SSatish Balay { 9173c0623SSatish Balay double x,y; 109ae0b57aSSatish Balay int ierr; 11173c0623SSatish Balay 1277c4ece6SBarry Smith PetscInitialize(&argc,&argv,0,0); 1398d6af09SSatish Balay /* To take care of paging effects */ 1498d6af09SSatish Balay y = MPI_Wtime(); 15173c0623SSatish Balay 16173c0623SSatish Balay x = MPI_Wtime(); 17173c0623SSatish Balay y = MPI_Wtime(); 18173c0623SSatish Balay y = MPI_Wtime(); 19173c0623SSatish Balay y = MPI_Wtime(); 20173c0623SSatish Balay y = MPI_Wtime(); 21173c0623SSatish Balay y = MPI_Wtime(); 22173c0623SSatish Balay y = MPI_Wtime(); 23173c0623SSatish Balay y = MPI_Wtime(); 24173c0623SSatish Balay y = MPI_Wtime(); 25173c0623SSatish Balay y = MPI_Wtime(); 26173c0623SSatish Balay y = MPI_Wtime(); 27173c0623SSatish Balay 2835d8aa7fSBarry Smith fprintf(stdout,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0); 29b860a41fSSatish Balay y = MPI_Wtick(); 30*b4d8b9abSSatish Balay fprintf(stdout,"%-15s : %e sec\n","MPI_Wtick",y); 31b860a41fSSatish Balay 3223fede2cSSatish Balay x = MPI_Wtime(); 33ac355199SBarry Smith ierr = PetscSleep(10);CHKERRQ(ierr); 3423fede2cSSatish Balay y = MPI_Wtime(); 3535d8aa7fSBarry Smith fprintf(stdout,"%-15s : %e sec - Slept for 10 sec \n","MPI_Wtime",(y-x)); 36b860a41fSSatish Balay 372b7fea2aSSatish Balay ierr = PetscFinalize();CHKERRQ(ierr); 383a40ed3dSBarry Smith PetscFunctionReturn(0); 39173c0623SSatish Balay } 40