Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceIDATE4Portability Subroutine: Returns the month, day, and year of the current system.Module: USE IFPORTSyntaxCALL IDATE4 (i, j, k)–or–CALL IDATE4 (iarray)i(Output) INTEGER(4). The current system month.j(Output) INTEGER(4). The current system day.k(Output) INTEGER(4). The current system year as an offset from 1900.iarray(Output) INTEGER(4). A three-element array that holds day as element 1, month as element 2,and year as element 3. The month is between 1 and 12. The year is returned as an offset from 1900,if the year is less than 2000. For years greater than or equal to 2000, this element simply returnsthe integer year, such as 2003.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBIDFLOATPortability Function: Converts an INTEGER(4) variable to double-precision real type.Module: USE IFPORTSyntaxresult = IDFLOAT (i)i(Input) Must be of type INTEGER(4).Results:The result type is double-precision real (REAL(8) or REAL*8).CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB2-164