# 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

Parent topic: G

## See Also

DATE_AND_TIME