/[MITgcm]/MITgcm_contrib/darwin2/pkg/quota/QUOTA.h
ViewVC logotype

Annotation of /MITgcm_contrib/darwin2/pkg/quota/QUOTA.h

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


Revision 1.3 - (hide annotations) (download)
Tue May 19 14:32:43 2015 UTC (10 years, 2 months ago) by benw
Branch: MAIN
CVS Tags: ctrb_darwin2_ckpt65w_20160512, ctrb_darwin2_ckpt66g_20170424, ctrb_darwin2_ckpt66k_20171025, ctrb_darwin2_ckpt66n_20180118, ctrb_darwin2_ckpt65v_20160409, ctrb_darwin2_ckpt65s_20160114, ctrb_darwin2_ckpt66d_20170214, ctrb_darwin2_ckpt65m_20150615, ctrb_darwin2_ckpt65q_20151118, ctrb_darwin2_ckpt65o_20150914, ctrb_darwin2_ckpt65p_20151023, ctrb_darwin2_ckpt65z_20160929, ctrb_darwin2_ckpt65n_20150729, ctrb_darwin2_ckpt66h_20170602, ctrb_darwin2_ckpt65x_20160612, ctrb_darwin2_ckpt66f_20170407, ctrb_darwin2_ckpt66a_20161020, ctrb_darwin2_ckpt66b_20161219, ctrb_darwin2_ckpt66j_20170815, ctrb_darwin2_ckpt65y_20160801, ctrb_darwin2_ckpt66c_20170121, ctrb_darwin2_ckpt65t_20160221, ctrb_darwin2_ckpt66o_20180209, ctrb_darwin2_ckpt66e_20170314, ctrb_darwin2_ckpt65u_20160315, ctrb_darwin2_ckpt65r_20151221, ctrb_darwin2_ckpt66i_20170718, ctrb_darwin2_ckpt66l_20171025, ctrb_darwin2_ckpt66m_20171213, HEAD
Changes since 1.2: +13 -12 lines
File MIME type: text/plain
Ben Ward - some superficial structural changes allowing runs with no pfts
         - more significant structural and parameter changes to follow later

1 benw 1.3 C $Header: /u/gcmpack/MITgcm_contrib/darwin2/pkg/quota/QUOTA.h,v 1.2 2012/07/02 09:52:12 benw Exp $
2 jahn 1.1 C $Name: $
3    
4     c QUOTA.h
5     c description: Key parameter arrays for generalized ecosystem quota model
6     c Ben Ward, Summer/Autumn 2009
7     c
8     c adapted from
9     c DARWIN.h
10     c description: Key parameter arrays for generalized ecosystem model
11     c Mick Follows, Scott Grant Fall/Winter 2005
12     c Stephanie Dutkiewicz Spring/Summer 2006
13     c
14     c iimax = no of modelled nutrient elements
15     c npmax = no of "functional groups" of plankton
16     c komax = no of "functional groups" of organic matter
17     c
18     c Parameter arrays
19     c NOTE: list not complete!!
20     c
21     c vmaxi(iimax,npmax) - maximum uptake rate for inorganic nutrients (and DIC)
22     c kn(iimax,npmax) - 1/2 saturation concentration for inorganic nutrient uptake
23     c biosynth - cost of biosynthesis
24     c amminhib - ammonium inhibition
25     c qcarbon(npmax) - Mean cell carbon content
26     c qmin(iomax,npmax) - minimum quota required to sustain growth
27     c qmax(iomax,npmax) - satiated quota (i.e. required for max growth rate)
28     c alphachl(npmax) - chl specific initial slope of PI curve
29     c chl2nmax - maximum cellular chl to nitrogen ratio
30     c pp_opt(npmax) - optimal prd_pry preference ratio
31     c pp_sig(npmax) - std.dev. of prd_pry preference ratio
32     c graz_pref(npmax,npmax) - size ratio based lognormal grazing preference matrix
33     c graz(npmax) - maximum grazing rate of predator
34     c kg(npmax) - 1/2 saturation prey biomass for grazing
35     c hollingtype - exponent of Holling grazing function
36 benw 1.3 c ns - exponent of prey switching function
37 jahn 1.1 c ass_eff - maximum assimilation efficiency
38 benw 1.3 c hill - assimilation shape parameter
39     c Lambda - grazing refuge parameter
40 jahn 1.1 c assim_graz(npmax,npmax) - assimilation efficiency of grazing
41     c beta_graz(iomax-iChl,npmax) - fraction of sloppy feeding to DOM
42     c kexc(iimax,npmax) - biomass specific excretion rate
43     c kmort(npmax) - plankton specific mortality rate
44     c beta_mort(iomax-iChl,npmax) - fraction of nortality to DOM
45     c respiration(npmax) - respiration rate
46     c
47     c biosink(npmax) - plankton sinking rate
48 benw 1.3 c motility(npmax) - ability to avoid sinking
49 jahn 1.1 c orgsink(iimax,komax) - organic matter sinking rate
50     c remin(iomax-iChl,komax) - organic matter remineralisation rate
51     c amm2nrite - ammonium to nitrite oxidation rate
52     c nrite2nrate - nitrite to nitrate oxidation rate
53     c k_w - light attenuation by water
54     c k_chl - light attenuation by chlorophyll
55     c
56     c use_NO3(npmax) - nitrate use on/off
57     c use_Si(npmax) - silicate use on/off
58     c autotrophy(npmax) - degree of autotrophy (1 = pure auto, 0 = pure hetero)
59 benw 1.3 c pft(npmax) - phytoplankton functional type
60 jahn 1.1 c 1=prochlorococcus, 2=synechococcus, 3=small eukaryotes,
61     c 4=diatoms, 5=dinoflagellates, 6=generic grazers
62     c
63     COMMON/quota_ecoparam/
64     & vmaxi,kn,
65     & biosynth,
66     & amminhib,
67     & qcarbon,
68     & qmin,qmax,
69     & alphachl,chl2nmax,
70     & pp_opt,pp_sig,graz_pref,
71     & graz,kg,
72 benw 1.3 & ass_eff,hill,Lambda,
73     & assim_graz,beta_graz,
74 jahn 1.1 & kexc,
75     & kmort,beta_mort,
76     & respiration,
77 benw 1.3 & biosink,orgsink,motility,
78 jahn 1.1 & remin,
79     & autotrophy,
80     & pft,
81     & amm2nrite,nrite2nrate,
82     & k_w,k_chl,
83     & phytoTempCoeff, phytoTempExp1,
84     & phytoTempExp2, phytoTempOptimum, phytoDecayPower,
85     & tempcoeff1, tempcoeff2_small,
86     & tempcoeff2_big, tempcoeff3,
87     & tempmax, temprange, tempnorm, tempdecay,
88     & ngrowfac, ilight,
89     & PAR0,
90 benw 1.2 #ifdef IRON_SED_SOURCE
91     & depthfesed,fesedflux,fesedflux_pcm,
92     #endif
93     #ifdef PART_SCAV
94     & scav_rat, scav_inter, scav_exp,
95     #endif
96 jahn 1.1 & nsource,ngroups,
97     & use_NO3,use_Si,
98 benw 1.3 & hollingtype,ns
99 jahn 1.1
100     _RL vmaxi(iimax,npmax)
101     _RL kn(iimax,npmax)
102     _RL biosynth
103     _RL amminhib
104     _RL qcarbon(npmax)
105     _RL qmin(iomax,npmax)
106     _RL qmax(iomax,npmax)
107     _RL alphachl(npmax)
108     _RL chl2nmax
109     _RL pp_opt(npmax),pp_sig(npmax)
110     _RL graz_pref(npmax,npmax)
111     _RL graz(npmax)
112     _RL kg(npmax)
113 benw 1.3 _RL ass_eff,hill,Lambda
114 jahn 1.1 _RL assim_graz(npmax,npmax)
115     _RL beta_graz(iomax-iChl,npmax)
116     _RL kexc(iimax,npmax)
117     _RL kmort(npmax)
118     _RL beta_mort(iomax-iChl,npmax)
119     _RL respiration(npmax)
120     _RL biosink(npmax)
121 benw 1.3 _RL motility(npmax)
122 jahn 1.1 _RL orgsink(komax)
123     _RL remin(iomax-iChl,komax)
124     c
125     _RL autotrophy(npmax)
126     c
127     _RL amm2nrite
128     _RL nrite2nrate
129     _RL PAR0
130     _RL k_w
131     _RL k_chl
132     _RL phytoTempCoeff(npmax)
133     _RL phytoTempExp1(npmax)
134     _RL phytoTempExp2(npmax)
135     _RL phytoTempOptimum(npmax)
136     _RL phytoDecayPower(npmax)
137     _RL tempcoeff1, tempcoeff2_big
138     _RL tempcoeff2_small, tempcoeff3
139     _RL tempmax, temprange, tempnorm,tempdecay
140     _RL ngrowfac,ilight
141 benw 1.2 #ifdef IRON_SED_SOURCE
142     _RL depthfesed, fesedflux, fesedflux_pcm
143     #endif
144     #ifdef PART_SCAV
145     _RL scav_rat, scav_inter, scav_exp
146     #endif
147 jahn 1.1 INTEGER hollingtype
148 benw 1.3 INTEGER ns
149 jahn 1.1 INTEGER pft(npmax)
150     INTEGER nsource(npmax)
151     INTEGER ngroups
152     INTEGER use_NO3(npmax)
153     INTEGER use_Si(npmax)
154     c
155     c Power law intercepts and exponents, with errors
156     c Note, while most errors are relative (times-divide), some are absolute (plus-minus)
157     COMMON/quota_allometry/biovol,biovolmin,biovfactor,
158     & a_vmaxi, b_vmaxi,
159     & a_kn, b_kn,
160     & a_qcarbon, b_qcarbon,
161     & a_respir, b_respir,
162     & a_qmin, b_qmin,
163     & a_qmax, b_qmax,
164     & a_alphachl, b_alphachl,
165     & a_graz, b_graz,
166     & a_kg, b_kg,
167     & a_prdpry, b_prdpry,
168     & a_kexc, b_kexc,
169     & a_biosink, b_biosink,
170     & a_mort, b_mort,
171     & a_beta_graz, b_beta_graz,
172     & a_beta_mort, b_beta_mort,
173     & ae_vmaxi, be_vmaxi,
174     & ae_kn, be_kn,
175     & ae_qcarbon, be_qcarbon,
176     & ae_respir, be_respir,
177     & ae_qmin, be_qmin,
178     & ae_qmax, be_qmax,
179     & ae_alphachl, be_alphachl,
180     & ae_graz, be_graz,
181     & ae_kg, be_kg,
182     & ae_prdpry, be_prdpry,
183     & ae_kexc, be_kexc,
184     & ae_biosink, be_biosink,
185     & ae_mort, be_mort,
186     & ae_beta_graz,be_beta_graz,
187     & ae_beta_mort,be_beta_mort
188    
189     _RL biovol(npmax),biovolmin,biovfactor
190     _RL a_vmaxi(iimax) ,b_vmaxi(iimax)
191     _RL a_kn(iimax) ,b_kn(iimax)
192     _RL a_qcarbon ,b_qcarbon
193     _RL a_respir ,b_respir
194     _RL a_qmin(iomax) ,b_qmin(iomax)
195     _RL a_qmax(iomax) ,b_qmax(iomax)
196     _RL a_alphachl ,b_alphachl
197     _RL a_graz ,b_graz
198     _RL a_kg ,b_kg
199     _RL a_prdpry ,b_prdpry
200     _RL a_kexc(iomax) ,b_kexc(iomax)
201     _RL a_biosink ,b_biosink
202     _RL a_mort ,b_mort
203     _RL a_beta_graz(iomax-iChl)
204     _RL b_beta_graz(iomax-iChl)
205     _RL a_beta_mort(iomax-iChl)
206     _RL b_beta_mort(iomax-iChl)
207     _RL ae_vmaxi(iimax),be_vmaxi(iimax)
208     _RL ae_kn(iimax) ,be_kn(iimax)
209     _RL ae_qcarbon ,be_qcarbon
210     _RL ae_respir ,be_respir
211     _RL ae_qmin(iomax) ,be_qmin(iomax)
212     _RL ae_qmax(iomax) ,be_qmax(iomax)
213     _RL ae_alphachl ,be_alphachl
214     _RL ae_graz ,be_graz
215     _RL ae_kg ,be_kg
216     _RL ae_prdpry ,be_prdpry
217     _RL ae_kexc(iomax) ,be_kexc(iomax)
218     _RL ae_biosink ,be_biosink
219     _RL ae_mort ,be_mort
220     _RL ae_beta_graz(iomax-iChl)
221     _RL be_beta_graz(iomax-iChl)
222     _RL ae_beta_mort(iomax-iChl)
223     _RL be_beta_mort(iomax-iChl)
224    
225     c ---------------------------------------------------------
226     c k0, kc - light coefficients
227     COMMON/quota_lightparam/ k0, kc, parfrac, parconv
228     _RL k0, kc, parfrac, parconv
229    
230     c chlpmax - chl:p max ratio
231     c chlpmin - chl:p min ratio
232     c istar - photoadaptation light limit
233     c
234     c ---------------------------------------------------------
235     c
236     COMMON/quota_chlparam/ chlpmax, chlpmin, istar
237     _RL chlpmax, chlpmin, istar
238     c
239     c ---------------------------------------------------------
240     c
241     COMMON/quota_diags_param/
242     & diver_thresh0, diver_thresh1,
243     & diver_thresh2, diver_thresh3,
244     & diver_thresh4
245    
246     _RL diver_thresh0, diver_thresh1
247     _RL diver_thresh2, diver_thresh3
248     _RL diver_thresh4
249     c
250     c ---------------------------------------------------------
251     c

  ViewVC Help
Powered by ViewVC 1.1.22