Changeset 5566 for trunk/NEMOGCM/NEMO/OPA_SRC/DIA
- Timestamp:
- 2015-07-08T15:15:40+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/DIA/diawri.F90
r5463 r5566 438 438 zdt = rdt 439 439 IF( nacc == 1 ) zdt = rdtmin 440 IF( ln_mskland ) THEN ; clop = "only(x)" ! put 1.e+20 on land (very expensive!!) 441 ELSE ; clop = "x" ! no use of the mask value (require less cpu time) 442 ENDIF 440 clop = "x" ! no use of the mask value (require less cpu time and otherwise the model crashes) 443 441 #if defined key_diainstant 444 442 zsto = nwrite * zdt
Note: See TracChangeset
for help on using the changeset viewer.