MODULE ice_oce
   !!======================================================================
   !!                 ***  MODULE  ice_oce  ***
   !! Ocean - ice  :  ice variables defined in memory 
   !!======================================================================
   !! History :  1.0  !  02-11  (G. Madec)  F90: Free form and module
   !!----------------------------------------------------------------------
#if defined key_lim3 || defined key_lim2
   !!----------------------------------------------------------------------
   !!   'key_lim2' or 'key_lim3'   :               LIM 2.0 or 3.0 ice model
   !!----------------------------------------------------------------------
   USE par_oce         ! ocean parameters

   IMPLICIT NONE
   PRIVATE
 
# if defined  key_lim2
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim2        = .TRUE.    !: LIM-2 ice model
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim3        = .FALSE.   !: no LIM-3
   CHARACTER(len=1), PUBLIC            ::   cice_grid      = 'B'       !: 'B'-grid ice-velocity
# endif
# if defined  key_lim3
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim2        = .FALSE.   !: no LIM-2
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim3        = .TRUE.    !: LIM-3 ice model
   CHARACTER(len=1), PUBLIC            ::   cice_grid      = 'C'       !: 'B'-grid ice-velocity
# endif

   !!----------------------------------------------------------------------
   !! ice-ocean common variables
   !!----------------------------------------------------------------------

# if defined key_lim3
   ! LIM-3                                             !!! ice to ocean fields
   REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   catm_ice   !: cloud cover              !!gm never used
   REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   tatm_ice   !: air temperature          !!gm nothing to do here...
   REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   icethi     !: ice thickness            !!gm never used
# endif
   
   REAL(wp), PUBLIC ::   rdt_ice      !: ice time step
   REAL(wp), PUBLIC ::   dtsd2        !: ice time step divide by 2

#else
   !!----------------------------------------------------------------------
   !!   Default option                      NO LIM 2.0 or 3.0 sea-ice model
   !!----------------------------------------------------------------------
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim2        = .FALSE.  !: no LIM-2 ice model
   LOGICAL         , PUBLIC, PARAMETER ::   lk_lim3        = .FALSE.  !: no LIM-3 ice model
   CHARACTER(len=1), PUBLIC            ::   cice_grid      = 'C'      !: 'B'-grid ice-velocity
#endif

   !!----------------------------------------------------------------------
   !! NEMO/OPA 3.0 , LOCEAN-IPSL (2008) 
   !! $Id$
   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
   !!----------------------------------------------------------------------
END MODULE ice_oce