Description: | Returns a processor-dependent approximation of the processor time in seconds. This is a new intrinsic procedure in Fortran 95. | ||
Class: | Subroutine | ||
Arguments: | TIME must
be scalar and of type real. It is an INTENT(OUT) argument.
If a meaningful time cannot be returned, a processor-dependent negative value is returned. |
Examples
Consider the following:
REAL time_begin, time_end
...
CALL CPU_TIME(time_begin)
...
CALL CPU_TIME(time_end)
PRINT (*,*) 'Time of operation was ', time_end - time_begin, ' seconds'