Visible to Intel only — GUID: GUID-5E307CCA-ACDB-40CA-B86C-56E1BB73D82D
Visible to Intel only — GUID: GUID-5E307CCA-ACDB-40CA-B86C-56E1BB73D82D
FOR_IFPORT_VERSION
Portability Function: Returns the version of the Fortran portability library (ifport).
Module
USE IFPORT
result = FOR_IFPORT_VERSION (string)
string |
(Output) Character*(*). The version information for the Fortran portability library (ifport). |
Results
The result type is INTEGER(4). The result is non-zero if successful; otherwise, zero.
If string is not long enough to contain the version information, the result is truncated on the right. If string is longer than the version information, the result is blank-padded on the right. The result may contain multiple blank or ASCII tab characters.
Example
Consider the following:
program what_ifport
use ifport
integer :: res
character*56 :: str
res = for_ifport_version( str )
print ("(3A)"), "'", str, "'"
end program what_ifport
The above example will produce a result similar to the following, depending on spacing and the actual version information:
'Intel Fortran portability library Vvv.m-eee Mmm dd yyyy '
where:
vv |
Is a major version number |
m |
Is a minor version number |
eee |
Is an edit number |
Mmm |
Is a three-character abbreviation for the month |
dd |
Is a two-digit day of the month |
yyyy |
Is a four-digit year |