Developer Guide and Reference

ID 767251
Date 10/31/2024
Public
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)

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