c Chemistry Variables Dimensions
c -------------------------------
      integer nlatsoz, nlevsoz, ntimesoz, nlatsq, nlevsq, ntimesq,
     .                              nlevsn2o,nlevsmeth
      parameter (nlatsoz = 37, nlevsoz = 34, ntimesoz = 12)
      parameter (nlatsq = 18, nlevsq = 20, ntimesq = 12)
      parameter (nlevsn2o = Nrphys)
      parameter (nlevsmeth = Nrphys)

c "Chemistry State" Variables
c -------------------------
      common /chemistry_vars/ 
     .   co2, cfc11, cfc12, cfc22, ozone, stratq, n2o, methane
      _RL co2
      _RL cfc11
      _RL cfc12
      _RL cfc22
      _RL ozone(nlatsoz,nlevsoz,ntimesoz)
      _RL stratq(nlatsq,nlevsq,ntimesq)
      _RL n2o(nlevsn2o)
      _RL methane(nlevsmeth)
                                                                                  
c Chemistry Exports
c -------------------
      common /chem_exports/ o3, qstr 
      _RL o3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy)
      _RL qstr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy)