unused (see 1e9e68247ad1);
authorwenzelm
Mon, 25 Jul 2016 14:02:29 +0200
changeset 63548 6c2c16fef8f1
parent 63547 00521f181510
child 63549 b0d31c7def86
unused (see 1e9e68247ad1);
src/HOL/Limits.thy
--- a/src/HOL/Limits.thy	Mon Jul 25 11:30:31 2016 +0200
+++ b/src/HOL/Limits.thy	Mon Jul 25 14:02:29 2016 +0200
@@ -2080,24 +2080,6 @@
 qed
 
 
-subsubsection \<open>Cauchy Sequences are Bounded\<close>
-
-text \<open>
-  A Cauchy sequence is bounded -- this is the standard
-  proof mechanization rather than the nonstandard proof.
-\<close>
-
-lemma lemmaCauchy: "\<forall>n \<ge> M. norm (X M - X n) < (1::real) \<Longrightarrow>
-  \<forall>n \<ge> M. norm (X n :: 'a::real_normed_vector) < 1 + norm (X M)"
-  apply clarify
-  apply (drule spec)
-  apply (drule (1) mp)
-  apply (simp only: norm_minus_commute)
-  apply (drule order_le_less_trans [OF norm_triangle_ineq2])
-  apply simp
-  done
-
-
 subsection \<open>Power Sequences\<close>
 
 text \<open>