src/HOL/Rational.thy
changeset 31641 feea4d3d743d
parent 31205 98370b26c2ce
child 31666 760c612ad800
child 31706 1db0c8f235fb
--- a/src/HOL/Rational.thy	Mon Jun 15 11:01:18 2009 +0200
+++ b/src/HOL/Rational.thy	Mon Jun 15 16:13:03 2009 +0200
@@ -1012,7 +1012,7 @@
 begin
 
 definition
-  "random i = random i o\<rightarrow> (\<lambda>num. Random.range i o\<rightarrow> (\<lambda>denom. Pair (
+  "Quickcheck.random i = Quickcheck.random i o\<rightarrow> (\<lambda>num. Random.range i o\<rightarrow> (\<lambda>denom. Pair (
      let j = Code_Numeral.int_of (denom + 1)
      in valterm_fract num (j, \<lambda>u. Code_Eval.term_of j))))"