Changeset 12504
- Timestamp:
- 2020-03-03T15:03:15+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/UKMO/NEMO_4.0.1_flush_time_step_file/src/OCE/stpctl.F90
r11715 r12504 106 106 IF(lwm .AND. ll_wrtstp) THEN !== current time step ==! ("time.step" file) 107 107 WRITE ( numstp, '(1x, i8)' ) kt 108 CALL FLUSH( numstp ) 108 109 REWIND( numstp ) 109 110 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.