From 85da107b8917b9c499a52287dd7275fd85e26035 Mon Sep 17 00:00:00 2001 From: Johannes Keller Date: Tue, 3 Jun 2025 15:11:02 +0200 Subject: [PATCH 1/2] add simulation time information for TSMP-PDAF related stop-alarm --- src/eclm/cime_comp_mod.F90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/eclm/cime_comp_mod.F90 b/src/eclm/cime_comp_mod.F90 index 3a343a7bd5..034010f1b4 100644 --- a/src/eclm/cime_comp_mod.F90 +++ b/src/eclm/cime_comp_mod.F90 @@ -4125,6 +4125,7 @@ subroutine cime_run() if (iamroot_CPLID) then write(logunit,*) ' ' write(logunit,103) subname,' NOTE: Stopping from TSMP-PDAF alarm ntsteps' + write(logunit,104) ' TSMP-PDAF alarm at ',ymd,tod write(logunit,*) ' ' endif stop_alarm = .true. From b8d847e721143803cc7c9644a0e6725797f09a9e Mon Sep 17 00:00:00 2001 From: Johannes Keller Date: Thu, 5 Jun 2025 14:27:40 +0200 Subject: [PATCH 2/2] TSMP-PDAF alarm statement includes model data in single line --- src/eclm/cime_comp_mod.F90 | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/eclm/cime_comp_mod.F90 b/src/eclm/cime_comp_mod.F90 index 034010f1b4..4d6681d442 100644 --- a/src/eclm/cime_comp_mod.F90 +++ b/src/eclm/cime_comp_mod.F90 @@ -4124,8 +4124,7 @@ subroutine cime_run() if (present(ntsteps) .and. counter == ntsteps) then if (iamroot_CPLID) then write(logunit,*) ' ' - write(logunit,103) subname,' NOTE: Stopping from TSMP-PDAF alarm ntsteps' - write(logunit,104) ' TSMP-PDAF alarm at ',ymd,tod + write(logunit,'(A, A, i10.8, i8)') subname,' NOTE: Stopping from TSMP-PDAF alarm ntsteps at model date = ',ymd,tod write(logunit,*) ' ' endif stop_alarm = .true.