/[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.3 by stephd, Fri Oct 21 20:56:53 2011 UTC revision 1.7 by jahn, Thu May 1 16:19:32 2014 UTC
# Line 36  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 60  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 81  c           have been tried Line 84  c           have been tried
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 92  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 110  c           have been tried Line 121  c           have been tried
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 149  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 174  c           have been tried Line 192  c           have been tried
192           _RL ZoomortSmall2, ZoomortBig2           _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 187  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 221  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.3  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22