1a5eb4965SSatish Balay #ifdef PETSC_RCS_HEADER 2*23fede2cSSatish Balay static char vcid[] = "$Id: MPI_Wtime.c,v 1.7 1997/10/19 03:30:47 bsmith Exp balay $"; 3d8e9fea7SSatish Balay #endif 4d8e9fea7SSatish Balay 5173c0623SSatish Balay #include "petsc.h" 6173c0623SSatish Balay 7173c0623SSatish Balay int main( int argc, char **argv) 8173c0623SSatish Balay { 9173c0623SSatish Balay double x, y; 10173c0623SSatish Balay 1177c4ece6SBarry Smith PetscInitialize(&argc, &argv,0,0); 1298d6af09SSatish Balay /* To take care of paging effects */ 1398d6af09SSatish Balay y = MPI_Wtime(); 14173c0623SSatish Balay 15173c0623SSatish Balay x = MPI_Wtime(); 16173c0623SSatish Balay y = 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 27173c0623SSatish Balay fprintf(stderr,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0); 28b860a41fSSatish Balay y = MPI_Wtick(); 29b860a41fSSatish Balay fprintf(stderr,"%-15s : %e sec\n","MPI_Wtick",y); 30b860a41fSSatish Balay 31*23fede2cSSatish Balay x = MPI_Wtime(); 32*23fede2cSSatish Balay PetscSleep(10); 33*23fede2cSSatish Balay y = MPI_Wtime(); 34*23fede2cSSatish Balay fprintf(stderr,"%-15s : %e sec - Slept for 10 sec \n","MPI_Wtime",(y-x)); 35b860a41fSSatish Balay 36173c0623SSatish Balay PetscFinalize(); 373a40ed3dSBarry Smith PetscFunctionReturn(0); 38173c0623SSatish Balay } 39