pkg/fizhi/fizhi_chemistry_coms.h

e337e4ca8c Andr*0001 c Chemistry Variables Dimensions
                0002 c -------------------------------
                0003       integer nlatsoz, nlevsoz, ntimesoz, nlatsq, nlevsq, ntimesq,
                0004      .                              nlevsn2o,nlevsmeth
                0005       parameter (nlatsoz = 37, nlevsoz = 34, ntimesoz = 12)
                0006       parameter (nlatsq = 18, nlevsq = 20, ntimesq = 12)
                0007       parameter (nlevsn2o = Nrphys)
                0008       parameter (nlevsmeth = Nrphys)
9a6b9d7b6d Andr*0009       common /chemistry_grid/ latsoz, levsoz, latsq, levsq
                0010       _RL latsoz(nlatsoz), levsoz(nlevsoz), latsq(nlatsq)
                0011       _RL levsq(nlevsq)
e337e4ca8c Andr*0012
                0013 c "Chemistry State" Variables
                0014 c -------------------------
                0015       common /chemistry_vars/
                0016      .   co2, cfc11, cfc12, cfc22, ozone, stratq, n2o, methane
                0017       _RL co2
                0018       _RL cfc11
                0019       _RL cfc12
                0020       _RL cfc22
                0021       _RL ozone(nlatsoz,nlevsoz,ntimesoz)
                0022       _RL stratq(nlatsq,nlevsq,ntimesq)
                0023       _RL n2o(nlevsn2o)
                0024       _RL methane(nlevsmeth)
9a6b9d7b6d Andr*0025
e337e4ca8c Andr*0026 c Chemistry Exports
                0027 c -------------------
                0028       common /chem_exports/ o3, qstr
86214b2dce Andr*0029       _RL o3(sNx,sNy,Nrphys,Nsx,Nsy)
                0030       _RL qstr(sNx,sNy,Nrphys,Nsx,Nsy)