diff -r 0a2a1b6507c1 -r 493b818e8e10 src/HOL/Analysis/Weierstrass_Theorems.thy --- a/src/HOL/Analysis/Weierstrass_Theorems.thy Wed Apr 18 21:12:50 2018 +0100 +++ b/src/HOL/Analysis/Weierstrass_Theorems.thy Wed May 02 13:49:38 2018 +0200 @@ -1376,7 +1376,7 @@ using \polynomial_function g\ by auto show "(\x. \i\B. (g x \ i) *\<^sub>R i) ` S \ T" using \B \ T\ - by (blast intro: real_vector_class.subspace_sum subspace_mul \subspace T\) + by (blast intro: subspace_sum subspace_mul \subspace T\) show "norm (f x - (\i\B. (g x \ i) *\<^sub>R i)) < e" if "x \ S" for x proof - have orth': "pairwise (\i j. orthogonal ((f x \ i) *\<^sub>R i - (g x \ i) *\<^sub>R i)