source:
branches/UKMO/dev_merge_2017_GC_couple_pkg/NEMOGCM/NEMO/TOP_SRC/CFC/trcice_cfc.F90
@
9677
Last change on this file since 9677 was 9677, checked in by dancopsey, 6 years ago | |
---|---|
File size: 1.5 KB |
Rev | Line | |
---|---|---|
[5367] | 1 | MODULE trcice_cfc |
2 | !!====================================================================== | |
3 | !! *** MODULE trcice_cfc *** | |
4 | !! TOP : Main module of the MY_TRC tracers | |
5 | !!====================================================================== | |
6 | !! History : 2.0 ! 2007-12 (C. Ethe, G. Madec) Original code | |
7 | !!---------------------------------------------------------------------- | |
8 | !! trc_ice_cfc : MY_TRC model main routine | |
9 | !!---------------------------------------------------------------------- | |
10 | USE par_trc ! TOP parameters | |
11 | USE oce_trc ! Ocean variables | |
12 | USE trc ! TOP variables | |
13 | ||
14 | IMPLICIT NONE | |
15 | PRIVATE | |
16 | ||
[5434] | 17 | PUBLIC trc_ice_ini_cfc ! called by trcice.F90 module |
[5367] | 18 | |
19 | !!---------------------------------------------------------------------- | |
20 | !! NEMO/TOP 3.3 , NEMO Consortium (2010) | |
[9677] | 21 | !! $Id$ |
[5367] | 22 | !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) |
23 | !!---------------------------------------------------------------------- | |
24 | CONTAINS | |
25 | ||
[5434] | 26 | SUBROUTINE trc_ice_ini_cfc |
[5367] | 27 | !!---------------------------------------------------------------------- |
28 | !! *** trc_ice_cfc *** | |
29 | !! | |
30 | !! ** Purpose : main routine of MY_TRC model | |
31 | !! | |
32 | !! ** Method : - | |
33 | !!---------------------------------------------------------------------- | |
34 | ! | |
35 | ! | |
[5434] | 36 | END SUBROUTINE trc_ice_ini_cfc |
[5367] | 37 | |
38 | !!====================================================================== | |
39 | END MODULE trcice_cfc |
Note: See TracBrowser
for help on using the repository browser.