RTC

Portability Function: Returns the number of seconds elapsed since a specific Greenwich mean time.

Module

USE IFPORT

構文

result = RTC( )

Results

The result type is REAL(8). The result is the number of seconds elapsed since 00:00:00 Greenwich mean time, January 1, 1970.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

 USE IFPORT
 real(8) s, s1, time_spent
 INTEGER(4) i, j
 s = RTC( )
 call sleep(4)
 s1 = RTC( )
 time_spent = s1 - s
 PRINT *, 'It took ',time_spent, 'seconds to run.'

関連情報


このヘルプトピックについてのフィードバックを送信

© 1996-2011 Intel Corporation. 無断での引用、転載を禁じます。