ST_CLS2

The ST_CLS2 routine breaks a string containing a list of 
            strings into an array of strings.  The separator for the
            strings is input as SEP.  If the separator is a blank,
            multiple blanks will be changed to single blanks before
            the string is processed.  If null strings are encountered
            or fewer than NEXP strings are found in the string, the
            appropriate CARR locations are set to CDEF.        

USAGE:   CALL ST_CLS2 ( STRING, SEP, CDEF, NEXP, CARR, NUM, IRET )

   Input parameters:
      STRING          CHAR*           String
      SEP             CHAR*1          Separator
      CDEF            CHAR*           Default string
      NEXP            INTEGER         Number of expected values

   Output parameters:
      CARR  (NUM)     CHAR*           Array of strings 
      NUM             INTEGER         Number of strings returned
      IRET            INTEGER         Return code
                                        1 = more than NEXP values
                                        0 = normal return

 
GEMLIB.tar Library contains routines utilities for GEMPAK. (Fortran90)
Date posted: 2/27/2007