FNLMath : Utilities : VERML
VERML
This function obtains IMSL MATH/LIBRARY-related version and system information.
Function Return Value
VERMLCHARACTER string containing information. (Output)
Required Arguments
ISELCT — Option for the information to retrieve. (Input)
ISELCT VERML
1 IMSL MATH/LIBRARY version number
2 Operating system (and version number) for which the library was produced.
3 Fortran compiler (and version number) for which the library was produced.
FORTRAN 90 Interface
Generic: VERML (ISELCT)
Specific: The specific interface name is VERML.
FORTRAN 77 Interface
Single: VERML (ISELCT)
Example
In this example, we print all of the information returned by VERML on a particular machine. The output is omitted because the results are system dependent.
 
USE UMACH_INT
USE VERML_INT
 
IMPLICIT NONE
INTEGER ISELCT, NOUT
CHARACTER STRING(3)*50, TEMP*32
!
STRING(1) = '('' IMSL MATH/LIBRARY Version Number: '', A)'
STRING(2) = '('' Operating System ID Number: '', A)'
STRING(3) = '('' Fortran Compiler Version Number: '', A)'
! Print the versions and numbers.
CALL UMACH (2, NOUT)
DO 10 ISELCT=1, 3
TEMP = VERML(ISELCT)
WRITE (NOUT,STRING(ISELCT)) TEMP
10 CONTINUE
END
Output
 
IMSL MATH/LIBRARY Version Number: IMSL Fortran Numerical Library, Version 6.0.0
Operating System ID Number: Solaris Version 10
Fortran Compiler Version Number: Sun Fortran 95 8.1 2005/01/07 (Workshop 10.0)