9.228. SECNDS

9.228 SECNDS — Time function

Description:

SECNDS(X) gets the time in seconds from the real-time system clock. X is a reference time, also in seconds. If this is zero, the time in seconds from midnight is returned. This function is non-standard and its use is discouraged.

Standard:

GNU extension

Class:

Function

Syntax:

RESULT = SECNDS (X)

Arguments:

T	Shall be of type REAL(4).
X	Shall be of type REAL(4).

Return value:

None

Example:

program test_secnds
    integer :: i
    real(4) :: t1, t2
    print *, secnds (0.0)   ! seconds since midnight
 
登录查看完整内容