C-----------------------------------------------------------------------
C IMSL Name:  VERSL (Single precision version)
C
C Purpose:    Obtain STAT/LIBRARY-related version, system and license
C             numbers.
C
C Usage:      VERSL(ISELCT)
C
C Example 1:
      INTEGER    ISELCT, NOUT
      CHARACTER  STRING(4)*50, TEMP*32, VERSL*32
      EXTERNAL   UMACH, VERSL
C
      STRING(1) = '('' IMSL STAT/LIBRARY Version Number:  '', A)'
      STRING(2) = '('' Operating System ID Number:  '', A)'
      STRING(3) = '('' Fortran Compiler Version Number:  '', A)'
      STRING(4) = '('' IMSL STAT/LIBRARY License Number:  '', A)'
C                                  Print the versions and numbers.
      CALL UMACH (2, NOUT)
      DO 10  ISELCT=1, 4
         TEMP = VERSL(ISELCT)
         WRITE (NOUT,STRING(ISELCT)) TEMP
   10 CONTINUE
      END