src/HOL/Multivariate_Analysis/Cauchy_Integral_Thm.thy
changeset 61942 f02b26f7d39d
parent 61907 f0c894ab18c9
child 61945 1135b8de26c3
--- a/src/HOL/Multivariate_Analysis/Cauchy_Integral_Thm.thy	Sun Dec 27 17:16:21 2015 +0100
+++ b/src/HOL/Multivariate_Analysis/Cauchy_Integral_Thm.thy	Sun Dec 27 21:46:36 2015 +0100
@@ -4830,7 +4830,7 @@
   case False
   have *: "finite {x. cmod (complex_of_real (2 * real_of_int x * pi) * \<i>) \<le> b + cmod (Ln w)}"
     apply (simp add: norm_mult finite_int_iff_bounded_le)
-    apply (rule_tac x="floor ((b + cmod (Ln w)) / (2*pi))" in exI)
+    apply (rule_tac x="\<lfloor>(b + cmod (Ln w)) / (2*pi)\<rfloor>" in exI)
     apply (auto simp: divide_simps le_floor_iff)
     done
   have [simp]: "\<And>P f. {z. P z \<and> (\<exists>n. z = f n)} = f ` {n. P (f n)}"