SKLEN     SKLEN     SKLEN     SKLEN     SKLEN     SKLEN     SKLEN     
          **********************************************
                    **************************
                              ******

SUBROUTINE SKLEN  (LINSK, LOUT, LENI, LENR, LENC, IFLAG)
Reads the first record of the linkfile to return the lengths
required for the integer, real, and character work arrays.

INPUT
LINSK     - Integer scalar, input unit number assigned to linkfile.
LOUT      - Integer scalar, formatted output unit file number.

OUTPUT
LENI      - Integer scalar, dimension required for integer work
            array, ISKWRK.
LENR      - Integer scalar, dimension required for real work
            array, RSKWRK.
LENC      - Integer scalar, dimension required for character work
            array, CSKWRK.