Turn end of run alarm off

Turn off stop_alarm check when write at end of run restart is called.
NOAA-EMC · May 6, 2024 · 09ca939 · 09ca939
1 parent 0dfc2bb
commit 09ca939
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90 b/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90
@@ -1147,6 +1147,8 @@ subroutine ModelAdvance(gcomp, rc)
        call ESMF_ClockGetAlarm(clock, alarmname='alarm_stop', alarm=alarm, rc=rc)
        if (ChkErr(rc,__LINE__,u_FILE_u)) return
        if (ESMF_AlarmIsRinging(alarm, rc=rc)) force_restart_now = .true.
+       call ESMF_AlarmRingerOff( alarm, rc=rc )
+       if (ChkErr(rc,__LINE__,u_FILE_u)) return
     endif
 
     !--------------------------------