CKATOM    CKATOM    CKATOM    CKATOM    CKATOM    CKATOM    CKATOM    
          **********************************************
                    **************************
                              ******

REAL FUNCTION CKATOM (ENAME)
Returns atomic weight, given character-string element name.

INPUT
ENAME   - Character string, element name.

RETURN
  Real scalar, element atomic weight.