Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 6/24/2024
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

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