6.43 CPU_TIME — CPU elapsed time in seconds

Description:

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

Standard:

F95 and later

Class:

Subroutine

Syntax:

CALL CPU_TIME(TIME)

Arguments:

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

Return value:

None

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