Intel® Fortran Compiler 16.0 User and Reference Guide
Portability Subroutine: Returns the time in numeric form.
USE IFPORT
CALL ITIME (array)
array |
(Output) INTEGER(4). A rank one array with three elements used to store numeric time data:
|
USE IFPORT INTEGER(4) time_array(3) CALL ITIME (time_array) write(*,10) time_array 10 format (1X,I2,':',I2,':',I2) END