changeset 45166 | 861ab6f9eb2b |
parent 44928 | 7ef6505bde7f |
child 45962 | fc77947a7db4 |
--- a/src/HOL/Finite_Set.thy Tue Oct 18 15:27:17 2011 +0200 +++ b/src/HOL/Finite_Set.thy Tue Oct 18 15:27:18 2011 +0200 @@ -1859,7 +1859,7 @@ by (simp add: card_Suc_Diff1 [symmetric]) lemma card_Diff_singleton_if: - "finite A ==> card (A-{x}) = (if x : A then card A - 1 else card A)" + "finite A ==> card (A - {x}) = (if x : A then card A - 1 else card A)" by (simp add: card_Diff_singleton) lemma card_Diff_insert[simp]: