Changeset 11914 for NEMO/branches/UKMO/NEMO_4.0.1_GC_couple_pkg/src/OCE/DIA
- Timestamp:
- 2019-11-15T16:21:47+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/UKMO/NEMO_4.0.1_GC_couple_pkg/src/OCE/DIA/diawri.F90
r11913 r11914 934 934 ! 935 935 CALL iom_close( inum ) 936 937 IF (cdfile_name == "output.abort") THEN938 CALL ctl_stop('STOP', 'NEMO abort from dia_wri_state')939 END IF940 941 936 ! 942 937 END SUBROUTINE dia_wri_state
Note: See TracChangeset
for help on using the changeset viewer.