diff -r e7ee815b04bf -r feebdaa346e5 src/HOL/Real.thy --- a/src/HOL/Real.thy Sun Nov 15 07:17:05 2020 +0000 +++ b/src/HOL/Real.thy Sun Nov 15 07:17:06 2020 +0000 @@ -1634,10 +1634,16 @@ text \Quickcheck\ -definition (in term_syntax) +context + includes term_syntax +begin + +definition valterm_ratreal :: "rat \ (unit \ Code_Evaluation.term) \ real \ (unit \ Code_Evaluation.term)" where [code_unfold]: "valterm_ratreal k = Code_Evaluation.valtermify Ratreal {\} k" +end + instantiation real :: random begin