Changeset 9265 for branches/NERC
- Timestamp:
- 2018-01-19T12:16:23+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_GO6_Carb_Fail_from_GO6_9163/NEMOGCM/NEMO/OPA_SRC/stpctl.F90
r9245 r9265 185 185 ENDIF 186 186 ! 187 IF( ztmin < - 3.) THEN ! we've got a problem187 IF( ztmin < -10.) THEN ! we've got a problem 188 188 IF (lk_mpp) THEN 189 189 CALL mpp_minloc ( tsn(:,:,1,jp_tem),tmask(:,:,1), ztmin, ii,ij ) … … 196 196 IF(lwp) THEN 197 197 WRITE(numout,*) 'stp_ctl:tracer anomaly: ***** WARNING *****' 198 WRITE(numout,*) 'stp_ctl:tracer anomaly: sea surface temperature < - 3C'198 WRITE(numout,*) 'stp_ctl:tracer anomaly: sea surface temperature < -10C' 199 199 WRITE(numout,9700) kt, ztmin, ii, ij 200 200 WRITE(numout,*) 'stp_ctl:tracer anomaly: ***** END OF WARNING *****'
Note: See TracChangeset
for help on using the changeset viewer.