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.

2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>WRITE(*, *) "Prompt on exit."CASE (QWIN$EXITNOPERSIST)WRITE(*,*) "Exit and close."CASE (QWIN$EXITPERSIST)WRITE(*,*) "Exit and leave open."END SELECTENDGETFILEINFOQQPortability Function: Returns information about the specified file. File names can containwildcards (* and ?).Module: USE IFPORTSyntaxresult = GETFILEINFOQQ (files, buffer, handle)files(Input) Character*(*). Name or pattern of files you are searching for. Can include a full path andwildcards (* and ?).buffer(Output) Derived type FILE$INFO or derived type FILE$INFOI8. Information about a file thatmatches the search criteria in files. The derived type FILE$INFO is defined in IFPORT.F90 asfollows:TYPE FILE$INFOINTEGER(4) CREATION! CREATION TIME (-1 ON FAT)INTEGER(4) LASTWRITE! LAST WRITE TO FILEINTEGER(4) LASTACCESS! LAST ACCESS (-1 ON FAT)INTEGER(4) LENGTH! LENGTH OF FILEINTEGER(4) PERMIT! FILE ACCESS MODECHARACTER(255) NAME! FILE NAMEEND TYPE FILE$INFOThe derived type FILE$INFOI8 is defined in IFPORT.F90 as follows:TYPE FILE$INFOINTEGER(4) CREATIONINTEGER(4) LASTWRITEINTEGER(4) LASTACCESSINTEGER(8) LENGTH! CREATION TIME (-1 on FAT)! LAST WRITE TO FILE! LAST ACCESS (-1 ON FAT)! LENGTH OF FILE2-120

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

Saved successfully!

Ooh no, something went wrong!