src/HOL/Rat.thy
changeset 51126 df86080de4cb
parent 50178 ad52ddd35c3a
child 51143 0a2371e7ced3
     1.1 --- a/src/HOL/Rat.thy	Thu Feb 14 17:58:28 2013 +0100
     1.2 +++ b/src/HOL/Rat.thy	Thu Feb 14 15:27:10 2013 +0100
     1.3 @@ -1030,7 +1030,7 @@
     1.4  begin
     1.5  
     1.6  definition
     1.7 -  "Quickcheck.random i = Quickcheck.random i \<circ>\<rightarrow> (\<lambda>num. Random.range i \<circ>\<rightarrow> (\<lambda>denom. Pair (
     1.8 +  "Quickcheck_Random.random i = Quickcheck_Random.random i \<circ>\<rightarrow> (\<lambda>num. Random.range i \<circ>\<rightarrow> (\<lambda>denom. Pair (
     1.9       let j = Code_Numeral.int_of (denom + 1)
    1.10       in valterm_fract num (j, \<lambda>u. Code_Evaluation.term_of j))))"
    1.11