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)