Changeset 12633 for NEMO/trunk/src/SAS/step.F90
- Timestamp:
- 2020-03-31T17:46:17+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/SAS/step.F90
r12377 r12633 126 126 IF( indic < 0 ) THEN 127 127 CALL ctl_stop( 'step: indic < 0' ) 128 CALL dia_wri_state( 'output.abort', Nnn)128 CALL dia_wri_state( Nnn, 'output.abort' ) 129 129 ENDIF 130 130 IF( kstp == nit000 ) CALL iom_close( numror ) ! close input ocean restart file
Note: See TracChangeset
for help on using the changeset viewer.