source: branches/nemo_v3_3_beta/NEMOGCM/NEMO/C1D_SRC/c1d.F90 @ 2382

Last change on this file since 2382 was 2382, checked in by gm, 10 years ago

v3.3beta: C1D - bug correction to compile with key_c1d

  • Property svn:keywords set to Id
File size: 982 bytes
Line 
1MODULE c1d
2   !!======================================================================
3   !!                     ***  MODULE  c1d  ***
4   !! Ocean domain  :  1D configuration
5   !!=====================================================================
6   !! History :   2.0  !  2004-09  (C. Ethe)  Original code
7   !!             3.0  !  2008-04 (G. Madec)  adaptation to SBC
8   !!----------------------------------------------------------------------
9
10   IMPLICIT NONE
11   PRIVATE
12
13#if defined key_c1d
14   LOGICAL, PUBLIC, PARAMETER ::   lk_c1d = .TRUE.    !: 1D config. flag activated
15#else
16   LOGICAL, PUBLIC, PARAMETER ::   lk_c1d = .FALSE.   !: 1D config. flag de-activated
17#endif
18
19   !!----------------------------------------------------------------------
20   !! NEMO/C1D 3.3 , NEMO Consortium (2010)
21   !! $Id$
22   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
23   !!======================================================================
24END MODULE c1d
Note: See TracBrowser for help on using the repository browser.