From 29600f0737231d4ecaa6c8e47b45afdd95f65fe2 Mon Sep 17 00:00:00 2001 From: anton-seaice Date: Fri, 20 Mar 2026 08:59:03 +1100 Subject: [PATCH 1/5] icepack debug statements --- cicecore/cicedyn/general/ice_step_mod.F90 | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/cicecore/cicedyn/general/ice_step_mod.F90 b/cicecore/cicedyn/general/ice_step_mod.F90 index 26faa27df..9ae67c5d9 100644 --- a/cicecore/cicedyn/general/ice_step_mod.F90 +++ b/cicecore/cicedyn/general/ice_step_mod.F90 @@ -22,7 +22,7 @@ module ice_step_mod use ice_domain_size, only: max_blocks use ice_exit, only: abort_ice use ice_fileunits, only: nu_diag - use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted + use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted, icepack_configure use icepack_intfc, only: icepack_prep_radiation use icepack_intfc, only: icepack_step_therm1 use icepack_intfc, only: icepack_step_therm2 @@ -620,6 +620,17 @@ subroutine step_therm1 (dt, iblk) enddo endif ! tr_aero + call icepack_warnings_flush(nu_diag) + if (icepack_warnings_aborted()) then + write(nu_diag,*) "iglob, jglob= ", this_block%i_glob(i), ", ", this_block%j_glob(j) + call abort_ice(error_message=subname, & + file=__FILE__, line=__LINE__) + !force CICE to try and continue + ! write(nu_diag,*) "icepack tries to abort, but try to continue" + !call icepack_warnings_setabort(.false.) + call icepack_configure() + endif + enddo ! i enddo ! j From 3f2ef3c799f364262cd95dcac1b3482826bb1550 Mon Sep 17 00:00:00 2001 From: Anton Steketee <79179784+anton-seaice@users.noreply.github.com> Date: Mon, 23 Mar 2026 12:52:56 +1100 Subject: [PATCH 2/5] Force to continue --- cicecore/cicedyn/general/ice_step_mod.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cicecore/cicedyn/general/ice_step_mod.F90 b/cicecore/cicedyn/general/ice_step_mod.F90 index 9ae67c5d9..11f0616de 100644 --- a/cicecore/cicedyn/general/ice_step_mod.F90 +++ b/cicecore/cicedyn/general/ice_step_mod.F90 @@ -623,11 +623,11 @@ subroutine step_therm1 (dt, iblk) call icepack_warnings_flush(nu_diag) if (icepack_warnings_aborted()) then write(nu_diag,*) "iglob, jglob= ", this_block%i_glob(i), ", ", this_block%j_glob(j) - call abort_ice(error_message=subname, & + !call abort_ice(error_message=subname, & file=__FILE__, line=__LINE__) !force CICE to try and continue ! write(nu_diag,*) "icepack tries to abort, but try to continue" - !call icepack_warnings_setabort(.false.) + call icepack_warnings_setabort(.false.) call icepack_configure() endif From 148eeca9824119c5a186bcf8f7b2161dc16aa174 Mon Sep 17 00:00:00 2001 From: Anton Steketee <79179784+anton-seaice@users.noreply.github.com> Date: Mon, 23 Mar 2026 13:28:31 +1100 Subject: [PATCH 3/5] Update ice_step_mod.F90 --- cicecore/cicedyn/general/ice_step_mod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cicecore/cicedyn/general/ice_step_mod.F90 b/cicecore/cicedyn/general/ice_step_mod.F90 index 11f0616de..d73e3d94a 100644 --- a/cicecore/cicedyn/general/ice_step_mod.F90 +++ b/cicecore/cicedyn/general/ice_step_mod.F90 @@ -624,7 +624,7 @@ subroutine step_therm1 (dt, iblk) if (icepack_warnings_aborted()) then write(nu_diag,*) "iglob, jglob= ", this_block%i_glob(i), ", ", this_block%j_glob(j) !call abort_ice(error_message=subname, & - file=__FILE__, line=__LINE__) + !file=__FILE__, line=__LINE__) !force CICE to try and continue ! write(nu_diag,*) "icepack tries to abort, but try to continue" call icepack_warnings_setabort(.false.) From 8c2cb754f4aa6d9cb67a1e6323eb8981ff5c4a1e Mon Sep 17 00:00:00 2001 From: Anton Steketee <79179784+anton-seaice@users.noreply.github.com> Date: Mon, 23 Mar 2026 13:57:53 +1100 Subject: [PATCH 4/5] icepack_warnings_setabort --- cicecore/cicedyn/general/ice_step_mod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cicecore/cicedyn/general/ice_step_mod.F90 b/cicecore/cicedyn/general/ice_step_mod.F90 index d73e3d94a..061c99755 100644 --- a/cicecore/cicedyn/general/ice_step_mod.F90 +++ b/cicecore/cicedyn/general/ice_step_mod.F90 @@ -22,7 +22,7 @@ module ice_step_mod use ice_domain_size, only: max_blocks use ice_exit, only: abort_ice use ice_fileunits, only: nu_diag - use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted, icepack_configure + use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted, icepack_configure, icepack_warnings_setabort use icepack_intfc, only: icepack_prep_radiation use icepack_intfc, only: icepack_step_therm1 use icepack_intfc, only: icepack_step_therm2 From 443a2a4256a8a415a323136291023be2e9660cc9 Mon Sep 17 00:00:00 2001 From: Anton Steketee <79179784+anton-seaice@users.noreply.github.com> Date: Mon, 23 Mar 2026 14:12:53 +1100 Subject: [PATCH 5/5] Update ice_step_mod.F90 --- cicecore/cicedyn/general/ice_step_mod.F90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/cicecore/cicedyn/general/ice_step_mod.F90 b/cicecore/cicedyn/general/ice_step_mod.F90 index 061c99755..2a8976c9b 100644 --- a/cicecore/cicedyn/general/ice_step_mod.F90 +++ b/cicecore/cicedyn/general/ice_step_mod.F90 @@ -22,7 +22,7 @@ module ice_step_mod use ice_domain_size, only: max_blocks use ice_exit, only: abort_ice use ice_fileunits, only: nu_diag - use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted, icepack_configure, icepack_warnings_setabort + use icepack_intfc, only: icepack_warnings_flush, icepack_warnings_aborted, icepack_configure use icepack_intfc, only: icepack_prep_radiation use icepack_intfc, only: icepack_step_therm1 use icepack_intfc, only: icepack_step_therm2 @@ -626,8 +626,8 @@ subroutine step_therm1 (dt, iblk) !call abort_ice(error_message=subname, & !file=__FILE__, line=__LINE__) !force CICE to try and continue - ! write(nu_diag,*) "icepack tries to abort, but try to continue" - call icepack_warnings_setabort(.false.) + write(nu_diag,*) "icepack tries to abort, but try to continue" + !call icepack_warnings_setabort(.false.) call icepack_configure() endif