      COMMON/BLK12A/WSTR(JP,JY,JX),OSTR(JP,JY,JX)
     2,RAD1(JP,JY,JX),THRM1(JP,JY,JX)
     3,EFLXC(JP,JY,JX),SFLXC(JP,JY,JX),HFLXC(JP,JY,JX),ENGYX(JP,JY,JX)
     4,VHCPC(JP,JY,JX),PSILT(JP,JY,JX),PSILG(JP,JY,JX),PSILO(JP,JY,JX)
     5,RC(JP,JY,JX),RA(JP,JY,JX),EP(JP,JY,JX),EVAPC(JP,JY,JX)
     6,UPWTR(2,JZ,JP,JY,JX),PSIRT(2,JZ,JP,JY,JX)
     7,PSIRO(2,JZ,JP,JY,JX),PSIRG(2,JZ,JP,JY,JX),CO2A(2,JZ,JP,JY,JX)
     8,OXYA(2,JZ,JP,JY,JX),CH4A(2,JZ,JP,JY,JX),Z2OA(2,JZ,JP,JY,JX)
     9,ZH3A(2,JZ,JP,JY,JX),CO2P(2,JZ,JP,JY,JX),OXYP(2,JZ,JP,JY,JX)
     1,CH4P(2,JZ,JP,JY,JX),Z2OP(2,JZ,JP,JY,JX),ZH3P(2,JZ,JP,JY,JX)
     2,ROXYP(2,JZ,JP,JY,JX),RCOFLA(2,JZ,JP,JY,JX),ROXFLA(2,JZ,JP,JY,JX)
     3,RCHFLA(2,JZ,JP,JY,JX),RN2FLA(2,JZ,JP,JY,JX),RNHFLA(2,JZ,JP,JY,JX)
     4,RCODFA(2,JZ,JP,JY,JX),ROXDFA(2,JZ,JP,JY,JX),RCHDFA(2,JZ,JP,JY,JX)
     5,RN2DFA(2,JZ,JP,JY,JX),RNHDFA(2,JZ,JP,JY,JX),RCO2S(2,JZ,JP,JY,JX)
     6,RUPOXS(2,JZ,JP,JY,JX),RUPCHS(2,JZ,JP,JY,JX),RUPN2S(2,JZ,JP,JY,JX)
     7,RUPN3S(2,JZ,JP,JY,JX),RUPN3B(2,JZ,JP,JY,JX),RCO2P(2,JZ,JP,JY,JX)
     8,RUPOXP(2,JZ,JP,JY,JX),RCO2M(2,JZ,JP,JY,JX),RCO2A(2,JZ,JP,JY,JX)
     9,UPOMC(JP,JY,JX),UPOMN(JP,JY,JX),UPOMP(JP,JY,JX),UPNH4(JP,JY,JX)
     1,UPNO3(JP,JY,JX),UPH2P(JP,JY,JX),UPH1P(JP,JY,JX),UPNF(JP,JY,JX)
     2,RCO2Z(JP,JY,JX),ROXYZ(JP,JY,JX),RCH4Z(JP,JY,JX),RN2OZ(JP,JY,JX)

