# HG changeset patch # User desharna # Date 1742821788 -3600 # Node ID fce6872bd4d2fddf06cde0d2810158b94cdd6df4 # Parent 06c1c163b66c3e281e29ec34bff09c1798f680c6 tuned variable names diff -r 06c1c163b66c -r fce6872bd4d2 src/HOL/Relation.thy --- a/src/HOL/Relation.thy Mon Mar 24 14:09:05 2025 +0100 +++ b/src/HOL/Relation.thy Mon Mar 24 14:09:48 2025 +0100 @@ -216,7 +216,7 @@ 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_on_subset: "reflp_on A R \ B \ A \ reflp_on B R" +lemma reflp_on_subset: "reflp_on B R \ A \ B \ reflp_on A R" using reflp_on_mono_strong . lemma reflp_on_image: "reflp_on (f ` A) R \ reflp_on A (\a b. R (f a) (f b))"