Changeset 7421 for branches/2016/dev_merge_2016/NEMOGCM/NEMO/NST_SRC/agrif_ice.F90

Timestamp:

2016-12-01T18:10:41+01:00 (8 years ago)

Author:

flavoni

Message:

#1811 merge dev_CNRS_MERATOR_2016 with dev_merge_2016 branch

File:

• branches/2016/dev_merge_2016/NEMOGCM/NEMO/NST_SRC/agrif_ice.F90 (modified) (2 diffs)

branches/2016/dev_merge_2016/NEMOGCM/NEMO/NST_SRC/agrif_ice.F90

@@ -5 +5 @@
    !!----------------------------------------------------------------------
    !! History :  3.4  ! 2012-08  (R. Benshila)  Original code
+   !!            3.6  ! 2016-05  (C. Rousset)   Add LIM3 compatibility
    !!----------------------------------------------------------------------
 #if defined key_agrif && defined key_lim2
@@ -59 +60 @@
    END FUNCTION agrif_ice_alloc
 
+#elif defined key_agrif && defined key_lim3
+   !!----------------------------------------------------------------------
+   !!   'key_agrif'                                              AGRIF zoom
+   !!----------------------------------------------------------------------   
+   IMPLICIT NONE
+   PRIVATE 
+
+   INTEGER, PUBLIC ::  u_ice_id, v_ice_id, tra_ice_id
+   INTEGER, PUBLIC ::  lim_nbstep = 0    ! child time position in sea-ice model
+
+   !!----------------------------------------------------------------------
+   !! NEMO/NST 3.6 , NEMO Consortium (2016)
+   !! $Id$
+   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
+   !!----------------------------------------------------------------------
+
 #endif
    !!======================================================================