| changeset 56541 | 0e3abadbef39 |
| parent 56479 | 91958d4b30f7 |
| child 56889 | 48a745e1bde7 |
--- a/src/HOL/Complex.thy Fri Apr 11 17:53:16 2014 +0200 +++ b/src/HOL/Complex.thy Fri Apr 11 22:53:33 2014 +0200 @@ -394,7 +394,7 @@ shows "((\<lambda>x. Complex (f x) (g x)) ---> Complex a b) F" proof (rule tendstoI) fix r :: real assume "0 < r" - hence "0 < r / sqrt 2" by (simp add: divide_pos_pos) + hence "0 < r / sqrt 2" by simp have "eventually (\<lambda>x. dist (f x) a < r / sqrt 2) F" using `(f ---> a) F` and `0 < r / sqrt 2` by (rule tendstoD) moreover