Changeset 10675 for branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/NEMO/OPA_SRC/DIA/diawri.F90
- Timestamp:
- 2019-02-13T14:30:01+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/NEMO/OPA_SRC/DIA/diawri.F90
r10020 r10675 1125 1125 #endif 1126 1126 1127 IF (cdfile_name == "output.abort") THEN1128 CALL ctl_stop('MPPSTOP', 'NEMO abort from dia_wri_state')1129 END IF1130 1127 1131 1128 ! IF( nn_timing == 1 ) CALL timing_stop('dia_wri_state') ! not sure this works for routines not called in first timestep
Note: See TracChangeset
for help on using the changeset viewer.