CKNPAR CKNPAR CKNPAR CKNPAR CKNPAR CKNPAR CKNPAR
**********************************************
**************************
******
SUBROUTINE CKNPAR (LINE, NPAR, LOUT, IPAR, ISTART, KERR)
Searches a character string LINE from last to first character,
to create a substring IPAR containing NPAR blank-delimited numbers;
ISTART is the column of LINE containing IPAR. This allows format-
free input of combined alpha-numeric data. For example,
input: LINE*80 = "t1 t2 dt 300.0 3.0E3 50"
NPAR = 3, the number of substrings requested
LOUT = 6, a logical unit number on which to write
diagnostic messages.
output: IPAR*80 = "300.0 3.0E3 50"
ISTART = 13, the starting column in LINE of the
NPAR substrings
KERR = .FALSE.
INPUT
LINE - Character string; length determined by calling routine.
NPAR - Integer scalar, number of substrings expected.
LOUT - Integer scalar, output unit for printed diagnostics.
OUTPUT
IPAR - Character string, subset of LINE, containing only the
NPAR substrings.
ISTART - Integer scalar, starting location in LINE of the NPAR
substrings.
KERR - Logical, character length or syntax error flag.