src/HOL/Library/Extended_Nonnegative_Real.thy
changeset 81763 2cf8f8e4c1fd
parent 81332 f94b30fa2b6c
child 81804 5a2e05eb7001
--- a/src/HOL/Library/Extended_Nonnegative_Real.thy	Fri Jan 10 21:08:18 2025 +0100
+++ b/src/HOL/Library/Extended_Nonnegative_Real.thy	Sun Jan 12 21:16:09 2025 +0000
@@ -1619,7 +1619,7 @@
   shows "I \<noteq> {} \<Longrightarrow> (SUP i\<in>I. f i + c) = (SUP i\<in>I. f i) + c"
   apply transfer
   apply (simp add: SUP_ereal_add_left)
-  by (metis SUP_upper all_not_in_conv ereal_le_add_mono1 max.absorb2 max.bounded_iff)
+  by (metis SUP_upper all_not_in_conv add_increasing2 max.absorb2 max.bounded_iff)
 
 lemma ennreal_SUP_const_minus:
   fixes f :: "'a \<Rightarrow> ennreal"