Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference

h.eng.cam.ac.uk
from h.eng.cam.ac.uk More from this publisher
12.07.2015 Views

2 Intel Fortran Libraries ReferenceABORT• “Miscellaneous Run-Time Routines”Most of these routines require a USE IFCORE statement to obtain the proper interfaces.Required USE statements are prominent in the routine descriptions.In addition to the appropriate USE statement, for some routines you must specify the types oflibraries to be used when linking. For more information, see the following sections in Volume I ofyour user’s guide:• "Specifying Path, Library, and Include Directories"• "Libraries Options"Also see "Understanding Errors During the Build Process" in Volume I of your user’s guide.In the description of routines, pointers and handles are INTEGER(4) on IA-32 processors;INTEGER(8) on Intel® Itanium® processors.Portability Subroutine: Flushes and closes I/O buffers, and terminates program execution.Module: USE IFPORTSyntaxCALL ABORT [string]string(Input; optional) Character*(*). Allows you to specify an abort message at program termination.When ABORT is called, "abort:" is written to external unit 0, followed by string. If omitted, thedefault message written to external unit 0 is "abort: Fortran Abort Called."CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS LIBSee Also: the EXIT and STOP statements in the Language ReferenceExampleUSE IFPORT! The following prints "abort: Fortran Abort Called"CALL ABORT! The following prints "abort: Out of here!"Call ABORT ("Out of here!")2-2

Descriptions of the Library Routines 2ABOUTBOXQQACCESSQuickWin Function: Specifies the information displayed in the message box that appears whenthe user selects the About command from a QuickWin application's Help menu. This function isonly available on Windows* systems.Module: USE IFQWINSyntaxresult = ABOUTBOXQQ (cstring)cstring(Input; output) Character*(*). Null-terminated C string.Results:The value of the result is INTEGER(4). It is zero if successful; otherwise, nonzero.If your program does not call ABOUTBOXQQ, the QuickWin run-time library supplies a defaultstring. For further discussion, see "Using QuickWin" in your user’s guide.CompatibilityQUICKWIN GRAPHICS LIBExampleConsider the following:USE IFQWININTEGER(4) dummy! Set the About box messagedummy = ABOUTBOXQQ ('Matrix Multiplier\r Version 1.0'C)Portability Function: Determines if a file exists and how it can be accessed.Module: USE IFPORTSyntaxresult = ACCESS (name, mode)name(Input) Character*(*). Name of the file whose accessibility is to be determined.2-3

Descriptions of the Library Routines 2ABOUTBOXQQACCESSQuickWin Function: Specifies the information displayed in the message box that appears whenthe user selects the About command from a QuickWin application's Help menu. This function isonly available on Windows* systems.Module: USE IFQWINSyntaxresult = ABOUTBOXQQ (cstring)cstring(Input; output) Character*(*). Null-terminated C string.Results:The value of the result is INTEGER(4). It is zero if successful; otherwise, nonzero.If your program does not call ABOUTBOXQQ, the QuickWin run-time library supplies a defaultstring. For further discussion, see "Using QuickWin" in your user’s guide.CompatibilityQUICKWIN GRAPHICS LIBExampleConsider the following:USE IFQWININTEGER(4) dummy! Set the About box messagedummy = ABOUTBOXQQ ('Matrix Multiplier\r Version 1.0'C)Portability Function: Determines if a file exists and how it can be accessed.Module: USE IFPORTSyntaxresult = ACCESS (name, mode)name(Input) Character*(*). Name of the file whose accessibility is to be determined.2-3

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

Saved successfully!

Ooh no, something went wrong!