Changeset 112 for trunk/NEMO/OPA_SRC
- Timestamp:
- 2004-06-28T16:36:55+02:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/domain.F90
r109 r112 297 297 IF(lwp)WRITE(numout,*) ' ice model coupling frequency nfice = ', nfice 298 298 nfbulk = nfice 299 IF ( MOD( rday, nfice*rdt ) /= 0) THEN 300 IF(lwp)WRITE(numout,*) ' ' 301 IF(lwp)WRITE(numout,*) 'W A R N I N G : nfice is NOT a multiple of the number of time steps in a day' 302 IF(lwp)WRITE(numout,*) ' ' 303 ENDIF 299 304 ENDIF 300 305 IF(lwp)WRITE(numout,*) ' bulk computation frequency nfbulk = ', nfbulk, ' = nfice if ice model used'
Note: See TracChangeset
for help on using the changeset viewer.