/[MITgcm]/MITgcm_contrib/darwin2/pkg/monod/MONOD.h
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/monod/MONOD.h

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

revision 1.2 by stephd, Wed Oct 5 20:37:22 2011 UTC revision 1.7 by jahn, Thu May 1 16:19:32 2014 UTC
# Line 17  c ksat = half sat coeff, phyto specific Line 17  c ksat = half sat coeff, phyto specific
17  c ksatlight = half sat coeff wrt light, phyto specific  c ksatlight = half sat coeff wrt light, phyto specific
18  c graze = grazing rate, phyto specific for each zooplankton  c graze = grazing rate, phyto specific for each zooplankton
19  c mortzoo = mortality rate for each zooplankton  c mortzoo = mortality rate for each zooplankton
20    c mortzoo2 = quadratic mortality rate for each zooplankton
21  c wsink = sinking speed, phyto specific  c wsink = sinking speed, phyto specific
22  c R_XY = stoichiometric ratios of nutrients in phytoplankton  c R_XY = stoichiometric ratios of nutrients in phytoplankton
23  c        specific to each functional group, relative to Phos  c        specific to each functional group, relative to Phos
# Line 35  c           have been tried Line 36  c           have been tried
36           COMMON/darwin_ecoparam/mu,ksatPO4,ksatNO3,ksatNO2,ksatNH4,           COMMON/darwin_ecoparam/mu,ksatPO4,ksatNO3,ksatNO2,ksatNH4,
37       &          ksatSi,ksatFeT,ksatPAR,       &          ksatSi,ksatFeT,ksatPAR,
38       &          mortzoo,wsink,R_NP,R_FeP,R_SiP,R_PC,R_PICPOC, physize,       &          mortzoo,wsink,R_NP,R_FeP,R_SiP,R_PC,R_PICPOC, physize,
39    #ifdef FIX_ZOO_QUOTAS
40         &          R_NP_zoo,R_FeP_zoo,R_SiP_zoo,R_PC_zoo,
41    #endif
42       &          diacoc,diazotroph,zoosize,ExportFracZ,       &          diacoc,diazotroph,zoosize,ExportFracZ,
43       &          Kpremin_P, Kpremin_N, Kpremin_Fe, Kpremin_Si,       &          Kpremin_P, Kpremin_N, Kpremin_Fe, Kpremin_Si,
44       &          sig1,sig2,sig3,       &          sig1,sig2,sig3,
# Line 43  c           have been tried Line 47  c           have been tried
47       &          zooTempCoeff, zooTempExp, zooTempOptimum, kinhib,       &          zooTempCoeff, zooTempExp, zooTempOptimum, kinhib,
48       &          diatomgraz, coccograz, olargegraz,       &          diatomgraz, coccograz, olargegraz,
49       &          mortphy, ExportFracP,       &          mortphy, ExportFracP,
50         &          mortzoo2,
51       &          Smallgrow, Biggrow, Smallmort, Bigmort,       &          Smallgrow, Biggrow, Smallmort, Bigmort,
52       &          Smallgrowrange, Biggrowrange, Smallmortrange,       &          Smallgrowrange, Biggrowrange, Smallmortrange,
53       &          Bigmortrange,       &          Bigmortrange,
# Line 58  c           have been tried Line 63  c           have been tried
63       &          SmallPsatrange, BigPsatrange, ProcPsatrange,       &          SmallPsatrange, BigPsatrange, ProcPsatrange,
64       &          prochlPsat,       &          prochlPsat,
65       &          UniDzPsat, UniDzPsatrange,       &          UniDzPsat, UniDzPsatrange,
66       &          depthdenit, o2crit, denit_np,       &          depthdenit, o2crit, denit_np, denit_no3, no3crit,
67  #ifdef OLD_GRAZE  #ifdef OLD_GRAZE
68       &          graze,       &          graze,
69       &          kgrazesat,       &          kgrazesat,
# Line 75  c           have been tried Line 80  c           have been tried
80       &          hollexp,       &          hollexp,
81  #endif  #endif
82       &          ZoomortSmall, ZoomortBig, ZooexfacSmall, ZooexfacBig,       &          ZoomortSmall, ZoomortBig, ZooexfacSmall, ZooexfacBig,
83         &          ZoomortSmall2, ZoomortBig2,
84       &          val_R_SiP_diatom, val_R_NP_diaz, val_RFeP_diaz,       &          val_R_SiP_diatom, val_R_NP_diaz, val_RFeP_diaz,
85       &          val_R_NP, val_RFeP, val_R_PC,       &          val_R_NP, val_RFeP, val_R_PC,
86       &          val_R_PICPOC,       &          val_R_PICPOC,
87    #ifdef FIX_ZOO_QUOTAS
88         &          val_R_NP_zoo, val_RFeP_zoo, val_R_SiP_zoo, val_R_PC_zoo,
89    #endif
90       &          ksatNH4fac, ksatNO2fac, val_ksatsi,       &          ksatNH4fac, ksatNO2fac, val_ksatsi,
91       &          ngrowfac, ilight,       &          ngrowfac, ilight,
92       &          phymin, PAR0, diaz_growfac,       &          phymin, PAR0, diaz_growfac,
# Line 89  c           have been tried Line 98  c           have been tried
98  #ifdef PART_SCAV  #ifdef PART_SCAV
99       &         ,scav_rat, scav_inter, scav_exp       &         ,scav_rat, scav_inter, scav_exp
100  #endif  #endif
101    #ifdef ALLOW_CDOM
102         &         , fraccdom, cdomdegrd, cdombleach, PARcdom
103         &         , rnp_cdom, rfep_cdom, rcp_cdom
104         &         , cdomcoeff
105    #endif
106       &         ,nsource,ngroups       &         ,nsource,ngroups
107            
108           _RL mu(npmax)           _RL mu(npmax)
# Line 100  c           have been tried Line 114  c           have been tried
114           _RL ksatFeT(npmax)           _RL ksatFeT(npmax)
115           _RL ksatPAR(npmax)           _RL ksatPAR(npmax)
116           _RL mortzoo(nzmax)           _RL mortzoo(nzmax)
117             _RL mortzoo2(nzmax)
118           _RL wsink(npmax)           _RL wsink(npmax)
119           _RL R_NP(npmax)           _RL R_NP(npmax)
120           _RL R_FeP(npmax)           _RL R_FeP(npmax)
121           _RL R_SiP(npmax)           _RL R_SiP(npmax)
122           _RL R_PC(npmax)           _RL R_PC(npmax)
123           _RL R_PICPOC(npmax)           _RL R_PICPOC(npmax)
124    #ifdef FIX_ZOO_QUOTAS
125             _RL R_NP_zoo(nzmax)
126             _RL R_FeP_zoo(nzmax)
127             _RL R_SiP_zoo(nzmax)
128             _RL R_PC_zoo(nzmax)
129    #endif
130           _RL physize(npmax)           _RL physize(npmax)
131           _RL diacoc(npmax)           _RL diacoc(npmax)
132           _RL diazotroph(npmax)           _RL diazotroph(npmax)
# Line 145  c           have been tried Line 166  c           have been tried
166           _RL UniDzPsat, UniDzPsatrange           _RL UniDzPsat, UniDzPsatrange
167           _RL depthdenit           _RL depthdenit
168           _RL o2crit           _RL o2crit
169           _RL denit_np           _RL denit_np, denit_no3
170             _RL no3crit
171           _RL ksatNH4fac, ksatNO2fac           _RL ksatNH4fac, ksatNO2fac
172           _RL sig1,sig2,sig3           _RL sig1,sig2,sig3
173           _RL val_ksatsi           _RL val_ksatsi
# Line 167  c           have been tried Line 189  c           have been tried
189           _RL hollexp           _RL hollexp
190  #endif  #endif
191           _RL ZoomortSmall, ZoomortBig, ZooexfacSmall, ZooexfacBig           _RL ZoomortSmall, ZoomortBig, ZooexfacSmall, ZooexfacBig
192             _RL ZoomortSmall2, ZoomortBig2
193           _RL val_R_SiP_diatom, val_R_NP_diaz, val_RFeP_diaz,           _RL val_R_SiP_diatom, val_R_NP_diaz, val_RFeP_diaz,
194       &          val_R_NP, val_RFeP, val_R_PC, val_R_PICPOC       &          val_R_NP, val_RFeP, val_R_PC, val_R_PICPOC
195    #ifdef FIX_ZOO_QUOTAS
196             _RL val_R_SiP_zoo, val_R_NP_zoo, val_RFeP_zoo, val_R_PC_zoo
197    #endif
198           _RL ngrowfac,ilight           _RL ngrowfac,ilight
199           _RL phymin           _RL phymin
200           _RL PAR0           _RL PAR0
# Line 182  c           have been tried Line 208  c           have been tried
208  #ifdef PART_SCAV  #ifdef PART_SCAV
209           _RL scav_rat, scav_inter, scav_exp           _RL scav_rat, scav_inter, scav_exp
210  #endif  #endif
211    #ifdef ALLOW_CDOM
212             _RL fraccdom, cdomdegrd, cdombleach, PARcdom
213             _RL rnp_cdom, rfep_cdom, rcp_cdom
214             _RL cdomcoeff
215    #endif
216           INTEGER nsource(npmax)           INTEGER nsource(npmax)
217           INTEGER ngroups           INTEGER ngroups
218    
# Line 216  c    istar          - photoadaptation li Line 246  c    istar          - photoadaptation li
246           COMMON/darwin_diags_param/           COMMON/darwin_diags_param/
247       &          diver_thresh0, diver_thresh1,       &          diver_thresh0, diver_thresh1,
248       &          diver_thresh2, diver_thresh3,       &          diver_thresh2, diver_thresh3,
249       &          diver_thresh4       &          diver_thresh4, shannon_thresh
250    
251           _RL diver_thresh0, diver_thresh1           _RL diver_thresh0, diver_thresh1
252           _RL diver_thresh2, diver_thresh3           _RL diver_thresh2, diver_thresh3
253           _RL diver_thresh4           _RL diver_thresh4, shannon_thresh
254    
255  #ifdef GEIDER  #ifdef GEIDER
256  c ANNA geider by mQyield instead of alpha  c ANNA geider by mQyield instead of alpha

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.7

  ViewVC Help
Powered by ViewVC 1.1.22