Need higher resolution times for linpack benchmark
N.M. Maclaren
nmm1@cam.ac.uk
Fri Dec 11 21:21:00 GMT 2009
This is nor a gfortran answer, but here is a wall-clock timer that is
callable from Fortran and I use when I need it.
/* Return high-precision timestamp. */
#include <stddef.h>
#include <sys/time.h>
double gettime_ (void) {
struct timeval timer;
if (gettimeofday(&timer,NULL))
return -1.0;
return timer.tv_sec+
1.0e-6*timer.tv_usec;
}
Regards,
Nick Maclaren.
More information about the Fortran
mailing list