Changeset 7073 for branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcnam_my_trc.F90
- Timestamp:
- 2016-10-24T12:36:50+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcnam_my_trc.F90
r3680 r7073 5 5 !!====================================================================== 6 6 !! History : 2.0 ! 2007-12 (C. Ethe, G. Madec) Original code 7 !!----------------------------------------------------------------------8 #if defined key_my_trc9 !!----------------------------------------------------------------------10 !! 'key_my_trc' : MY_TRC model11 7 !!---------------------------------------------------------------------- 12 8 !! trc_nam_my_trc : MY_TRC model initialisation … … 43 39 END SUBROUTINE trc_nam_my_trc 44 40 45 #else46 !!----------------------------------------------------------------------47 !! Dummy module : No MY_TRC48 !!----------------------------------------------------------------------49 CONTAINS50 SUBROUTINE trc_nam_my_trc ! Empty routine51 END SUBROUTINE trc_nam_my_trc52 #endif53 41 54 42 !!======================================================================
Note: See TracChangeset
for help on using the changeset viewer.