source: branches/2017/dev_merge_2017/NEMOGCM/NEMO/NST_SRC/agrif_ice.F90 @ 9019

Last change on this file since 9019 was 9019, checked in by timgraham, 4 years ago

Merge of dev_CNRS_2017 into branch

  • Property svn:keywords set to Id
File size: 1.4 KB
Line 
1MODULE agrif_ice
2   !!======================================================================
3   !!                       ***  MODULE agrif_ice  ***
4   !! AGRIF :   define in memory AGRIF variables for sea-ice
5   !!----------------------------------------------------------------------
6   !! History :  3.4  ! 2012-08  (R. Benshila)  Original code
7   !!            3.6  ! 2016-05  (C. Rousset)   Add LIM3 compatibility
8   !!----------------------------------------------------------------------
9#if defined key_agrif && defined key_lim3
10   !!----------------------------------------------------------------------
11   !!   'key_agrif'                                              AGRIF zoom
12   !!   'key_lim3'                                       LIM3 sea-ice model
13   !!----------------------------------------------------------------------   
14   IMPLICIT NONE
15   PRIVATE
16
17   INTEGER, PUBLIC ::  u_ice_id, v_ice_id, tra_ice_id
18   INTEGER, PUBLIC ::  lim_nbstep = 0    ! child time position in sea-ice model
19
20   !!----------------------------------------------------------------------
21   !! NEMO/NST 4.0 , NEMO Consortium (2017)
22   !! $Id$
23   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
24   !!----------------------------------------------------------------------
25
26#endif
27   !!======================================================================
28END MODULE agrif_ice
Note: See TracBrowser for help on using the repository browser.