      COMMON/BLK22B/RC2PFU(JZ,JY,JX),RM1PFU(JZ,JY,JX)
     2,RH0BBU(JZ,JY,JX),RH3BBU(JZ,JY,JX)
     3,RF1BBU(JZ,JY,JX),RF2BBU(JZ,JY,JX),RC0BBU(JZ,JY,JX)
     4,RC1BBU(JZ,JY,JX),RC2BBU(JZ,JY,JX),RM1BBU(JZ,JY,JX)
     5,XCOBLS(JS,JY,JX),XCHBLS(JS,JY,JX),XOXBLS(JS,JY,JX)
     6,XNGBLS(JS,JY,JX),XN2BLS(JS,JY,JX),XN4BLW(JS,JY,JX)
     7,XN3BLW(JS,JY,JX),XNOBLW(JS,JY,JX),XH1PBS(JS,JY,JX)
     8,XH2PBS(JS,JY,JX),XALBLS(JS,JY,JX),XFEBLS(JS,JY,JX)
     9,XHYBLS(JS,JY,JX),XCABLS(JS,JY,JX),XMGBLS(JS,JY,JX)
     1,XNABLS(JS,JY,JX),XKABLS(JS,JY,JX),XOHBLS(JS,JY,JX)
     2,XSOBLS(JS,JY,JX),XCLBLS(JS,JY,JX),XC3BLS(JS,JY,JX)
     3,XHCBLS(JS,JY,JX),XAL1BS(JS,JY,JX),XAL2BS(JS,JY,JX)
     4,XAL3BS(JS,JY,JX),XAL4BS(JS,JY,JX),XALSBS(JS,JY,JX)
     5,XFE1BS(JS,JY,JX),XFE2BS(JS,JY,JX),XFE3BS(JS,JY,JX)
     6,XFE4BS(JS,JY,JX),XFESBS(JS,JY,JX),XCAOBS(JS,JY,JX)
     7,XCACBS(JS,JY,JX),XCAHBS(JS,JY,JX),XCASBS(JS,JY,JX)
     8,XMGOBS(JS,JY,JX),XMGCBS(JS,JY,JX),XHGBLS(JS,JY,JX)

