SKKTFL    SKKTFL    SKKTFL    SKKTFL    SKKTFL    SKKTFL    SKKTFL    
          **********************************************
                    **************************
                              ******

SUBROUTINE SKKTFL (ISKWRK, KTFL)

Allows the user to assign a location in the temperature array
to use for the gas-phase species.

INPUT
ISKWRK(*) - Integer workspace array; dimension at least LENISK.
KTFL(*)   - Integer array, ndices into the temperature(s) for
            gas-phase species;
            dimension at least KKGAS, the total gas-phase species
            count.
            Default value stored in ISKWRK is set to 1 in SKINIT.