source: NEMO/trunk/src/NST/agrif_ice.F90

Last change on this file was 13216, checked in by rblod, 12 months ago

Merge dev_r12973_AGRIF_CMEMS

  • Property svn:keywords set to Id
File size: 1.4 KB
RevLine 
[3455]1MODULE agrif_ice
2   !!======================================================================
3   !!                       ***  MODULE agrif_ice  ***
4   !! AGRIF :   define in memory AGRIF variables for sea-ice
5   !!----------------------------------------------------------------------
[9656]6   !! History :  3.4   !  2012-08  (R. Benshila)          Original code
7   !!            4.0   !  2018     (C. Rousset)           SI3 compatibility
[3455]8   !!----------------------------------------------------------------------
[9570]9#if defined key_agrif && defined key_si3
[3455]10   !!----------------------------------------------------------------------
11   !!   'key_agrif'                                              AGRIF zoom
[9656]12   !!   'key_si3'                                         SI3 sea-ice model
[7646]13   !!----------------------------------------------------------------------   
14   IMPLICIT NONE
15   PRIVATE
16
17   INTEGER, PUBLIC ::  u_ice_id, v_ice_id, tra_ice_id
[13216]18   INTEGER, PUBLIC ::  u_iceini_id, v_iceini_id, tra_iceini_id
[9872]19   INTEGER, PUBLIC ::  nbstep_ice = 0    ! child time position in sea-ice model
[7646]20
21   !!----------------------------------------------------------------------
[9598]22   !! NEMO/NST 4.0 , NEMO Consortium (2018)
[7646]23   !! $Id$
[10068]24   !! Software governed by the CeCILL license (see ./LICENSE)
[7646]25   !!----------------------------------------------------------------------
26
[3455]27#endif
28   !!======================================================================
29END MODULE agrif_ice
Note: See TracBrowser for help on using the repository browser.