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