CPU_TIME

組込みサブルーチン：プロセッサー依存でプロセッサー時間 (秒単位) の近似値を返します。これは Fortran 95 の新しい組込み手続です。

形式

CALL CPU_TIME (time)

time
スカラの実数型。これは INTENT(OUT) 引数です。

結果

意味のある時間を返せない場合，プロセッサーに依存した負の値が返されます。

例

次に例を示します。

	REAL time_begin, time_end
	...
	CALL CPU_TIME(time_begin)
	! 時間を計測する作業
	...
	!
	CALL CPU_TIME(time_end)
	PRINT (*,*) 'Time of operation was ', time_begin - time_end, ' seconds'