SKSYMM    SKSYMM    SKSYMM    SKSYMM    SKSYMM    SKSYMM    SKSYMM    
          **********************************************
                    **************************
                              ******

SUBROUTINE SKSYMM (ISKWRK, CSKWRK, LOUT, MATNAM, KERR)
Returns the character string name of a material.

INPUT
ISKWRK(*) - Integer workspace array; dimension at least LENISK.
CSKWRK(*) - Character string workspace array; dimension at least
            LENCSK.
LOUT      - Integer scalar, formatted output file unit number.

OUTPUT
MATNAM    - Character string, material name.
KERR      - Logical, character length error flag.