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.
par_pisces.F90 in NEMO/trunk/src/TOP/PISCES – NEMO

source: NEMO/trunk/src/TOP/PISCES/par_pisces.F90 @ 10345

Last change on this file since 10345 was 10068, checked in by nicolasmartin, 6 years ago

First part of modifications to have a common default header : fix typos and SVN keywords properties

  • Property svn:keywords set to Id
File size: 4.4 KB
RevLine 
[935]1MODULE par_pisces
2   !!======================================================================
3   !!                        ***  par_pisces  ***
4   !! TOP :   set the PISCES parameters
5   !!======================================================================
6   !! History :   2.0  !  2007-12  (C. Ethe, G. Madec)  revised architecture
7   !!----------------------------------------------------------------------
8
9   IMPLICIT NONE
10
[3680]11   ! productive layer depth
[7646]12   INTEGER, PUBLIC ::   jpkb       !: first vertical layers where biology is active
13   INTEGER, PUBLIC ::   jpkbm1     !: first vertical layers where biology is active
[3680]14
[935]15   ! assign an index in trc arrays for each LOBSTER prognostic variables
[7646]16   INTEGER, PUBLIC ::   jpdet     !: detritus                   
17   INTEGER, PUBLIC ::   jpdom     !: dissolved organic matter
18   INTEGER, PUBLIC ::   jpdic     !: dissolved inoganic carbon concentration
19   INTEGER, PUBLIC ::   jptal     !: total alkalinity
20   INTEGER, PUBLIC ::   jpoxy     !: oxygen carbon concentration
21   INTEGER, PUBLIC ::   jpcal     !: calcite  concentration
22   INTEGER, PUBLIC ::   jppo4     !: phosphate concentration
23   INTEGER, PUBLIC ::   jppoc     !: small particulate organic phosphate concentration
24   INTEGER, PUBLIC ::   jpsil     !: silicate concentration
25   INTEGER, PUBLIC ::   jpphy     !: phytoplancton concentration
26   INTEGER, PUBLIC ::   jpzoo     !: zooplancton concentration
27   INTEGER, PUBLIC ::   jpdoc     !: dissolved organic carbon concentration
28   INTEGER, PUBLIC ::   jpdia     !: Diatoms Concentration
29   INTEGER, PUBLIC ::   jpmes     !: Mesozooplankton Concentration
30   INTEGER, PUBLIC ::   jpdsi     !: Diatoms Silicate Concentration
31   INTEGER, PUBLIC ::   jpfer     !: Iron Concentration
32   INTEGER, PUBLIC ::   jpbfe     !: Big iron particles Concentration
33   INTEGER, PUBLIC ::   jpgoc     !: big particulate organic phosphate concentration
34   INTEGER, PUBLIC ::   jpsfe     !: Small iron particles Concentration
35   INTEGER, PUBLIC ::   jpdfe     !: Diatoms iron Concentration
36   INTEGER, PUBLIC ::   jpgsi     !: (big) Silicate Concentration
37   INTEGER, PUBLIC ::   jpnfe     !: Nano iron Concentration
38   INTEGER, PUBLIC ::   jpnch     !: Nano Chlorophyll Concentration
39   INTEGER, PUBLIC ::   jpdch     !: Diatoms Chlorophyll Concentration
40   INTEGER, PUBLIC ::   jpno3     !: Nitrates Concentration
41   INTEGER, PUBLIC ::   jpnh4     !: Ammonium Concentration
42   INTEGER, PUBLIC ::   jpdon     !: dissolved organic nitrogen concentration
43   INTEGER, PUBLIC ::   jpdop     !: dissolved organic phosphorus concentration
44   INTEGER, PUBLIC ::   jppon     !: small particulate organic nitrogen concentration
45   INTEGER, PUBLIC ::   jppop     !: small particulate organic phosphorus concentration
46   INTEGER, PUBLIC ::   jpnph     !: small particulate organic phosphorus concentration
47   INTEGER, PUBLIC ::   jppph     !: small particulate organic phosphorus concentration
48   INTEGER, PUBLIC ::   jpndi     !: small particulate organic phosphorus concentration
49   INTEGER, PUBLIC ::   jppdi     !: small particulate organic phosphorus concentration
50   INTEGER, PUBLIC ::   jppic     !: small particulate organic phosphorus concentration
51   INTEGER, PUBLIC ::   jpnpi     !: small particulate organic phosphorus concentration
52   INTEGER, PUBLIC ::   jpppi     !: small particulate organic phosphorus concentration
53   INTEGER, PUBLIC ::   jppfe     !: small particulate organic phosphorus concentration
54   INTEGER, PUBLIC ::   jppch     !: small particulate organic phosphorus concentration
55   INTEGER, PUBLIC ::   jpgon     !: Big nitrogen particles Concentration
56   INTEGER, PUBLIC ::   jpgop     !: Big phosphorus particles Concentration
57   INTEGER, PUBLIC ::   jplgw     !: Weak Ligands
58   INTEGER, PUBLIC ::   jpfep     !: Fe nanoparticle
[935]59
60   !!---------------------------------------------------------------------
61   !!   Default                                   No CFC geochemical model
62   ! Starting/ending PISCES do-loop indices (N.B. no PISCES : jpl_pcs < jpf_pcs the do-loop are never done)
[7646]63   INTEGER, PUBLIC  ::   jp_pcs0  !: First index of PISCES tracers
64   INTEGER, PUBLIC  ::   jp_pcs1  !: Last  index of PISCES tracers
[935]65
[9124]66   !!----------------------------------------------------------------------
[10067]67   !! NEMO/TOP 4.0 , NEMO Consortium (2018)
[9124]68   !! $Id$
[10068]69   !! Software governed by the CeCILL license (see ./LICENSE)
[935]70   !!======================================================================
71END MODULE par_pisces
Note: See TracBrowser for help on using the repository browser.