New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
sms_npzd.h90 in trunk/NEMO/TOP_SRC/SMS – NEMO

source: trunk/NEMO/TOP_SRC/SMS/sms_npzd.h90 @ 186

Last change on this file since 186 was 186, checked in by opalod, 19 years ago

CL + CE : NEMO TRC_SRC start

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 6.5 KB
Line 
1!!---------------------------------------------------------------------
2!!
3!!                         COMMON passivetrc.npzd.h
4!!                       **************************
5!!
6!!  purpose :
7!!  ---------
8!!     INCLUDE COMMON FILE for NPZD biological model
9!!
10!!  modifications :
11!!   -------------
12!!      original    : 99-09 (M. Levy)
13!!      additions   : 01-02 (E. Kestenare): add sediment parameters
14!!
15!!---------------------------------------------------------------------
16!!  opa8, ipsl (11/96)
17!!---------------------------------------------------------------------
18!!
19!!
20!!----------------------------------------------------------------------
21!!
22!! COMMON/cotbio/ : biological parameters
23!! --------------------------------------------
24!!
25!!      apmin     : minimum phytoplancton concentration (NAMELIST)
26!!      azmin     : minimum zooplancton concentration (NAMELIST)
27!!      anmin     : minimum nutrients concentration (NAMELIST)
28!!      admin     : minimum detritus concentration (NAMELIST)
29!!      redf      : redfield ratio c:n (NAMELIST)
30!!      slopet    : van t hoff coefficient (NAMELIST)
31!!      toptp     : optimal photosynthesis temperature (NAMELIST)
32!!      aknut     : half-saturation nutrient (NAMELIST)
33!!      rcchl     : standard carbone/chlorophyl ratio (NAMELIST)
34!!      rgamma    : phytoplankton exudation fraction (NAMELIST)
35!!      toptgz    : optimal temperature for zooplankton growth (NAMELIST)
36!!      tmaxgz    : maximal temperature for zooplankton growth (NAMELIST)
37!!      rgz       : widtht of zooplankton temperature FUNCTION (NAMELIST)
38!!      rppz      : zooplankton nominal preference for phytoplancton
39!!                  food, (NAMELIST)
40!!      taus      : maximum specific zooplankton grazing rate (NAMELIST)
41!!      aks       : half saturation constant for total zooplankton
42!!                  grazing (NAMELIST)
43!!      filmax    : maximum mass clearance rate for zooplankton (NAMELIST)
44!!      rpnaz     : non-assimilated phytoplankton by zooplancton (NAMELIST)
45!!      rdnaz     : non-assimilated detritus by zooplankton (NAMELIST)
46!!      eggzoo    : minimum for zooplankton concentration (NAMELIST)
47!!      tauzn     : zooplancton specific excretion rate (NAMELIST)
48!!      tmmaxp    : maximal phytoplancton mortality rate (NAMELIST)
49!!      tmminp    : minimal phytoplancton mortality rate (NAMELIST)
50!!      tmmaxz    : maximal zooplankton mortality rate (NAMELIST)
51!!      tmminz    : minimal zooplankton mortality rate (NAMELIST)
52!!      anumin    : nutrient threshold for phytoplankton mortality (NAMELIST)
53!!      afdmin    : food threshold for zooplankton mortality (NAMELIST)
54!!      taudn     : detrital breakdown rate (NAMELIST)
55!!      vsed      : sedimentation speed (NAMELIST)
56!!      tmumax    : maximal phytoplankton growth rate (NAMELIST)
57!!      aki       : light photosynthesis half saturation constant (NAMELIST)
58!!
59!!      remine()  : remineralisation trend
60!!
61!!      tmaxr     : maximum coefficient for passive tracer damping (NAMELIST)
62!!      tminr     : minimum coefficient for passive tracer damping (NAMELIST)
63!!      remdmp()  : damping coefficient of passive tracers (depth dependant)
64!!
65
66      REAL apmin,azmin,anmin,admin,    &
67                     redf,slopet,toptp,aknut,rcchl,    &
68                     rgamma,toptgz,tmaxgz,rgz,    &
69                     rppz,taus,aks,filmax,rpnaz,rdnaz,eggzoo,tauzn,    &
70                     tmmaxp,tmminp,tmmaxz,tmminz,anumin,afdmin,taudn,    &
71                     vsed,tmumax,aki,    &
72                     tmaxr,tminr
73      REAL remine(jpi,jpj,jpk)
74      REAL remdmp(jpk,jptra)
75
76      COMMON/cotbio/  apmin,azmin,anmin,admin,    &
77                     redf,slopet,toptp,aknut,rcchl,    &
78                     rgamma,toptgz,tmaxgz,rgz,    &
79                     rppz,taus,aks,filmax,rpnaz,rdnaz,eggzoo,tauzn,    &
80                     tmmaxp,tmminp,tmmaxz,tmminz,anumin,afdmin,taudn,    &
81                     vsed,tmumax,aki,remine,    &
82                     tmaxr,tminr,remdmp
83!!
84#    if defined key_trc_diabio
85!!
86!!----------------------------------------------------------------------
87!!
88!! COMMON/cottbd/ : biological trends
89!! ------------------------------------------------------------------
90!!
91!!      ctrbio    : biological trends name (NAMELIST)
92!!      ctrbil    : biological trends long name (NAMELIST)
93!!      ctrbiu    : biological trends unit (NAMELIST)
94!!      trbio()   : biological trends
95!!
96      CHARACTER*8 ctrbio(jpdiabio)
97      CHARACTER*8 ctrbiu(jpdiabio)
98      CHARACTER*80 ctrbil(jpdiabio)
99      REAL trbio(jpi,jpj,jpk,jpdiabio)
100
101      COMMON/cittbd/ctrbio, ctrbil, ctrbiu
102
103      COMMON/cottbd/trbio
104!!
105!!    netcdf files and index COMMON biological trends files
106!!
107!!      nwritebio: time step frequency for biological outputs (NAMELIST)
108!!      nitb     : id for additional array output FILE
109!!      ndepitb  : id for depth mesh
110!!      nhoritb  : id for horizontal mesh
111!!
112      INTEGER nwritebio,nitb,ndepitb,nhoritb
113      COMMON/cibcdf/nwritebio,nitb,ndepitb,nhoritb
114
115#    endif
116!!----------------------------------------------------------------------
117!!
118!! COMMON/cotopt/ : optical parameters
119!! -----------------------------------
120!!
121!!      xze       : euphotic layer depth
122!!      xpar      : par (photosynthetic available radiation)
123!!      xkr0      : water coefficient absorption in red (NAMELIST)
124!!      xkg0      : water coefficient absorption in green (NAMELIST)
125!!      xkrp      : pigment coefficient absorption in red (NAMELIST)
126!!      xkgp      : pigment coefficient absorption in green (NAMELIST)
127!!      xlr       : exposant for pigment absorption in red (NAMELIST)
128!!      xlg       : exposant for pigment absorption in green (NAMELIST)
129!!      rpig      : chla/chla+phea ratio (NAMELIST)
130!!
131      REAL xkr0,xkg0,xkrp,xkgp,xlr,xlg,rpig
132
133      REAL xze(jpi,jpj)
134      REAL xpar(jpi,jpj,jpk)
135      COMMON/cotopt/xze,xpar,xkr0,xkg0,    &
136                     xkgp,xkrp,xlg,xlr,rpig
137!!----------------------------------------------------------------------
138!!
139!! COMMON/cotsedim/ : sediment parameters
140!! --------------------------------------
141!!
142!!      sedlam : time coefficient of POC remineralization in sediments
143!!      dmin3  : fraction of sinking POC released at each level
144!!      dminl  : fraction of sinking POC released in sediments
145!!      sedpoc : mass of POC in sediments
146!!      fbod   : rapid sinking particles
147!!
148!!
149      REAL sedlam, sedlostpoc
150      REAL dmin3(jpi,jpj,jpk), dminl(jpi,jpj),sedpoc(jpi,jpj)
151      REAL fbod(jpi,jpj),cmask(jpi,jpj),areacot
152
153      COMMON/cotsedim/sedlam,dmin3,dminl,sedpoc,fbod,sedlostpoc,    &
154     &                cmask, areacot
155
Note: See TracBrowser for help on using the repository browser.