diff -r 1f0ec5b8135a -r e455cdaac479 src/HOL/Quotient.thy --- a/src/HOL/Quotient.thy Wed Apr 18 15:09:07 2012 +0200 +++ b/src/HOL/Quotient.thy Wed Apr 18 15:48:32 2012 +0200 @@ -34,17 +34,6 @@ shows "((op =) OOO R) = R" by (auto simp add: fun_eq_iff) -subsection {* Respects predicate *} - -definition - Respects :: "('a \ 'a \ bool) \ 'a set" -where - "Respects R = {x. R x x}" - -lemma in_respects: - shows "x \ Respects R \ R x x" - unfolding Respects_def by simp - subsection {* set map (vimage) and set relation *} definition "set_rel R xs ys \ \x y. R x y \ x \ xs \ y \ ys"