- Timestamp:
- 2017-02-20T13:00:57+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/trc.F90
r7331 r7703 267 267 268 268 IF( trc_alloc /= 0 ) CALL ctl_warn('trc_alloc: failed to allocate arrays') 269 270 ! It is known that not intialising SBC_TRC can introduce NaNs 271 sbc_trc(:,:,:) = 0.0 272 269 273 ! 270 274 END FUNCTION trc_alloc
Note: See TracChangeset
for help on using the changeset viewer.