Changeset 5666 for branches/UKMO/2015_CO6_CO5_shelfdiagnostic/NEMOGCM/NEMO/TOP_SRC/C14b/trcice_c14b.F90

Timestamp:

2015-08-04T14:45:33+02:00 (9 years ago)

Author:

deazer

Message:

Upgraded branch to VERSION 3 6 STABLE

File:

• branches/UKMO/2015_CO6_CO5_shelfdiagnostic/NEMOGCM/NEMO/TOP_SRC/C14b/trcice_c14b.F90 (copied) (copied from trunk/NEMOGCM/NEMO/TOP_SRC/C14b/trcice_c14b.F90) (3 diffs)

branches/UKMO/2015_CO6_CO5_shelfdiagnostic/NEMOGCM/NEMO/TOP_SRC/C14b/trcice_c14b.F90

@@ -16 +16 @@
    PRIVATE
 
-   PUBLIC   trc_ice_c14b       ! called by trcice.F90 module
+   PUBLIC   trc_ice_ini_c14b       ! called by trcice.F90 module
 
    !!----------------------------------------------------------------------
    !! NEMO/TOP 3.3 , NEMO Consortium (2010)
-   !! $Id: trcice_c14b.F90 4990 2014-12-15 16:42:49Z timgraham $
+   !! $Id$
    !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
    !!----------------------------------------------------------------------
 CONTAINS
 
-   SUBROUTINE trc_ice_c14b
+   SUBROUTINE trc_ice_ini_c14b
       !!----------------------------------------------------------------------
       !!                     ***  trc_ice_c14b  ***
@@ -32 +32 @@
       !
       !
-   END SUBROUTINE trc_ice_c14b
+   END SUBROUTINE trc_ice_ini_c14b
 
 
@@ -40 +40 @@
    !!----------------------------------------------------------------------
 CONTAINS
-   SUBROUTINE trc_ice_c14b             ! Empty routine
-   END SUBROUTINE trc_ice_c14b
+   SUBROUTINE trc_ice_ini_c14b             ! Empty routine
+   END SUBROUTINE trc_ice_ini_c14b
 #endif