FOR_IFCORE_VERSION

Portability Function: Returns the version of the Fortran run-time library (ifcore).

Module

USE IFPORT

result = FOR_IFCORE_VERSION (string)

string

(Output) Character*(*). The version information for the Fortran run-time library (ifcore).

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_ifcore
    use ifport
    integer       :: res
    character*56  :: str

    res = for_ifcore_version( str )
    print ("(3A)"), "'", str, "'"

end program what_ifcore

The above example will produce a result similar to the following, depending on spacing and the actual version information:

'Intel Fortran RTL Core Library V16.0-001       May 27 2014    '