12.07.2015 Views

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Descriptions of the Library Routines 2IDATEPortability Subroutine: Returns the month, day, and year of the current system.Module: USE IFPORTSyntaxCALL IDATE (i, j, k)–or–CALL IDATE (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). Three-element array that holds day as element 1, month as element 2, andyear as element 3. The month is between 1 and 12. The year is greater than or equal to 1969 and isreturned as 2 digits.NOTE. IDATE is an intrinsic procedure unless you specify USE IFPORT.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS LIBSee Also: “DATE”, “GETDAT”, the DATE_AND_TIME and IDATE subroutines in theLanguage <strong>Reference</strong>Exampleuse IFPORTinteger(4) imonth, iday, iyear, datarray(3)! If the date is July 11, 1999:CALL IDATE(IMONTH, IDAY, IYEAR)! sets IMONTH to 7, IDAY to 11 and IYEAR to 99.CALL IDATE (DATARRAY)! datarray is (/11,7,99/)2-163

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!