diff --git a/mediator/med_diag_mod.F90 b/mediator/med_diag_mod.F90 index 4c9ba6b4..bb0139cc 100644 --- a/mediator/med_diag_mod.F90 +++ b/mediator/med_diag_mod.F90 @@ -2116,8 +2116,6 @@ subroutine med_phases_diag_print(gcomp, rc) if (ChkErr(rc,__LINE__,u_FILE_u)) return if (ESMF_AlarmIsRinging(stop_alarm, rc=rc)) then output_level = max(output_level, budget_print_ltend) - call ESMF_AlarmRingerOff( stop_alarm, rc=rc ) - if (ChkErr(rc,__LINE__,u_FILE_u)) return endif endif