7.86. CKLEN

CKLEN     CKLEN     CKLEN     CKLEN     CKLEN     CKLEN     CKLEN     
          **********************************************
                    **************************
                              ******

SUBROUTINE CKLEN (LINC, LOUT, LENI, LENR, LENC, IFLAG)
Returns the lengths required for work arrays.

INPUT
LINC     - Integer scalar, input file unit for the linkfile.
LOUT     - Integer scalar, formatted output file unit.

OUTPUT
LENI     - Integer scalar, minimum length required for the
           integer work array.
LENR     - Integer scalar, minimum length required for the
           real work array.
LENC     - Integer scalar, minimum length required for the
           character work array.
IFLAG    - Integer scalar, indicates successful reading of
           linkfile; IFLAG>0 indicates error type.