Changeset 5434 for trunk/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcice_my_trc.F90
- Timestamp:
- 2015-06-18T11:05:30+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcice_my_trc.F90
r5385 r5434 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 !!---------------------------------------------------------------------- … … 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 45 45 !!====================================================================== 46 END MODULE trcice_ my_trc46 END MODULE trcice_ini_my_trc
Note: See TracChangeset
for help on using the changeset viewer.