diff -r 750c533459b1 -r b5622eef7176 src/HOL/Multivariate_Analysis/Derivative.thy --- a/src/HOL/Multivariate_Analysis/Derivative.thy Fri Jun 26 14:53:15 2015 +0200 +++ b/src/HOL/Multivariate_Analysis/Derivative.thy Fri Jun 26 14:53:28 2015 +0200 @@ -879,7 +879,7 @@ have "\\<^sub>F x1 in ?F. norm (f x1 - f y) \ (\ x1 - \ y) + e * \x1 - y\" (is "\\<^sub>F x1 in ?F. ?le' x1") proof eventually_elim - case elim + case (elim x1) from norm_triangle_ineq2[THEN order_trans, OF elim(1)] have "norm (f x1 - f y) \ norm (f' y) * \x1 - y\ + e2 * \x1 - y\" by (simp add: ac_simps)