-- Hoogle documentation, generated by Haddock -- See Hoogle, http://www.haskell.org/hoogle/ -- | Testing utilities for the validity library -- -- Note: There are companion instance packages for this library: -- -- @package genvalidity @version 0.9.0.0 -- | GenValidity exists to make tests involving Validity -- types easier and speed up the generation of data for them. -- -- Let's use the example from Data.Validity again: A datatype -- that represents primes. To implement tests for this datatype, we would -- have to be able to generate both primes and non-primes. We could do -- this with (Prime $ arbitrary) suchThat isValid -- but this is tedious and inefficient. -- -- The GenValid type class allows you to specify how to -- (efficiently) generate valid data of the given type to allow for -- easier and quicker testing. Just instantiating GenUnchecked -- already gives you access to a default instance of GenValid -- and GenInvalid but writing custom implementations of these -- functions may speed up the generation of data. -- -- For example, to generate primes, we don't have to consider even -- numbers other than 2. A more efficient implementation could then look -- as follows: -- --
--   instance GenUnchecked Prime where
--       genUnchecked = Prime <$> arbitrary
--   
-- --
--   instance GenValid Prime where
--       genValid = Prime <$>
--          (oneof
--            [ pure 2
--            , ((\y -> 2 * abs y + 1) <$> arbitrary) `suchThat` isPrime)
--            ])
--   
-- -- Typical examples of tests involving validity could look as follows: -- --
--   it "succeeds when given valid input" $ do
--       forAllValid $ \input ->
--           myFunction input `shouldSatisfy` isRight
--   
-- --
--   it "produces valid output when it succeeds" $ do
--       forAllUnchecked $ \input ->
--           case myFunction input of
--               Nothing -> return () -- Can happen
--               Just output -> output `shouldSatisfy` isValid
--   
-- -- Definitely also look at the genvalidity-property and genvalidity-hspec -- packages for more info on how to use this package. module Data.GenValidity -- | A class of types for which truly arbitrary values can be generated. -- --

How to instantiate GenUnchecked

-- -- Step 1: Try to instantiate GenUnchecked via -- Generic. this is probably what you want -- -- An instance of this class can be made automatically if the type in -- question has a Generic instance. This instance will try to use -- genUnchecked to generate all structural sub-parts of the value -- that is being generated. -- -- Example: -- --
--   {-# LANGUAGE DeriveGeneric #-}
--   
--   data MyType = MyType Rational String
--       deriving (Show, Eq, Generic)
--   
--   instance GenUnchecked MyType
--   
-- -- generates something like: -- --
--   instance GenUnchecked MyType where
--       genUnchecked = MyType <$> genUnchecked <*> genUnchecked
--   
-- -- If this is not possible because there is no GenUnchecked -- instance available for one of the sub-parts of your type, then do -- not instantiate GenUnchecked for your type. Just continue -- with GenValid instead. -- -- Step 2: If an instatiation via Generic is not possible, -- then you should emulate what genericGenUnchecked does. This -- means that all sub-parts should be generated using -- genUnchecked. Make sure to generate any possible value, valid -- or not, that can exist at runtime even when taking the existence of -- unsafeCoerce into account. -- --

Warning: Invalid values can be funky

-- -- Some types have serious validity constraints. See Rational for -- example. These can behave very strangely when they are not valid. In -- that case, do not override GenUnchecked such that -- genUnchecked only generates valid values. In that case, do -- not override genUnchecked at all. Instead, use genValid -- from GenValid (see below) instead and consider not -- instantiating GenUnchecked at all. class GenUnchecked a genUnchecked :: GenUnchecked a => Gen a genUnchecked :: (GenUnchecked a, Generic a, GGenUnchecked (Rep a)) => Gen a shrinkUnchecked :: GenUnchecked a => a -> [a] shrinkUnchecked :: (GenUnchecked a, Generic a, GUncheckedRecursivelyShrink (Rep a), GUncheckedSubterms (Rep a) a) => a -> [a] -- | A class of types for which valid values can be generated. -- --

How to instantiate GenValid

-- -- Step 1: Try to instantiate GenValid without overriding -- any functions. This is only possible if your type has a -- GenUnchecked instance. If it doesn't, go to step 2. It is -- possible that, if few values are valid or if validity checking is -- expensive, that the resulting generator is too slow. In that case, go -- to Step 2. -- -- Step 2: Try to instantiate GenValid using the helper -- functions via Generic This involves using -- genValidStructurally to override genValid and using -- shrinkValidStructurally to override shrinkValid. -- Every time you override genValid, you should also override -- shrinkValid -- -- Step 3: If the above is not possible due to lack of a -- Generic instance, then you should emulate what -- genValidStructurally does. This means that all sub-parts should -- be generated using genValid. Make sure to generate any possible -- valid value, but only valid values. -- --

A note about Arbitrary

-- -- If you also write Arbitrary instances for GenValid -- types, it may be best to simply use -- --
--   arbitrary = genValid
--   shrink = shrinkValid
--   
class Validity a => GenValid a -- | Generate a valid datum, this should cover all possible valid values in -- the type -- -- The default implementation is as follows: -- --
--   genValid = genUnchecked `suchThat` isValid
--   
-- -- To speed up testing, it may be a good idea to implement this yourself. -- If you do, make sure that it is possible to generate all possible -- valid data, otherwise your testing may not cover all cases. genValid :: GenValid a => Gen a -- | Generate a valid datum, this should cover all possible valid values in -- the type -- -- The default implementation is as follows: -- --
--   genValid = genUnchecked `suchThat` isValid
--   
-- -- To speed up testing, it may be a good idea to implement this yourself. -- If you do, make sure that it is possible to generate all possible -- valid data, otherwise your testing may not cover all cases. genValid :: (GenValid a, GenUnchecked a) => Gen a -- | Shrink a valid value. -- -- The default implementation is as follows: -- --
--   shrinkValid = filter isValid . shrinkUnchecked
--   
-- -- It is important that this shrinking function only shrinks values to -- valid values. If shrinkValid ever shrinks a value to an invalid -- value, the test that is being shrunk for might fail for a different -- reason than for the reason that it originally failed. This would lead -- to very confusing error messages. shrinkValid :: GenValid a => a -> [a] -- | Shrink a valid value. -- -- The default implementation is as follows: -- --
--   shrinkValid = filter isValid . shrinkUnchecked
--   
-- -- It is important that this shrinking function only shrinks values to -- valid values. If shrinkValid ever shrinks a value to an invalid -- value, the test that is being shrunk for might fail for a different -- reason than for the reason that it originally failed. This would lead -- to very confusing error messages. shrinkValid :: (GenValid a, GenUnchecked a) => a -> [a] -- | A class of types for which invalid values can be generated. -- --

How to instantiate GenInvalid

-- -- Step 1: Realise that you probably do not want to. It makes no -- sense, and serves no purpose, to instantiate GenInvalid for -- types which contain no invalid values. (In fact, the default -- implementation will go into an infinite loop for such types.) You -- should only instantiate GenInvalid if you explicitly want to -- use it to write tests that deal with invalid values, or if you are -- writing a container for parametric values. -- -- Step 2: Instantiate GenInvalid without overriding any -- functions. class Validity a => GenInvalid a -- | Generate an invalid datum, this should cover all possible invalid -- values -- --
--   genInvalid = genUnchecked `suchThat` isInvalid
--   
-- -- To speed up testing, it may be a good idea to implement this yourself. -- If you do, make sure that it is possible to generate all possible -- invalid data, otherwise your testing may not cover all cases. genInvalid :: GenInvalid a => Gen a -- | Generate an invalid datum, this should cover all possible invalid -- values -- --
--   genInvalid = genUnchecked `suchThat` isInvalid
--   
-- -- To speed up testing, it may be a good idea to implement this yourself. -- If you do, make sure that it is possible to generate all possible -- invalid data, otherwise your testing may not cover all cases. genInvalid :: (GenInvalid a, GenUnchecked a) => Gen a shrinkInvalid :: GenInvalid a => a -> [a] shrinkInvalid :: (GenInvalid a, GenUnchecked a) => a -> [a] -- | Generate a valid value by generating all the sub parts using the -- Generic instance, and trying that until a valid value has been -- generated -- --
--   genValidStructurally = genValidStructurallyWithoutExtraChecking `suchThat` isValid
--   
-- -- This is probably the function that you are looking for. If you do use -- this function to override genValid, you probably also want to -- use shrinkValidStructurally to override shrinkValid. genValidStructurally :: (Validity a, Generic a, GGenValid (Rep a)) => Gen a -- | Generate a valid value by generating all the sub parts using the -- Generic instance, -- -- This generator is _not_ guaranteed to generate a valid value. -- -- This is probably _not_ the function that you are looking for when -- overriding genValid _unless_ the type in question has no -- _extra_ validity constraints on top of the validity of its sub parts. genValidStructurallyWithoutExtraChecking :: (Generic a, GGenValid (Rep a)) => Gen a -- | Shrink a term to any of its immediate valid subterms, and also -- recursively shrink all subterms, and then filtering out the results -- that are not valid. -- --
--   shrinkValidStructurally = filter isValid . shrinkValidStructurallyWithoutExtraFiltering
--   
-- -- This is probably the function that you are looking for. shrinkValidStructurally :: (Validity a, Generic a, GValidRecursivelyShrink (Rep a), GValidSubterms (Rep a) a) => a -> [a] -- | Shrink a term to any of its immediate valid subterms, and also -- recursively shrink all subterms. -- -- This shrinking function is _not_ guaranteed to shrink to valid values. -- -- This is probably _not_ the function that you are looking for when -- overriding shrinkValid _unless_ the type in question has no -- _extra_ validity constraints on top of the validity of its sub parts. shrinkValidStructurallyWithoutExtraFiltering :: (Generic a, GValidRecursivelyShrink (Rep a), GValidSubterms (Rep a) a) => a -> [a] -- | upTo generates an integer between 0 (inclusive) and n. upTo :: Int -> Gen Int -- | 'genSplit a' generates a tuple '(b, c)' such that 'b + c' equals -- a. genSplit :: Int -> Gen (Int, Int) -- | 'genSplit3 a' generates a triple '(b, c, d)' such that 'b + c + d' -- equals a. genSplit3 :: Int -> Gen (Int, Int, Int) -- | 'genSplit4 a' generates a quadruple '(b, c, d, e)' such that 'b + c + -- d + e' equals a. genSplit4 :: Int -> Gen (Int, Int, Int, Int) -- | 'genSplit5 a' generates a quintuple '(b, c, d, e, f)' such that 'b + c -- + d + e + f' equals a. genSplit5 :: Int -> Gen (Int, Int, Int, Int, Int) -- | 'arbPartition n' generates a list ls such that 'sum ls' -- equals n. arbPartition :: Int -> Gen [Int] -- | Generates a random permutation of the given list. shuffle :: () => [a] -> Gen [a] -- | A version of listOf that takes size into account more -- accurately. -- -- This generator distributes the size that is is given among the values -- in the list that it generates. genListOf :: Gen a -> Gen [a] shrinkTuple :: (a -> [a]) -> (b -> [b]) -> (a, b) -> [(a, b)] -- | Turn a shrinking function into a function that shrinks tuples. shrinkT2 :: (a -> [a]) -> (a, a) -> [(a, a)] -- | Turn a shrinking function into a function that shrinks triples. shrinkT3 :: (a -> [a]) -> (a, a, a) -> [(a, a, a)] -- | Turn a shrinking function into a function that shrinks quadruples. shrinkT4 :: (a -> [a]) -> (a, a, a, a) -> [(a, a, a, a)] genUtf16SurrogateCodePoint :: Gen Char genericGenUnchecked :: (Generic a, GGenUnchecked (Rep a)) => Gen a class GGenUnchecked f gGenUnchecked :: GGenUnchecked f => Gen (f a) -- | Shrink a term to any of its immediate subterms, and also recursively -- shrink all subterms. genericShrinkUnchecked :: (Generic a, GUncheckedRecursivelyShrink (Rep a), GUncheckedSubterms (Rep a) a) => a -> [a] -- | Recursively shrink all immediate uncheckedSubterms. uncheckedRecursivelyShrink :: (Generic a, GUncheckedRecursivelyShrink (Rep a)) => a -> [a] class GUncheckedRecursivelyShrink f gUncheckedRecursivelyShrink :: GUncheckedRecursivelyShrink f => f a -> [f a] -- | All immediate uncheckedSubterms of a term. uncheckedSubterms :: (Generic a, GUncheckedSubterms (Rep a) a) => a -> [a] class GUncheckedSubterms f a gUncheckedSubterms :: GUncheckedSubterms f a => f a -> [a] class GUncheckedSubtermsIncl f a gUncheckedSubtermsIncl :: GUncheckedSubtermsIncl f a => f a -> [a] class GGenValid f gGenValid :: GGenValid f => Gen (f a) class GValidRecursivelyShrink f gValidRecursivelyShrink :: GValidRecursivelyShrink f => f a -> [f a] -- | All immediate validSubterms of a term. structurallyValidSubterms :: (Generic a, GValidSubterms (Rep a) a) => a -> [a] class GValidSubterms f a gValidSubterms :: GValidSubterms f a => f a -> [a] class GValidSubtermsIncl f a gValidSubtermsIncl :: GValidSubtermsIncl f a => f a -> [a] instance (Data.GenValidity.GValidSubtermsIncl f a, Data.GenValidity.GValidSubtermsIncl g a) => Data.GenValidity.GValidSubterms (f GHC.Generics.:*: g) a instance (Data.GenValidity.GValidSubtermsIncl f a, Data.GenValidity.GValidSubtermsIncl g a) => Data.GenValidity.GValidSubterms (f GHC.Generics.:+: g) a instance Data.GenValidity.GValidSubtermsIncl GHC.Generics.V1 a instance Data.GenValidity.GValidSubtermsIncl GHC.Generics.U1 a instance (Data.GenValidity.GValidSubtermsIncl f a, Data.GenValidity.GValidSubtermsIncl g a) => Data.GenValidity.GValidSubtermsIncl (f GHC.Generics.:*: g) a instance (Data.GenValidity.GValidSubtermsIncl f a, Data.GenValidity.GValidSubtermsIncl g a) => Data.GenValidity.GValidSubtermsIncl (f GHC.Generics.:+: g) a instance Data.GenValidity.GValidSubtermsIncl f a => Data.GenValidity.GValidSubtermsIncl (GHC.Generics.M1 i c f) a instance Data.GenValidity.GValidSubtermsIncl (GHC.Generics.K1 i a) a instance Data.GenValidity.GValidSubtermsIncl (GHC.Generics.K1 i a) b instance Data.GenValidity.GValidSubterms GHC.Generics.V1 a instance Data.GenValidity.GValidSubterms GHC.Generics.U1 a instance Data.GenValidity.GValidSubterms f a => Data.GenValidity.GValidSubterms (GHC.Generics.M1 i c f) a instance Data.GenValidity.GValidSubterms (GHC.Generics.K1 i a) b instance (Data.GenValidity.GValidRecursivelyShrink f, Data.GenValidity.GValidRecursivelyShrink g) => Data.GenValidity.GValidRecursivelyShrink (f GHC.Generics.:*: g) instance (Data.GenValidity.GValidRecursivelyShrink f, Data.GenValidity.GValidRecursivelyShrink g) => Data.GenValidity.GValidRecursivelyShrink (f GHC.Generics.:+: g) instance Data.GenValidity.GValidRecursivelyShrink f => Data.GenValidity.GValidRecursivelyShrink (GHC.Generics.M1 i c f) instance Data.GenValidity.GenValid a => Data.GenValidity.GValidRecursivelyShrink (GHC.Generics.K1 i a) instance Data.GenValidity.GValidRecursivelyShrink GHC.Generics.U1 instance Data.GenValidity.GValidRecursivelyShrink GHC.Generics.V1 instance Data.GenValidity.GGenValid GHC.Generics.U1 instance (Data.GenValidity.GGenValid a, Data.GenValidity.GGenValid b) => Data.GenValidity.GGenValid (a GHC.Generics.:*: b) instance (Data.GenValidity.GGenValid a, Data.GenValidity.GGenValid b) => Data.GenValidity.GGenValid (a GHC.Generics.:+: b) instance Data.GenValidity.GGenValid a => Data.GenValidity.GGenValid (GHC.Generics.M1 i c a) instance Data.GenValidity.GenValid a => Data.GenValidity.GGenValid (GHC.Generics.K1 i a) instance (Data.GenValidity.GUncheckedSubtermsIncl f a, Data.GenValidity.GUncheckedSubtermsIncl g a) => Data.GenValidity.GUncheckedSubterms (f GHC.Generics.:*: g) a instance (Data.GenValidity.GUncheckedSubtermsIncl f a, Data.GenValidity.GUncheckedSubtermsIncl g a) => Data.GenValidity.GUncheckedSubterms (f GHC.Generics.:+: g) a instance Data.GenValidity.GUncheckedSubtermsIncl GHC.Generics.V1 a instance Data.GenValidity.GUncheckedSubtermsIncl GHC.Generics.U1 a instance (Data.GenValidity.GUncheckedSubtermsIncl f a, Data.GenValidity.GUncheckedSubtermsIncl g a) => Data.GenValidity.GUncheckedSubtermsIncl (f GHC.Generics.:*: g) a instance (Data.GenValidity.GUncheckedSubtermsIncl f a, Data.GenValidity.GUncheckedSubtermsIncl g a) => Data.GenValidity.GUncheckedSubtermsIncl (f GHC.Generics.:+: g) a instance Data.GenValidity.GUncheckedSubtermsIncl f a => Data.GenValidity.GUncheckedSubtermsIncl (GHC.Generics.M1 i c f) a instance Data.GenValidity.GUncheckedSubtermsIncl (GHC.Generics.K1 i a) a instance Data.GenValidity.GUncheckedSubtermsIncl (GHC.Generics.K1 i a) b instance (Data.GenValidity.GenValid a, Data.GenValidity.GenValid b) => Data.GenValidity.GenValid (a, b) instance (Data.GenValidity.GenValid a, Data.GenValidity.GenValid b) => Data.GenValidity.GenValid (Data.Either.Either a b) instance (Data.GenValidity.GenValid a, Data.GenValidity.GenValid b, Data.GenValidity.GenValid c) => Data.GenValidity.GenValid (a, b, c) instance (Data.GenValidity.GenValid a, Data.GenValidity.GenValid b, Data.GenValidity.GenValid c, Data.GenValidity.GenValid d) => Data.GenValidity.GenValid (a, b, c, d) instance (Data.GenValidity.GenValid a, Data.GenValidity.GenValid b, Data.GenValidity.GenValid c, Data.GenValidity.GenValid d, Data.GenValidity.GenValid e) => Data.GenValidity.GenValid (a, b, c, d, e) instance Data.GenValidity.GenValid a => Data.GenValidity.GenValid (GHC.Maybe.Maybe a) instance Data.GenValidity.GenValid a => Data.GenValidity.GenValid (GHC.Base.NonEmpty a) instance Data.GenValidity.GenValid a => Data.GenValidity.GenValid [a] instance Data.GenValidity.GenValid () instance Data.GenValidity.GenValid GHC.Types.Bool instance Data.GenValidity.GenValid GHC.Types.Ordering instance Data.GenValidity.GenValid GHC.Types.Char instance Data.GenValidity.GenValid GHC.Types.Int instance Data.GenValidity.GenValid GHC.Int.Int8 instance Data.GenValidity.GenValid GHC.Int.Int16 instance Data.GenValidity.GenValid GHC.Int.Int32 instance Data.GenValidity.GenValid GHC.Int.Int64 instance Data.GenValidity.GenValid GHC.Types.Word instance Data.GenValidity.GenValid GHC.Word.Word8 instance Data.GenValidity.GenValid GHC.Word.Word16 instance Data.GenValidity.GenValid GHC.Word.Word32 instance Data.GenValidity.GenValid GHC.Word.Word64 instance Data.GenValidity.GenValid GHC.Types.Float instance Data.GenValidity.GenValid GHC.Types.Double instance Data.GenValidity.GenValid GHC.Integer.Type.Integer instance Data.GenValidity.GenValid GHC.Natural.Natural instance (GHC.Real.Integral a, GHC.Num.Num a, GHC.Classes.Ord a, Data.GenValidity.GenValid a) => Data.GenValidity.GenValid (GHC.Real.Ratio a) instance Data.Fixed.HasResolution a => Data.GenValidity.GenValid (Data.Fixed.Fixed a) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenInvalid a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenInvalid b) => Data.GenValidity.GenInvalid (a, b) instance (Data.GenValidity.GenInvalid a, Data.GenValidity.GenInvalid b) => Data.GenValidity.GenInvalid (Data.Either.Either a b) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c, Data.GenValidity.GenInvalid a, Data.GenValidity.GenInvalid b, Data.GenValidity.GenInvalid c) => Data.GenValidity.GenInvalid (a, b, c) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c, Data.GenValidity.GenUnchecked d, Data.GenValidity.GenInvalid a, Data.GenValidity.GenInvalid b, Data.GenValidity.GenInvalid c, Data.GenValidity.GenInvalid d) => Data.GenValidity.GenInvalid (a, b, c, d) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c, Data.GenValidity.GenUnchecked d, Data.GenValidity.GenUnchecked e, Data.GenValidity.GenInvalid a, Data.GenValidity.GenInvalid b, Data.GenValidity.GenInvalid c, Data.GenValidity.GenInvalid d, Data.GenValidity.GenInvalid e) => Data.GenValidity.GenInvalid (a, b, c, d, e) instance Data.GenValidity.GenInvalid a => Data.GenValidity.GenInvalid (GHC.Maybe.Maybe a) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenInvalid a) => Data.GenValidity.GenInvalid (GHC.Base.NonEmpty a) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenInvalid a) => Data.GenValidity.GenInvalid [a] instance (GHC.Real.Integral a, GHC.Num.Num a, GHC.Classes.Ord a, Data.Validity.Validity a, Data.GenValidity.GenUnchecked a) => Data.GenValidity.GenInvalid (GHC.Real.Ratio a) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b) => Data.GenValidity.GenUnchecked (a, b) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b) => Data.GenValidity.GenUnchecked (Data.Either.Either a b) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c) => Data.GenValidity.GenUnchecked (a, b, c) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c, Data.GenValidity.GenUnchecked d) => Data.GenValidity.GenUnchecked (a, b, c, d) instance (Data.GenValidity.GenUnchecked a, Data.GenValidity.GenUnchecked b, Data.GenValidity.GenUnchecked c, Data.GenValidity.GenUnchecked d, Data.GenValidity.GenUnchecked e) => Data.GenValidity.GenUnchecked (a, b, c, d, e) instance Data.GenValidity.GenUnchecked a => Data.GenValidity.GenUnchecked (GHC.Maybe.Maybe a) instance Data.GenValidity.GenUnchecked a => Data.GenValidity.GenUnchecked (GHC.Base.NonEmpty a) instance Data.GenValidity.GenUnchecked a => Data.GenValidity.GenUnchecked [a] instance Data.GenValidity.GenUnchecked () instance Data.GenValidity.GenUnchecked GHC.Types.Bool instance Data.GenValidity.GenUnchecked GHC.Types.Ordering instance Data.GenValidity.GenUnchecked GHC.Types.Char instance Data.GenValidity.GenUnchecked GHC.Types.Int instance Data.GenValidity.GenUnchecked GHC.Int.Int8 instance Data.GenValidity.GenUnchecked GHC.Int.Int16 instance Data.GenValidity.GenUnchecked GHC.Int.Int32 instance Data.GenValidity.GenUnchecked GHC.Int.Int64 instance Data.GenValidity.GenUnchecked GHC.Types.Word instance Data.GenValidity.GenUnchecked GHC.Word.Word8 instance Data.GenValidity.GenUnchecked GHC.Word.Word16 instance Data.GenValidity.GenUnchecked GHC.Word.Word32 instance Data.GenValidity.GenUnchecked GHC.Word.Word64 instance Data.GenValidity.GenUnchecked GHC.Types.Float instance Data.GenValidity.GenUnchecked GHC.Types.Double instance Data.GenValidity.GenUnchecked GHC.Integer.Type.Integer instance Data.GenValidity.GenUnchecked GHC.Natural.Natural instance (GHC.Real.Integral a, Data.GenValidity.GenUnchecked a) => Data.GenValidity.GenUnchecked (GHC.Real.Ratio a) instance Data.Fixed.HasResolution a => Data.GenValidity.GenUnchecked (Data.Fixed.Fixed a) instance Data.GenValidity.GenUnchecked a => Data.GenValidity.GGenUnchecked (GHC.Generics.K1 i a) instance Data.GenValidity.GenUnchecked a => Data.GenValidity.GUncheckedRecursivelyShrink (GHC.Generics.K1 i a) instance Data.GenValidity.GUncheckedSubterms GHC.Generics.V1 a instance Data.GenValidity.GUncheckedSubterms GHC.Generics.U1 a instance Data.GenValidity.GUncheckedSubterms f a => Data.GenValidity.GUncheckedSubterms (GHC.Generics.M1 i c f) a instance Data.GenValidity.GUncheckedSubterms (GHC.Generics.K1 i a) b instance (Data.GenValidity.GUncheckedRecursivelyShrink f, Data.GenValidity.GUncheckedRecursivelyShrink g) => Data.GenValidity.GUncheckedRecursivelyShrink (f GHC.Generics.:*: g) instance (Data.GenValidity.GUncheckedRecursivelyShrink f, Data.GenValidity.GUncheckedRecursivelyShrink g) => Data.GenValidity.GUncheckedRecursivelyShrink (f GHC.Generics.:+: g) instance Data.GenValidity.GUncheckedRecursivelyShrink f => Data.GenValidity.GUncheckedRecursivelyShrink (GHC.Generics.M1 i c f) instance Data.GenValidity.GUncheckedRecursivelyShrink GHC.Generics.U1 instance Data.GenValidity.GUncheckedRecursivelyShrink GHC.Generics.V1 instance Data.GenValidity.GGenUnchecked GHC.Generics.U1 instance (Data.GenValidity.GGenUnchecked a, Data.GenValidity.GGenUnchecked b) => Data.GenValidity.GGenUnchecked (a GHC.Generics.:*: b) instance (Data.GenValidity.GGenUnchecked a, Data.GenValidity.GGenUnchecked b) => Data.GenValidity.GGenUnchecked (a GHC.Generics.:+: b) instance Data.GenValidity.GGenUnchecked a => Data.GenValidity.GGenUnchecked (GHC.Generics.M1 i c a) module Data.GenRelativeValidity class (GenUnchecked a, RelativeValidity a b, GenRelativeUnchecked a b) => GenRelativeInvalid a b genInvalidFor :: GenRelativeInvalid a b => b -> Gen a class (GenValid a, RelativeValidity a b) => GenRelativeValid a b genValidFor :: GenRelativeValid a b => b -> Gen a class (GenUnchecked a, RelativeValidity a b) => GenRelativeUnchecked a b genUncheckedFor :: GenRelativeUnchecked a b => b -> Gen a