New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
trcice_cfc.F90 in branches/NERC/dev_r5518_NOC_unchanged/NEMOGCM/NEMO/TOP_SRC/CFC – NEMO

source: branches/NERC/dev_r5518_NOC_unchanged/NEMOGCM/NEMO/TOP_SRC/CFC/trcice_cfc.F90 @ 6240

Last change on this file since 6240 was 6240, checked in by jpalmier, 8 years ago

JPALM -- 13-01-2016 -- clean svn_key

File size: 2.1 KB
Line 
1MODULE 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#if defined key_cfc
9   !!----------------------------------------------------------------------
10   !!   'key_cfc'                                               CFC tracers
11   !!----------------------------------------------------------------------
12   !! trc_ice_cfc       : MY_TRC model main routine
13   !!----------------------------------------------------------------------
14   USE par_trc         ! TOP parameters
15   USE oce_trc         ! Ocean variables
16   USE trc             ! TOP variables
17
18   IMPLICIT NONE
19   PRIVATE
20
21   PUBLIC   trc_ice_ini_cfc       ! called by trcice.F90 module
22
23   !!----------------------------------------------------------------------
24   !! NEMO/TOP 3.3 , NEMO Consortium (2010)
25   !! $Id$
26   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
27   !!----------------------------------------------------------------------
28CONTAINS
29
30   SUBROUTINE trc_ice_ini_cfc
31      !!----------------------------------------------------------------------
32      !!                     ***  trc_ice_cfc  ***
33      !!
34      !! ** Purpose :   main routine of MY_TRC model
35      !!
36      !! ** Method  : -
37      !!----------------------------------------------------------------------
38      !
39      !
40   END SUBROUTINE trc_ice_ini_cfc
41
42
43#else
44   !!----------------------------------------------------------------------
45   !!   Dummy module                                        No MY_TRC model
46   !!----------------------------------------------------------------------
47CONTAINS
48   SUBROUTINE trc_ice_ini_cfc             ! Empty routine
49   END SUBROUTINE trc_ice_ini_cfc
50#endif
51
52   !!======================================================================
53END MODULE trcice_cfc
Note: See TracBrowser for help on using the repository browser.