source: trunk/NEMOGCM/NEMO/TOP_SRC/AGE/trcice_age.F90 @ 7646

Last change on this file since 7646 was 7041, checked in by cetlod, 5 years ago

ROBUST5_CNRS : implementation of part I of new TOP interface - 1st step -, see ticket #1782

File size: 1.2 KB
Line 
1MODULE trcice_age
2   !!======================================================================
3   !!                         ***  MODULE trcice_age  ***
4   !!======================================================================
5   USE par_trc         ! TOP parameters
6   USE oce_trc         ! Ocean variables
7   USE trc             ! TOP variables
8
9   IMPLICIT NONE
10   PRIVATE
11
12   PUBLIC   trc_ice_ini_age       ! called by trcice.F90 module
13
14   !!----------------------------------------------------------------------
15   !! NEMO/TOP 3.3 , NEMO Consortium (2010)
16   !! $Id: trcice_ageb.F90 4990 2014-12-15 16:42:49Z timgraham $
17   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
18   !!----------------------------------------------------------------------
19CONTAINS
20
21   SUBROUTINE trc_ice_ini_age
22      !!----------------------------------------------------------------------
23      !!                     ***  trc_ice_ageb  ***
24      !!
25      !!----------------------------------------------------------------------
26      !
27      !
28   END SUBROUTINE trc_ice_ini_age
29
30   !!======================================================================
31END MODULE trcice_age
Note: See TracBrowser for help on using the repository browser.