Changeset 5666 for branches/UKMO/2015_CO6_CO5_shelfdiagnostic/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcice_my_trc.F90
- Timestamp:
- 2015-08-04T14:45:33+02:00 (9 years ago)
- File:
-
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/2015_CO6_CO5_shelfdiagnostic/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcice_my_trc.F90
r5386 r5666 16 16 PRIVATE 17 17 18 PUBLIC trc_ice_ my_trc ! called by trcice.F90 module18 PUBLIC trc_ice_ini_my_trc ! called by trcice.F90 module 19 19 20 20 !!---------------------------------------------------------------------- 21 21 !! NEMO/TOP 3.3 , NEMO Consortium (2010) 22 !! $Id : trcice_my_trc.F90 4990 2014-12-15 16:42:49Z timgraham$22 !! $Id$ 23 23 !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) 24 24 !!---------------------------------------------------------------------- 25 25 CONTAINS 26 26 27 SUBROUTINE trc_ice_ my_trc27 SUBROUTINE trc_ice_ini_my_trc 28 28 !!---------------------------------------------------------------------- 29 29 !! *** trc_ice_my_trc *** … … 32 32 ! 33 33 ! 34 END SUBROUTINE trc_ice_ my_trc34 END SUBROUTINE trc_ice_ini_my_trc 35 35 36 36 #else … … 39 39 !!---------------------------------------------------------------------- 40 40 CONTAINS 41 SUBROUTINE trc_ice_ my_trc ! Empty routine42 END SUBROUTINE trc_ice_ my_trc41 SUBROUTINE trc_ice_ini_my_trc ! Empty routine 42 END SUBROUTINE trc_ice_ini_my_trc 43 43 #endif 44 44
Note: See TracChangeset
for help on using the changeset viewer.