8.90. SKWT

SKWT      SKWT      SKWT      SKWT      SKWT      SKWT      SKWT      
          **********************************************
                    **************************
                              ******

SUBROUTINE SKWT   (ISKWRK, RSKWRK, WT)
Returns the molecular weights of the species.

INPUT
RSKWRK(*) - Real    workspace array; dimension at least LENRSK.

OUTPUT
WT(*)     - Real array, molecular masses for the species;
            dimension at least KKTOT, the total species count.
               cgs units, gm/mole