Changeset 5411 for trunk/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90
- Timestamp:
- 2015-06-12T19:39:14+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90
r5385 r5411 220 220 221 221 IF ( ( nn_ice_tr >= 0 ) .AND. ln_ironice ) THEN 222 WRITE(numout,*) ' ln_ironice incompatible with nn_ice_tr = ', nn_ice_tr 223 WRITE(numout,*) ' Specify your sea ice iron concentration in nampisice instead ' 224 WRITE(numout,*) ' ln_ironice is forced to .FALSE. ' 225 ln_ironice = .FALSE. 222 IF(lwp) THEN 223 WRITE(numout,*) ' ln_ironice incompatible with nn_ice_tr = ', nn_ice_tr 224 WRITE(numout,*) ' Specify your sea ice iron concentration in nampisice instead ' 225 WRITE(numout,*) ' ln_ironice is forced to .FALSE. ' 226 ln_ironice = .FALSE. 227 ENDIF 226 228 ENDIF 227 229
Note: See TracChangeset
for help on using the changeset viewer.