Changeset 1229 for trunk/NEMO/LIM_SRC_2/ice_2.F90

Timestamp:

2008-12-01T08:04:11+01:00 (16 years ago)

Author:

smasson

Message:

define restart names in the namelist, see ticket:258

File:

• trunk/NEMO/LIM_SRC_2/ice_2.F90 (modified) (1 diff)

trunk/NEMO/LIM_SRC_2/ice_2.F90

@@ -21 +21 @@
 
    !!* Share parameters namelist (namicerun read in iceini) *
+   CHARACTER(len=32)     , PUBLIC ::   cn_icerst_in  = "restart_ice_in"   !: suffix of ice restart name (input)
+   CHARACTER(len=32)     , PUBLIC ::   cn_icerst_out = "restart_ice"      !: suffix of ice restart name (output)
    LOGICAL               , PUBLIC ::   ln_limdyn     = .TRUE.             !: flag for ice dynamics (T) or not (F)
    LOGICAL               , PUBLIC ::   ln_limdmp     = .FALSE.            !: Ice damping