CPU_TIME — CPU elapsed time in seconds

CPU_TIME()

Returns a REAL value representing the elapsed CPU time in seconds. This is useful for testing segments of code to determine execution time.

Parameters

TIME – The type shall be REAL with INTENT(OUT).

Returns

None

Standard:

Fortran 95 and later

Class:

Subroutine

Syntax:

CALL CPU_TIME(TIME)

Example:

program test_cpu_time
    real :: start, finish
    call cpu_time(start)
        ! put code to test here
    call cpu_time(finish)
    print '("Time = ",f6.3," seconds.")',finish-start
end program test_cpu_time

See also:

SYSTEM_CLOCK, DATE_AND_TIME