      COMMON/BLK2B/PHR(JY,JX),CN4RI(JY,JX),CNORI(JY,JX),CN4R(JY,JX)
     2,CN3R(JY,JX),CNOR(JY,JX),CPOR(JY,JX),CALR(JY,JX),CFER(JY,JX)
     3,CHYR(JY,JX),CCAR(JY,JX),CMGR(JY,JX),CNAR(JY,JX),CKAR(JY,JX)
     4,COHR(JY,JX),CSOR(JY,JX),CCLR(JY,JX),CC3R(JY,JX),CHCR(JY,JX)
     5,CCHR(JY,JX),CAL1R(JY,JX),CAL2R(JY,JX),CAL3R(JY,JX),CAL4R(JY,JX)
     6,CALSR(JY,JX),CFE1R(JY,JX),CFE2R(JY,JX),CFE3R(JY,JX),CFE4R(JY,JX)
     7,CFESR(JY,JX),CCAOR(JY,JX),CCACR(JY,JX),CCAHR(JY,JX),CCASR(JY,JX)
     8,CMGOR(JY,JX),CMGCR(JY,JX),CMGHR(JY,JX),CMGSR(JY,JX),CNACR(JY,JX)
     9,CNASR(JY,JX),CKASR(JY,JX),CH0PR(JY,JX),CH1PR(JY,JX),CH3PR(JY,JX)
     1,CF1PR(JY,JX),CF2PR(JY,JX),CC0PR(JY,JX),CC1PR(JY,JX),CC2PR(JY,JX)
     2,CM1PR(JY,JX),CCOR(JY,JX),COXR(JY,JX),CNNR(JY,JX),CN2R(JY,JX)
     6,PHQ(366,JY,JX),CN4Q(366,JY,JX),CN3Q(366,JY,JX),CNOQ(366,JY,JX)
     7,CPOQ(366,JY,JX),CALQ(366,JY,JX),CFEQ(366,JY,JX),CHYQ(366,JY,JX)
     8,CCAQ(366,JY,JX),CMGQ(366,JY,JX),CNAQ(366,JY,JX),CKAQ(366,JY,JX)
     9,COHQ(366,JY,JX),CSOQ(366,JY,JX),CCLQ(366,JY,JX),CC3Q(366,JY,JX)
     1,CHCQ(366,JY,JX),CAL1Q(366,JY,JX),CAL2Q(366,JY,JX)
     2,CAL3Q(366,JY,JX),CAL4Q(366,JY,JX),CALSQ(366,JY,JX)
     3,CFE1Q(366,JY,JX),CFE2Q(366,JY,JX),CFE3Q(366,JY,JX)
     4,CFE4Q(366,JY,JX),CFESQ(366,JY,JX),CCAOQ(366,JY,JX)
     5,CCACQ(366,JY,JX),CCAHQ(366,JY,JX),CCASQ(366,JY,JX)
     6,CMGOQ(366,JY,JX),CMGCQ(366,JY,JX),CMGHQ(366,JY,JX)
     7,CMGSQ(366,JY,JX),CNACQ(366,JY,JX),CNASQ(366,JY,JX)
     8,CKASQ(366,JY,JX),CH0PQ(366,JY,JX),CH1PQ(366,JY,JX)
     9,CH3PQ(366,JY,JX),CF1PQ(366,JY,JX),CF2PQ(366,JY,JX)
     1,CC0PQ(366,JY,JX),CC1PQ(366,JY,JX),CC2PQ(366,JY,JX)
     2,CM1PQ(366,JY,JX),CSTRQ(366,JY,JX),DENS0(JY,JX)
     3,CSTRR(JY,JX)
