- Timestamp:
- 2015-05-13T10:37:43+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/CNRS/dev_r4826_PISCES_QUOTA/NEMOGCM/NEMO/TOP_SRC/TRP/trdmld_trc.F90
r4509 r5266 133 133 SELECT CASE ( nn_ctls_trc ) ! choice of the control surface 134 134 CASE ( -2 ) ; STOP 'trdmld_trc : not ready ' ! -> isopycnal surface (see ???) 135 #if defined key_pisces || defined key_pisces_reduced 135 #if defined key_pisces || defined key_pisces_reduced || defined key_pisces_quota 136 136 CASE ( -1 ) ; nmld_trc(:,:) = neln(:,:) ! -> euphotic layer with light criterion 137 137 #endif
Note: See TracChangeset
for help on using the changeset viewer.