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

!!---------------------------------------------------------------------
!!
!!                         COMMON passivetrc.npzd.h
!!                       **************************
!!
!!  purpose :
!!  ---------
!!     INCLUDE COMMON FILE for NPZD biological model
!!
!!  modifications :
!!   -------------
!!      original    : 99-09 (M. Levy) 
!!      additions   : 01-02 (E. Kestenare): add sediment parameters
!!
!!---------------------------------------------------------------------
!!  TOP 1.0 , LOCEAN-IPSL (2005)
!! $Header$
!! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt
!!---------------------------------------------------------------------
!!
!!
!!----------------------------------------------------------------------
!!
!! COMMON/cotbio/ : biological parameters
!! --------------------------------------------
!!
!!      apmin     : minimum phytoplancton concentration (NAMELIST)
!!      azmin     : minimum zooplancton concentration (NAMELIST)
!!      anmin     : minimum nutrients concentration (NAMELIST)
!!      admin     : minimum detritus concentration (NAMELIST)
!!      redf      : redfield ratio c:n (NAMELIST)
!!      slopet    : van t hoff coefficient (NAMELIST)
!!      toptp     : optimal photosynthesis temperature (NAMELIST)
!!      aknut     : half-saturation nutrient (NAMELIST)
!!      rcchl     : standard carbone/chlorophyl ratio (NAMELIST)
!!      rgamma    : phytoplankton exudation fraction (NAMELIST)
!!      toptgz    : optimal temperature for zooplankton growth (NAMELIST)
!!      tmaxgz    : maximal temperature for zooplankton growth (NAMELIST) 
!!      rgz       : widtht of zooplankton temperature FUNCTION (NAMELIST)
!!      rppz      : zooplankton nominal preference for phytoplancton
!!                  food, (NAMELIST)
!!      taus      : maximum specific zooplankton grazing rate (NAMELIST)
!!      aks       : half saturation constant for total zooplankton
!!                  grazing (NAMELIST)
!!      filmax    : maximum mass clearance rate for zooplankton (NAMELIST)
!!      rpnaz     : non-assimilated phytoplankton by zooplancton (NAMELIST) 
!!      rdnaz     : non-assimilated detritus by zooplankton (NAMELIST) 
!!      eggzoo    : minimum for zooplankton concentration (NAMELIST)
!!      tauzn     : zooplancton specific excretion rate (NAMELIST)
!!      tmmaxp    : maximal phytoplancton mortality rate (NAMELIST)
!!      tmminp    : minimal phytoplancton mortality rate (NAMELIST)
!!      tmmaxz    : maximal zooplankton mortality rate (NAMELIST)
!!      tmminz    : minimal zooplankton mortality rate (NAMELIST)
!!      anumin    : nutrient threshold for phytoplankton mortality (NAMELIST)
!!      afdmin    : food threshold for zooplankton mortality (NAMELIST)
!!      taudn     : detrital breakdown rate (NAMELIST)
!!      vsed      : sedimentation speed (NAMELIST)
!!      tmumax    : maximal phytoplankton growth rate (NAMELIST)
!!      aki       : light photosynthesis half saturation constant (NAMELIST)
!!
!!      remine()  : remineralisation trend
!!
!!      tmaxr     : maximum coefficient for passive tracer damping (NAMELIST)
!!      tminr     : minimum coefficient for passive tracer damping (NAMELIST)
!!      remdmp()  : damping coefficient of passive tracers (depth dependant)
!!

      REAL apmin,azmin,anmin,admin,    &
                     redf,slopet,toptp,aknut,rcchl,    &
                     rgamma,toptgz,tmaxgz,rgz,    &
                     rppz,taus,aks,filmax,rpnaz,rdnaz,eggzoo,tauzn,    &
                     tmmaxp,tmminp,tmmaxz,tmminz,anumin,afdmin,taudn,    &
                     vsed,tmumax,aki,    &
                     tmaxr,tminr
      REAL remine(jpi,jpj,jpk)
      REAL remdmp(jpk,jptra)

      COMMON/cotbio/  apmin,azmin,anmin,admin,    &
                     redf,slopet,toptp,aknut,rcchl,    &
                     rgamma,toptgz,tmaxgz,rgz,    &
                     rppz,taus,aks,filmax,rpnaz,rdnaz,eggzoo,tauzn,    &
                     tmmaxp,tmminp,tmmaxz,tmminz,anumin,afdmin,taudn,    &
                     vsed,tmumax,aki,remine,    &
                     tmaxr,tminr,remdmp
!!
#    if defined key_trc_diabio
!!
!!----------------------------------------------------------------------
!!
!! COMMON/cottbd/ : biological trends
!! ------------------------------------------------------------------
!!
!!      ctrbio    : biological trends name (NAMELIST)
!!      ctrbil    : biological trends long name (NAMELIST)
!!      ctrbiu    : biological trends unit (NAMELIST)
!!      trbio()   : biological trends
!!
      CHARACTER*8 ctrbio(jpdiabio)
      CHARACTER*8 ctrbiu(jpdiabio)
      CHARACTER*80 ctrbil(jpdiabio)
      REAL trbio(jpi,jpj,jpk,jpdiabio)

      COMMON/cittbd/ctrbio, ctrbil, ctrbiu

      COMMON/cottbd/trbio
!!
!!    netcdf files and index COMMON biological trends files
!!
!!      nwritebio: time step frequency for biological outputs (NAMELIST)
!!      nitb     : id for additional array output FILE
!!      ndepitb  : id for depth mesh
!!      nhoritb  : id for horizontal mesh
!!
      INTEGER nwritebio,nitb,ndepitb,nhoritb
      COMMON/cibcdf/nwritebio,nitb,ndepitb,nhoritb

#    endif 
!!----------------------------------------------------------------------
!!
!! COMMON/cotopt/ : optical parameters
!! -----------------------------------
!!
!!      xze       : euphotic layer depth
!!      xpar      : par (photosynthetic available radiation)
!!      xkr0      : water coefficient absorption in red (NAMELIST)
!!      xkg0      : water coefficient absorption in green (NAMELIST)
!!      xkrp      : pigment coefficient absorption in red (NAMELIST)
!!      xkgp      : pigment coefficient absorption in green (NAMELIST)
!!      xlr       : exposant for pigment absorption in red (NAMELIST)
!!      xlg       : exposant for pigment absorption in green (NAMELIST)
!!      rpig      : chla/chla+phea ratio (NAMELIST)
!!
      REAL xkr0,xkg0,xkrp,xkgp,xlr,xlg,rpig

      REAL xze(jpi,jpj)
      REAL xpar(jpi,jpj,jpk)
      COMMON/cotopt/xze,xpar,xkr0,xkg0,    &
                     xkgp,xkrp,xlg,xlr,rpig
!!----------------------------------------------------------------------
!!
!! COMMON/cotsedim/ : sediment parameters
!! --------------------------------------
!!
!!      sedlam : time coefficient of POC remineralization in sediments
!!      dmin3  : fraction of sinking POC released at each level
!!      dminl  : fraction of sinking POC released in sediments
!!      sedpoc : mass of POC in sediments
!!      fbod   : rapid sinking particles
!!
!!
      REAL sedlam, sedlostpoc
      REAL dmin3(jpi,jpj,jpk), dminl(jpi,jpj),sedpoc(jpi,jpj)
      REAL fbod(jpi,jpj),cmask(jpi,jpj),areacot

      COMMON/cotsedim/sedlam,dmin3,dminl,sedpoc,fbod,sedlostpoc,    &
     &                cmask, areacot