Changeset 881 for branches/dev_001_SBC/NEMO/LIM_SRC/dom_ice.F90

Timestamp:

2008-04-08T11:45:52+02:00 (16 years ago)

Author:

ctlod

Message:

dev_001_SBC: Step I: change cpp ket name key_ice_lim into key_lim2 & change names inside modules with extension _2, see ticket: #110

File:

• branches/dev_001_SBC/NEMO/LIM_SRC/dom_ice.F90 (modified) (3 diffs)

branches/dev_001_SBC/NEMO/LIM_SRC/dom_ice.F90

@@ -1 @@
-MODULE dom_ice
+MODULE dom_ice_2
    !!======================================================================
    !!                   ***  MODULE  dom_ice  ***
-   !! LIM Sea Ice :   Domain  variables
+   !! LIM 2.0 Sea Ice :   Domain  variables
    !!======================================================================
    !! History :   2.0  !  03-08  (C. Ethe)  Free form and module
    !!----------------------------------------------------------------------
-
+#if defined key_lim2
    !!----------------------------------------------------------------------
    !!   LIM 2.0, UCL-LOCEAN-IPSL (2005)
@@ -12 +12 @@
    !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
    !!----------------------------------------------------------------------
-   USE par_ice
+   USE par_ice_2
 
    IMPLICIT NONE
@@ -33 +33 @@
 
    !!======================================================================
-END MODULE dom_ice
+#endif
+END MODULE dom_ice_2