SKMXTP    SKMXTP    SKMXTP    SKMXTP    SKMXTP    SKMXTP    SKMXTP    
          **********************************************
                    **************************
                              ******

SUBROUTINE SKMXTP (ISKWRK, MXTP)
Returns the maximum number of temperatures used in
fitting the thermodynamic properties of the species.

INPUT
ISKWRK(*) - Integer workspace array; dimension at least LENISK.

OUTPUT
MXTP      - Integer scalar, maximum number of temperatures used in
            fitting the thermodynamic properties of the species.