src/HOL/Multivariate_Analysis/Topology_Euclidean_Space.thy
changeset 47755 cb891d9a23c1
parent 46647 714100f5fda4
child 47978 2a1953f0d20d
     1.1 --- a/src/HOL/Multivariate_Analysis/Topology_Euclidean_Space.thy	Mon Mar 12 21:28:10 2012 +0100
     1.2 +++ b/src/HOL/Multivariate_Analysis/Topology_Euclidean_Space.thy	Mon Mar 12 21:34:43 2012 +0100
     1.3 @@ -3175,8 +3175,8 @@
     1.4      have "eventually (\<lambda>n. dist (x n) a < d) sequentially"
     1.5        using x(2) `d>0` by simp
     1.6      hence "eventually (\<lambda>n. (f \<circ> x) n \<in> T) sequentially"
     1.7 -    proof (rule eventually_elim1)
     1.8 -      fix n assume "dist (x n) a < d" thus "(f \<circ> x) n \<in> T"
     1.9 +    proof eventually_elim
    1.10 +      case (elim n) thus ?case
    1.11          using d x(1) `f a \<in> T` unfolding dist_nz[THEN sym] by auto
    1.12      qed
    1.13    }