- Timestamp:
- 2020-03-13T17:33:02+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_starthour_obsoper/NEMOGCM/NEMO/OPA_SRC/step.F90
r11883 r12555 379 379 IF( kstp == nit000 ) THEN 380 380 CALL iom_close( numror ) ! close input ocean restart file 381 IF(lwm ) CALL FLUSH ( numond ) ! flush output namelist oce381 IF(lwm .AND. numond /= -1) CALL FLUSH ( numond ) ! flush output namelist oce 382 382 IF( lwm.AND.numoni /= -1 ) CALL FLUSH ( numoni ) ! flush output namelist ice 383 383 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.