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 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

FOR_IFCORE_VERSION

Module

Results

Example

See Also