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

Last change on this file since 10416 was 10416, checked in by aumont, 20 months ago

Remove LFe from standard PISCES code

  • Property svn:keywords set to Id
File size: 4.3 KB
Line 
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
11   ! productive layer depth
12   INTEGER, PUBLIC ::   jpkb       !: first vertical layers where biology is active
13   INTEGER, PUBLIC ::   jpkbm1     !: first vertical layers where biology is active
14
15   ! assign an index in trc arrays for each LOBSTER prognostic variables
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
59   !!---------------------------------------------------------------------
60   !!   Default                                   No CFC geochemical model
61   ! Starting/ending PISCES do-loop indices (N.B. no PISCES : jpl_pcs < jpf_pcs the do-loop are never done)
62   INTEGER, PUBLIC  ::   jp_pcs0  !: First index of PISCES tracers
63   INTEGER, PUBLIC  ::   jp_pcs1  !: Last  index of PISCES tracers
64
65   !!----------------------------------------------------------------------
66   !! NEMO/TOP 4.0 , NEMO Consortium (2018)
67   !! $Id$
68   !! Software governed by the CeCILL license (see ./LICENSE)
69   !!======================================================================
70END MODULE par_pisces
Note: See TracBrowser for help on using the repository browser.