VERML
This function obtains IMSL MATH/LIBRARY-related version, system and serial numbers.
Function Return Value
VERML — CHARACTER 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.
4 IMSL MATH/LIBRARY serial number
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(4)*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)'
STRING(4) = '('' IMSL MATH/LIBRARY Serial Number: '', A)'
! Print the versions and numbers.
CALL UMACH (2, NOUT)
DO 10 ISELCT=1, 4
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)
IMSL MATH/LIBRARY Serial Number: 999999
Published date: 03/19/2020
Last modified date: 03/19/2020
