Changeset 11129 for NEMO/branches/2019/ENHANCE-03_domcfg/src/daymod.f90
- Timestamp:
- 2019-06-18T17:11:36+02:00 (5 years ago)
- Location:
- NEMO/branches/2019/ENHANCE-03_domcfg
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/ENHANCE-03_domcfg/src/daymod.f90
r10727 r11129 273 273 274 274 IF( nsec_week > 7*nsecd ) nsec_week = ndt05 ! New week 275 276 IF(ln_ctl) THEN277 WRITE(charout,FMT="('kt =', I4,' d/m/y =',I2,I2,I4)") kt, nday, nmonth, nyear278 CALL prt_ctl_info(charout)279 ENDIF280 275 281 276 IF( lrst_oce ) CALL day_rst( kt, 'WRITE' ) ! write day restart information
Note: See TracChangeset
for help on using the changeset viewer.