Changeset 768 for branches/dev_001_GM/NEMO/TOP_SRC/trc.F90

Timestamp:

2007-12-16T15:46:18+01:00 (16 years ago)

Author:

gm

Message:

dev_001_GM - create 1 trclsm_ module by trc model (CFC, LOBSTER, PISCES..) + some bug corrections

File:

• branches/dev_001_GM/NEMO/TOP_SRC/trc.F90 (modified) (2 diffs)

branches/dev_001_GM/NEMO/TOP_SRC/trc.F90

@@ -10 +10 @@
    !!----------------------------------------------------------------------
    !! NEMO/TOP 1.0 , LOCEAN-IPSL (2005) 
-   !! $Id:$ 
+   !! $Id$ 
    !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
    !!----------------------------------------------------------------------
@@ -139 +139 @@
 # endif
 
-  !!  1D configuration
-  !! --------------------------------------------------
-# if defined key_cfg_1d
-      LOGICAL, PARAMETER ::   lk_trccfg_1d   = .TRUE.   !: 1D pass. tracer configuration flag
-# else   
-      LOGICAL, PARAMETER ::   lk_trccfg_1d   = .FALSE.  !: 1D pass. tracer configuration flag
-# endif
-
 #else
    !!----------------------------------------------------------------------