1 |
molod |
1.6 |
C $Header: /u/gcmpack/MITgcm/pkg/fizhi/fizhi_chemistry_coms.h,v 1.5 2004/06/16 19:22:18 molod Exp $ |
2 |
molod |
1.5 |
C $Name: $ |
3 |
|
|
|
4 |
molod |
1.1 |
c Chemistry Variables Dimensions |
5 |
|
|
c ------------------------------- |
6 |
|
|
integer nlatsoz, nlevsoz, ntimesoz, nlatsq, nlevsq, ntimesq, |
7 |
|
|
. nlevsn2o,nlevsmeth |
8 |
|
|
parameter (nlatsoz = 37, nlevsoz = 34, ntimesoz = 12) |
9 |
|
|
parameter (nlatsq = 18, nlevsq = 20, ntimesq = 12) |
10 |
|
|
parameter (nlevsn2o = Nrphys) |
11 |
|
|
parameter (nlevsmeth = Nrphys) |
12 |
molod |
1.6 |
common /chemistry_grid/ latsoz, levsoz, latsq, levsq |
13 |
|
|
_RL latsoz(nlatsoz), levsoz(nlevsoz), latsq(nlatsq) |
14 |
|
|
_RL levsq(nlevsq) |
15 |
molod |
1.1 |
|
16 |
|
|
c "Chemistry State" Variables |
17 |
|
|
c ------------------------- |
18 |
|
|
common /chemistry_vars/ |
19 |
|
|
. co2, cfc11, cfc12, cfc22, ozone, stratq, n2o, methane |
20 |
|
|
_RL co2 |
21 |
|
|
_RL cfc11 |
22 |
|
|
_RL cfc12 |
23 |
|
|
_RL cfc22 |
24 |
|
|
_RL ozone(nlatsoz,nlevsoz,ntimesoz) |
25 |
|
|
_RL stratq(nlatsq,nlevsq,ntimesq) |
26 |
|
|
_RL n2o(nlevsn2o) |
27 |
|
|
_RL methane(nlevsmeth) |
28 |
molod |
1.6 |
|
29 |
molod |
1.1 |
c Chemistry Exports |
30 |
|
|
c ------------------- |
31 |
|
|
common /chem_exports/ o3, qstr |
32 |
molod |
1.4 |
_RL o3(sNx,sNy,Nrphys,Nsx,Nsy) |
33 |
|
|
_RL qstr(sNx,sNy,Nrphys,Nsx,Nsy) |