Changeset 10675
- Timestamp:
- 2019-02-13T14:30:01+01:00 (6 years ago)
- Location:
- branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/CONFIG/SHARED/namelist_ref
r10149 r10675 50 50 ln_clobber = .false. ! clobber (overwrite) an existing file 51 51 nn_chunksz = 0 ! chunksize (bytes) for NetCDF file (works only with iom_nf90 routines) 52 nn_abort = 1 ! output the final state (1) or not (0) in case of model error 52 53 / 53 54 ! -
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 -
branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90
r6491 r10675 137 137 NAMELIST/namrun/ cn_ocerst_indir, cn_ocerst_outdir, nn_stocklist, ln_rst_list, & 138 138 & nn_no , cn_exp , cn_ocerst_in, cn_ocerst_out, ln_rstart , ln_rstdate, nn_rstctl, & 139 & nn_it000, nn_itend , nn_date0 , nn_leapy , nn_istate , nn_ stock , &139 & nn_it000, nn_itend , nn_date0 , nn_leapy , nn_istate , nn_abort , nn_stock , & 140 140 & nn_write, ln_dimgnnn, ln_mskland , ln_cfmeta , ln_clobber, nn_chunksz, nn_euler 141 141 NAMELIST/namdom/ nn_bathy, rn_bathy , rn_e3zps_min, rn_e3zps_rat, nn_msh, rn_hmin, & … … 182 182 WRITE(numout,*) ' leap year calendar (0/1) nn_leapy = ', nn_leapy 183 183 WRITE(numout,*) ' initial state output nn_istate = ', nn_istate 184 WRITE(numout,*) ' abort state output nn_abort = ', nn_abort 184 185 IF( ln_rst_list ) THEN 185 186 WRITE(numout,*) ' list of restart dump times nn_stocklist =', nn_stocklist -
branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90
r6491 r10675 40 40 INTEGER :: nn_leapy !: Leap year calendar flag (0/1 or 30) 41 41 INTEGER :: nn_istate !: initial state output flag (0/1) 42 INTEGER :: nn_abort !: Output final state in case of error flag (0/1) 42 43 INTEGER :: nn_write !: model standard output frequency 43 44 INTEGER :: nn_stock !: restart file frequency -
branches/UKMO/dev_r5518_GO6_package_abort_switch/NEMOGCM/NEMO/OPA_SRC/step.F90
r10149 r10675 376 376 IF( indic < 0 ) THEN 377 377 CALL ctl_stop( 'step: indic < 0' ) 378 CALL dia_wri_state( 'output.abort', kstp ) 378 IF( nn_abort ) CALL dia_wri_state( 'output.abort', kstp ) 379 CALL ctl_stop('MPPSTOP', 'NEMO abort from stp') 379 380 ENDIF 380 381 IF( kstp == nit000 ) THEN
Note: See TracChangeset
for help on using the changeset viewer.