Changeset 7068 for branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/PISCES/trcice_pisces.F90
- Timestamp:
- 2016-10-21T17:38:13+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/PISCES/trcice_pisces.F90
r7041 r7068 5 5 !!====================================================================== 6 6 !! History : 3.5 ! 2013 (M. Vancoppenolle, O. Aumont, G. Madec), original code 7 !!----------------------------------------------------------------------8 #if defined key_pisces9 !!----------------------------------------------------------------------10 !! 'key_pisces' PISCES bio-model11 7 !!---------------------------------------------------------------------- 12 8 !! trc_ice_pisces : PISCES fake sea ice model setting … … 276 272 277 273 278 #else279 !!----------------------------------------------------------------------280 !! Dummy module No PISCES biochemical model281 !!----------------------------------------------------------------------282 CONTAINS283 SUBROUTINE trc_ice_ini_pisces ! Empty routine284 END SUBROUTINE trc_ice_ini_pisces285 #endif286 287 274 !!====================================================================== 288 275 END MODULE trcice_pisces
Note: See TracChangeset
for help on using the changeset viewer.