IDATE — Get current local time subroutine (day/month/year)#
-
IDATE(VALUES)#
IDATE(VALUES)
FillsVALUES
with the numerical values at the current local time. The day (in the range 1-31), month (in the range 1-12), and year appear in elements 1, 2, and 3 ofVALUES
, respectively. The year has four significant digits.- Parameters
VALUES – The type shall be
INTEGER, DIMENSION(3)
and the kind shall be the default integer kind.- Returns
Does not return anything.
- Standard:
GNU extension
- Class:
Subroutine
- Syntax:
CALL IDATE(VALUES)
- Example:
program test_idate integer, dimension(3) :: tarray call idate(tarray) print *, tarray(1) print *, tarray(2) print *, tarray(3) end program test_idate
- See also: