diff -r 575f8f5c8e31 -r 81c920587d49 src/HOL/Relation.thy --- a/src/HOL/Relation.thy Mon Mar 24 14:04:11 2025 +0100 +++ b/src/HOL/Relation.thy Mon Mar 24 14:05:55 2025 +0100 @@ -264,9 +264,6 @@ lemma reflp_on_mono[mono]: "A \ B \ R \ Q \ reflp_on B R \ reflp_on A Q" by (simp add: reflp_on_mono_strong le_fun_def) -lemma reflp_mono: "reflp R \ (\x y. R x y \ Q x y) \ reflp Q" - using reflp_on_mono_strong[OF _ subset_UNIV] . - lemma (in preorder) reflp_on_le[simp]: "reflp_on A (\)" by (simp add: reflp_onI)