ST_ILSR
The ST_ILSR routine breaks a string containing a list of integers
into an array of integers. The separator for the integers
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 IARR locations are set to
IDEF. Range strings (with optional increments) are indicated
with a hyphen (i.e., 3-9 or 3-12-3) and are processed into the
IARR array.
USAGE: CALL ST_ILSR ( STRING, SEP, IDEF, NEXP, IARR, NUM, IRET )
Input parameters:
STRING CHAR* String
SEP CHAR*1 Separator
IDEF INTEGER Default value
NEXP INTEGER Number of expected values
Output parameters:
IARR (NUM) INTEGER Array of integer values
NUM INTEGER Number of values returned
IRET INTEGER Return code
1 = more than NEXP values
0 = normal return
-3 = invalid substring
GEMLIB.tar |
Library contains routines
utilities for GEMPAK. (Fortran90)
Date posted: 2/27/2007 |