--- a/src/HOL/Library/Code_Real_Approx_By_Float.thy Wed Jul 17 22:24:20 2019 +0200
+++ b/src/HOL/Library/Code_Real_Approx_By_Float.thy Thu Jul 18 12:06:42 2019 +0200
@@ -199,7 +199,9 @@
"uminus :: real \<Rightarrow> real"
"minus :: real \<Rightarrow> real \<Rightarrow> real"
"times :: real \<Rightarrow> real \<Rightarrow> real"
- "divide :: real \<Rightarrow> real \<Rightarrow> real"]]
+ "divide :: real \<Rightarrow> real \<Rightarrow> real"
+ "(<) :: real \<Rightarrow> real \<Rightarrow> bool"
+ "(\<le>) :: real \<Rightarrow> real \<Rightarrow> bool"]]
lemma [code]: "inverse r = 1 / r" for r :: real
by (fact inverse_eq_divide)