8.63. SKPNT

SKPNT     SKPNT     SKPNT     SKPNT     SKPNT     SKPNT     SKPNT     
          **********************************************
                    **************************
                              ******

SUBROUTINE SKPNT  (LSAVE, LOUT, VERS, PREC, LENI, LENR, LENC, IERR)
Reads from a file information about a Surface Chemkin linkfile,
pointers for the Surface Chemkin Library, and returns lengths
of work arrays.

INPUT
LSAVE     - Integer scalar, input unit for binary data file.
LOUT      - Integer scalar, formatted output file unit number.

OUTPUT
VERS      - Real scalar, version number of the Surface Chemkin
            linkfile.
PREC      - Character string, machine precision of the linkfile.
LENI      - Integer scalar, length required for integer work array.
LENR      - Integer scalar, length required for real work array.
LENC      - Integer scalar, length required for character work array.
KERR      - Logical, error flag.