--- a/src/HOL/SetInterval.thy Sun Feb 15 07:54:46 2009 +0100
+++ b/src/HOL/SetInterval.thy Sun Feb 15 11:26:38 2009 +0100
@@ -568,7 +568,6 @@
apply auto
apply (case_tac xa)
apply auto
-apply (auto simp add: finite_M_bounded_by_nat)
done
lemma card_less_Suc: