- Timestamp:
- 2019-11-06T17:01:36+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/fix_sn_cfctl_ticket2328/src/OCE/DOM/daymod.F90
r10068 r11869 277 277 IF( nsec_week > 7*nsecd ) nsec_week = ndt05 ! New week 278 278 279 IF(ln_ctl ) THEN279 IF(ln_ctl .OR. sn_cfctl%l_mppout) THEN 280 280 WRITE(charout,FMT="('kt =', I4,' d/m/y =',I2,I2,I4)") kt, nday, nmonth, nyear 281 281 CALL prt_ctl_info(charout)
Note: See TracChangeset
for help on using the changeset viewer.