Changeset 7068 for branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/CFC/par_cfc.F90

Timestamp:

2016-10-21T17:38:13+02:00 (8 years ago)

Author:

cetlod

Message:

ROBUST5_CNRS : implementation of part I of new TOP interface - 1st step -, see ticket #1782

File:

• branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/CFC/par_cfc.F90 (modified) (1 diff)

branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/CFC/par_cfc.F90

@@ -12 +12 @@
 
    IMPLICIT NONE
-
-   INTEGER, PUBLIC  :: jp_cfc            !:  number of CFC passive tracers
-   INTEGER, PUBLIC  :: jpc11, jpc12      !:  index of CFC tracers
    INTEGER, PUBLIC  :: jp_cfc0, jp_cfc1  !:  First/last index of CFC tracers
-
-   LOGICAL, PUBLIC  :: ln_cfc11, ln_cfc12, ll_cfc
 
    !!======================================================================