interface Test.QuickCheck where {
infix 1 `classify`;
infixr 0 ==>;
{-# NEED #-}
instance Data.Typeable.Typeable1 Ratio.Ratio;
{-# NEED #-}
instance Data.Typeable.Typeable1 NHC.Internal.IO;
{-# NEED #-}
instance (Data.Typeable.Typeable a) => Data.Typeable.Typeable (Ratio.Ratio a);
{-# NEED #-}
instance (Data.Typeable.Typeable a) => Data.Typeable.Typeable (NHC.Internal.IO a);
{-# NEED #-}
instance Testable Property;
{-# NEED #-}
instance Testable Result;
{-# NEED #-}
instance Testable Prelude.Bool;
{-# NEED #-}
instance Testable ();
{-# NEED #-}
instance (Arbitrary a,Prelude.Show a,Testable b) => Testable (a -> b);
{-# NEED #-}
instance (Arbitrary a,Arbitrary b,Arbitrary c) => Arbitrary (a,b,c);
{-# NEED #-}
instance (Arbitrary a,Arbitrary b,Arbitrary c,Arbitrary d) => Arbitrary (a,b,c,d);
{-# NEED #-}
instance (Arbitrary a) => Arbitrary (Prelude.Maybe a);
{-# NEED #-}
instance Arbitrary Prelude.Integer;
{-# NEED #-}
instance Arbitrary Prelude.Float;
{-# NEED #-}
instance Arbitrary Prelude.Bool;
{-# NEED #-}
instance Arbitrary Prelude.Double;
{-# NEED #-}
instance (Arbitrary a,Arbitrary b) => Arbitrary (Prelude.Either a b);
{-# NEED #-}
instance Arbitrary ();
{-# NEED #-}
instance Arbitrary Prelude.Int;
{-# NEED #-}
instance (Arbitrary a) => Arbitrary [a];
{-# NEED #-}
instance (Arbitrary a,Arbitrary b) => Arbitrary (a,b);
{-# NEED #-}
instance (Arbitrary a,Arbitrary b) => Arbitrary (a -> b);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Fractional (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.RealFrac (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Num (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Real (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Enum (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Ord (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Eq (Ratio.Ratio a);
{-# NEED #-}
instance (Prelude.Read a,Prelude.Integral a) => Prelude.Read (Ratio.Ratio a);
{-# NEED #-}
instance Prelude.Read System.Random.StdGen;
{-# NEED #-}
instance Prelude.Functor Gen;
{-# NEED #-}
instance Prelude.Functor NHC.Internal.IO;
{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Show (Ratio.Ratio a);
{-# NEED #-}
instance Prelude.Show System.Random.StdGen;
{-# NEED #-}
instance (Prelude.Show a) => Prelude.Show (NHC.Internal.IO a);
{-# NEED #-}
instance System.Random.RandomGen System.Random.StdGen;
{-# NEED #-}
instance System.Random.Random Prelude.Char;
{-# NEED #-}
instance System.Random.Random Prelude.Integer;
{-# NEED #-}
instance System.Random.Random Prelude.Float;
{-# NEED #-}
instance System.Random.Random Prelude.Bool;
{-# NEED #-}
instance System.Random.Random Prelude.Double;
{-# NEED #-}
instance System.Random.Random Prelude.Int;
{-# NEED #-}
instance Prelude.Monad Gen;
{-# NEED #-}
instance Prelude.Monad NHC.Internal.IO;
interface Data.Typeable
{-# NEED #-}
class Typeable a;
interface Ratio
{-# NEED Ratio #-}
data (Prelude.Integral a) => Ratio a;
interface ! Test.QuickCheck
{-# NEED check #-}
check{-# 2 #-}::(Testable a) => (Config -> (a -> (NHC.Internal.IO ())));
{-# NEED verboseCheck #-}
verboseCheck{-# 0 #-}::(Testable a) => (a -> (NHC.Internal.IO ()));
{-# NEED quickCheck #-}
quickCheck{-# 0 #-}::(Testable a) => (a -> (NHC.Internal.IO ()));
{-# NEED test #-}
test{-# 0 #-}::(Testable a) => (a -> (NHC.Internal.IO ()));
interface NHC.Internal
{-# NEED IO #-}
newtype {-# #-} IO a;
{-# NEED World #-}
data World;
interface ! Test.QuickCheck
{-# NEED defaultConfig #-}
defaultConfig{-# 0 #-}::Config;
{-# NEED {Config Config configMaxTest configMaxFail configSize configEvery} #-}
data Config
= Config {configMaxTest :: Prelude.Int} {configMaxFail :: Prelude.Int} {configSize :: (Prelude.Int -> Prelude.Int)} {configEvery :: (Prelude.Int -> ([Prelude.String] -> Prelude.String))};
{-# NEED collect #-}
collect{-# 1 #-}::(Prelude.Show a,Testable b) => (a -> (b -> Property));
{-# NEED trivial #-}
trivial{-# 0 #-}::(Testable a) => (Prelude.Bool -> (a -> Property));
{-# NEED classify #-}
classify{-# 2 #-}::(Testable a) => (Prelude.Bool -> (Prelude.String -> (a -> Property)));
{-# NEED label #-}
label{-# 2 #-}::(Testable a) => (Prelude.String -> (a -> Property));
{-# NEED (==>) #-}
(==>){-# 2 #-}::(Testable a) => (Prelude.Bool -> (a -> Property));
{-# NEED forAll #-}
forAll{-# 2 #-}::(Prelude.Show a,Testable b) => ((Gen a) -> ((a -> b) -> Property));
{-# NEED evaluate #-}
evaluate{-# 1 #-}::(Testable a) => (a -> (Gen Result));
{-# NEED {Testable property} #-}
class Testable a where {
property{-# 1 #-}::(a -> Property);
};
{-# NEED {Property} #-}
newtype {-# #-} Property
= Prop (Gen Result);
{-# NEED {Result Result ok stamp arguments} #-}
data Result
= Result {ok :: (Prelude.Maybe Prelude.Bool)} {stamp :: [Prelude.String]} {arguments :: [Prelude.String]};
{-# NEED four #-}
four{-# 1 #-}::(Prelude.Monad a) => ((a b) -> (a (b,b,b,b)));
{-# NEED three #-}
three{-# 1 #-}::(Prelude.Monad a) => ((a b) -> (a (b,b,b)));
{-# NEED two #-}
two{-# 1 #-}::(Prelude.Monad a) => ((a b) -> (a (b,b)));
{-# NEED frequency #-}
frequency{-# 1 #-}::([(Prelude.Int,(Gen a))] -> (Gen a));
{-# NEED oneof #-}
oneof{-# 1 #-}::([(Gen a)] -> (Gen a));
{-# NEED vector #-}
vector{-# 1 #-}::(Arbitrary a) => (Prelude.Int -> (Gen [a]));
{-# NEED {Arbitrary arbitrary coarbitrary} #-}
class Arbitrary a where {
arbitrary{-# 0 #-}::(Gen a);
coarbitrary{-# 2 #-}::(a -> ((Gen b) -> (Gen b)));
};
{-# NEED elements #-}
elements{-# 1 #-}::([a] -> (Gen a));
{-# NEED choose #-}
choose{-# 1 #-}::(System.Random.Random a) => ((a,a) -> (Gen a));
interface System.Random
{-# NEED Random #-}
class Random a;
interface ! Test.QuickCheck
{-# NEED generate #-}
generate{-# 3 #-}::(Prelude.Int -> (System.Random.StdGen -> ((Gen a) -> a)));
{-# NEED variant #-}
variant{-# 2 #-}::(Prelude.Int -> ((Gen a) -> (Gen a)));
{-# NEED promote #-}
promote{-# 1 #-}::((a -> (Gen b)) -> (Gen (a -> b)));
{-# NEED rand #-}
rand{-# 0 #-}::(Gen System.Random.StdGen);
{-# NEED resize #-}
resize{-# 2 #-}::(Prelude.Int -> ((Gen a) -> (Gen a)));
{-# NEED sized #-}
sized{-# 1 #-}::((Prelude.Int -> (Gen a)) -> (Gen a));
{-# NEED {Gen} #-}
newtype {-# #-} Gen a
= Gen (Prelude.Int -> (System.Random.StdGen -> a));
interface System.Random
{-# NEED StdGen #-}
data StdGen;
}
|