Intel® Fortran Compiler 16.0 User and Reference Guide

GMTIME

Portability Subroutine: Returns the Greenwich mean time in an array of time elements.

Module

USE IFPORT

CALL GMTIME (stime,tarray)

stime

(Input) INTEGER(4). Numeric time data to be formatted. Number of seconds since 00:00:00 Greenwich mean time, January 1, 1970.

tarray

(Output) INTEGER(4). One-dimensional array with 9 elements used to contain numeric time data. The elements of tarray are returned as follows:

Element

Value

tarray(1)

Seconds (0-61, where 60-61 can be returned for leap seconds)

tarray(2)

Minutes (0-59)

tarray(3)

Hours (0-23)

tarray(4)

Day of month (1-31)

tarray(5)

Month (0-11)

tarray(6)

Number of years since 1900

tarray(7)

Day of week (0-6, where 0 is Sunday)

tarray(8)

Day of year (0-365)

tarray(9)

Daylight saving flag (0 if standard time, 1 if daylight saving time)

Caution

This subroutine may cause problems with the year 2000. Use DATE_AND_TIME instead.

Example

use IFPORT
integer(4) stime, timearray(9)
! initialize stime to number of seconds since
!   00:00:00 GMT January 1, 1970
stime = time()
CALL GMTIME (stime, timearray)
print *, timearray
end

See Also