Changeset 226 for trunk/NEMO
- Timestamp:
- 2005-03-18T19:35:02+01:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/domain.F90
r223 r226 299 299 IF( lk_ice_lim ) THEN 300 300 IF(lwp) WRITE(numout,*) ' ice model coupling frequency nfice = ', nfice 301 nfbulk = nfice 302 IF( MOD( rday, nfice*rdt ) /= 0 ) THEN 303 IF(lwp) WRITE(numout,*) ' ' 304 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' 305 IF(lwp) WRITE(numout,*) ' ' 306 ENDIF 301 nfbulk = nfice 302 IF( MOD( rday, nfice*rdt ) /= 0 ) THEN 303 IF(lwp) WRITE(numout,*) ' ' 304 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' 305 IF(lwp) WRITE(numout,*) ' ' 307 306 ENDIF 308 307 IF(lwp) WRITE(numout,*) ' bulk computation frequency nfbulk = ', nfbulk, ' = nfice if ice model used'
Note: See TracChangeset
for help on using the changeset viewer.