Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference
A newer version of this document is available. Customers should click here to go to the newest version.
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  |