diff -r 5352449209b1 -r 160eaf566bcb src/HOL/Analysis/Path_Connected.thy --- a/src/HOL/Analysis/Path_Connected.thy Mon Oct 07 21:51:31 2019 +0200 +++ b/src/HOL/Analysis/Path_Connected.thy Tue Oct 08 10:26:40 2019 +0000 @@ -3307,7 +3307,7 @@ have "\norm (z + C *\<^sub>R (z-a)) - norm (C *\<^sub>R (z-a))\ \ norm z" by (metis add_diff_cancel norm_triangle_ineq3) moreover have "norm (C *\<^sub>R (z-a)) > norm z + B" - using zna \B>0\ by (simp add: C_def le_max_iff_disj field_simps) + using zna \B>0\ by (simp add: C_def le_max_iff_disj) ultimately have C: "norm (z + C *\<^sub>R (z-a)) > B" by linarith { fix u::real assume u: "0\u" "u\1" and ins: "(1 - u) *\<^sub>R z + u *\<^sub>R (z + C *\<^sub>R (z - a)) \ s"