/[MITgcm]/MITgcm_contrib/darwin2/pkg/monod/monod_init_fixed.F
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/monod/monod_init_fixed.F

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:23 2011 UTC revision 1.5 by stephd, Thu May 31 21:08:25 2012 UTC
# Line 269  c grazing exponential 1= holling 2, 2=ho Line 269  c grazing exponential 1= holling 2, 2=ho
269  c set zoo mortality  c set zoo mortality
270         ZoomortSmall = 1.0 _d 0/(30.0 _d 0*pday)         ZoomortSmall = 1.0 _d 0/(30.0 _d 0*pday)
271         ZoomortBig = 1.0 _d 0/(30.0 _d 0*pday)         ZoomortBig = 1.0 _d 0/(30.0 _d 0*pday)
272           ZoomortSmall2 = 0. _d 0
273           ZoomortBig2 = 0. _d 0
274  c set zoo exportfrac  c set zoo exportfrac
275         ZooexfacSmall = 0.2 _d 0         ZooexfacSmall = 0.2 _d 0
276         ZooexfacBig = 0.7 _d 0         ZooexfacBig = 0.7 _d 0
# Line 305  c sinking rate for particulate matter (m Line 307  c sinking rate for particulate matter (m
307           Pa2Atm      = 1.01325 _d 5           Pa2Atm      = 1.01325 _d 5
308  #endif  #endif
309    
310    #ifdef ALLOW_CDOM
311             fraccdom=2. _d 0 / 100. _d 0
312             cdomdegrd= 1. _d 0 / (200 _d 0 *pday)
313             cdombleach = 1. _d 0 / (15 _d 0 *pday)
314             PARcdom  = 20. _d 0
315             rnp_cdom = 16. _d 0
316             rfep_cdom = 1. _d -3
317             rcp_cdom  = 120. _d 0
318             cdomcoeff = .1 _d -1  / 1.d -4
319    #endif
320    
321  C make sure we have reserved enough space in Ptracers  C make sure we have reserved enough space in Ptracers
322        IF ( nCompZooMax .LT. 4 ) THEN        IF ( nCompZooMax .LT. 4 ) THEN
323          WRITE(msgBuf,'(A,A,I3)')          WRITE(msgBuf,'(A,A,I3)')
# Line 336  c diver3 - fraction of biomass to count Line 349  c diver3 - fraction of biomass to count
349          diver_thresh3=.999 _d 0          diver_thresh3=.999 _d 0
350  c diver4 - fraction of maximum species  c diver4 - fraction of maximum species
351          diver_thresh4=1 _d -5          diver_thresh4=1 _d -5
352    c threshold on total biomass for contributing to Shannon and Simpson ind
353    c (these become large at very small biomass)
354            shannon_thresh = 1 _d -8   ! mmol P m-3
355  #endif  #endif
356    
357  c set up diagnostics  c set up diagnostics

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

  ViewVC Help
Powered by ViewVC 1.1.22