      COMMON/BLK20C/XALFHS(3,JD,JV,JH),XFEFHS(3,JD,JV,JH)
     1,XHYFHS(3,JD,JV,JH),XCAFHS(3,JD,JV,JH),XMGFHS(3,JD,JV,JH)
     2,XNAFHS(3,JD,JV,JH),XKAFHS(3,JD,JV,JH),XOHFHS(3,JD,JV,JH)
     3,XSOFHS(3,JD,JV,JH),XCLFHS(3,JD,JV,JH),XC3FHS(3,JD,JV,JH)
     4,XHCFHS(3,JD,JV,JH),XAL1HS(3,JD,JV,JH),XAL2HS(3,JD,JV,JH)
     5,XAL3HS(3,JD,JV,JH),XAL4HS(3,JD,JV,JH),XALSHS(3,JD,JV,JH)
     6,XFE1HS(3,JD,JV,JH),XFE2HS(3,JD,JV,JH)
     7,XFE3HS(3,JD,JV,JH),XFE4HS(3,JD,JV,JH),XFESHS(3,JD,JV,JH)
     8,XCAOHS(3,JD,JV,JH),XCACHS(3,JD,JV,JH),XCAHHS(3,JD,JV,JH)
     9,XCASHS(3,JD,JV,JH),XMGOHS(3,JD,JV,JH),XMGCHS(3,JD,JV,JH)
     1,XMGHHS(3,JD,JV,JH),XMGSHS(3,JD,JV,JH),XNACHS(3,JD,JV,JH)
     2,XNASHS(3,JD,JV,JH),XKASHS(3,JD,JV,JH),XH0PHS(3,JD,JV,JH)
     3,XH3PHS(3,JD,JV,JH),XF1PHS(3,JD,JV,JH)
     4,XF2PHS(3,JD,JV,JH),XC0PHS(3,JD,JV,JH),XC1PHS(3,JD,JV,JH)
     5,XC2PHS(3,JD,JV,JH),XM1PHS(3,JD,JV,JH),XH0BHB(3,JD,JV,JH)
     6,XH3BHB(3,JD,JV,JH),XF1BHB(3,JD,JV,JH)
     7,XF2BHB(3,JD,JV,JH),XC0BHB(3,JD,JV,JH),XC1BHB(3,JD,JV,JH)
     8,XC2BHB(3,JD,JV,JH),XM1BHB(3,JD,JV,JH)
