Changeset 1253 for trunk/NEMO/TOP_SRC/CFC/par_cfc.F90

Timestamp:

2009-01-13T10:55:38+01:00 (15 years ago)

Author:

cetlod

Message:

update parameter files to take into account the new C14 bomb tracer model, see ticket:298

File:

• trunk/NEMO/TOP_SRC/CFC/par_cfc.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/CFC/par_cfc.F90

@@ -34 +34 @@
    LOGICAL, PUBLIC, PARAMETER ::   lk_cfc     = .TRUE.      !: CFC flag 
    INTEGER, PUBLIC, PARAMETER ::   jp_cfc     =  2          !: number of passive tracers
-   INTEGER, PUBLIC, PARAMETER ::   jp_cfc_2d  =  0          !: additional 2d output arrays ('key_trc_diaadd')
+   INTEGER, PUBLIC, PARAMETER ::   jp_cfc_2d  =  2          !: additional 2d output arrays ('key_trc_diaadd')
    INTEGER, PUBLIC, PARAMETER ::   jp_cfc_3d  =  0          !: additional 3d output arrays ('key_trc_diaadd')
    INTEGER, PUBLIC, PARAMETER ::   jp_cfc_trd =  0          !: number of sms trends for CFC
    
    ! assign an index in trc arrays for each CFC prognostic variables
-   INTEGER, PUBLIC, PARAMETER ::   jp11       = jp_lp + 1   !: CFC-11 
-   INTEGER, PUBLIC, PARAMETER ::   jp12       = jp_lp + 2   !: CFC-12   
+   INTEGER, PUBLIC, PARAMETER ::   jpc11       = jp_lp + 1   !: CFC-11 
+   INTEGER, PUBLIC, PARAMETER ::   jpc12       = jp_lp + 2   !: CFC-12   
 #else
    !!---------------------------------------------------------------------