インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス
Portability Function: Returns the number of seconds since the first time it is called, or zero.
USE IFPORT
result = TIMEF( )
The result type is REAL(8). The result value is the number of seconds that have elapsed since the first time TIMEF was called.
The first time it is called, TIMEF returns 0.
USE IFPORT
INTEGER i, j
REAL(8) elapsed_time
elapsed_time = TIMEF( )
DO i = 1, 100000
j = j + 1
END DO
elapsed_time = TIMEF( )
PRINT *, elapsed_time
END