可搬用関数:TIMEF が最初に呼び出された時からの秒数またはゼロを返します。
モジュール:USE DFPORT
形式
result = TIMEF ( )
結果
結果の型は REAL(8) です。結果は,TIMEF が最初に呼び出された時からの経過時間を秒数で返します。TIMEF を最初に呼び出した時には,0.0D0 が返されます。
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
日付け手続例
USE DFPORT 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