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 | |
---|