--- a/src/HOL/Library/Code_Real_Approx_By_Float.thy Tue Jun 20 13:07:44 2017 +0200
+++ b/src/HOL/Library/Code_Real_Approx_By_Float.thy Tue Jun 20 13:07:45 2017 +0200
@@ -33,13 +33,11 @@
constant "0 :: real" \<rightharpoonup>
(SML) "0.0"
and (OCaml) "0.0"
-declare zero_real_code[code_unfold del]
code_printing
constant "1 :: real" \<rightharpoonup>
(SML) "1.0"
and (OCaml) "1.0"
-declare one_real_code[code_unfold del]
code_printing
constant "HOL.equal :: real \<Rightarrow> real \<Rightarrow> bool" \<rightharpoonup>