/[MITgcm]/MITgcm/pkg/fizhi/fizhi_chemistry_coms.h
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/fizhi_chemistry_coms.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.5 by molod, Wed Jun 16 19:22:18 2004 UTC revision 1.6 by molod, Tue Jul 13 21:11:08 2004 UTC
# Line 3  C $Name$ Line 3  C $Name$
3    
4  c Chemistry Variables Dimensions  c Chemistry Variables Dimensions
5  c -------------------------------  c -------------------------------
       common /chemistry_grid/ nlatsoz, nlevsoz, ntimesoz, latsoz, levsoz  
      .  nlatsq, nlevsq, ntimesq, latsq, levsq, nlevsn2o,nlevsmeth  
       _RL latsoz(nlatsoz), levsoz(nlevsoz), latsq(nlatsq), levsq(nlevsq)  
6        integer nlatsoz, nlevsoz, ntimesoz, nlatsq, nlevsq, ntimesq,        integer nlatsoz, nlevsoz, ntimesoz, nlatsq, nlevsq, ntimesq,
7       .                              nlevsn2o,nlevsmeth       .                              nlevsn2o,nlevsmeth
8        parameter (nlatsoz = 37, nlevsoz = 34, ntimesoz = 12)        parameter (nlatsoz = 37, nlevsoz = 34, ntimesoz = 12)
9        parameter (nlatsq = 18, nlevsq = 20, ntimesq = 12)        parameter (nlatsq = 18, nlevsq = 20, ntimesq = 12)
10        parameter (nlevsn2o = Nrphys)        parameter (nlevsn2o = Nrphys)
11        parameter (nlevsmeth = Nrphys)        parameter (nlevsmeth = Nrphys)
12          common /chemistry_grid/ latsoz, levsoz, latsq, levsq
13          _RL latsoz(nlatsoz), levsoz(nlevsoz), latsq(nlatsq)
14          _RL levsq(nlevsq)
15    
16  c "Chemistry State" Variables  c "Chemistry State" Variables
17  c -------------------------  c -------------------------
# Line 25  c ------------------------- Line 25  c -------------------------
25        _RL stratq(nlatsq,nlevsq,ntimesq)        _RL stratq(nlatsq,nlevsq,ntimesq)
26        _RL n2o(nlevsn2o)        _RL n2o(nlevsn2o)
27        _RL methane(nlevsmeth)        _RL methane(nlevsmeth)
28                                                                                      
29  c Chemistry Exports  c Chemistry Exports
30  c -------------------  c -------------------
31        common /chem_exports/ o3, qstr        common /chem_exports/ o3, qstr
32        _RL o3(sNx,sNy,Nrphys,Nsx,Nsy)        _RL o3(sNx,sNy,Nrphys,Nsx,Nsy)
33        _RL qstr(sNx,sNy,Nrphys,Nsx,Nsy)        _RL qstr(sNx,sNy,Nrphys,Nsx,Nsy)
   
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22