SKGMS     SKGMS     SKGMS     SKGMS     SKGMS     SKGMS     SKGMS     
          **********************************************
                    **************************
                              ******

SUBROUTINE SKGMS  (T, ISKWRK, RSKWRK, GMS)
Returns an array of the standard state Gibbs free energies
in mass units. Does not account for dependence on surface coverage (HFCOV). To include that effect, use subroutine SKCGMS.

INPUT
T(*)      - Real array, temperature(s); dimension is determined by
            the application program to be the total number of
            species temperatures, nominally 1.
               cgs units, K
ISKWRK(*) - Integer workspace array; dimension at least LENISK.
RSKWRK(*) - Real    workspace array; dimension at least LENRSK.

OUTPUT
GMS(*)    - Real array, standard state Gibbs free energies
            for the species;
            dimension at least KKTOT, the total species count.
               cgs units, ergs/gm