1 #ifndef lint 2 static char vcid[] = "$Id: MPI_Wtime.c,v 1.4 1996/03/19 21:30:13 bsmith Exp balay $"; 3 #endif 4 5 #include "stdio.h" 6 #include "petsc.h" 7 8 int main( int argc, char **argv) 9 { 10 double x, y; 11 12 PetscInitialize(&argc, &argv,0,0); 13 /* To take care of paging effects */ 14 y = MPI_Wtime(); 15 16 x = MPI_Wtime(); 17 y = MPI_Wtime(); 18 y = MPI_Wtime(); 19 y = MPI_Wtime(); 20 y = MPI_Wtime(); 21 y = MPI_Wtime(); 22 y = MPI_Wtime(); 23 y = MPI_Wtime(); 24 y = MPI_Wtime(); 25 y = MPI_Wtime(); 26 y = MPI_Wtime(); 27 28 fprintf(stderr,"%-15s : %e sec\n","MPI_Wtime",(y-x)/10.0); 29 y = MPI_Wtick(); 30 fprintf(stderr,"%-15s : %e sec\n","MPI_Wtick",y); 31 32 33 PetscFinalize(); 34 return 0; 35 } 36