fortran, Wall clock time routine

Seong-Gon Ki
#1 / 2

Wall clock time routine

Dear fortran 90 experts;

I am looking for a good wall-clock time routine for Fortran 90. I want
something like MPI_Wtime routine, but I want to have one independent of
MPI library. I basically want to do sometinh like this:

REAL :: start, finish
start = WALL_CLOCK()
..do something...
finish = WALL_CLOCK()
write(*,*) "Elapsed time is: ", finish - start, " seconds"

Any suggestion for where to look for?

-- Seong-Gon

------------------------------------------------------------------------------
Seong-Gon Kim, Ph.D. (703) 866-9584
[Home]
Code 6390 (202) 404-4419
[Work]
Center for Computational Materials Science (202)
404-7546 [Fax]

[email]
Washington, DC 20375-5320

Wed, 18 Jun 1902 08:00:00 GMT

Dr Ivan D Reid, muSR Facili
#2 / 2

Wall clock time routine

Quote:

>I am looking for a good wall-clock time routine for Fortran 90. I want
>something like MPI_Wtime routine, but I want to have one independent of
>MPI library. I basically want to do sometinh like this:
>REAL :: start, finish
>start = WALL_CLOCK()
>..do something...
>finish = WALL_CLOCK()
>write(*,*) "Elapsed time is: ", finish - start, " seconds"
>Any suggestion for where to look for?

DATE_AND_TIME() returns real-time clock info. Some vendors have
extensions such as SECNDS() which returns number of seconds since midnight.
On VMS you have access to LIB$INIT_TIMER, LIB$SHOW_TIMER and LIB$STAT_TIMER.

--

MuSR99 Conference, Les Diablerets: http://www1.psi.ch/~musr99/musr99.html

Wed, 18 Jun 1902 08:00:00 GMT