Developer Guide and Reference

ID 767251
Date 10/31/2024
Public
Document Table of Contents

ITIME

Portability Subroutine: Returns the time in numeric form.

Module

USE IFPORT

CALL ITIME (array)

array

(Output) INTEGER(4). A rank one array with three elements used to store numeric time data:

  • array(1) - the hour

  • array(2) - the minute

  • array(3) - the second

Example

USE IFPORT INTEGER(4) time_array(3) CALL ITIME (time_array) write(*,10) time_array 10 format (1X,I2,':',I2,':',I2) END

See Also