Changeset 1465 for trunk/NEMO/LIM_SRC_3/ice.F90

Timestamp:

2009-06-11T09:29:51+02:00 (15 years ago)

Author:

smasson

Message:

supress ice_oce module, see ticket:448

File:

• trunk/NEMO/LIM_SRC_3/ice.F90 (modified) (2 diffs)

trunk/NEMO/LIM_SRC_3/ice.F90

@@ -189 +189 @@
    !! * Share Module variables
    !!--------------------------------------------------------------------------
+   REAL(wp), PUBLIC ::   rdt_ice      !: ice time step
+
    INTEGER , PUBLIC ::   &     !!: ** ice-dynamic namelist (namicedyn) **
       nbiter = 1      ,  &     !: number of sub-time steps for relaxation
@@ -298 +300 @@
       fdvolif,   &  !: Total variation of ice volume (only used for outputs)
       rdvonif,   &  !: Lateral Variation of ice volume (only used for outputs)
-      sist   ,   &  !: Average Sea-Ice Surface Temperature (Kelvin ??? degree ??? I don't know)
+      sist   ,   &  !: Average Sea-Ice Surface Temperature (Kelvin)
+      icethi ,   &  !: total ice thickness (for all categories) (only used for outputs)
       t_bo   ,   &  !: Sea-Ice bottom temperature (Kelvin)      
       hicifp ,   &  !: Ice production/melting