-- Hoogle documentation, generated by Haddock -- See Hoogle, http://www.haskell.org/hoogle/ -- | Utilities for GHC.Generics -- -- This package provides common functions on generic types. See README. @package generic-data @version 0.3.0.0 module Generic.Data.Internal.Compat -- | Lift the standard readPrec and readListPrec functions -- through the type constructor. readPrec1 :: (Read1 f, Read a) => ReadPrec f a -- | Division (round down) of natural numbers. Div x 0 is -- undefined (i.e., it cannot be reduced). module Generic.Data.Internal.Enum -- | Generic toEnum generated with the StandardEnum option. -- --
--   instance Enum MyType where
--     toEnum = gtoEnum
--     fromEnum = gfromEnum
--     enumFrom = genumFrom
--     enumFromThen = genumFromThen
--     enumFromTo = genumFromTo
--     enumFromThenTo = genumFromThenTo
--   
gtoEnum :: forall a. (Generic a, GEnum StandardEnum (Rep a)) => Int -> a -- | Generic fromEnum generated with the StandardEnum option. -- -- See also gtoEnum. gfromEnum :: (Generic a, GEnum StandardEnum (Rep a)) => a -> Int -- | Generic enumFrom generated with the StandardEnum option. -- -- See also gtoEnum. genumFrom :: (Generic a, GEnum StandardEnum (Rep a)) => a -> [a] -- | Generic enumFromThen generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromThen :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromTo generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromTo :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromThenTo generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromThenTo :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> a -> [a] -- | Generic toEnum generated with the FiniteEnum option. -- --
--   instance Enum MyType where
--     toEnum = gtoFiniteEnum
--     fromEnum = gfromFiniteEnum
--     enumFrom = gfiniteEnumFrom
--     enumFromThen = gfiniteEnumFromThen
--     enumFromTo = gfiniteEnumFromTo
--     enumFromThenTo = gfiniteEnumFromThenTo
--   
gtoFiniteEnum :: forall a. (Generic a, GEnum FiniteEnum (Rep a)) => Int -> a -- | Generic fromEnum generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfromFiniteEnum :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> Int -- | Generic enumFrom generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfiniteEnumFrom :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> [a] -- | Generic enumFromThen generated with the FiniteEnum -- option. -- -- See also gtoFiniteEnum. gfiniteEnumFromThen :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromTo generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfiniteEnumFromTo :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromThenTo generated with the FiniteEnum -- option. -- -- See also gtoFiniteEnum. gfiniteEnumFromThenTo :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> a -> [a] -- | Unsafe generic toEnum. Does not check whether the argument is -- within valid bounds. Use gtoEnum or gtoFiniteEnum -- instead. gtoEnumRaw' :: forall opts a. (Generic a, GEnum opts (Rep a)) => Int -> a -- | Generic toEnum. Use gfromEnum or gfromFiniteEnum -- instead. gtoEnum' :: forall opts a. (Generic a, GEnum opts (Rep a)) => String -> Int -> a -- | Generic fromEnum. Use gfromEnum or -- gfromFiniteEnum instead. gfromEnum' :: forall opts a. (Generic a, GEnum opts (Rep a)) => a -> Int -- |
--   genumMin == gfromEnum gminBound
--   
genumMin :: Int -- |
--   genumMin == gfromEnum gmaxBound
--   
genumMax :: forall opts a. (Generic a, GEnum opts (Rep a)) => Int -- | Generic enumFrom. Use genumFrom or -- gfiniteEnumFrom instead. genumFrom' :: forall opts a. (Generic a, GEnum opts (Rep a)) => a -> [a] -- | Generic enumFromThen. Use genumFromThen or -- gfiniteEnumFromThen instead. genumFromThen' :: forall opts a. (Generic a, GEnum opts (Rep a)) => a -> a -> [a] -- | Generic enumFromTo. Use genumFromTo or -- gfiniteEnumFromTo instead. genumFromTo' :: forall opts a. (Generic a, GEnum opts (Rep a)) => a -> a -> [a] -- | Generic enumFromThenTo. Use genumFromThenTo or -- gfiniteEnumFromThenTo instead. genumFromThenTo' :: forall opts a. (Generic a, GEnum opts (Rep a)) => a -> a -> a -> [a] -- | Generic minBound. -- --
--   instance Bounded MyType where
--     minBound = gminBound
--     maxBound = gmaxBound
--   
gminBound :: (Generic a, GBounded (Rep a)) => a -- | Generic maxBound. -- -- See also gminBound. gmaxBound :: (Generic a, GBounded (Rep a)) => a -- | Generic representation of Enum types. -- -- The opts parameter is a type-level option to select different -- implementations. class GEnum opts f gCardinality :: GEnum opts f => Int gFromEnum :: GEnum opts f => f p -> Int gToEnum :: GEnum opts f => Int -> f p -- | Standard option for GEnum: derive Enum for types with -- only nullary constructors (the same restrictions as in the Haskell -- 2010 report). data StandardEnum -- | Extends the StandardEnum option for GEnum to allow all -- constructors to have arbitrary many fields. Each field type must be an -- instance of both Enum and Bounded. Two restrictions -- require the user's caution: -- -- -- -- The resulting GEnum instance starts enumerating from 0 -- up to (cardinality - 1) and respects the generic Ord -- instance. Implied by this the values from different constructors are -- enumerated sequentially. They are not interleaved. -- -- To be very exact: The aforementioned generic Ord instance can -- be determined by constraining the field types to Enum instead -- of Ord. Each field's order on its values is given by their -- enumeration. -- --
--   data Example = C0 Bool Bool | C1 Bool
--     deriving (Eq, Ord, Show, Generic)
--   
--   gCardinality == 6  -- 2 * 2 + 2
--   
--   enumeration = 
--       [ C0 False False
--       , C0 False  True
--       , C0  True False
--       , C0  True  True
--       , C1 False
--       , C1 True
--       ]
--   
--   enumeration == map gtoFiniteEnum [0 .. 5]
--   [0 .. 5] == map gfromFiniteEnum enumeration
--   
data FiniteEnum -- | Generic representation of Bounded types. class GBounded f gMinBound :: GBounded f => f p gMaxBound :: GBounded f => f p instance Generic.Data.Internal.Enum.GBounded f => Generic.Data.Internal.Enum.GBounded (GHC.Generics.M1 i c f) instance Generic.Data.Internal.Enum.GBounded GHC.Generics.U1 instance GHC.Enum.Bounded c => Generic.Data.Internal.Enum.GBounded (GHC.Generics.K1 i c) instance (Generic.Data.Internal.Enum.GBounded f, Generic.Data.Internal.Enum.GBounded g) => Generic.Data.Internal.Enum.GBounded (f GHC.Generics.:+: g) instance (Generic.Data.Internal.Enum.GBounded f, Generic.Data.Internal.Enum.GBounded g) => Generic.Data.Internal.Enum.GBounded (f GHC.Generics.:*: g) instance (Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.FiniteEnum f, Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.FiniteEnum g) => Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.FiniteEnum (f GHC.Generics.:*: g) instance (GHC.Enum.Bounded c, GHC.Enum.Enum c) => Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.FiniteEnum (GHC.Generics.K1 i c) instance Generic.Data.Internal.Enum.GEnum opts f => Generic.Data.Internal.Enum.GEnum opts (GHC.Generics.M1 i c f) instance (Generic.Data.Internal.Enum.GEnum opts f, Generic.Data.Internal.Enum.GEnum opts g) => Generic.Data.Internal.Enum.GEnum opts (f GHC.Generics.:+: g) instance Generic.Data.Internal.Enum.GEnum opts GHC.Generics.U1 -- | Type level functions on generic representations. module Generic.Data.Internal.Functions -- | Number of constructors of a data type. nconstructors :: forall r. KnownNat (NConstructors r) => Integer -- | Arity of a constructor. nfields :: forall r. KnownNat (NFields r) => Integer -- | Type metadata accessors -- -- Type names, constructor names... module Generic.Data.Internal.Meta -- | Name of the first data constructor in a type as a string. -- --
--   gdatatypeName @(Maybe AnyType) = "Maybe"
--   
gdatatypeName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | Name of the module where the first type constructor is defined. -- --
--   gmoduleName @(Maybe AnyType) = "GHC.Base"
--   
gmoduleName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | Name of the package where the first type constructor is defined. -- --
--   gpackageName @(Maybe AnyType) = "base"
--   
gpackageName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | True if the first type constructor is a newtype. gisNewtype :: forall a. (Generic a, GDatatype (Rep a)) => Bool fromDatatype :: forall d r. Datatype d => (M1 D d Proxy () -> r) -> r -- | Generic representations that contain datatype metadata. class GDatatype f gDatatypeName :: GDatatype f => String gModuleName :: GDatatype f => String gPackageName :: GDatatype f => String gIsNewtype :: GDatatype f => Bool -- | Name of the first constructor in a value. -- --
--   gconName (Just 0) = "Just"
--   
gconName :: forall a. Constructors a => a -> String -- | The fixity of the first constructor. -- --
--   gconFixity (Just 0) = Prefix
--   gconFixity ([] :*: id) = Infix RightAssociative 6
--   
gconFixity :: forall a. Constructors a => a -> Fixity -- | True if the constructor is a record. -- --
--   gconIsRecord (Just 0) = False
--   gconIsRecord (Sum 0) = True
--   -- newtype Sum a = Sum { getSum :: a }
--   
gconIsRecord :: forall a. Constructors a => a -> Bool -- | Number of constructors. -- --
--   gconNum @(Maybe AnyType) = 2
--   
gconNum :: forall a. Constructors a => Int -- | Index of a constructor. -- --
--   gconIndex Nothing = 0
--   gconIndex (Just "test") = 1
--   
gconIndex :: forall a. Constructors a => a -> Int -- | An opaque identifier for a constructor. newtype ConId a ConId :: Int -> ConId a -- | Identifier of a constructor. conId :: forall a. Constructors a => a -> ConId a -- | Index of a constructor, given its identifier. See also -- gconIndex. conIdToInt :: forall a. ConId a -> Int -- | Name of a constructor. See also gconName. conIdToString :: forall a. Constructors a => ConId a -> String -- | All constructor identifiers. -- --
--   gconNum @a = length (conIdEnum @a)
--   
conIdEnum :: forall a. Constructors a => [ConId a] -- | This must not be called on an empty type. conIdMin :: forall a. Constructors a => ConId a -- | This must not be called on an empty type. conIdMax :: forall a. Constructors a => ConId a -- | Constraint synonym for Generic and GConstructor. class (Generic a, GConstructors (Rep a)) => Constructors a newtype GConId r GConId :: Int -> GConId r gConIdToInt :: GConId r -> Int toConId :: forall a. Generic a => GConId (Rep a) -> ConId a fromConId :: forall a. Generic a => ConId a -> GConId (Rep a) reGConId :: GConId r -> GConId s gConIdMin :: forall r. GConstructors r => GConId r gConIdMax :: forall r. GConstructors r => GConId r -- | Generic representations that contain constructor metadata. class GConstructors r gConIdToString :: GConstructors r => GConId r -> String gConId :: GConstructors r => r p -> GConId r gConNum :: GConstructors r => Int gConFixity :: GConstructors r => r p -> Fixity gConIsRecord :: GConstructors r => r p -> Bool -- | Meta field of the M1 type constructor. -- | Name of the data type (MetaData). -- | Name of the module where the data type is defined (MetaData) -- | Name of the package where the data type is defined (MetaData) -- | True if the data type is a newtype (MetaData). -- | Name of the constructor (MetaCons). -- | Fixity of the constructor (MetaCons). -- | True for a record constructor (MetaCons). -- | Just the name of the record field, if it is one -- (MetaSel). -- | Name of the record field; undefined for non-record fields -- (MetaSel). -- | Unpackedness annotation of a field (MetaSel). -- | Strictness annotation of a field (MetaSel). -- | Inferred strictness of a field (MetaSel). -- | A placeholder for Meta values. type DummyMeta = 'MetaData "" "" "" 'False -- | Remove an M1 type constructor. instance forall k (r :: k). GHC.Classes.Ord (Generic.Data.Internal.Meta.GConId r) instance forall k (r :: k). GHC.Classes.Eq (Generic.Data.Internal.Meta.GConId r) instance forall k (a :: k). GHC.Classes.Ord (Generic.Data.Internal.Meta.ConId a) instance forall k (a :: k). GHC.Classes.Eq (Generic.Data.Internal.Meta.ConId a) instance (GHC.Generics.Generic a, Generic.Data.Internal.Meta.GConstructors (GHC.Generics.Rep a)) => Generic.Data.Internal.Meta.Constructors a instance forall k (f :: k -> *) (c :: GHC.Generics.Meta). Generic.Data.Internal.Meta.GConstructors f => Generic.Data.Internal.Meta.GConstructors (GHC.Generics.M1 GHC.Generics.D c f) instance forall k (f :: k -> *) (g :: k -> *). (Generic.Data.Internal.Meta.GConstructors f, Generic.Data.Internal.Meta.GConstructors g) => Generic.Data.Internal.Meta.GConstructors (f GHC.Generics.:+: g) instance forall k (c :: GHC.Generics.Meta) (f :: k -> *). GHC.Generics.Constructor c => Generic.Data.Internal.Meta.GConstructors (GHC.Generics.M1 GHC.Generics.C c f) instance forall k (d :: GHC.Generics.Meta) (f :: k -> *). GHC.Generics.Datatype d => Generic.Data.Internal.Meta.GDatatype (GHC.Generics.M1 GHC.Generics.D d f) -- | Pack/unpack newtypes. module Generic.Data.Internal.Newtype -- | Class of newtypes. class (Generic a, Coercible a (Old a), Newtype' a) => Newtype a type Old a = GOld (Rep a) type Newtype' a = NewtypeErr a (MetaDataNewtype (MetaOf (Rep a))) -- | Generic newtype destructor. unpack :: Newtype a => a -> Old a -- | Generic newtype constructor. pack :: Newtype a => Old a -> a instance (GHC.Generics.Generic a, GHC.Types.Coercible a (Generic.Data.Internal.Newtype.Old a), Generic.Data.Internal.Newtype.Newtype' a) => Generic.Data.Internal.Newtype.Newtype a module Generic.Data.Internal.Resolvers -- | A newtype whose instances for simple classes (Eq, Ord, -- Read, Show) use higher-kinded class instances for -- f (Eq1, Ord1, Read1, Show1). newtype Id1 f a Id1 :: f a -> Id1 f a [unId1] :: Id1 f a -> f a -- | A newtype with trivial instances, that considers every value -- equivalent to every other one, and shows as just "_". newtype Opaque a Opaque :: a -> Opaque a [unOpaque] :: Opaque a -> a -- | A higher-kinded version of Opaque. newtype Opaque1 f a Opaque1 :: f a -> Opaque1 f a [unOpaque1] :: Opaque1 f a -> f a instance Data.Functor.Classes.Show1 f => Data.Functor.Classes.Show1 (Generic.Data.Internal.Resolvers.Id1 f) instance Data.Functor.Classes.Read1 f => Data.Functor.Classes.Read1 (Generic.Data.Internal.Resolvers.Id1 f) instance Data.Functor.Classes.Ord1 f => Data.Functor.Classes.Ord1 (Generic.Data.Internal.Resolvers.Id1 f) instance Data.Functor.Classes.Eq1 f => Data.Functor.Classes.Eq1 (Generic.Data.Internal.Resolvers.Id1 f) instance GHC.Classes.Eq (Generic.Data.Internal.Resolvers.Opaque1 f a) instance GHC.Classes.Ord (Generic.Data.Internal.Resolvers.Opaque1 f a) instance GHC.Show.Show (Generic.Data.Internal.Resolvers.Opaque1 f a) instance Data.Functor.Classes.Eq1 (Generic.Data.Internal.Resolvers.Opaque1 f) instance Data.Functor.Classes.Ord1 (Generic.Data.Internal.Resolvers.Opaque1 f) instance Data.Functor.Classes.Show1 (Generic.Data.Internal.Resolvers.Opaque1 f) instance GHC.Classes.Eq (Generic.Data.Internal.Resolvers.Opaque a) instance GHC.Classes.Ord (Generic.Data.Internal.Resolvers.Opaque a) instance GHC.Show.Show (Generic.Data.Internal.Resolvers.Opaque a) instance Data.Functor.Classes.Eq1 Generic.Data.Internal.Resolvers.Opaque instance Data.Functor.Classes.Ord1 Generic.Data.Internal.Resolvers.Opaque instance Data.Functor.Classes.Show1 Generic.Data.Internal.Resolvers.Opaque instance (Data.Functor.Classes.Eq1 f, GHC.Classes.Eq a) => GHC.Classes.Eq (Generic.Data.Internal.Resolvers.Id1 f a) instance (Data.Functor.Classes.Ord1 f, GHC.Classes.Ord a) => GHC.Classes.Ord (Generic.Data.Internal.Resolvers.Id1 f a) instance (Data.Functor.Classes.Read1 f, GHC.Read.Read a) => GHC.Read.Read (Generic.Data.Internal.Resolvers.Id1 f a) instance (Data.Functor.Classes.Show1 f, GHC.Show.Show a) => GHC.Show.Show (Generic.Data.Internal.Resolvers.Id1 f a) module Generic.Data.Internal.Show -- | Generic showsPrec. -- --
--   instance Show MyType where
--     showsPrec = gshowsPrec
--   
gshowsPrec :: (Generic a, GShow0 (Rep a)) => Int -> a -> ShowS gprecShows :: (Generic a, GShow0 (Rep a)) => a -> PrecShowS -- | Generic representation of Show types. type GShow0 = GShow Proxy -- | Generic liftShowsPrec. gliftShowsPrec :: (Generic1 f, GShow1 (Rep1 f)) => (Int -> a -> ShowS) -> ([a] -> ShowS) -> Int -> f a -> ShowS gLiftPrecShows :: GShow1 f => (Int -> a -> ShowS) -> ([a] -> ShowS) -> f a -> PrecShowS type ShowsPrec a = (Int -> a -> ShowS, [a] -> ShowS) -- | Generic representation of Show1 types. type GShow1 = GShow Identity class GShow p f gPrecShows :: GShow p f => p (ShowsPrec a) -> f a -> PrecShowS class GShowC p c f gPrecShowsC :: GShowC p c f => p (ShowsPrec a) -> String -> Fixity -> M1 C c f a -> PrecShowS class GShowFields p f gPrecShowsFields :: GShowFields p f => p (ShowsPrec a) -> f a -> [PrecShowS] class GShowNamed p f gPrecShowsNamed :: GShowNamed p f => p (ShowsPrec a) -> f a -> ShowFields class GShowSingle p f gPrecShowsSingle :: GShowSingle p f => p (ShowsPrec a) -> f a -> PrecShowS instance Generic.Data.Internal.Show.GShowSingle p f => Generic.Data.Internal.Show.GShowFields p (GHC.Generics.M1 GHC.Generics.S c f) instance (GHC.Generics.Selector c, Generic.Data.Internal.Show.GShowSingle p f) => Generic.Data.Internal.Show.GShowNamed p (GHC.Generics.M1 GHC.Generics.S c f) instance GHC.Show.Show a => Generic.Data.Internal.Show.GShowSingle p (GHC.Generics.K1 i a) instance Data.Functor.Classes.Show1 f => Generic.Data.Internal.Show.GShowSingle Data.Functor.Identity.Identity (GHC.Generics.Rec1 f) instance Generic.Data.Internal.Show.GShowSingle Data.Functor.Identity.Identity GHC.Generics.Par1 instance (Generic.Data.Internal.Show.GShowSingle Data.Functor.Identity.Identity f, Generic.Data.Internal.Show.GShowSingle p g) => Generic.Data.Internal.Show.GShowSingle p (f GHC.Generics.:.: g) instance Generic.Data.Internal.Show.GShowNamed p f => Generic.Data.Internal.Show.GShowC p ('GHC.Generics.MetaCons s y 'GHC.Types.True) f instance (Generic.Data.Internal.Show.GShowNamed p f, Generic.Data.Internal.Show.GShowNamed p g) => Generic.Data.Internal.Show.GShowNamed p (f GHC.Generics.:*: g) instance Generic.Data.Internal.Show.GShowNamed p GHC.Generics.U1 instance Generic.Data.Internal.Show.GShowFields p f => Generic.Data.Internal.Show.GShowC p ('GHC.Generics.MetaCons s y 'GHC.Types.False) f instance (Generic.Data.Internal.Show.GShowFields p f, Generic.Data.Internal.Show.GShowFields p g) => Generic.Data.Internal.Show.GShowFields p (f GHC.Generics.:*: g) instance Generic.Data.Internal.Show.GShowFields p GHC.Generics.U1 instance (GHC.Generics.Constructor c, Generic.Data.Internal.Show.GShowC p c f) => Generic.Data.Internal.Show.GShow p (GHC.Generics.M1 GHC.Generics.C c f) instance Generic.Data.Internal.Show.GShow p f => Generic.Data.Internal.Show.GShow p (GHC.Generics.M1 GHC.Generics.D d f) instance (Generic.Data.Internal.Show.GShow p f, Generic.Data.Internal.Show.GShow p g) => Generic.Data.Internal.Show.GShow p (f GHC.Generics.:+: g) instance Generic.Data.Internal.Show.GShow p GHC.Generics.V1 -- | Generic representations as data types. module Generic.Data.Internal.Data -- | Synthetic data type. -- -- A wrapper to view a generic Rep as the datatype it's supposed -- to represent, without needing a declaration. newtype Data r p Data :: r p -> Data r p [unData] :: Data r p -> r p -- | Conversion between a generic type and the synthetic type made using -- its representation. toData :: Generic a => a -> Data (Rep a) p -- | Inverse of fromData. fromData :: Generic a => Data (Rep a) p -> a instance GHC.Base.Monoid (r p) => GHC.Base.Monoid (Generic.Data.Internal.Data.Data r p) instance GHC.Base.Semigroup (r p) => GHC.Base.Semigroup (Generic.Data.Internal.Data.Data r p) instance Data.Functor.Classes.Ord1 r => Data.Functor.Classes.Ord1 (Generic.Data.Internal.Data.Data r) instance Data.Functor.Classes.Eq1 r => Data.Functor.Classes.Eq1 (Generic.Data.Internal.Data.Data r) instance GHC.Classes.Ord (r p) => GHC.Classes.Ord (Generic.Data.Internal.Data.Data r p) instance GHC.Classes.Eq (r p) => GHC.Classes.Eq (Generic.Data.Internal.Data.Data r p) instance Data.Functor.Contravariant.Contravariant r => Data.Functor.Contravariant.Contravariant (Generic.Data.Internal.Data.Data r) instance GHC.Base.MonadPlus r => GHC.Base.MonadPlus (Generic.Data.Internal.Data.Data r) instance GHC.Base.Monad r => GHC.Base.Monad (Generic.Data.Internal.Data.Data r) instance GHC.Base.Alternative r => GHC.Base.Alternative (Generic.Data.Internal.Data.Data r) instance GHC.Base.Applicative r => GHC.Base.Applicative (Generic.Data.Internal.Data.Data r) instance Data.Traversable.Traversable r => Data.Traversable.Traversable (Generic.Data.Internal.Data.Data r) instance Data.Foldable.Foldable r => Data.Foldable.Foldable (Generic.Data.Internal.Data.Data r) instance GHC.Base.Functor r => GHC.Base.Functor (Generic.Data.Internal.Data.Data r) instance (GHC.Base.Functor r, Data.Functor.Contravariant.Contravariant r) => GHC.Generics.Generic (Generic.Data.Internal.Data.Data r p) instance GHC.Generics.Generic1 (Generic.Data.Internal.Data.Data r) instance (Generic.Data.Internal.Show.GShow1 r, GHC.Show.Show p) => GHC.Show.Show (Generic.Data.Internal.Data.Data r p) instance Generic.Data.Internal.Show.GShow1 r => Data.Functor.Classes.Show1 (Generic.Data.Internal.Data.Data r) instance Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.StandardEnum r => GHC.Enum.Enum (Generic.Data.Internal.Data.Data r p) instance Generic.Data.Internal.Enum.GBounded r => GHC.Enum.Bounded (Generic.Data.Internal.Data.Data r p) module Generic.Data.Internal.Utils -- | Coerce while preserving the type index. coerce' :: Coercible (f x) (g x) => f x -> g x -- | Elimination of V1. absurd1 :: V1 x -> a -- | A helper for better type inference. from' :: Generic a => a -> Rep a () -- | A helper for better type inference. to' :: Generic a => Rep a () -> a -- | Lift binary combinators generically. liftG2 :: Generic1 f => (Rep1 f a -> Rep1 f b -> Rep1 f c) -> f a -> f b -> f c -- | Generic deriving for standard classes in base module Generic.Data.Internal.Prelude -- | Generic (==). -- --
--   instance Eq MyType where
--     (==) = geq
--   
geq :: (Generic a, Eq (Rep a ())) => a -> a -> Bool -- | Generic compare. -- --
--   instance Ord MyType where
--     compare = gcompare
--   
gcompare :: (Generic a, Ord (Rep a ())) => a -> a -> Ordering -- | Generic (<>) (or mappend). -- --
--   instance Semigroup MyType where
--     (<>) = gmappend
--   
-- -- See also gmempty. gmappend :: (Generic a, Semigroup (Rep a ())) => a -> a -> a -- | Generic mempty. -- --
--   instance Monoid MyType where
--     mempty = gmempty
--   
gmempty :: (Generic a, Monoid (Rep a ())) => a -- | Generic (<>) (or mappend). -- -- The difference from gmappend is the Monoid constraint -- instead of Semigroup, for older versions of base where -- Semigroup is not a superclass of Monoid. gmappend' :: (Generic a, Monoid (Rep a ())) => a -> a -> a -- | Generic fmap. -- --
--   instance Functor MyTypeF where
--     fmap = gfmap
--   
gfmap :: (Generic1 f, Functor (Rep1 f)) => (a -> b) -> f a -> f b -- | Generic (<$). -- -- See also gfmap. gconstmap :: (Generic1 f, Functor (Rep1 f)) => a -> f b -> f a -- | Generic pure. -- --
--   instance Applicative MyTypeF where
--     pure = gpure
--     (<*>) = gap
--   
gpure :: (Generic1 f, Applicative (Rep1 f)) => a -> f a -- | Generic (<*>) (or ap). -- -- See also gpure. gap :: (Generic1 f, Applicative (Rep1 f)) => f (a -> b) -> f a -> f b -- | Generic liftA2. -- -- See also gpure. gliftA2 :: (Generic1 f, Applicative (Rep1 f)) => (a -> b -> c) -> f a -> f b -> f c -- | Generic empty. -- --
--   instance Alternative MyTypeF where
--     empty = gempty
--     (<|>) = galt
--   
gempty :: (Generic1 f, Alternative (Rep1 f)) => f a -- | Generic (<|>). -- -- See also gempty. galt :: (Generic1 f, Alternative (Rep1 f)) => f a -> f a -> f a -- | Generic foldMap. -- --
--   instance Foldable MyTypeF where
--     foldMap = gfoldMap
--   
gfoldMap :: (Generic1 f, Foldable (Rep1 f), Monoid m) => (a -> m) -> f a -> m -- | Generic foldr. -- --
--   instance Foldable MyTypeF where
--     foldr = gfoldr
--   
-- -- See also gfoldMap. gfoldr :: (Generic1 f, Foldable (Rep1 f)) => (a -> b -> b) -> b -> f a -> b -- | Generic traverse. -- --
--   instance Traversable MyTypeF where
--     traverse = gtraverse
--   
gtraverse :: (Generic1 f, Traversable (Rep1 f), Applicative m) => (a -> m b) -> f a -> m (f b) -- | Generic sequenceA. -- --
--   instance Traversable MyTypeF where
--     sequenceA = gsequenceA
--   
-- -- See also gtraverse. gsequenceA :: (Generic1 f, Traversable (Rep1 f), Applicative m) => f (m a) -> m (f a) -- | Generic liftEq. gliftEq :: (Generic1 f, Eq1 (Rep1 f)) => (a -> b -> Bool) -> f a -> f b -> Bool -- | Generic liftCompare. gliftCompare :: (Generic1 f, Ord1 (Rep1 f)) => (a -> b -> Ordering) -> f a -> f b -> Ordering -- | Newtypes with instances implemented using generic combinators. module Generic.Data.Internal.Generically -- | Type with instances derived via Generic. newtype Generically a Generically :: a -> Generically a [unGenerically] :: Generically a -> a -- | Type with Enum instance derived via Generic with -- FiniteEnum option. newtype FiniteEnumeration a FiniteEnumeration :: a -> FiniteEnumeration a [unFiniteEnumeration] :: FiniteEnumeration a -> a -- | Type with instances derived via Generic1. newtype Generically1 f a Generically1 :: f a -> Generically1 f a [unGenerically1] :: Generically1 f a -> f a instance GHC.Generics.Generic (f a) => GHC.Generics.Generic (Generic.Data.Internal.Generically.Generically1 f a) instance GHC.Generics.Generic1 f => GHC.Generics.Generic1 (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Data.Functor.Classes.Eq1 (GHC.Generics.Rep1 f)) => Data.Functor.Classes.Eq1 (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Data.Functor.Classes.Eq1 (GHC.Generics.Rep1 f), GHC.Classes.Eq a) => GHC.Classes.Eq (Generic.Data.Internal.Generically.Generically1 f a) instance (GHC.Generics.Generic1 f, Data.Functor.Classes.Ord1 (GHC.Generics.Rep1 f)) => Data.Functor.Classes.Ord1 (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Data.Functor.Classes.Ord1 (GHC.Generics.Rep1 f), GHC.Classes.Ord a) => GHC.Classes.Ord (Generic.Data.Internal.Generically.Generically1 f a) instance (GHC.Generics.Generic1 f, Generic.Data.Internal.Show.GShow1 (GHC.Generics.Rep1 f)) => Data.Functor.Classes.Show1 (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Generic.Data.Internal.Show.GShow1 (GHC.Generics.Rep1 f), GHC.Show.Show a) => GHC.Show.Show (Generic.Data.Internal.Generically.Generically1 f a) instance (GHC.Generics.Generic1 f, GHC.Base.Functor (GHC.Generics.Rep1 f)) => GHC.Base.Functor (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, GHC.Base.Applicative (GHC.Generics.Rep1 f)) => GHC.Base.Applicative (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, GHC.Base.Alternative (GHC.Generics.Rep1 f)) => GHC.Base.Alternative (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Data.Foldable.Foldable (GHC.Generics.Rep1 f)) => Data.Foldable.Foldable (Generic.Data.Internal.Generically.Generically1 f) instance (GHC.Generics.Generic1 f, Data.Traversable.Traversable (GHC.Generics.Rep1 f)) => Data.Traversable.Traversable (Generic.Data.Internal.Generically.Generically1 f) instance GHC.Generics.Generic a => GHC.Generics.Generic (Generic.Data.Internal.Generically.FiniteEnumeration a) instance (GHC.Generics.Generic a, Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.FiniteEnum (GHC.Generics.Rep a)) => GHC.Enum.Enum (Generic.Data.Internal.Generically.FiniteEnumeration a) instance GHC.Generics.Generic a => GHC.Generics.Generic (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, GHC.Classes.Eq (GHC.Generics.Rep a ())) => GHC.Classes.Eq (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, GHC.Classes.Ord (GHC.Generics.Rep a ())) => GHC.Classes.Ord (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, Generic.Data.Internal.Show.GShow0 (GHC.Generics.Rep a)) => GHC.Show.Show (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, GHC.Base.Semigroup (GHC.Generics.Rep a ())) => GHC.Base.Semigroup (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, GHC.Base.Monoid (GHC.Generics.Rep a ())) => GHC.Base.Monoid (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, Generic.Data.Internal.Enum.GEnum Generic.Data.Internal.Enum.StandardEnum (GHC.Generics.Rep a)) => GHC.Enum.Enum (Generic.Data.Internal.Generically.Generically a) instance (GHC.Generics.Generic a, Generic.Data.Internal.Enum.GBounded (GHC.Generics.Rep a)) => GHC.Enum.Bounded (Generic.Data.Internal.Generically.Generically a) -- | Generic combinators to derive type class instances. -- -- base classes that GHC can not derive instances for, as of -- version 8.2: -- -- -- -- On base < 4.12 (i.e., GHC < 8.6), import -- Generic.Data.Orphans to obtain instances needed internally to -- derive those. -- -- GHC can derive instances for other classes here, although there may be -- types supported by one method but not the other or vice versa. module Generic.Data -- | Generic (<>) (or mappend). -- --
--   instance Semigroup MyType where
--     (<>) = gmappend
--   
-- -- See also gmempty. gmappend :: (Generic a, Semigroup (Rep a ())) => a -> a -> a -- | Generic mempty. -- --
--   instance Monoid MyType where
--     mempty = gmempty
--   
gmempty :: (Generic a, Monoid (Rep a ())) => a -- | Generic (<>) (or mappend). -- -- The difference from gmappend is the Monoid constraint -- instead of Semigroup, for older versions of base where -- Semigroup is not a superclass of Monoid. gmappend' :: (Generic a, Monoid (Rep a ())) => a -> a -> a -- | Generic (==). -- --
--   instance Eq MyType where
--     (==) = geq
--   
geq :: (Generic a, Eq (Rep a ())) => a -> a -> Bool -- | Generic compare. -- --
--   instance Ord MyType where
--     compare = gcompare
--   
gcompare :: (Generic a, Ord (Rep a ())) => a -> a -> Ordering -- | Generic showsPrec. -- --
--   instance Show MyType where
--     showsPrec = gshowsPrec
--   
gshowsPrec :: (Generic a, GShow0 (Rep a)) => Int -> a -> ShowS -- | Generic representation of Show types. type GShow0 = GShow Proxy -- | Generic representation of Enum types. -- -- The opts parameter is a type-level option to select different -- implementations. class GEnum opts f -- | Standard option for GEnum: derive Enum for types with -- only nullary constructors (the same restrictions as in the Haskell -- 2010 report). data StandardEnum -- | Generic toEnum generated with the StandardEnum option. -- --
--   instance Enum MyType where
--     toEnum = gtoEnum
--     fromEnum = gfromEnum
--     enumFrom = genumFrom
--     enumFromThen = genumFromThen
--     enumFromTo = genumFromTo
--     enumFromThenTo = genumFromThenTo
--   
gtoEnum :: forall a. (Generic a, GEnum StandardEnum (Rep a)) => Int -> a -- | Generic fromEnum generated with the StandardEnum option. -- -- See also gtoEnum. gfromEnum :: (Generic a, GEnum StandardEnum (Rep a)) => a -> Int -- | Generic enumFrom generated with the StandardEnum option. -- -- See also gtoEnum. genumFrom :: (Generic a, GEnum StandardEnum (Rep a)) => a -> [a] -- | Generic enumFromThen generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromThen :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromTo generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromTo :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromThenTo generated with the StandardEnum -- option. -- -- See also gtoEnum. genumFromThenTo :: (Generic a, GEnum StandardEnum (Rep a)) => a -> a -> a -> [a] -- | Extends the StandardEnum option for GEnum to allow all -- constructors to have arbitrary many fields. Each field type must be an -- instance of both Enum and Bounded. Two restrictions -- require the user's caution: -- -- -- -- The resulting GEnum instance starts enumerating from 0 -- up to (cardinality - 1) and respects the generic Ord -- instance. Implied by this the values from different constructors are -- enumerated sequentially. They are not interleaved. -- -- To be very exact: The aforementioned generic Ord instance can -- be determined by constraining the field types to Enum instead -- of Ord. Each field's order on its values is given by their -- enumeration. -- --
--   data Example = C0 Bool Bool | C1 Bool
--     deriving (Eq, Ord, Show, Generic)
--   
--   gCardinality == 6  -- 2 * 2 + 2
--   
--   enumeration = 
--       [ C0 False False
--       , C0 False  True
--       , C0  True False
--       , C0  True  True
--       , C1 False
--       , C1 True
--       ]
--   
--   enumeration == map gtoFiniteEnum [0 .. 5]
--   [0 .. 5] == map gfromFiniteEnum enumeration
--   
data FiniteEnum -- | Generic toEnum generated with the FiniteEnum option. -- --
--   instance Enum MyType where
--     toEnum = gtoFiniteEnum
--     fromEnum = gfromFiniteEnum
--     enumFrom = gfiniteEnumFrom
--     enumFromThen = gfiniteEnumFromThen
--     enumFromTo = gfiniteEnumFromTo
--     enumFromThenTo = gfiniteEnumFromThenTo
--   
gtoFiniteEnum :: forall a. (Generic a, GEnum FiniteEnum (Rep a)) => Int -> a -- | Generic fromEnum generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfromFiniteEnum :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> Int -- | Generic enumFrom generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfiniteEnumFrom :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> [a] -- | Generic enumFromThen generated with the FiniteEnum -- option. -- -- See also gtoFiniteEnum. gfiniteEnumFromThen :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromTo generated with the FiniteEnum option. -- -- See also gtoFiniteEnum. gfiniteEnumFromTo :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> [a] -- | Generic enumFromThenTo generated with the FiniteEnum -- option. -- -- See also gtoFiniteEnum. gfiniteEnumFromThenTo :: (Generic a, GEnum FiniteEnum (Rep a)) => a -> a -> a -> [a] -- | Generic minBound. -- --
--   instance Bounded MyType where
--     minBound = gminBound
--     maxBound = gmaxBound
--   
gminBound :: (Generic a, GBounded (Rep a)) => a -- | Generic maxBound. -- -- See also gminBound. gmaxBound :: (Generic a, GBounded (Rep a)) => a -- | Generic representation of Bounded types. class GBounded f -- | Generic fmap. -- --
--   instance Functor MyTypeF where
--     fmap = gfmap
--   
gfmap :: (Generic1 f, Functor (Rep1 f)) => (a -> b) -> f a -> f b -- | Generic (<$). -- -- See also gfmap. gconstmap :: (Generic1 f, Functor (Rep1 f)) => a -> f b -> f a -- | Generic foldMap. -- --
--   instance Foldable MyTypeF where
--     foldMap = gfoldMap
--   
gfoldMap :: (Generic1 f, Foldable (Rep1 f), Monoid m) => (a -> m) -> f a -> m -- | Generic foldr. -- --
--   instance Foldable MyTypeF where
--     foldr = gfoldr
--   
-- -- See also gfoldMap. gfoldr :: (Generic1 f, Foldable (Rep1 f)) => (a -> b -> b) -> b -> f a -> b -- | Generic traverse. -- --
--   instance Traversable MyTypeF where
--     traverse = gtraverse
--   
gtraverse :: (Generic1 f, Traversable (Rep1 f), Applicative m) => (a -> m b) -> f a -> m (f b) -- | Generic sequenceA. -- --
--   instance Traversable MyTypeF where
--     sequenceA = gsequenceA
--   
-- -- See also gtraverse. gsequenceA :: (Generic1 f, Traversable (Rep1 f), Applicative m) => f (m a) -> m (f a) -- | Generic pure. -- --
--   instance Applicative MyTypeF where
--     pure = gpure
--     (<*>) = gap
--   
gpure :: (Generic1 f, Applicative (Rep1 f)) => a -> f a -- | Generic (<*>) (or ap). -- -- See also gpure. gap :: (Generic1 f, Applicative (Rep1 f)) => f (a -> b) -> f a -> f b -- | Generic liftA2. -- -- See also gpure. gliftA2 :: (Generic1 f, Applicative (Rep1 f)) => (a -> b -> c) -> f a -> f b -> f c -- | Generic empty. -- --
--   instance Alternative MyTypeF where
--     empty = gempty
--     (<|>) = galt
--   
gempty :: (Generic1 f, Alternative (Rep1 f)) => f a -- | Generic (<|>). -- -- See also gempty. galt :: (Generic1 f, Alternative (Rep1 f)) => f a -> f a -> f a -- | Generic liftEq. gliftEq :: (Generic1 f, Eq1 (Rep1 f)) => (a -> b -> Bool) -> f a -> f b -> Bool -- | Generic liftCompare. gliftCompare :: (Generic1 f, Ord1 (Rep1 f)) => (a -> b -> Ordering) -> f a -> f b -> Ordering -- | Generic liftShowsPrec. gliftShowsPrec :: (Generic1 f, GShow1 (Rep1 f)) => (Int -> a -> ShowS) -> ([a] -> ShowS) -> Int -> f a -> ShowS -- | Generic representation of Show1 types. type GShow1 = GShow Identity -- | A newtype whose instances for simple classes (Eq, Ord, -- Read, Show) use higher-kinded class instances for -- f (Eq1, Ord1, Read1, Show1). newtype Id1 f a Id1 :: f a -> Id1 f a [unId1] :: Id1 f a -> f a -- | A newtype with trivial instances, that considers every value -- equivalent to every other one, and shows as just "_". newtype Opaque a Opaque :: a -> Opaque a [unOpaque] :: Opaque a -> a -- | A higher-kinded version of Opaque. newtype Opaque1 f a Opaque1 :: f a -> Opaque1 f a [unOpaque1] :: Opaque1 f a -> f a -- | Type with instances derived via Generic. newtype Generically a Generically :: a -> Generically a [unGenerically] :: Generically a -> a -- | Type with Enum instance derived via Generic with -- FiniteEnum option. newtype FiniteEnumeration a FiniteEnumeration :: a -> FiniteEnumeration a [unFiniteEnumeration] :: FiniteEnumeration a -> a -- | Type with instances derived via Generic1. newtype Generically1 f a Generically1 :: f a -> Generically1 f a [unGenerically1] :: Generically1 f a -> f a -- | Class of newtypes. class (Generic a, Coercible a (Old a), Newtype' a) => Newtype a -- | Generic newtype constructor. pack :: Newtype a => Old a -> a -- | Generic newtype destructor. unpack :: Newtype a => a -> Old a -- | Name of the first data constructor in a type as a string. -- --
--   gdatatypeName @(Maybe AnyType) = "Maybe"
--   
gdatatypeName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | Name of the module where the first type constructor is defined. -- --
--   gmoduleName @(Maybe AnyType) = "GHC.Base"
--   
gmoduleName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | Name of the package where the first type constructor is defined. -- --
--   gpackageName @(Maybe AnyType) = "base"
--   
gpackageName :: forall a. (Generic a, GDatatype (Rep a)) => String -- | True if the first type constructor is a newtype. gisNewtype :: forall a. (Generic a, GDatatype (Rep a)) => Bool -- | Generic representations that contain datatype metadata. class GDatatype f -- | Name of the first constructor in a value. -- --
--   gconName (Just 0) = "Just"
--   
gconName :: forall a. Constructors a => a -> String -- | The fixity of the first constructor. -- --
--   gconFixity (Just 0) = Prefix
--   gconFixity ([] :*: id) = Infix RightAssociative 6
--   
gconFixity :: forall a. Constructors a => a -> Fixity -- | True if the constructor is a record. -- --
--   gconIsRecord (Just 0) = False
--   gconIsRecord (Sum 0) = True
--   -- newtype Sum a = Sum { getSum :: a }
--   
gconIsRecord :: forall a. Constructors a => a -> Bool -- | Number of constructors. -- --
--   gconNum @(Maybe AnyType) = 2
--   
gconNum :: forall a. Constructors a => Int -- | Index of a constructor. -- --
--   gconIndex Nothing = 0
--   gconIndex (Just "test") = 1
--   
gconIndex :: forall a. Constructors a => a -> Int -- | Constraint synonym for Generic and GConstructor. class (Generic a, GConstructors (Rep a)) => Constructors a -- | Generic representations that contain constructor metadata. class GConstructors r -- | An opaque identifier for a constructor. data ConId a -- | Identifier of a constructor. conId :: forall a. Constructors a => a -> ConId a -- | Index of a constructor, given its identifier. See also -- gconIndex. conIdToInt :: forall a. ConId a -> Int -- | Name of a constructor. See also gconName. conIdToString :: forall a. Constructors a => ConId a -> String -- | All constructor identifiers. -- --
--   gconNum @a = length (conIdEnum @a)
--   
conIdEnum :: forall a. Constructors a => [ConId a] -- | Meta field of the M1 type constructor. -- | Name of the data type (MetaData). -- | Name of the module where the data type is defined (MetaData) -- | Name of the package where the data type is defined (MetaData) -- | True if the data type is a newtype (MetaData). -- | Name of the constructor (MetaCons). -- | Fixity of the constructor (MetaCons). -- | True for a record constructor (MetaCons). -- | Just the name of the record field, if it is one -- (MetaSel). -- | Name of the record field; undefined for non-record fields -- (MetaSel). -- | Unpackedness annotation of a field (MetaSel). -- | Strictness annotation of a field (MetaSel). -- | Inferred strictness of a field (MetaSel). module Generic.Data.Orphans instance Data.Functor.Classes.Eq1 f => Data.Functor.Classes.Eq1 (GHC.Generics.M1 i c f) instance Data.Functor.Classes.Ord1 f => Data.Functor.Classes.Ord1 (GHC.Generics.M1 i c f) instance Data.Functor.Classes.Eq1 GHC.Generics.V1 instance Data.Functor.Classes.Ord1 GHC.Generics.V1 instance Data.Functor.Classes.Eq1 GHC.Generics.U1 instance Data.Functor.Classes.Ord1 GHC.Generics.U1 instance GHC.Classes.Eq c => Data.Functor.Classes.Eq1 (GHC.Generics.K1 i c) instance GHC.Classes.Ord c => Data.Functor.Classes.Ord1 (GHC.Generics.K1 i c) instance (Data.Functor.Classes.Eq1 f, Data.Functor.Classes.Eq1 g) => Data.Functor.Classes.Eq1 (f GHC.Generics.:*: g) instance (Data.Functor.Classes.Ord1 f, Data.Functor.Classes.Ord1 g) => Data.Functor.Classes.Ord1 (f GHC.Generics.:*: g) instance (Data.Functor.Classes.Eq1 f, Data.Functor.Classes.Eq1 g) => Data.Functor.Classes.Eq1 (f GHC.Generics.:+: g) instance (Data.Functor.Classes.Ord1 f, Data.Functor.Classes.Ord1 g) => Data.Functor.Classes.Ord1 (f GHC.Generics.:+: g) instance Data.Functor.Classes.Eq1 f => Data.Functor.Classes.Eq1 (GHC.Generics.Rec1 f) instance Data.Functor.Classes.Ord1 f => Data.Functor.Classes.Ord1 (GHC.Generics.Rec1 f) instance Data.Functor.Classes.Eq1 GHC.Generics.Par1 instance Data.Functor.Classes.Ord1 GHC.Generics.Par1 instance (Data.Functor.Classes.Eq1 f, Data.Functor.Classes.Eq1 g) => Data.Functor.Classes.Eq1 (f GHC.Generics.:.: g) instance (Data.Functor.Classes.Ord1 f, Data.Functor.Classes.Ord1 g) => Data.Functor.Classes.Ord1 (f GHC.Generics.:.: g) -- | Utilities to derive and transform generic types. module Generic.Data.Types -- | Synthetic data type. -- -- A wrapper to view a generic Rep as the datatype it's supposed -- to represent, without needing a declaration. newtype Data r p Data :: r p -> Data r p [unData] :: Data r p -> r p -- | Conversion between a generic type and the synthetic type made using -- its representation. toData :: Generic a => a -> Data (Rep a) p -- | Inverse of fromData. fromData :: Generic a => Data (Rep a) p -> a