diff -r a9ed5fcc5e39 -r d41a8ba25b67 src/HOL/Integration.thy --- a/src/HOL/Integration.thy Thu May 28 23:03:12 2009 -0700 +++ b/src/HOL/Integration.thy Fri May 29 09:22:56 2009 -0700 @@ -272,7 +272,7 @@ fix x :: real assume "a \ x" and "x \ b" with f' have "DERIV f x :> f'(x)" by simp then have "\r>0. \s>0. \z. z \ x \ \z - x\ < s \ \(f z - f x) / (z - x) - f' x\ < r" - by (simp add: DERIV_iff2 LIM_def) + by (simp add: DERIV_iff2 LIM_eq) with `0 < e` obtain s where "\z. z \ x \ \z - x\ < s \ \(f z - f x) / (z - x) - f' x\ < e/2" and "0 < s" by (drule_tac x="e/2" in spec, auto)