-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/
-- | A promoted and singled version of the base library
--
-- singletons-base uses singletons-th to define
-- promoted and singled functions from the base library,
-- including the Prelude. This library was originally presented in
-- Dependently Typed Programming with Singletons, published at the
-- Haskell Symposium, 2012.
-- (https://richarde.dev/papers/2012/singletons/paper.pdf) See
-- also the paper published at Haskell Symposium, 2014, which describes
-- how promotion works in greater detail:
-- https://richarde.dev/papers/2014/promotion/promotion.pdf.
--
-- WARNING: singletons-base defines orphan instances for
-- Sing, SingKind, etc. for common types such as
-- Bool, [], Maybe, etc. If you define
-- instances of these types in your code, you will likely not be able to
-- use that code with singletons-base.
--
-- singletons-base uses code that relies on bleeding-edge GHC
-- language extensions. As such, singletons-base only supports
-- the latest major version of GHC (currently GHC 9.10). For more
-- information, consult the singletons README.
--
-- You may also be interested in the following related libraries:
--
--
-- - The singletons library is a small, foundational library
-- that defines basic singleton-related types and definitions.
-- - The singletons-th library defines Template Haskell
-- functionality that allows promotion of term-level functions to
-- type-level equivalents and singling functions to dependently
-- typed equivalents.
--
@package singletons-base
@version 3.4
-- | Defines a replacement for the promoted Error function whose
-- argument is kind-polymorphic.
module Data.Singletons.Base.PolyError
-- | Like Error from GHC.TypeLits.Singletons, but with an
-- argument that is generalized to be kind-polymorphic. This allows
-- passing additional information to the error besides raw
-- Symbols.
type family PolyError (arg :: a) :: b
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.PolyError.PolyErrorSym0
-- | Defines functions and datatypes relating to the singleton for
-- Bool, including singled versions of all the definitions in
-- Data.Bool.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Bool. Also, please excuse
-- the apparent repeated variable names. This is due to an interaction
-- between Template Haskell and Haddock.
module Data.Bool.Singletons
type family Sing :: k -> Type
data SBool (a :: Bool)
[SFalse] :: SBool 'False
[STrue] :: SBool 'True
-- | Type-level If. If True a b ==> a; If
-- False a b ==> b
type family If (cond :: Bool) (tru :: k) (fls :: k) :: k
-- | Conditional over singletons
sIf :: forall {k} (a :: Bool) (b :: k) (c :: k). Sing a -> Sing b -> Sing c -> Sing (If a b c)
-- | Type-level "not". An injective type family since 4.10.0.0.
--
-- @since base-4.7.0.0
type family Not (a :: Bool) = (res :: Bool) | res -> a
-- | Negation of a singleton
sNot :: forall (a :: Bool). Sing a -> Sing (Not a)
-- | Type-level "and"
type family (a :: Bool) && (b :: Bool) :: Bool
infixr 3 &&
-- | Type-level "or"
type family (a :: Bool) || (b :: Bool) :: Bool
infixr 2 ||
-- | Conjunction of singletons
(%&&) :: forall (a :: Bool) (b :: Bool). Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
-- | Disjunction of singletons
(%||) :: forall (a :: Bool) (b :: Bool). Sing a -> Sing b -> Sing (a || b)
infixr 2 %||
bool_ :: a -> a -> Bool -> a
type family Bool_ (a1 :: a) (a2 :: a) (a3 :: Bool) :: a
sBool_ :: forall a (t1 :: a) (t2 :: a) (t3 :: Bool). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Bool_Sym0 :: TyFun a (a ~> (Bool ~> a)) -> Type) t1) t2) t3)
type family Otherwise :: Bool
sOtherwise :: Sing OtherwiseSym0
type family TrueSym0 :: Bool
type family FalseSym0 :: Bool
data IfSym0 (a :: TyFun Bool k ~> k ~> k)
data IfSym1 (a6989586621679134776 :: Bool) (b :: TyFun k k ~> k)
data IfSym2 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (c :: TyFun k k)
type family IfSym3 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (a6989586621679134778 :: k) :: k
data NotSym0 (a :: TyFun Bool Bool)
type family NotSym1 (a6989586621679134554 :: Bool) :: Bool
data (a :: TyFun Bool Bool ~> Bool) &&@#@$
infixr 3 &&@#@$
data (a6989586621679133848 :: Bool) &&@#@$$ (b :: TyFun Bool Bool)
infixr 3 &&@#@$$
type family (a6989586621679133848 :: Bool) &&@#@$$$ (a6989586621679133849 :: Bool) :: Bool
infixr 3 &&@#@$$$
data (a :: TyFun Bool Bool ~> Bool) ||@#@$
infixr 2 ||@#@$
data (a6989586621679134209 :: Bool) ||@#@$$ (b :: TyFun Bool Bool)
infixr 2 ||@#@$$
type family (a6989586621679134209 :: Bool) ||@#@$$$ (a6989586621679134210 :: Bool) :: Bool
infixr 2 ||@#@$$$
data Bool_Sym0 (a1 :: TyFun a a ~> Bool ~> a)
data Bool_Sym1 (a6989586621679132605 :: a) (b :: TyFun a Bool ~> a)
data Bool_Sym2 (a6989586621679132605 :: a) (a6989586621679132606 :: a) (c :: TyFun Bool a)
type family Bool_Sym3 (a6989586621679132605 :: a) (a6989586621679132606 :: a) (a6989586621679132607 :: Bool) :: a
type family OtherwiseSym0 :: Bool
instance Data.Singletons.SingI1 Data.Bool.Singletons.IfSym1
instance Data.Singletons.SingI1 Data.Bool.Singletons.Bool_Sym1
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Bool.Singletons.Bool_Sym2 d)
instance Data.Singletons.SingI c => Data.Singletons.SingI1 (Data.Bool.Singletons.IfSym2 c)
instance Data.Singletons.SingI2 Data.Bool.Singletons.IfSym2
instance Data.Singletons.SingI2 Data.Bool.Singletons.Bool_Sym2
instance Data.Singletons.SingI (Data.Bool.Singletons.&&@#@$)
instance Data.Singletons.SingI x => Data.Singletons.SingI ((Data.Bool.Singletons.&&@#@$$) x)
instance Data.Singletons.SingI Data.Bool.Singletons.Bool_Sym0
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Bool.Singletons.Bool_Sym1 d)
instance forall a (d1 :: a) (d2 :: a). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Bool.Singletons.Bool_Sym2 d1 d2)
instance Data.Singletons.SingI Data.Bool.Singletons.IfSym0
instance Data.Singletons.SingI c => Data.Singletons.SingI (Data.Bool.Singletons.IfSym1 c)
instance forall k (c :: GHC.Types.Bool) (t :: k). (Data.Singletons.SingI c, Data.Singletons.SingI t) => Data.Singletons.SingI (Data.Bool.Singletons.IfSym2 c t)
instance Data.Singletons.SingI Data.Bool.Singletons.NotSym0
instance Data.Singletons.SingI (Data.Bool.Singletons.||@#@$)
instance Data.Singletons.SingI x => Data.Singletons.SingI ((Data.Bool.Singletons.||@#@$$) x)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.&&@#@$)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Bool.Singletons.&&@#@$$) a6989586621679133848)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Bool.Singletons.Bool_Sym0
instance forall a (a6989586621679132605 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.Bool_Sym1 a6989586621679132605)
instance forall a (a6989586621679132605 :: a) (a6989586621679132606 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.Bool_Sym2 a6989586621679132605 a6989586621679132606)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Bool.Singletons.IfSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.IfSym1 a6989586621679134776)
instance forall k (a6989586621679134776 :: GHC.Types.Bool) (a6989586621679134777 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.IfSym2 a6989586621679134776 a6989586621679134777)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Bool.Singletons.NotSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Bool.Singletons.||@#@$)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Bool.Singletons.||@#@$$) a6989586621679134209)
-- | Defines the promoted version of Eq, PEq, and the
-- singleton version, SEq. Also defines the DefaultEq type
-- family, which is useful for implementing boolean equality for
-- non-inductively defined data types.
module Data.Eq.Singletons
class PEq a where {
type (arg :: a) == (arg1 :: a) :: Bool;
type (arg :: a) /= (arg1 :: a) :: Bool;
type arg :: a == arg1 :: a = Apply Apply TFHelper_6989586621679139564Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a /= arg1 :: a = Apply Apply TFHelper_6989586621679139553Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
}
infix 4 ==
infix 4 /=
class SEq a
(%==) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%==) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139564Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%/=) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%/=) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139553Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
infix 4 %==
infix 4 %/=
-- | One way to compute Boolean equality for types of any kind. This will
-- return True if the two arguments are known to be the same type
-- and False if they are known to be apart. Examples:
--
--
-- >>> DefaultEq Nothing Nothing
-- True
-- >>> DefaultEq Nothing (Just a)
-- False
-- >>> DefaultEq a a
-- True
--
--
-- DefaultEq is most suited for data types that are not
-- inductively defined. Four concrete examples of this are
-- Natural, Symbol, Char, and Type. One
-- cannot implement boolean equality for these types by pattern matching
-- alone, so DefaultEq is a good fit instead.
--
-- The downside to DefaultEq is that it can fail to reduce if it
-- is unable to determine if two types are equal or apart. Here is one
-- such example:
--
--
-- DefaultEq (Just a) (Just b)
--
--
-- What should this reduce to? It depends on what a and
-- b are. DefaultEq has no way of knowing what these two
-- types are, and as a result, this type will be stuck. This is a pitfall
-- that you can run into if you use DefaultEq to implement boolean
-- equality for an inductive data type like Maybe. For this
-- reason, it is usually recommended to implement boolean equality for
-- inductive data types using pattern matching and recursion, not
-- DefaultEq.
--
-- Note that this definition is slightly different from the (==)
-- type family from Data.Type.Equality in base, as
-- (==) attempts to distinguish applications of type constructors
-- from other types. As a result, a == a does not reduce to
-- True for every a, but DefaultEq a a
-- does reduce to True for every a. The latter
-- behavior is more desirable for singletons' purposes, so we
-- use it instead of (==).
type family DefaultEq (a :: k) (b :: k) :: Bool
data (a1 :: TyFun a a ~> Bool) ==@#@$
infix 4 ==@#@$
data (a6989586621679139544 :: a) ==@#@$$ (b :: TyFun a Bool)
infix 4 ==@#@$$
type family (a6989586621679139544 :: a) ==@#@$$$ (a6989586621679139545 :: a) :: Bool
infix 4 ==@#@$$$
data (a1 :: TyFun a a ~> Bool) /=@#@$
infix 4 /=@#@$
data (a6989586621679139549 :: a) /=@#@$$ (b :: TyFun a Bool)
infix 4 /=@#@$$
type family (a6989586621679139549 :: a) /=@#@$$$ (a6989586621679139550 :: a) :: Bool
infix 4 /=@#@$$$
data DefaultEqSym0 (a :: TyFun k k ~> Bool)
data DefaultEqSym1 (a6989586621679141691 :: k) (b :: TyFun k Bool)
type family DefaultEqSym2 (a6989586621679141691 :: k) (a6989586621679141692 :: k) :: Bool
instance Data.Eq.Singletons.PEq GHC.Types.Bool
instance Data.Eq.Singletons.PEq (GHC.Internal.Data.Either.Either a b)
instance Data.Eq.Singletons.PEq (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Eq.Singletons.PEq [a]
instance Data.Eq.Singletons.PEq (GHC.Internal.Maybe.Maybe a)
instance Data.Eq.Singletons.PEq (GHC.Internal.Base.NonEmpty a)
instance Data.Eq.Singletons.PEq GHC.Types.Ordering
instance Data.Eq.Singletons.PEq (a, b)
instance Data.Eq.Singletons.PEq (a, b, c)
instance Data.Eq.Singletons.PEq (a, b, c, d)
instance Data.Eq.Singletons.PEq (a, b, c, d, e)
instance Data.Eq.Singletons.PEq (a, b, c, d, e, f)
instance Data.Eq.Singletons.PEq (a, b, c, d, e, f, g)
instance Data.Eq.Singletons.PEq ()
instance Data.Eq.Singletons.PEq GHC.Internal.Base.Void
instance Data.Eq.Singletons.SEq GHC.Types.Bool
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b) => Data.Eq.Singletons.SEq (GHC.Internal.Data.Either.Either a b)
instance Data.Eq.Singletons.SEq a => Data.Eq.Singletons.SEq (GHC.Internal.Data.Functor.Identity.Identity a)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq [a]) => Data.Eq.Singletons.SEq [a]
instance Data.Eq.Singletons.SEq a => Data.Eq.Singletons.SEq (GHC.Internal.Maybe.Maybe a)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq [a]) => Data.Eq.Singletons.SEq (GHC.Internal.Base.NonEmpty a)
instance Data.Eq.Singletons.SEq GHC.Types.Ordering
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b) => Data.Eq.Singletons.SEq (a, b)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b, Data.Eq.Singletons.SEq c) => Data.Eq.Singletons.SEq (a, b, c)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b, Data.Eq.Singletons.SEq c, Data.Eq.Singletons.SEq d) => Data.Eq.Singletons.SEq (a, b, c, d)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b, Data.Eq.Singletons.SEq c, Data.Eq.Singletons.SEq d, Data.Eq.Singletons.SEq e) => Data.Eq.Singletons.SEq (a, b, c, d, e)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b, Data.Eq.Singletons.SEq c, Data.Eq.Singletons.SEq d, Data.Eq.Singletons.SEq e, Data.Eq.Singletons.SEq f) => Data.Eq.Singletons.SEq (a, b, c, d, e, f)
instance (Data.Eq.Singletons.SEq a, Data.Eq.Singletons.SEq b, Data.Eq.Singletons.SEq c, Data.Eq.Singletons.SEq d, Data.Eq.Singletons.SEq e, Data.Eq.Singletons.SEq f, Data.Eq.Singletons.SEq g) => Data.Eq.Singletons.SEq (a, b, c, d, e, f, g)
instance Data.Eq.Singletons.SEq ()
instance Data.Eq.Singletons.SEq GHC.Internal.Base.Void
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI1 (Data.Eq.Singletons./=@#@$$)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI1 (Data.Eq.Singletons.==@#@$$)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI (Data.Eq.Singletons./=@#@$)
instance forall a (d :: a). (Data.Eq.Singletons.SEq a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Eq.Singletons./=@#@$$) d)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI (Data.Eq.Singletons.==@#@$)
instance forall a (d :: a). (Data.Eq.Singletons.SEq a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Eq.Singletons.==@#@$$) d)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons./=@#@$)
instance forall a (a6989586621679139549 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Eq.Singletons./=@#@$$) a6989586621679139549)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.==@#@$)
instance forall a (a6989586621679139544 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Eq.Singletons.==@#@$$) a6989586621679139544)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.DefaultEqSym0
instance forall k (a6989586621679141691 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.DefaultEqSym1 a6989586621679141691)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679139553Sym0
instance forall a (a6989586621679139558 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679139553Sym1 a6989586621679139558)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679139564Sym0
instance forall a (a6989586621679139569 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679139564Sym1 a6989586621679139569)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679141968Sym0
instance forall a (a6989586621679141973 :: GHC.Internal.Maybe.Maybe a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679141968Sym1 a6989586621679141973)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679141997Sym0
instance forall a (a6989586621679142002 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679141997Sym1 a6989586621679142002)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142040Sym0
instance forall a b (a6989586621679142045 :: GHC.Internal.Data.Either.Either a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142040Sym1 a6989586621679142045)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142064Sym0
instance forall a (a6989586621679142069 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142064Sym1 a6989586621679142069)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142077Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142077Sym1 a6989586621679142082)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142100Sym0
instance forall a b (a6989586621679142105 :: (a, b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142100Sym1 a6989586621679142105)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142134Sym0
instance forall a b c (a6989586621679142139 :: (a, b, c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142134Sym1 a6989586621679142139)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142177Sym0
instance forall a b c d (a6989586621679142182 :: (a, b, c, d)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142177Sym1 a6989586621679142182)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142229Sym0
instance forall a b c d e (a6989586621679142234 :: (a, b, c, d, e)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142229Sym1 a6989586621679142234)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142290Sym0
instance forall a b c d e f (a6989586621679142295 :: (a, b, c, d, e, f)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142290Sym1 a6989586621679142295)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142360Sym0
instance forall a b c d e f g (a6989586621679142365 :: (a, b, c, d, e, f, g)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142360Sym1 a6989586621679142365)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142390Sym0
instance forall a (a6989586621679142395 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142390Sym1 a6989586621679142395)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142401Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142401Sym1 a6989586621679142406)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142410Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142410Sym1 a6989586621679142415)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Eq.Singletons.TFHelper_6989586621679142419Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Eq.Singletons.TFHelper_6989586621679142419Sym1 a6989586621679142424)
-- | This module defines singleton instances making TypeRep the
-- singleton for the kind TYPE rep (for some
-- RuntimeRep rep), an instantiation of which is the
-- famous kind Type. The definitions don't fully line up with what
-- is expected within the singletons library, so expect unusual results!
module Data.Singletons.Base.TypeRepTYPE
type family Sing :: k -> Type
-- | A variant of SomeTypeRep whose underlying TypeRep is
-- restricted to kind TYPE rep (for some
-- RuntimeRep rep).
data SomeTypeRepTYPE (a :: RuntimeRep)
[SomeTypeRepTYPE] :: forall (a :: RuntimeRep) (a1 :: TYPE a). !TypeRep a1 -> SomeTypeRepTYPE a
instance GHC.Classes.Eq (Data.Singletons.Base.TypeRepTYPE.SomeTypeRepTYPE GHC.Types.LiftedRep)
instance GHC.Classes.Ord (Data.Singletons.Base.TypeRepTYPE.SomeTypeRepTYPE GHC.Types.LiftedRep)
instance Data.Eq.Singletons.PEq (*)
instance Data.Singletons.Decide.SDecide (*)
instance Data.Eq.Singletons.SEq (*)
instance GHC.Internal.Show.Show (Data.Singletons.Base.TypeRepTYPE.SomeTypeRepTYPE GHC.Types.LiftedRep)
instance GHC.Internal.Data.Typeable.Internal.Typeable a => Data.Singletons.SingI a
instance Data.Singletons.SingKind (*)
-- | Defines functions and datatypes relating to the singleton for tuples,
-- including singled versions of all the definitions in
-- Data.Tuple.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Tuple. Also, please
-- excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Data.Tuple.Singletons
type family Sing :: k -> Type
data STuple0 (a :: ())
[STuple0] :: STuple0 '()
data STuple2 (a1 :: (a, b))
[STuple2] :: forall a b (n1 :: a) (n2 :: b). Sing n1 -> Sing n2 -> STuple2 '(n1, n2)
data STuple3 (a1 :: (a, b, c))
[STuple3] :: forall a b c (n1 :: a) (n2 :: b) (n3 :: c). Sing n1 -> Sing n2 -> Sing n3 -> STuple3 '(n1, n2, n3)
data STuple4 (a1 :: (a, b, c, d))
[STuple4] :: forall a b c d (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> STuple4 '(n1, n2, n3, n4)
data STuple5 (a1 :: (a, b, c, d, e))
[STuple5] :: forall a b c d e (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> STuple5 '(n1, n2, n3, n4, n5)
data STuple6 (a1 :: (a, b, c, d, e, f))
[STuple6] :: forall a b c d e f (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> STuple6 '(n1, n2, n3, n4, n5, n6)
data STuple7 (a1 :: (a, b, c, d, e, f, g))
[STuple7] :: forall a b c d e f g (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f) (n7 :: g). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> Sing n7 -> STuple7 '(n1, n2, n3, n4, n5, n6, n7)
type family Fst (a1 :: (a, b)) :: a
sFst :: forall a b (t :: (a, b)). Sing t -> Sing (Apply (FstSym0 :: TyFun (a, b) a -> Type) t)
type family Snd (a1 :: (a, b)) :: b
sSnd :: forall a b (t :: (a, b)). Sing t -> Sing (Apply (SndSym0 :: TyFun (a, b) b -> Type) t)
type family Curry (a1 :: (a, b) ~> c) (a2 :: a) (a3 :: b) :: c
sCurry :: forall a b c (t1 :: (a, b) ~> c) (t2 :: a) (t3 :: b). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type) t1) t2) t3)
type family Uncurry (a1 :: a ~> b ~> c) (a2 :: (a, b)) :: c
sUncurry :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: (a, b)). Sing t1 -> Sing t2 -> Sing (Apply (Apply (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type) t1) t2)
type family Swap (a1 :: (a, b)) :: (b, a)
sSwap :: forall a b (t :: (a, b)). Sing t -> Sing (Apply (SwapSym0 :: TyFun (a, b) (b, a) -> Type) t)
type family Tuple0Sym0 :: ()
data Tuple2Sym0 (a1 :: TyFun a b ~> (a, b))
data Tuple2Sym1 (a6989586621679047641 :: a) (b1 :: TyFun b (a, b))
type family Tuple2Sym2 (a6989586621679047641 :: a) (a6989586621679047642 :: b) :: (a, b)
data Tuple3Sym0 (a1 :: TyFun a b ~> c ~> (a, b, c))
data Tuple3Sym1 (a6989586621679047672 :: a) (b1 :: TyFun b c ~> (a, b, c))
data Tuple3Sym2 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (c1 :: TyFun c (a, b, c))
type family Tuple3Sym3 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (a6989586621679047674 :: c) :: (a, b, c)
data Tuple4Sym0 (a1 :: TyFun a b ~> c ~> d ~> (a, b, c, d))
data Tuple4Sym1 (a6989586621679047721 :: a) (b1 :: TyFun b c ~> d ~> (a, b, c, d))
data Tuple4Sym2 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (c1 :: TyFun c d ~> (a, b, c, d))
data Tuple4Sym3 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (d1 :: TyFun d (a, b, c, d))
type family Tuple4Sym4 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (a6989586621679047724 :: d) :: (a, b, c, d)
data Tuple5Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym1 (a6989586621679047790 :: a) (b1 :: TyFun b c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym2 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (c1 :: TyFun c d ~> e ~> (a, b, c, d, e))
data Tuple5Sym3 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (d1 :: TyFun d e ~> (a, b, c, d, e))
data Tuple5Sym4 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (e1 :: TyFun e (a, b, c, d, e))
type family Tuple5Sym5 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (a6989586621679047794 :: e) :: (a, b, c, d, e)
data Tuple6Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym1 (a6989586621679047881 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym2 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (c1 :: TyFun c d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym3 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (d1 :: TyFun d e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym4 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (e1 :: TyFun e f ~> (a, b, c, d, e, f))
data Tuple6Sym5 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (f1 :: TyFun f (a, b, c, d, e, f))
type family Tuple6Sym6 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (a6989586621679047886 :: f) :: (a, b, c, d, e, f)
data Tuple7Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym1 (a6989586621679047996 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym2 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (c1 :: TyFun c d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym3 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (d1 :: TyFun d e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym4 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (e1 :: TyFun e f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym5 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (f1 :: TyFun f g ~> (a, b, c, d, e, f, g))
data Tuple7Sym6 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (g1 :: TyFun g (a, b, c, d, e, f, g))
type family Tuple7Sym7 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (a6989586621679048002 :: g) :: (a, b, c, d, e, f, g)
data FstSym0 (a1 :: TyFun (a, b) a)
type family FstSym1 (a6989586621679174384 :: (a, b)) :: a
data SndSym0 (a1 :: TyFun (a, b) b)
type family SndSym1 (a6989586621679174380 :: (a, b)) :: b
data CurrySym0 (a1 :: TyFun (a, b) ~> c a ~> b ~> c)
data CurrySym1 (a6989586621679174372 :: (a, b) ~> c) (b1 :: TyFun a b ~> c)
data CurrySym2 (a6989586621679174372 :: (a, b) ~> c) (a6989586621679174373 :: a) (c1 :: TyFun b c)
type family CurrySym3 (a6989586621679174372 :: (a, b) ~> c) (a6989586621679174373 :: a) (a6989586621679174374 :: b) :: c
data UncurrySym0 (a1 :: TyFun a ~> b ~> c (a, b) ~> c)
data UncurrySym1 (a6989586621679174364 :: a ~> b ~> c) (b1 :: TyFun (a, b) c)
type family UncurrySym2 (a6989586621679174364 :: a ~> b ~> c) (a6989586621679174365 :: (a, b)) :: c
data SwapSym0 (a1 :: TyFun (a, b) (b, a))
type family SwapSym1 (a6989586621679174358 :: (a, b)) :: (b, a)
instance Data.Singletons.SingI1 Data.Tuple.Singletons.CurrySym1
instance Data.Singletons.SingI1 Data.Tuple.Singletons.UncurrySym1
instance forall a b c (d :: (a, b) Data.Singletons.~> c). Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Tuple.Singletons.CurrySym2 d)
instance Data.Singletons.SingI2 Data.Tuple.Singletons.CurrySym2
instance Data.Singletons.SingI Data.Tuple.Singletons.CurrySym0
instance forall a b c (d :: (a, b) Data.Singletons.~> c). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Tuple.Singletons.CurrySym1 d)
instance forall a b c (d1 :: (a, b) Data.Singletons.~> c) (d2 :: a). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Tuple.Singletons.CurrySym2 d1 d2)
instance Data.Singletons.SingI Data.Tuple.Singletons.FstSym0
instance Data.Singletons.SingI Data.Tuple.Singletons.SndSym0
instance Data.Singletons.SingI Data.Tuple.Singletons.SwapSym0
instance Data.Singletons.SingI Data.Tuple.Singletons.UncurrySym0
instance forall a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Tuple.Singletons.UncurrySym1 d)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Tuple.Singletons.CurrySym0
instance forall a b c (a6989586621679174372 :: (a, b) Data.Singletons.~> c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Tuple.Singletons.CurrySym1 a6989586621679174372)
instance forall a b c (a6989586621679174372 :: (a, b) Data.Singletons.~> c) (a6989586621679174373 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Tuple.Singletons.CurrySym2 a6989586621679174372 a6989586621679174373)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Tuple.Singletons.FstSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Tuple.Singletons.SndSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Tuple.Singletons.SwapSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Tuple.Singletons.UncurrySym0
instance forall a b c (a6989586621679174364 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Tuple.Singletons.UncurrySym1 a6989586621679174364)
-- | Defines functions and datatypes relating to the singleton for
-- Void, including singled versions of all the definitions in
-- Data.Void.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Void. Also, please excuse
-- the apparent repeated variable names. This is due to an interaction
-- between Template Haskell and Haddock.
module Data.Void.Singletons
type family Sing :: k -> Type
data SVoid (a :: Void)
type family Absurd (a1 :: Void) :: a
sAbsurd :: forall a (t :: Void). Sing t -> Sing (Apply (AbsurdSym0 :: TyFun Void a -> Type) t)
data AbsurdSym0 (a1 :: TyFun Void a)
type family AbsurdSym1 (a6989586621679180348 :: Void) :: a
instance Data.Singletons.SingI Data.Void.Singletons.AbsurdSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Void.Singletons.AbsurdSym0
-- | Defines the promoted version of Ord, POrd, and the singleton
-- version, SOrd.
module Data.Ord.Singletons
class POrd a where {
type Compare (arg :: a) (arg1 :: a) :: Ordering;
type (arg :: a) < (arg1 :: a) :: Bool;
type (arg :: a) <= (arg1 :: a) :: Bool;
type (arg :: a) > (arg1 :: a) :: Bool;
type (arg :: a) >= (arg1 :: a) :: Bool;
type Max (arg :: a) (arg1 :: a) :: a;
type Min (arg :: a) (arg1 :: a) :: a;
type Compare arg :: a arg1 :: a = Apply Apply Compare_6989586621679239102Sym0 :: TyFun a a ~> Ordering -> Type arg arg1;
type arg :: a < arg1 :: a = Apply Apply TFHelper_6989586621679239123Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a <= arg1 :: a = Apply Apply TFHelper_6989586621679239139Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a > arg1 :: a = Apply Apply TFHelper_6989586621679239155Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a >= arg1 :: a = Apply Apply TFHelper_6989586621679239171Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type Max arg :: a arg1 :: a = Apply Apply Max_6989586621679239187Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Min arg :: a arg1 :: a = Apply Apply Min_6989586621679239203Sym0 :: TyFun a a ~> a -> Type arg arg1;
}
infix 4 <
infix 4 <=
infix 4 >
infix 4 >=
class SEq a => SOrd a
sCompare :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
($dmsCompare) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2 ~ Apply (Apply (Compare_6989586621679239102Sym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
(%<) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239123Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%<=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239139Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239155Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239171Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
sMax :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMax) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Max_6989586621679239187Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMin :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMin) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Min_6989586621679239203Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
infix 4 %<
infix 4 %<=
infix 4 %>
infix 4 %>=
type family Comparing (a1 :: b ~> a) (a2 :: b) (a3 :: b) :: Ordering
sComparing :: forall b a (t1 :: b ~> a) (t2 :: b) (t3 :: b). SOrd a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ComparingSym0 :: TyFun (b ~> a) (b ~> (b ~> Ordering)) -> Type) t1) t2) t3)
type family Sing :: k -> Type
data SOrdering (a :: Ordering)
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
data SDown (a1 :: Down a)
[SDown] :: forall a (n :: a). Sing n -> SDown ('Down n)
type family GetDown (a1 :: Down a) :: a
sGetDown :: forall a (t :: Down a). Sing t -> Sing (Apply (GetDownSym0 :: TyFun (Down a) a -> Type) t)
type family LTSym0 :: Ordering
type family EQSym0 :: Ordering
type family GTSym0 :: Ordering
data CompareSym0 (a1 :: TyFun a a ~> Ordering)
data CompareSym1 (a6989586621679239068 :: a) (b :: TyFun a Ordering)
type family CompareSym2 (a6989586621679239068 :: a) (a6989586621679239069 :: a) :: Ordering
data (a1 :: TyFun a a ~> Bool) <@#@$
infix 4 <@#@$
data (a6989586621679239073 :: a) <@#@$$ (b :: TyFun a Bool)
infix 4 <@#@$$
type family (a6989586621679239073 :: a) <@#@$$$ (a6989586621679239074 :: a) :: Bool
infix 4 <@#@$$$
data (a1 :: TyFun a a ~> Bool) <=@#@$
infix 4 <=@#@$
data (a6989586621679239078 :: a) <=@#@$$ (b :: TyFun a Bool)
infix 4 <=@#@$$
type family (a6989586621679239078 :: a) <=@#@$$$ (a6989586621679239079 :: a) :: Bool
infix 4 <=@#@$$$
data (a1 :: TyFun a a ~> Bool) >@#@$
infix 4 >@#@$
data (a6989586621679239083 :: a) >@#@$$ (b :: TyFun a Bool)
infix 4 >@#@$$
type family (a6989586621679239083 :: a) >@#@$$$ (a6989586621679239084 :: a) :: Bool
infix 4 >@#@$$$
data (a1 :: TyFun a a ~> Bool) >=@#@$
infix 4 >=@#@$
data (a6989586621679239088 :: a) >=@#@$$ (b :: TyFun a Bool)
infix 4 >=@#@$$
type family (a6989586621679239088 :: a) >=@#@$$$ (a6989586621679239089 :: a) :: Bool
infix 4 >=@#@$$$
data MaxSym0 (a1 :: TyFun a a ~> a)
data MaxSym1 (a6989586621679239093 :: a) (b :: TyFun a a)
type family MaxSym2 (a6989586621679239093 :: a) (a6989586621679239094 :: a) :: a
data MinSym0 (a1 :: TyFun a a ~> a)
data MinSym1 (a6989586621679239098 :: a) (b :: TyFun a a)
type family MinSym2 (a6989586621679239098 :: a) (a6989586621679239099 :: a) :: a
data ComparingSym0 (a1 :: TyFun b ~> a b ~> b ~> Ordering)
data ComparingSym1 (a6989586621679239059 :: b ~> a) (b1 :: TyFun b b ~> Ordering)
data ComparingSym2 (a6989586621679239059 :: b ~> a) (a6989586621679239060 :: b) (c :: TyFun b Ordering)
type family ComparingSym3 (a6989586621679239059 :: b ~> a) (a6989586621679239060 :: b) (a6989586621679239061 :: b) :: Ordering
data DownSym0 (a1 :: TyFun a Down a)
type family DownSym1 (a6989586621679250142 :: a) :: Down a
data GetDownSym0 (a1 :: TyFun Down a a)
type family GetDownSym1 (a6989586621679250145 :: Down a) :: a
instance forall a (z :: GHC.Internal.Data.Ord.Down a). GHC.Classes.Eq (Data.Ord.Singletons.SDown z)
instance Data.Eq.Singletons.PEq (GHC.Internal.Data.Ord.Down a)
instance Data.Ord.Singletons.POrd GHC.Types.Bool
instance Data.Ord.Singletons.POrd (GHC.Internal.Data.Ord.Down a)
instance Data.Ord.Singletons.POrd (GHC.Internal.Data.Either.Either a b)
instance Data.Ord.Singletons.POrd (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Ord.Singletons.POrd [a]
instance Data.Ord.Singletons.POrd (GHC.Internal.Maybe.Maybe a)
instance Data.Ord.Singletons.POrd (GHC.Internal.Base.NonEmpty a)
instance Data.Ord.Singletons.POrd GHC.Types.Ordering
instance Data.Ord.Singletons.POrd (a, b)
instance Data.Ord.Singletons.POrd (a, b, c)
instance Data.Ord.Singletons.POrd (a, b, c, d)
instance Data.Ord.Singletons.POrd (a, b, c, d, e)
instance Data.Ord.Singletons.POrd (a, b, c, d, e, f)
instance Data.Ord.Singletons.POrd (a, b, c, d, e, f, g)
instance Data.Ord.Singletons.POrd ()
instance Data.Ord.Singletons.POrd GHC.Internal.Base.Void
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Ord.Down a)
instance Data.Singletons.Decide.SDecide a => Data.Singletons.Decide.SDecide (GHC.Internal.Data.Ord.Down a)
instance Data.Eq.Singletons.SEq a => Data.Eq.Singletons.SEq (GHC.Internal.Data.Ord.Down a)
instance Data.Ord.Singletons.SOrd GHC.Types.Bool
instance Data.Ord.Singletons.SOrd a => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Ord.Down a)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b) => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Either.Either a b)
instance Data.Ord.Singletons.SOrd a => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Functor.Identity.Identity a)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd [a]) => Data.Ord.Singletons.SOrd [a]
instance Data.Ord.Singletons.SOrd a => Data.Ord.Singletons.SOrd (GHC.Internal.Maybe.Maybe a)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd [a]) => Data.Ord.Singletons.SOrd (GHC.Internal.Base.NonEmpty a)
instance Data.Ord.Singletons.SOrd GHC.Types.Ordering
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b) => Data.Ord.Singletons.SOrd (a, b)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b, Data.Ord.Singletons.SOrd c) => Data.Ord.Singletons.SOrd (a, b, c)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b, Data.Ord.Singletons.SOrd c, Data.Ord.Singletons.SOrd d) => Data.Ord.Singletons.SOrd (a, b, c, d)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b, Data.Ord.Singletons.SOrd c, Data.Ord.Singletons.SOrd d, Data.Ord.Singletons.SOrd e) => Data.Ord.Singletons.SOrd (a, b, c, d, e)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b, Data.Ord.Singletons.SOrd c, Data.Ord.Singletons.SOrd d, Data.Ord.Singletons.SOrd e, Data.Ord.Singletons.SOrd f) => Data.Ord.Singletons.SOrd (a, b, c, d, e, f)
instance (Data.Ord.Singletons.SOrd a, Data.Ord.Singletons.SOrd b, Data.Ord.Singletons.SOrd c, Data.Ord.Singletons.SOrd d, Data.Ord.Singletons.SOrd e, Data.Ord.Singletons.SOrd f, Data.Ord.Singletons.SOrd g) => Data.Ord.Singletons.SOrd (a, b, c, d, e, f, g)
instance Data.Ord.Singletons.SOrd ()
instance Data.Ord.Singletons.SOrd GHC.Internal.Base.Void
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Ord.Down a)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 Data.Ord.Singletons.ComparingSym1
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 (Data.Ord.Singletons.<=@#@$$)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 (Data.Ord.Singletons.<@#@$$)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 (Data.Ord.Singletons.>=@#@$$)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 (Data.Ord.Singletons.>@#@$$)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 Data.Ord.Singletons.CompareSym1
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 Data.Ord.Singletons.MaxSym1
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 Data.Ord.Singletons.MinSym1
instance forall a b (d :: b Data.Singletons.~> a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Ord.Singletons.ComparingSym2 d)
instance Data.Singletons.SingI1 'GHC.Internal.Data.Ord.Down
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI2 Data.Ord.Singletons.ComparingSym2
instance forall a (n :: a). Data.Singletons.SingI n => Data.Singletons.SingI ('GHC.Internal.Data.Ord.Down n)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI (Data.Ord.Singletons.<=@#@$)
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Ord.Singletons.<=@#@$$) d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI (Data.Ord.Singletons.<@#@$)
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Ord.Singletons.<@#@$$) d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI (Data.Ord.Singletons.>=@#@$)
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Ord.Singletons.>=@#@$$) d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI (Data.Ord.Singletons.>@#@$)
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Ord.Singletons.>@#@$$) d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.Ord.Singletons.CompareSym0
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Ord.Singletons.CompareSym1 d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.Ord.Singletons.ComparingSym0
instance forall a b (d :: b Data.Singletons.~> a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Ord.Singletons.ComparingSym1 d)
instance forall a b (d1 :: b Data.Singletons.~> a) (d2 :: b). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Ord.Singletons.ComparingSym2 d1 d2)
instance Data.Singletons.SingI Data.Ord.Singletons.DownSym0
instance Data.Singletons.SingI Data.Ord.Singletons.GetDownSym0
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.Ord.Singletons.MaxSym0
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Ord.Singletons.MaxSym1 d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.Ord.Singletons.MinSym0
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Ord.Singletons.MinSym1 d)
instance Data.Singletons.SingKind a => Data.Singletons.SingKind (GHC.Internal.Data.Ord.Down a)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.<=@#@$)
instance forall a (a6989586621679239078 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Ord.Singletons.<=@#@$$) a6989586621679239078)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.<@#@$)
instance forall a (a6989586621679239073 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Ord.Singletons.<@#@$$) a6989586621679239073)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.>=@#@$)
instance forall a (a6989586621679239088 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Ord.Singletons.>=@#@$$) a6989586621679239088)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.>@#@$)
instance forall a (a6989586621679239083 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Ord.Singletons.>@#@$$) a6989586621679239083)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.CompareSym0
instance forall a (a6989586621679239068 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.CompareSym1 a6989586621679239068)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679239102Sym0
instance forall a (a6989586621679239107 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679239102Sym1 a6989586621679239107)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679252052Sym0
instance forall a (a6989586621679252057 :: GHC.Internal.Data.Ord.Down a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679252052Sym1 a6989586621679252057)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254045Sym0
instance forall a (a6989586621679254050 :: GHC.Internal.Maybe.Maybe a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254045Sym1 a6989586621679254050)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254611Sym0
instance forall a (a6989586621679254616 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254611Sym1 a6989586621679254616)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254652Sym0
instance forall a b (a6989586621679254657 :: GHC.Internal.Data.Either.Either a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254652Sym1 a6989586621679254657)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254676Sym0
instance forall a (a6989586621679254681 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254676Sym1 a6989586621679254681)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254689Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254689Sym1 a6989586621679254694)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254712Sym0
instance forall a b (a6989586621679254717 :: (a, b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254712Sym1 a6989586621679254717)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254746Sym0
instance forall a b c (a6989586621679254751 :: (a, b, c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254746Sym1 a6989586621679254751)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254789Sym0
instance forall a b c d (a6989586621679254794 :: (a, b, c, d)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254789Sym1 a6989586621679254794)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254841Sym0
instance forall a b c d e (a6989586621679254846 :: (a, b, c, d, e)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254841Sym1 a6989586621679254846)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254902Sym0
instance forall a b c d e f (a6989586621679254907 :: (a, b, c, d, e, f)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254902Sym1 a6989586621679254907)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679254972Sym0
instance forall a b c d e f g (a6989586621679254977 :: (a, b, c, d, e, f, g)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679254972Sym1 a6989586621679254977)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679255002Sym0
instance forall a (a6989586621679255007 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679255002Sym1 a6989586621679255007)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679255013Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679255013Sym1 a6989586621679255018)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679255022Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679255022Sym1 a6989586621679255027)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Compare_6989586621679255031Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Compare_6989586621679255031Sym1 a6989586621679255036)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.ComparingSym0
instance forall b a (a6989586621679239059 :: b Data.Singletons.~> a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.ComparingSym1 a6989586621679239059)
instance forall b a (a6989586621679239059 :: b Data.Singletons.~> a) (a6989586621679239060 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.ComparingSym2 a6989586621679239059 a6989586621679239060)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.DownSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.GetDownSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239111Scrutinee_6989586621679237776Sym0
instance forall k1 (x6989586621679239109 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239111Scrutinee_6989586621679237776Sym1 x6989586621679239109)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239115Scrutinee_6989586621679237778Sym0
instance forall k1 (x6989586621679239109 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239115Scrutinee_6989586621679237778Sym1 x6989586621679239109)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239132Scrutinee_6989586621679237780Sym0
instance forall k1 (x6989586621679239130 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239132Scrutinee_6989586621679237780Sym1 x6989586621679239130)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239148Scrutinee_6989586621679237782Sym0
instance forall k1 (x6989586621679239146 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239148Scrutinee_6989586621679237782Sym1 x6989586621679239146)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239164Scrutinee_6989586621679237784Sym0
instance forall k1 (x6989586621679239162 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239164Scrutinee_6989586621679237784Sym1 x6989586621679239162)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239180Scrutinee_6989586621679237786Sym0
instance forall k1 (x6989586621679239178 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239180Scrutinee_6989586621679237786Sym1 x6989586621679239178)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239196Scrutinee_6989586621679237788Sym0
instance forall k1 (x6989586621679239194 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239196Scrutinee_6989586621679237788Sym1 x6989586621679239194)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Let6989586621679239212Scrutinee_6989586621679237790Sym0
instance forall k1 (x6989586621679239210 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Let6989586621679239212Scrutinee_6989586621679237790Sym1 x6989586621679239210)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.MaxSym0
instance forall a (a6989586621679239093 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.MaxSym1 a6989586621679239093)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Max_6989586621679239187Sym0
instance forall a (a6989586621679239192 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Max_6989586621679239187Sym1 a6989586621679239192)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.MinSym0
instance forall a (a6989586621679239098 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.MinSym1 a6989586621679239098)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.Min_6989586621679239203Sym0
instance forall a (a6989586621679239208 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.Min_6989586621679239203Sym1 a6989586621679239208)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679239123Sym0
instance forall a (a6989586621679239128 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679239123Sym1 a6989586621679239128)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679239139Sym0
instance forall a (a6989586621679239144 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679239139Sym1 a6989586621679239144)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679239155Sym0
instance forall a (a6989586621679239160 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679239155Sym1 a6989586621679239160)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679239171Sym0
instance forall a (a6989586621679239176 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679239171Sym1 a6989586621679239176)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679252041Sym0
instance forall a (a6989586621679252046 :: GHC.Internal.Data.Ord.Down a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679252041Sym1 a6989586621679252046)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Ord.Singletons.TFHelper_6989586621679252162Sym0
instance forall a (a6989586621679252167 :: GHC.Internal.Data.Ord.Down a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Ord.Singletons.TFHelper_6989586621679252162Sym1 a6989586621679252167)
instance Data.Singletons.Decide.SDecide a => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Ord.Singletons.SDown
instance Data.Singletons.Decide.SDecide a => GHC.Internal.Data.Type.Equality.TestEquality Data.Ord.Singletons.SDown
-- | Defines singleton versions of the definitions in
-- Data.Function.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Function. Also, please
-- excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Data.Function.Singletons
type family Id (a1 :: a) :: a
sId :: forall a (t :: a). Sing t -> Sing (Apply (IdSym0 :: TyFun a a -> Type) t)
type family Const (a1 :: a) (a2 :: b) :: a
sConst :: forall a b (t1 :: a) (t2 :: b). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ConstSym0 :: TyFun a (b ~> a) -> Type) t1) t2)
type family ( (a1 :: b ~> c) . (a2 :: a ~> b) ) (a3 :: a) :: c
infixr 9 .
(%.) :: forall b c a (t1 :: b ~> c) (t2 :: a ~> b) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ((.@#@$) :: TyFun (b ~> c) ((a ~> b) ~> (a ~> c)) -> Type) t1) t2) t3)
infixr 9 %.
type family Flip (a1 :: a ~> b ~> c) (a2 :: b) (a3 :: a) :: c
sFlip :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: b) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FlipSym0 :: TyFun (a ~> (b ~> c)) (b ~> (a ~> c)) -> Type) t1) t2) t3)
type family (a1 :: a ~> b) $ (a2 :: a) :: b
infixr 0 $
(%$) :: forall a b (t1 :: a ~> b) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (($@#@$) :: TyFun (a ~> b) (a ~> b) -> Type) t1) t2)
infixr 0 %$
type family (a1 :: a) & (a2 :: a ~> b) :: b
infixl 1 &
(%&) :: forall a b (t1 :: a) (t2 :: a ~> b). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((&@#@$) :: TyFun a ((a ~> b) ~> b) -> Type) t1) t2)
infixl 1 %&
type family On (a1 :: b ~> b ~> c) (a2 :: a ~> b) (a3 :: a) (a4 :: a) :: c
infixl 0 `On`
sOn :: forall b c a (t1 :: b ~> (b ~> c)) (t2 :: a ~> b) (t3 :: a) (t4 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (Apply (OnSym0 :: TyFun (b ~> (b ~> c)) ((a ~> b) ~> (a ~> (a ~> c))) -> Type) t1) t2) t3) t4)
infixl 0 `sOn`
data IdSym0 (a1 :: TyFun a a)
type family IdSym1 (a6989586621679181809 :: a) :: a
data ConstSym0 (a1 :: TyFun a b ~> a)
data ConstSym1 (a6989586621679181804 :: a) (b1 :: TyFun b a)
type family ConstSym2 (a6989586621679181804 :: a) (a6989586621679181805 :: b) :: a
data (a1 :: TyFun b ~> c a ~> b ~> a ~> c) .@#@$
infixr 9 .@#@$
data (a6989586621679181791 :: b ~> c) .@#@$$ (b1 :: TyFun a ~> b a ~> c)
infixr 9 .@#@$$
data ( (a6989586621679181791 :: b ~> c) .@#@$$$ (a6989586621679181792 :: a ~> b) ) (c1 :: TyFun a c)
infixr 9 .@#@$$$
type family ( (a6989586621679181791 :: b ~> c) .@#@$$$$ (a6989586621679181792 :: a ~> b) ) (a6989586621679181793 :: a) :: c
infixr 9 .@#@$$$$
data FlipSym0 (a1 :: TyFun a ~> b ~> c b ~> a ~> c)
data FlipSym1 (a6989586621679181779 :: a ~> b ~> c) (b1 :: TyFun b a ~> c)
data FlipSym2 (a6989586621679181779 :: a ~> b ~> c) (a6989586621679181780 :: b) (c1 :: TyFun a c)
type family FlipSym3 (a6989586621679181779 :: a ~> b ~> c) (a6989586621679181780 :: b) (a6989586621679181781 :: a) :: c
data (a1 :: TyFun a ~> b a ~> b) $@#@$
infixr 0 $@#@$
data (a6989586621679181760 :: a ~> b) $@#@$$ (b1 :: TyFun a b)
infixr 0 $@#@$$
type family (a6989586621679181760 :: a ~> b) $@#@$$$ (a6989586621679181761 :: a) :: b
infixr 0 $@#@$$$
data (a1 :: TyFun a a ~> b ~> b) &@#@$
infixl 1 &@#@$
data (a6989586621679329292 :: a) &@#@$$ (b1 :: TyFun a ~> b b)
infixl 1 &@#@$$
type family (a6989586621679329292 :: a) &@#@$$$ (a6989586621679329293 :: a ~> b) :: b
infixl 1 &@#@$$$
data OnSym0 (a1 :: TyFun b ~> b ~> c a ~> b ~> a ~> a ~> c)
infixl 0 `OnSym0`
data OnSym1 (a6989586621679329305 :: b ~> b ~> c) (b1 :: TyFun a ~> b a ~> a ~> c)
infixl 0 `OnSym1`
data OnSym2 (a6989586621679329305 :: b ~> b ~> c) (a6989586621679329306 :: a ~> b) (c1 :: TyFun a a ~> c)
infixl 0 `OnSym2`
data OnSym3 (a6989586621679329305 :: b ~> b ~> c) (a6989586621679329306 :: a ~> b) (a6989586621679329307 :: a) (d :: TyFun a c)
infixl 0 `OnSym3`
type family OnSym4 (a6989586621679329305 :: b ~> b ~> c) (a6989586621679329306 :: a ~> b) (a6989586621679329307 :: a) (a6989586621679329308 :: a) :: c
infixl 0 `OnSym4`
instance Data.Singletons.SingI1 Data.Function.Singletons.OnSym1
instance forall b c (d :: b Data.Singletons.~> (b Data.Singletons.~> c)) a. Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Function.Singletons.OnSym2 d)
instance Data.Singletons.SingI1 (Data.Function.Singletons.&@#@$$)
instance forall b c (d1 :: b Data.Singletons.~> (b Data.Singletons.~> c)) a (d2 :: a Data.Singletons.~> b). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI1 (Data.Function.Singletons.OnSym3 d1 d2)
instance Data.Singletons.SingI2 Data.Function.Singletons.OnSym2
instance forall b c (d :: b Data.Singletons.~> (b Data.Singletons.~> c)) a. Data.Singletons.SingI d => Data.Singletons.SingI2 (Data.Function.Singletons.OnSym3 d)
instance Data.Singletons.SingI (Data.Function.Singletons.&@#@$)
instance forall a (d :: a) b. Data.Singletons.SingI d => Data.Singletons.SingI ((Data.Function.Singletons.&@#@$$) d)
instance Data.Singletons.SingI Data.Function.Singletons.OnSym0
instance forall b c (d :: b Data.Singletons.~> (b Data.Singletons.~> c)) a. Data.Singletons.SingI d => Data.Singletons.SingI (Data.Function.Singletons.OnSym1 d)
instance forall b c (d1 :: b Data.Singletons.~> (b Data.Singletons.~> c)) a (d2 :: a Data.Singletons.~> b). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Function.Singletons.OnSym2 d1 d2)
instance forall b c (d1 :: b Data.Singletons.~> (b Data.Singletons.~> c)) a (d2 :: a Data.Singletons.~> b) (d3 :: a). (Data.Singletons.SingI d1, Data.Singletons.SingI d2, Data.Singletons.SingI d3) => Data.Singletons.SingI (Data.Function.Singletons.OnSym3 d1 d2 d3)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.&@#@$)
instance forall a b (a6989586621679329292 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Function.Singletons.&@#@$$) a6989586621679329292)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Function.Singletons.Lambda_6989586621679329313Sym0
instance forall k2 k3 k4 k5 k6 (ty6989586621679329309 :: k2 Data.Singletons.~> (k2 Data.Singletons.~> k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.Lambda_6989586621679329313Sym1 ty6989586621679329309)
instance forall k2 k3 k4 k5 k6 (ty6989586621679329309 :: k2 Data.Singletons.~> (k2 Data.Singletons.~> k3)) (f6989586621679329310 :: k4 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.Lambda_6989586621679329313Sym2 ty6989586621679329309 f6989586621679329310)
instance forall k2 k3 k4 k5 k6 (ty6989586621679329309 :: k2 Data.Singletons.~> (k2 Data.Singletons.~> k3)) (f6989586621679329310 :: k4 Data.Singletons.~> k2) (a_69895866216793292966989586621679329311 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.Lambda_6989586621679329313Sym3 ty6989586621679329309 f6989586621679329310 a_69895866216793292966989586621679329311)
instance forall k2 k3 k4 k5 k6 (ty6989586621679329309 :: k2 Data.Singletons.~> (k2 Data.Singletons.~> k3)) (f6989586621679329310 :: k4 Data.Singletons.~> k2) (a_69895866216793292966989586621679329311 :: k5) (a_69895866216793292986989586621679329312 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.Lambda_6989586621679329313Sym4 ty6989586621679329309 f6989586621679329310 a_69895866216793292966989586621679329311 a_69895866216793292986989586621679329312)
instance forall k2 k3 k4 k5 k6 (ty6989586621679329309 :: k2 Data.Singletons.~> (k2 Data.Singletons.~> k3)) (f6989586621679329310 :: k4 Data.Singletons.~> k2) (a_69895866216793292966989586621679329311 :: k5) (a_69895866216793292986989586621679329312 :: k6) (x6989586621679329315 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.Lambda_6989586621679329313Sym5 ty6989586621679329309 f6989586621679329310 a_69895866216793292966989586621679329311 a_69895866216793292986989586621679329312 x6989586621679329315)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Function.Singletons.OnSym0
instance forall b c a (a6989586621679329305 :: b Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.OnSym1 a6989586621679329305)
instance forall b c a (a6989586621679329305 :: b Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621679329306 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.OnSym2 a6989586621679329305 a6989586621679329306)
instance forall b c a (a6989586621679329305 :: b Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621679329306 :: a Data.Singletons.~> b) (a6989586621679329307 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Function.Singletons.OnSym3 a6989586621679329305 a6989586621679329306 a6989586621679329307)
-- | Defines functions and datatypes relating to the singleton for
-- Either, including singled versions of all the definitions in
-- Data.Either.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Either. Also, please
-- excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Data.Either.Singletons
type family Sing :: k -> Type
data SEither (a1 :: Either a b)
[SLeft] :: forall a b (n :: a). Sing n -> SEither ('Left n :: Either a b)
[SRight] :: forall a b (n :: b). Sing n -> SEither ('Right n :: Either a b)
either_ :: (a -> c) -> (b -> c) -> Either a b -> c
type family Either_ (a1 :: a ~> c) (a2 :: b ~> c) (a3 :: Either a b) :: c
sEither_ :: forall a c b (t1 :: a ~> c) (t2 :: b ~> c) (t3 :: Either a b). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Either_Sym0 :: TyFun (a ~> c) ((b ~> c) ~> (Either a b ~> c)) -> Type) t1) t2) t3)
type family Lefts (a1 :: [Either a b]) :: [a]
sLefts :: forall a b (t :: [Either a b]). Sing t -> Sing (Apply (LeftsSym0 :: TyFun [Either a b] [a] -> Type) t)
type family Rights (a1 :: [Either a b]) :: [b]
sRights :: forall a b (t :: [Either a b]). Sing t -> Sing (Apply (RightsSym0 :: TyFun [Either a b] [b] -> Type) t)
type family PartitionEithers (a1 :: [Either a b]) :: ([a], [b])
sPartitionEithers :: forall a b (t :: [Either a b]). Sing t -> Sing (Apply (PartitionEithersSym0 :: TyFun [Either a b] ([a], [b]) -> Type) t)
type family IsLeft (a1 :: Either a b) :: Bool
sIsLeft :: forall a b (t :: Either a b). Sing t -> Sing (Apply (IsLeftSym0 :: TyFun (Either a b) Bool -> Type) t)
type family IsRight (a1 :: Either a b) :: Bool
sIsRight :: forall a b (t :: Either a b). Sing t -> Sing (Apply (IsRightSym0 :: TyFun (Either a b) Bool -> Type) t)
data LeftSym0 (a1 :: TyFun a Either a b)
type family LeftSym1 (a6989586621679047196 :: a) :: Either a b
data RightSym0 (a1 :: TyFun b Either a b)
type family RightSym1 (a6989586621679047198 :: b) :: Either a b
data Either_Sym0 (a1 :: TyFun a ~> c b ~> c ~> Either a b ~> c)
data Either_Sym1 (a6989586621679337268 :: a ~> c) (b1 :: TyFun b ~> c Either a b ~> c)
data Either_Sym2 (a6989586621679337268 :: a ~> c) (a6989586621679337269 :: b ~> c) (c1 :: TyFun Either a b c)
type family Either_Sym3 (a6989586621679337268 :: a ~> c) (a6989586621679337269 :: b ~> c) (a6989586621679337270 :: Either a b) :: c
data LeftsSym0 (a1 :: TyFun [Either a b] [a])
type family LeftsSym1 (a6989586621679339586 :: [Either a b]) :: [a]
data RightsSym0 (a1 :: TyFun [Either a b] [b])
type family RightsSym1 (a6989586621679339580 :: [Either a b]) :: [b]
data IsLeftSym0 (a1 :: TyFun Either a b Bool)
type family IsLeftSym1 (a6989586621679339558 :: Either a b) :: Bool
data IsRightSym0 (a1 :: TyFun Either a b Bool)
type family IsRightSym1 (a6989586621679339555 :: Either a b) :: Bool
instance Data.Singletons.SingI1 Data.Either.Singletons.Either_Sym1
instance forall a c (d :: a Data.Singletons.~> c) b. Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Either.Singletons.Either_Sym2 d)
instance Data.Singletons.SingI2 Data.Either.Singletons.Either_Sym2
instance Data.Singletons.SingI Data.Either.Singletons.Either_Sym0
instance forall a c (d :: a Data.Singletons.~> c) b. Data.Singletons.SingI d => Data.Singletons.SingI (Data.Either.Singletons.Either_Sym1 d)
instance forall a c (d1 :: a Data.Singletons.~> c) b (d2 :: b Data.Singletons.~> c). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Either.Singletons.Either_Sym2 d1 d2)
instance Data.Singletons.SingI Data.Either.Singletons.IsLeftSym0
instance Data.Singletons.SingI Data.Either.Singletons.IsRightSym0
instance Data.Singletons.SingI Data.Either.Singletons.LeftsSym0
instance Data.Singletons.SingI Data.Either.Singletons.PartitionEithersSym0
instance Data.Singletons.SingI Data.Either.Singletons.RightsSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.Either_Sym0
instance forall a c b (a6989586621679337268 :: a Data.Singletons.~> c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Either_Sym1 a6989586621679337268)
instance forall a c b (a6989586621679337268 :: a Data.Singletons.~> c) (a6989586621679337269 :: b Data.Singletons.~> c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Either_Sym2 a6989586621679337268 a6989586621679337269)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.IsLeftSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.IsRightSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.LeftsSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.Let6989586621679339565LeftSym0
instance forall k k2 k3 (a_69895866216793395596989586621679339564 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Let6989586621679339565LeftSym1 a_69895866216793395596989586621679339564)
instance forall k k2 k3 (a_69895866216793395596989586621679339564 :: k) (a6989586621679339572 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Let6989586621679339565LeftSym2 a_69895866216793395596989586621679339564 a6989586621679339572)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.Let6989586621679339565RightSym0
instance forall k k2 k3 (a_69895866216793395596989586621679339564 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Let6989586621679339565RightSym1 a_69895866216793395596989586621679339564)
instance forall k k2 k3 (a_69895866216793395596989586621679339564 :: k) (a6989586621679339566 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Either.Singletons.Let6989586621679339565RightSym2 a_69895866216793395596989586621679339564 a6989586621679339566)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.PartitionEithersSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Either.Singletons.RightsSym0
-- | Defines the promoted and singled versions of the Functor type
-- class.
module Data.Functor.Singletons
class PFunctor (f :: Type -> Type) where {
type Fmap (arg :: a ~> b) (arg1 :: f a) :: f b;
type (arg :: a) <$ (arg1 :: f b) :: f a;
type arg :: a <$ arg1 :: f b = Apply Apply TFHelper_6989586621679351153Sym0 :: TyFun a f b ~> f a -> Type arg arg1;
}
infixl 4 <$
class SFunctor (f :: Type -> Type)
sFmap :: forall a b (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FmapSym0 :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
(%<$) :: forall a b (t1 :: a) (t2 :: f b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
($dm%<$) :: forall a b (t1 :: a) (t2 :: f b). (SFunctor f, Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351153Sym0 :: TyFun a (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
infixl 4 %<$
type family (a1 :: f a) $> (a2 :: b) :: f b
infixl 4 $>
(%$>) :: forall (f :: Type -> Type) a b (t1 :: f a) (t2 :: b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (($>@#@$) :: TyFun (f a) (b ~> f b) -> Type) t1) t2)
infixl 4 %$>
type family (a1 :: a ~> b) <$> (a2 :: f a) :: f b
infixl 4 <$>
(%<$>) :: forall a b (f :: Type -> Type) (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$>@#@$) :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
infixl 4 %<$>
type family (a1 :: f a) <&> (a2 :: a ~> b) :: f b
infixl 1 <&>
(%<&>) :: forall (f :: Type -> Type) a b (t1 :: f a) (t2 :: a ~> b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<&>@#@$) :: TyFun (f a) ((a ~> b) ~> f b) -> Type) t1) t2)
infixl 1 %<&>
type family Void (a1 :: f a) :: f ()
sVoid :: forall (f :: Type -> Type) a (t :: f a). SFunctor f => Sing t -> Sing (Apply (VoidSym0 :: TyFun (f a) (f ()) -> Type) t)
data FmapSym0 (a1 :: TyFun a ~> b f a ~> f b)
data FmapSym1 (a6989586621679351144 :: a ~> b) (b1 :: TyFun f a f b)
type family FmapSym2 (a6989586621679351144 :: a ~> b) (a6989586621679351145 :: f a) :: f b
data (a1 :: TyFun a f b ~> f a) <$@#@$
infixl 4 <$@#@$
data (a6989586621679351149 :: a) <$@#@$$ (b1 :: TyFun f b f a)
infixl 4 <$@#@$$
type family (a6989586621679351149 :: a) <$@#@$$$ (a6989586621679351150 :: f b) :: f a
infixl 4 <$@#@$$$
data (a1 :: TyFun f a b ~> f b) $>@#@$
infixl 4 $>@#@$
data (a6989586621679536177 :: f a) $>@#@$$ (b1 :: TyFun b f b)
infixl 4 $>@#@$$
type family (a6989586621679536177 :: f a) $>@#@$$$ (a6989586621679536178 :: b) :: f b
infixl 4 $>@#@$$$
data (a1 :: TyFun a ~> b f a ~> f b) <$>@#@$
infixl 4 <$>@#@$
data (a6989586621679536195 :: a ~> b) <$>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <$>@#@$$
type family (a6989586621679536195 :: a ~> b) <$>@#@$$$ (a6989586621679536196 :: f a) :: f b
infixl 4 <$>@#@$$$
data (a1 :: TyFun f a a ~> b ~> f b) <&>@#@$
infixl 1 <&>@#@$
data (a6989586621679536184 :: f a) <&>@#@$$ (b1 :: TyFun a ~> b f b)
infixl 1 <&>@#@$$
type family (a6989586621679536184 :: f a) <&>@#@$$$ (a6989586621679536185 :: a ~> b) :: f b
infixl 1 <&>@#@$$$
data VoidSym0 (a1 :: TyFun f a f ())
type family VoidSym1 (a6989586621679536168 :: f a) :: f ()
instance Control.Monad.Singletons.Internal.PFunctor GHC.Internal.Data.Ord.Down
instance Control.Monad.Singletons.Internal.PFunctor ((,) a)
instance Control.Monad.Singletons.Internal.SFunctor GHC.Internal.Data.Ord.Down
instance Control.Monad.Singletons.Internal.SFunctor ((,) a)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI1 (Data.Functor.Singletons.<$>@#@$$)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI1 (Data.Functor.Singletons.$>@#@$$)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI1 (Data.Functor.Singletons.<&>@#@$$)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI (Data.Functor.Singletons.$>@#@$)
instance forall (f :: * -> *) a (d :: f a) b. (Control.Monad.Singletons.Internal.SFunctor f, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Functor.Singletons.$>@#@$$) d)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI (Data.Functor.Singletons.<$>@#@$)
instance forall (f :: * -> *) a b (d :: a Data.Singletons.~> b). (Control.Monad.Singletons.Internal.SFunctor f, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Functor.Singletons.<$>@#@$$) d)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI (Data.Functor.Singletons.<&>@#@$)
instance forall (f :: * -> *) a (d :: f a) b. (Control.Monad.Singletons.Internal.SFunctor f, Data.Singletons.SingI d) => Data.Singletons.SingI ((Data.Functor.Singletons.<&>@#@$$) d)
instance Control.Monad.Singletons.Internal.SFunctor f => Data.Singletons.SingI Data.Functor.Singletons.VoidSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.$>@#@$)
instance forall (f :: * -> *) a b (a6989586621679536177 :: f a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Functor.Singletons.$>@#@$$) a6989586621679536177)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.<$>@#@$)
instance forall a b (f :: * -> *) (a6989586621679536195 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Functor.Singletons.<$>@#@$$) a6989586621679536195)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.<&>@#@$)
instance forall (f :: * -> *) a b (a6989586621679536184 :: f a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Functor.Singletons.<&>@#@$$) a6989586621679536184)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Fmap_6989586621679536305Sym0
instance forall a1 b a2 (a6989586621679536310 :: a1 Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Fmap_6989586621679536305Sym1 a6989586621679536310)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Fmap_6989586621679536341Sym0
instance forall a b (a6989586621679536346 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Fmap_6989586621679536341Sym1 a6989586621679536346)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Lambda_6989586621679536315Sym0
instance forall k1 k2 k3 k4 (_f_69895866216795361376989586621679536312 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536315Sym1 _f_69895866216795361376989586621679536312)
instance forall k1 k2 k3 k4 (_f_69895866216795361376989586621679536312 :: k1) (a_69895866216795361436989586621679536313 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536315Sym2 _f_69895866216795361376989586621679536312 a_69895866216795361436989586621679536313)
instance forall k1 k2 k3 k4 (_f_69895866216795361376989586621679536312 :: k1) (a_69895866216795361436989586621679536313 :: k2) (a_69895866216795361456989586621679536314 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536315Sym3 _f_69895866216795361376989586621679536312 a_69895866216795361436989586621679536313 a_69895866216795361456989586621679536314)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Lambda_6989586621679536331Sym0
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536331Sym1 _z_69895866216795361396989586621679536328)
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1) (a_69895866216795361516989586621679536329 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536331Sym2 _z_69895866216795361396989586621679536328 a_69895866216795361516989586621679536329)
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1) (a_69895866216795361516989586621679536329 :: k2) (a_69895866216795361536989586621679536330 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536331Sym3 _z_69895866216795361396989586621679536328 a_69895866216795361516989586621679536329 a_69895866216795361536989586621679536330)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Lambda_6989586621679536335Sym0
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536335Sym1 _z_69895866216795361396989586621679536328)
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1) (a_69895866216795361516989586621679536329 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536335Sym2 _z_69895866216795361396989586621679536328 a_69895866216795361516989586621679536329)
instance forall k1 k2 k3 k4 (_z_69895866216795361396989586621679536328 :: k1) (a_69895866216795361516989586621679536329 :: k2) (a_69895866216795361536989586621679536330 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536335Sym3 _z_69895866216795361396989586621679536328 a_69895866216795361516989586621679536329 a_69895866216795361536989586621679536330)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.Lambda_6989586621679536361Sym0
instance forall k1 k2 k3 (_z_69895866216795361586989586621679536359 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536361Sym1 _z_69895866216795361586989586621679536359)
instance forall k1 k2 k3 (_z_69895866216795361586989586621679536359 :: k1) (a_69895866216795361646989586621679536360 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.Lambda_6989586621679536361Sym2 _z_69895866216795361586989586621679536359 a_69895866216795361646989586621679536360)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.TFHelper_6989586621679536321Sym0
instance forall a1 a2 b (a6989586621679536326 :: a1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.TFHelper_6989586621679536321Sym1 a6989586621679536326)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.TFHelper_6989586621679536352Sym0
instance forall a b (a6989586621679536357 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Singletons.TFHelper_6989586621679536352Sym1 a6989586621679536357)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Singletons.VoidSym0
-- | Defines the promoted and singled versions of the MonadFail type
-- class.
module Control.Monad.Fail.Singletons
class PMonadFail (m :: k -> Type) where {
type Fail (arg :: [Char]) :: m a;
}
class SMonad m => SMonadFail (m :: Type -> Type)
sFail :: forall a (t :: [Char]). SMonadFail m => Sing t -> Sing (Apply (FailSym0 :: TyFun [Char] (m a) -> Type) t)
data FailSym0 (a1 :: TyFun [Char] m a)
type family FailSym1 (a6989586621679552824 :: [Char]) :: m a
instance Control.Monad.Fail.Singletons.PMonadFail []
instance Control.Monad.Fail.Singletons.PMonadFail GHC.Internal.Maybe.Maybe
instance Control.Monad.Fail.Singletons.SMonadFail []
instance Control.Monad.Fail.Singletons.SMonadFail GHC.Internal.Maybe.Maybe
instance Control.Monad.Fail.Singletons.SMonadFail m => Data.Singletons.SingI Control.Monad.Fail.Singletons.FailSym0
instance forall k (m :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Fail.Singletons.FailSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Fail.Singletons.Fail_6989586621679552826Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Fail.Singletons.Fail_6989586621679552832Sym0
-- | Defines and exports singletons useful for the Natural, Symbol, and
-- Char kinds.
module GHC.TypeLits.Singletons
-- | Natural number
--
-- Invariant: numbers <= 0xffffffffffffffff use the NS
-- constructor
data Natural
-- | (Kind) This is the kind of type-level symbols.
data Symbol
-- | The character type Char represents Unicode codespace and its
-- elements are code points as in definitions D9 and D10 of the
-- Unicode Standard.
--
-- Character literals in Haskell are single-quoted: 'Q',
-- 'Я' or 'Ω'. To represent a single quote itself use
-- '\'', and to represent a backslash use '\\'. The
-- full grammar can be found in the section 2.6 of the Haskell 2010
-- Language Report.
--
-- To specify a character by its code point one can use decimal,
-- hexadecimal or octal notation: '\65', '\x41' and
-- '\o101' are all alternative forms of 'A'. The
-- largest code point is '\x10ffff'.
--
-- There is a special escape syntax for ASCII control characters:
--
-- TODO: table
--
-- Data.Char provides utilities to work with Char.
data Char
type family Sing :: k -> Type
-- | A value-level witness for a type-level natural number. This is
-- commonly referred to as a singleton type, as for each
-- n, there is a single value that inhabits the type
-- SNat n (aside from bottom).
--
-- The definition of SNat is intentionally left abstract. To
-- obtain an SNat value, use one of the following:
--
--
-- - The natSing method of KnownNat.
-- - The SNat pattern synonym.
-- - The withSomeSNat function, which creates an SNat
-- from a Natural number.
--
--
-- @since base-4.18.0.0
data SNat (n :: Nat)
-- | A explicitly bidirectional pattern synonym relating an SNat to
-- a KnownNat constraint.
--
-- As an expression: Constructs an explicit SNat n
-- value from an implicit KnownNat n constraint:
--
--
-- SNat @n :: KnownNat n => SNat n
--
--
-- As a pattern: Matches on an explicit SNat n
-- value bringing an implicit KnownNat n constraint into
-- scope:
--
--
-- f :: SNat n -> ..
-- f SNat = {- KnownNat n in scope -}
--
--
-- @since base-4.18.0.0
pattern SNat :: () => KnownNat n => SNat n
-- | A value-level witness for a type-level symbol. This is commonly
-- referred to as a singleton type, as for each s, there
-- is a single value that inhabits the type SSymbol s
-- (aside from bottom).
--
-- The definition of SSymbol is intentionally left abstract. To
-- obtain an SSymbol value, use one of the following:
--
--
-- - The symbolSing method of KnownSymbol.
-- - The SSymbol pattern synonym.
-- - The withSomeSSymbol function, which creates an
-- SSymbol from a String.
--
--
-- @since base-4.18.0.0
data SSymbol (s :: Symbol)
-- | A explicitly bidirectional pattern synonym relating an SSymbol
-- to a KnownSymbol constraint.
--
-- As an expression: Constructs an explicit SSymbol
-- s value from an implicit KnownSymbol s
-- constraint:
--
--
-- SSymbol @s :: KnownSymbol s => SSymbol s
--
--
-- As a pattern: Matches on an explicit SSymbol s
-- value bringing an implicit KnownSymbol s constraint
-- into scope:
--
--
-- f :: SSymbol s -> ..
-- f SSymbol = {- KnownSymbol s in scope -}
--
--
-- @since base-4.18.0.0
pattern SSymbol :: () => KnownSymbol s => SSymbol s
-- | An alias for the SSymbol pattern synonym.
pattern SSym :: () => KnownSymbol s => SSymbol s
-- | A value-level witness for a type-level character. This is commonly
-- referred to as a singleton type, as for each c, there
-- is a single value that inhabits the type SChar c
-- (aside from bottom).
--
-- The definition of SChar is intentionally left abstract. To
-- obtain an SChar value, use one of the following:
--
--
-- - The charSing method of KnownChar.
-- - The SChar pattern synonym.
-- - The withSomeSChar function, which creates an SChar
-- from a Char.
--
--
-- @since base-4.18.0.0
data SChar (s :: Char)
-- | A explicitly bidirectional pattern synonym relating an SChar to
-- a KnownChar constraint.
--
-- As an expression: Constructs an explicit SChar
-- c value from an implicit KnownChar c constraint:
--
--
-- SChar @c :: KnownChar c => SChar c
--
--
-- As a pattern: Matches on an explicit SChar c
-- value bringing an implicit KnownChar c constraint into
-- scope:
--
--
-- f :: SChar c -> ..
-- f SChar = {- KnownChar c in scope -}
--
--
-- @since base-4.18.0.0
pattern SChar :: () => KnownChar c => SChar c
-- | Convert an explicit SNat n value into an implicit
-- KnownNat n constraint.
--
-- @since base-4.18.0.0
withKnownNat :: forall (n :: Nat) r. SNat n -> (KnownNat n => r) -> r
-- | Convert an explicit SSymbol s value into an implicit
-- KnownSymbol s constraint.
--
-- @since base-4.18.0.0
withKnownSymbol :: forall (s :: Symbol) r. SSymbol s -> (KnownSymbol s => r) -> r
-- | Convert an explicit SChar c value into an implicit
-- KnownChar c constraint.
--
-- @since base-4.18.0.0
withKnownChar :: forall (c :: Char) r. SChar c -> (KnownChar c => r) -> r
-- | A promoted version of error. This implements Error as a
-- stuck type family with a Symbol argument. Depending on your
-- needs, you might also consider the following alternatives:
--
--
-- - Data.Singletons.Base.PolyError provides PolyError,
-- which generalizes the argument to be kind-polymorphic. This allows
-- passing additional information to the error besides raw
-- Symbols.
-- - Data.Singletons.Base.TypeError provides TypeError,
-- a slightly modified version of the custom type error machinery found
-- in GHC.TypeLits. This allows emitting error messages as
-- compiler errors rather than as stuck type families.
--
type family Error (str :: Symbol) :: a
-- | The singleton for error.
sError :: forall (str :: Symbol) a. HasCallStack => Sing str -> a
-- | The promotion of errorWithoutStackTrace.
type family ErrorWithoutStackTrace (str :: Symbol) :: a
-- | The singleton for errorWithoutStackTrace.
sErrorWithoutStackTrace :: forall (str :: Symbol) a. Sing str -> a
-- | The promotion of undefined.
type family Undefined :: forall a. () => a
-- | The singleton for undefined.
sUndefined :: HasCallStack => a
-- | This class gives the integer associated with a type-level natural.
-- There are instances of the class for every concrete literal: 0, 1, 2,
-- etc.
--
-- @since base-4.7.0.0
class KnownNat (n :: Nat)
-- | @since base-4.10.0.0
natVal :: forall (n :: Nat) proxy. KnownNat n => proxy n -> Natural
-- | This class gives the string associated with a type-level symbol. There
-- are instances of the class for every concrete literal: "hello", etc.
--
-- @since base-4.7.0.0
class KnownSymbol (n :: Symbol)
-- | @since base-4.7.0.0
symbolVal :: forall (n :: Symbol) proxy. KnownSymbol n => proxy n -> String
-- | @since base-4.16.0.0
class KnownChar (n :: Char)
charVal :: forall (n :: Char) proxy. KnownChar n => proxy n -> Char
-- | Exponentiation of type-level naturals.
--
-- @since base-4.7.0.0
type family (a :: Natural) ^ (b :: Natural) :: Natural
infixr 8 ^
-- | The singleton analogue of (^) for Naturals.
(%^) :: forall (a :: Natural) (b :: Natural). Sing a -> Sing b -> Sing (a ^ b)
infixr 8 %^
-- | Comparison (<=) of comparable types, as a function.
--
-- @since base-4.16.0.0
type (m :: k) <=? (n :: k) = OrdCond Compare m n 'True 'True 'False
infix 4 <=?
-- | The singleton analogue of <=?
--
-- Note that, because of historical reasons in GHC's Natural API,
-- <=? is incompatible (unification-wise) with <= and
-- the PEq, SEq, POrd, and SOrd instances for
-- Natural. (a <=? b) ~ 'True does not imply
-- anything about a <= b or any other PEq /
-- POrd relationships.
--
-- (Be aware that <= in the paragraph above refers to
-- <= from the POrd typeclass, exported from
-- Data.Ord.Singletons, and not the <= from
-- GHC.TypeNats. The latter is simply a type alias for (a
-- <=? b) ~ 'True.)
--
-- This is provided here for the sake of completeness and for
-- compatibility with libraries with APIs built around <=?.
-- New code should use CmpNat, exposed through this library
-- through the POrd and SOrd instances for Natural.
(%<=?) :: forall (a :: Natural) (b :: Natural). Sing a -> Sing b -> Sing (a <=? b)
infix 4 %<=?
-- | Log base 2 (round down) of natural numbers. Log 0 is
-- undefined (i.e., it cannot be reduced).
--
-- @since base-4.11.0.0
type family Log2 (a :: Natural) :: Natural
sLog2 :: forall (x :: Natural). Sing x -> Sing (Log2 x)
-- | Division (round down) of natural numbers. Div x 0 is
-- undefined (i.e., it cannot be reduced).
--
-- @since base-4.11.0.0
type family Div (a :: Natural) (b :: Natural) :: Natural
infixl 7 `Div`
sDiv :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (Div x y)
infixl 7 `sDiv`
-- | Modulus of natural numbers. Mod x 0 is undefined (i.e., it
-- cannot be reduced).
--
-- @since base-4.11.0.0
type family Mod (a :: Natural) (b :: Natural) :: Natural
infixl 7 `Mod`
sMod :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (Mod x y)
infixl 7 `sMod`
type family DivMod (a :: Natural) (a1 :: Natural) :: (Natural, Natural)
sDivMod :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (DivMod x y)
type family Quot (a :: Natural) (a1 :: Natural) :: Natural
infixl 7 `Quot`
sQuot :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (Quot x y)
infixl 7 `sQuot`
type family Rem (a :: Natural) (a1 :: Natural) :: Natural
infixl 7 `Rem`
sRem :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (Rem x y)
infixl 7 `sRem`
type family QuotRem (a :: Natural) (a1 :: Natural) :: (Natural, Natural)
sQuotRem :: forall (x :: Natural) (y :: Natural). Sing x -> Sing y -> Sing (QuotRem x y)
consSymbol :: Char -> String -> String
-- | Extending a type-level symbol with a type-level character
--
-- @since base-4.16.0.0
type family ConsSymbol (a :: Char) (b :: Symbol) :: Symbol
sConsSymbol :: forall (x :: Char) (y :: Symbol). Sing x -> Sing y -> Sing (ConsSymbol x y)
unconsSymbol :: String -> Maybe (Char, String)
-- | This type family yields type-level Just storing the first
-- character of a symbol and its tail if it is defined and Nothing
-- otherwise.
--
-- @since base-4.16.0.0
type family UnconsSymbol (a :: Symbol) :: Maybe (Char, Symbol)
sUnconsSymbol :: forall (x :: Symbol). Sing x -> Sing (UnconsSymbol x)
charToNat :: Char -> Natural
-- | Convert a character to its Unicode code point (cf. ord)
--
-- @since base-4.16.0.0
type family CharToNat (a :: Char) :: Natural
sCharToNat :: forall (x :: Char). Sing x -> Sing (CharToNat x)
natToChar :: Natural -> Char
-- | Convert a Unicode code point to a character (cf. chr)
--
-- @since base-4.16.0.0
type family NatToChar (a :: Natural) :: Char
sNatToChar :: forall (x :: Natural). Sing x -> Sing (NatToChar x)
data ErrorSym0 (a1 :: TyFun Symbol a)
type family ErrorSym1 (a6989586621679559199 :: Symbol) :: a
data ErrorWithoutStackTraceSym0 (a1 :: TyFun Symbol a)
type family ErrorWithoutStackTraceSym1 (a6989586621679559465 :: Symbol) :: a
type family UndefinedSym0 :: a
data KnownNatSym0 (a :: TyFun Nat Constraint)
type family KnownNatSym1 (a6989586621679569797 :: Nat)
data KnownSymbolSym0 (a :: TyFun Symbol Constraint)
type family KnownSymbolSym1 (a6989586621679569799 :: Symbol)
data KnownCharSym0 (a :: TyFun Char Constraint)
type family KnownCharSym1 (a6989586621679569801 :: Char)
data (a :: TyFun Natural Natural ~> Natural) ^@#@$
infixr 8 ^@#@$
data (a6989586621679559885 :: Natural) ^@#@$$ (b :: TyFun Natural Natural)
infixr 8 ^@#@$$
type family (a6989586621679559885 :: Natural) ^@#@$$$ (a6989586621679559886 :: Natural) :: Natural
infixr 8 ^@#@$$$
data (a :: TyFun k k ~> Bool) <=?@#@$
infix 4 <=?@#@$
data (a6989586621679560321 :: k) <=?@#@$$ (b :: TyFun k Bool)
infix 4 <=?@#@$$
type family (a6989586621679560321 :: k) <=?@#@$$$ (a6989586621679560322 :: k) :: Bool
infix 4 <=?@#@$$$
data Log2Sym0 (a :: TyFun Natural Natural)
type family Log2Sym1 (a6989586621679570442 :: Natural) :: Natural
data DivSym0 (a :: TyFun Natural Natural ~> Natural)
infixl 7 `DivSym0`
data DivSym1 (a6989586621679570671 :: Natural) (b :: TyFun Natural Natural)
infixl 7 `DivSym1`
type family DivSym2 (a6989586621679570671 :: Natural) (a6989586621679570672 :: Natural) :: Natural
infixl 7 `DivSym2`
data ModSym0 (a :: TyFun Natural Natural ~> Natural)
infixl 7 `ModSym0`
data ModSym1 (a6989586621679571114 :: Natural) (b :: TyFun Natural Natural)
infixl 7 `ModSym1`
type family ModSym2 (a6989586621679571114 :: Natural) (a6989586621679571115 :: Natural) :: Natural
infixl 7 `ModSym2`
data DivModSym0 (a :: TyFun Natural Natural ~> (Natural, Natural))
data DivModSym1 (a6989586621679571798 :: Natural) (b :: TyFun Natural (Natural, Natural))
type family DivModSym2 (a6989586621679571798 :: Natural) (a6989586621679571799 :: Natural) :: (Natural, Natural)
data QuotSym0 (a :: TyFun Natural Natural ~> Natural)
infixl 7 `QuotSym0`
data QuotSym1 (a6989586621679571780 :: Natural) (b :: TyFun Natural Natural)
infixl 7 `QuotSym1`
type family QuotSym2 (a6989586621679571780 :: Natural) (a6989586621679571781 :: Natural) :: Natural
infixl 7 `QuotSym2`
data RemSym0 (a :: TyFun Natural Natural ~> Natural)
infixl 7 `RemSym0`
data RemSym1 (a6989586621679571769 :: Natural) (b :: TyFun Natural Natural)
infixl 7 `RemSym1`
type family RemSym2 (a6989586621679571769 :: Natural) (a6989586621679571770 :: Natural) :: Natural
infixl 7 `RemSym2`
data QuotRemSym0 (a :: TyFun Natural Natural ~> (Natural, Natural))
data QuotRemSym1 (a6989586621679571791 :: Natural) (b :: TyFun Natural (Natural, Natural))
type family QuotRemSym2 (a6989586621679571791 :: Natural) (a6989586621679571792 :: Natural) :: (Natural, Natural)
data ConsSymbolSym0 (a :: TyFun Char Symbol ~> Symbol)
data ConsSymbolSym1 (a6989586621679573081 :: Char) (b :: TyFun Symbol Symbol)
type family ConsSymbolSym2 (a6989586621679573081 :: Char) (a6989586621679573082 :: Symbol) :: Symbol
data UnconsSymbolSym0 (a :: TyFun Symbol Maybe (Char, Symbol))
type family UnconsSymbolSym1 (a6989586621679573593 :: Symbol) :: Maybe (Char, Symbol)
data CharToNatSym0 (a :: TyFun Char Natural)
type family CharToNatSym1 (a6989586621679573817 :: Char) :: Natural
data NatToCharSym0 (a :: TyFun Natural Char)
type family NatToCharSym1 (a6989586621679574046 :: Natural) :: Char
instance GHC.Classes.Eq GHC.Types.Symbol
instance GHC.Internal.Data.String.IsString GHC.Types.Symbol
instance GHC.Internal.Base.Monoid GHC.Types.Symbol
instance GHC.Classes.Ord GHC.Types.Symbol
instance GHC.Internal.Base.Semigroup GHC.Types.Symbol
instance GHC.Internal.Show.Show GHC.Types.Symbol
instance Data.Singletons.SingI1 GHC.TypeLits.Singletons.ConsSymbolSym1
instance Data.Singletons.SingI1 GHC.TypeLits.Singletons.DivSym1
instance Data.Singletons.SingI1 GHC.TypeLits.Singletons.ModSym1
instance Data.Singletons.SingI GHC.TypeLits.Singletons.CharToNatSym0
instance Data.Singletons.SingI GHC.TypeLits.Singletons.ConsSymbolSym0
instance Data.Singletons.SingI x => Data.Singletons.SingI (GHC.TypeLits.Singletons.ConsSymbolSym1 x)
instance Data.Singletons.SingI GHC.TypeLits.Singletons.DivSym0
instance Data.Singletons.SingI x => Data.Singletons.SingI (GHC.TypeLits.Singletons.DivSym1 x)
instance Data.Singletons.SingI GHC.TypeLits.Singletons.Log2Sym0
instance Data.Singletons.SingI GHC.TypeLits.Singletons.ModSym0
instance Data.Singletons.SingI x => Data.Singletons.SingI (GHC.TypeLits.Singletons.ModSym1 x)
instance Data.Singletons.SingI GHC.TypeLits.Singletons.NatToCharSym0
instance Data.Singletons.SingI GHC.TypeLits.Singletons.UnconsSymbolSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.CharToNatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.ConsSymbolSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.ConsSymbolSym1 a6989586621679573081)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.DivModSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.DivModSym1 a6989586621679571798)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.DivSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.DivSym1 a6989586621679570671)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.KnownCharSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.KnownNatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.KnownSymbolSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.Log2Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.ModSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.ModSym1 a6989586621679571114)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.NatToCharSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.QuotRemSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.QuotRemSym1 a6989586621679571791)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.QuotSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.QuotSym1 a6989586621679571780)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.RemSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (GHC.TypeLits.Singletons.RemSym1 a6989586621679571769)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings GHC.TypeLits.Singletons.UnconsSymbolSym0
-- | Defines functions and datatypes relating to the singleton for
-- Maybe, including singled versions of all the definitions in
-- Data.Maybe.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.Maybe. Also, please
-- excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Data.Maybe.Singletons
type family Sing :: k -> Type
data SMaybe (a1 :: Maybe a)
[SNothing] :: forall a. SMaybe ('Nothing :: Maybe a)
[SJust] :: forall a (n :: a). Sing n -> SMaybe ('Just n)
maybe_ :: b -> (a -> b) -> Maybe a -> b
type family Maybe_ (a1 :: b) (a2 :: a ~> b) (a3 :: Maybe a) :: b
sMaybe_ :: forall b a (t1 :: b) (t2 :: a ~> b) (t3 :: Maybe a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Maybe_Sym0 :: TyFun b ((a ~> b) ~> (Maybe a ~> b)) -> Type) t1) t2) t3)
type family IsJust (a1 :: Maybe a) :: Bool
sIsJust :: forall a (t :: Maybe a). Sing t -> Sing (Apply (IsJustSym0 :: TyFun (Maybe a) Bool -> Type) t)
type family IsNothing (a1 :: Maybe a) :: Bool
sIsNothing :: forall a (t :: Maybe a). Sing t -> Sing (Apply (IsNothingSym0 :: TyFun (Maybe a) Bool -> Type) t)
type family FromJust (a1 :: Maybe a) :: a
sFromJust :: forall a (t :: Maybe a). Sing t -> Sing (Apply (FromJustSym0 :: TyFun (Maybe a) a -> Type) t)
type family FromMaybe (a1 :: a) (a2 :: Maybe a) :: a
sFromMaybe :: forall a (t1 :: a) (t2 :: Maybe a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FromMaybeSym0 :: TyFun a (Maybe a ~> a) -> Type) t1) t2)
type family ListToMaybe (a1 :: [a]) :: Maybe a
sListToMaybe :: forall a (t :: [a]). Sing t -> Sing (Apply (ListToMaybeSym0 :: TyFun [a] (Maybe a) -> Type) t)
type family MaybeToList (a1 :: Maybe a) :: [a]
sMaybeToList :: forall a (t :: Maybe a). Sing t -> Sing (Apply (MaybeToListSym0 :: TyFun (Maybe a) [a] -> Type) t)
type family CatMaybes (a1 :: [Maybe a]) :: [a]
sCatMaybes :: forall a (t :: [Maybe a]). Sing t -> Sing (Apply (CatMaybesSym0 :: TyFun [Maybe a] [a] -> Type) t)
type family MapMaybe (a1 :: a ~> Maybe b) (a2 :: [a]) :: [b]
sMapMaybe :: forall a b (t1 :: a ~> Maybe b) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMaybeSym0 :: TyFun (a ~> Maybe b) ([a] ~> [b]) -> Type) t1) t2)
type family NothingSym0 :: Maybe a
data JustSym0 (a1 :: TyFun a Maybe a)
type family JustSym1 (a6989586621679047124 :: a) :: Maybe a
data Maybe_Sym0 (a1 :: TyFun b a ~> b ~> Maybe a ~> b)
data Maybe_Sym1 (a6989586621679582849 :: b) (b1 :: TyFun a ~> b Maybe a ~> b)
data Maybe_Sym2 (a6989586621679582849 :: b) (a6989586621679582850 :: a ~> b) (c :: TyFun Maybe a b)
type family Maybe_Sym3 (a6989586621679582849 :: b) (a6989586621679582850 :: a ~> b) (a6989586621679582851 :: Maybe a) :: b
data IsJustSym0 (a1 :: TyFun Maybe a Bool)
type family IsJustSym1 (a6989586621679585085 :: Maybe a) :: Bool
data IsNothingSym0 (a1 :: TyFun Maybe a Bool)
type family IsNothingSym1 (a6989586621679585082 :: Maybe a) :: Bool
data FromJustSym0 (a1 :: TyFun Maybe a a)
type family FromJustSym1 (a6989586621679585078 :: Maybe a) :: a
data FromMaybeSym0 (a1 :: TyFun a Maybe a ~> a)
data FromMaybeSym1 (a6989586621679585068 :: a) (b :: TyFun Maybe a a)
type family FromMaybeSym2 (a6989586621679585068 :: a) (a6989586621679585069 :: Maybe a) :: a
data ListToMaybeSym0 (a1 :: TyFun [a] Maybe a)
type family ListToMaybeSym1 (a6989586621679585059 :: [a]) :: Maybe a
data MaybeToListSym0 (a1 :: TyFun Maybe a [a])
type family MaybeToListSym1 (a6989586621679585063 :: Maybe a) :: [a]
data CatMaybesSym0 (a1 :: TyFun [Maybe a] [a])
type family CatMaybesSym1 (a6989586621679585053 :: [Maybe a]) :: [a]
data MapMaybeSym0 (a1 :: TyFun a ~> Maybe b [a] ~> [b])
data MapMaybeSym1 (a6989586621679585038 :: a ~> Maybe b) (b1 :: TyFun [a] [b])
type family MapMaybeSym2 (a6989586621679585038 :: a ~> Maybe b) (a6989586621679585039 :: [a]) :: [b]
instance Data.Singletons.SingI1 Data.Maybe.Singletons.MapMaybeSym1
instance forall b (d :: b) a. Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Maybe.Singletons.Maybe_Sym2 d)
instance Data.Singletons.SingI1 Data.Maybe.Singletons.FromMaybeSym1
instance Data.Singletons.SingI1 Data.Maybe.Singletons.Maybe_Sym1
instance Data.Singletons.SingI2 Data.Maybe.Singletons.Maybe_Sym2
instance Data.Singletons.SingI Data.Maybe.Singletons.CatMaybesSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.FromJustSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.FromMaybeSym0
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Maybe.Singletons.FromMaybeSym1 d)
instance Data.Singletons.SingI Data.Maybe.Singletons.IsJustSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.IsNothingSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.ListToMaybeSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.MapMaybeSym0
instance forall a b (d :: a Data.Singletons.~> GHC.Internal.Maybe.Maybe b). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Maybe.Singletons.MapMaybeSym1 d)
instance Data.Singletons.SingI Data.Maybe.Singletons.MaybeToListSym0
instance Data.Singletons.SingI Data.Maybe.Singletons.Maybe_Sym0
instance forall b (d :: b) a. Data.Singletons.SingI d => Data.Singletons.SingI (Data.Maybe.Singletons.Maybe_Sym1 d)
instance forall b (d1 :: b) a (d2 :: a Data.Singletons.~> b). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Maybe.Singletons.Maybe_Sym2 d1 d2)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.CatMaybesSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.FromJustSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.FromMaybeSym0
instance forall a (a6989586621679585068 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.FromMaybeSym1 a6989586621679585068)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.IsJustSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.IsNothingSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.Let6989586621679585043RsSym0
instance forall a k1 k (f6989586621679585040 :: a Data.Singletons.~> GHC.Internal.Maybe.Maybe k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Let6989586621679585043RsSym1 f6989586621679585040)
instance forall a k1 k (f6989586621679585040 :: a Data.Singletons.~> GHC.Internal.Maybe.Maybe k1) (x6989586621679585041 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Let6989586621679585043RsSym2 f6989586621679585040 x6989586621679585041)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.Let6989586621679585045Scrutinee_6989586621679584915Sym0
instance forall k1 k2 k3 (f6989586621679585040 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Let6989586621679585045Scrutinee_6989586621679584915Sym1 f6989586621679585040)
instance forall k1 k2 k3 (f6989586621679585040 :: k1 Data.Singletons.~> k2) (x6989586621679585041 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Let6989586621679585045Scrutinee_6989586621679584915Sym2 f6989586621679585040 x6989586621679585041)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.ListToMaybeSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.MapMaybeSym0
instance forall a b (a6989586621679585038 :: a Data.Singletons.~> GHC.Internal.Maybe.Maybe b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.MapMaybeSym1 a6989586621679585038)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.MaybeToListSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Maybe.Singletons.Maybe_Sym0
instance forall b a (a6989586621679582849 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Maybe_Sym1 a6989586621679582849)
instance forall b a (a6989586621679582849 :: b) (a6989586621679582850 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Maybe.Singletons.Maybe_Sym2 a6989586621679582849 a6989586621679582850)
-- | Defines the promoted and singleton version of the Bounded and
-- Enum type classes.
--
-- While Prelude.Singletons re-exports the promoted and singled
-- versions of Enum, it deliberately avoids re-exporting
-- Succ and Pred, as these are names are likely to clash
-- with code that deals with unary natural numbers. As a result, this
-- module exists to provide Succ and Pred for those who
-- want them.
module Data.Singletons.Base.Enum
class PBounded a where {
type MinBound :: a;
type MaxBound :: a;
}
class SBounded a
sMinBound :: SBounded a => Sing (MinBoundSym0 :: a)
sMaxBound :: SBounded a => Sing (MaxBoundSym0 :: a)
class PEnum a where {
type Succ (arg :: a) :: a;
type Pred (arg :: a) :: a;
type ToEnum (arg :: Natural) :: a;
type FromEnum (arg :: a) :: Natural;
type EnumFromTo (arg :: a) (arg1 :: a) :: [a];
type EnumFromThenTo (arg :: a) (arg1 :: a) (arg2 :: a) :: [a];
type Succ arg :: a = Apply Succ_6989586621679618581Sym0 :: TyFun a a -> Type arg;
type Pred arg :: a = Apply Pred_6989586621679618594Sym0 :: TyFun a a -> Type arg;
type EnumFromTo arg :: a arg1 :: a = Apply Apply EnumFromTo_6989586621679618604Sym0 :: TyFun a a ~> [a] -> Type arg arg1;
type EnumFromThenTo arg :: a arg1 :: a arg2 :: a = Apply Apply Apply EnumFromThenTo_6989586621679618616Sym0 :: TyFun a a ~> a ~> [a] -> Type arg arg1 arg2;
}
class SEnum a
sSucc :: forall (t :: a). SEnum a => Sing t -> Sing (Apply (SuccSym0 :: TyFun a a -> Type) t)
($dmsSucc) :: forall (t :: a). (SEnum a, Apply (SuccSym0 :: TyFun a a -> Type) t ~ Apply (Succ_6989586621679618581Sym0 :: TyFun a a -> Type) t) => Sing t -> Sing (Apply (SuccSym0 :: TyFun a a -> Type) t)
sPred :: forall (t :: a). SEnum a => Sing t -> Sing (Apply (PredSym0 :: TyFun a a -> Type) t)
($dmsPred) :: forall (t :: a). (SEnum a, Apply (PredSym0 :: TyFun a a -> Type) t ~ Apply (Pred_6989586621679618594Sym0 :: TyFun a a -> Type) t) => Sing t -> Sing (Apply (PredSym0 :: TyFun a a -> Type) t)
sToEnum :: forall (t :: Natural). SEnum a => Sing t -> Sing (Apply (ToEnumSym0 :: TyFun Natural a -> Type) t)
sFromEnum :: forall (t :: a). SEnum a => Sing t -> Sing (Apply (FromEnumSym0 :: TyFun a Natural -> Type) t)
sEnumFromTo :: forall (t1 :: a) (t2 :: a). SEnum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2)
($dmsEnumFromTo) :: forall (t1 :: a) (t2 :: a). (SEnum a, Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2 ~ Apply (Apply (EnumFromTo_6989586621679618604Sym0 :: TyFun a (a ~> [a]) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2)
sEnumFromThenTo :: forall (t1 :: a) (t2 :: a) (t3 :: a). SEnum a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3)
($dmsEnumFromThenTo) :: forall (t1 :: a) (t2 :: a) (t3 :: a). (SEnum a, Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (EnumFromThenTo_6989586621679618616Sym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3)
type family MinBoundSym0 :: a
type family MaxBoundSym0 :: a
data SuccSym0 (a1 :: TyFun a a)
type family SuccSym1 (a6989586621679618558 :: a) :: a
data PredSym0 (a1 :: TyFun a a)
type family PredSym1 (a6989586621679618561 :: a) :: a
data ToEnumSym0 (a1 :: TyFun Natural a)
type family ToEnumSym1 (a6989586621679618564 :: Natural) :: a
data FromEnumSym0 (a1 :: TyFun a Natural)
type family FromEnumSym1 (a6989586621679618567 :: a) :: Natural
data EnumFromToSym0 (a1 :: TyFun a a ~> [a])
data EnumFromToSym1 (a6989586621679618571 :: a) (b :: TyFun a [a])
type family EnumFromToSym2 (a6989586621679618571 :: a) (a6989586621679618572 :: a) :: [a]
data EnumFromThenToSym0 (a1 :: TyFun a a ~> a ~> [a])
data EnumFromThenToSym1 (a6989586621679618577 :: a) (b :: TyFun a a ~> [a])
data EnumFromThenToSym2 (a6989586621679618577 :: a) (a6989586621679618578 :: a) (c :: TyFun a [a])
type family EnumFromThenToSym3 (a6989586621679618577 :: a) (a6989586621679618578 :: a) (a6989586621679618579 :: a) :: [a]
instance Data.Singletons.Base.Enum.PBounded GHC.Types.Bool
instance Data.Singletons.Base.Enum.PBounded GHC.Types.Char
instance Data.Singletons.Base.Enum.PBounded (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Singletons.Base.Enum.PBounded GHC.Types.Ordering
instance Data.Singletons.Base.Enum.PBounded (a, b)
instance Data.Singletons.Base.Enum.PBounded (a, b, c)
instance Data.Singletons.Base.Enum.PBounded (a, b, c, d)
instance Data.Singletons.Base.Enum.PBounded (a, b, c, d, e)
instance Data.Singletons.Base.Enum.PBounded (a, b, c, d, e, f)
instance Data.Singletons.Base.Enum.PBounded (a, b, c, d, e, f, g)
instance Data.Singletons.Base.Enum.PBounded ()
instance Data.Singletons.Base.Enum.PEnum GHC.Types.Bool
instance Data.Singletons.Base.Enum.PEnum GHC.Types.Char
instance Data.Singletons.Base.Enum.PEnum GHC.Num.Natural.Natural
instance Data.Singletons.Base.Enum.PEnum GHC.Types.Ordering
instance Data.Singletons.Base.Enum.PEnum ()
instance Data.Singletons.Base.Enum.SBounded GHC.Types.Bool
instance Data.Singletons.Base.Enum.SBounded GHC.Types.Char
instance Data.Singletons.Base.Enum.SBounded a => Data.Singletons.Base.Enum.SBounded (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Singletons.Base.Enum.SBounded GHC.Types.Ordering
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b) => Data.Singletons.Base.Enum.SBounded (a, b)
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b, Data.Singletons.Base.Enum.SBounded c) => Data.Singletons.Base.Enum.SBounded (a, b, c)
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b, Data.Singletons.Base.Enum.SBounded c, Data.Singletons.Base.Enum.SBounded d) => Data.Singletons.Base.Enum.SBounded (a, b, c, d)
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b, Data.Singletons.Base.Enum.SBounded c, Data.Singletons.Base.Enum.SBounded d, Data.Singletons.Base.Enum.SBounded e) => Data.Singletons.Base.Enum.SBounded (a, b, c, d, e)
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b, Data.Singletons.Base.Enum.SBounded c, Data.Singletons.Base.Enum.SBounded d, Data.Singletons.Base.Enum.SBounded e, Data.Singletons.Base.Enum.SBounded f) => Data.Singletons.Base.Enum.SBounded (a, b, c, d, e, f)
instance (Data.Singletons.Base.Enum.SBounded a, Data.Singletons.Base.Enum.SBounded b, Data.Singletons.Base.Enum.SBounded c, Data.Singletons.Base.Enum.SBounded d, Data.Singletons.Base.Enum.SBounded e, Data.Singletons.Base.Enum.SBounded f, Data.Singletons.Base.Enum.SBounded g) => Data.Singletons.Base.Enum.SBounded (a, b, c, d, e, f, g)
instance Data.Singletons.Base.Enum.SBounded ()
instance Data.Singletons.Base.Enum.SEnum GHC.Types.Bool
instance Data.Singletons.Base.Enum.SEnum GHC.Types.Char
instance Data.Singletons.Base.Enum.SEnum GHC.Num.Natural.Natural
instance Data.Singletons.Base.Enum.SEnum GHC.Types.Ordering
instance Data.Singletons.Base.Enum.SEnum ()
instance Data.Singletons.SingI1 Data.Singletons.Base.Enum.EfdtNatDnSym1
instance Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Singletons.Base.Enum.EfdtNatDnSym2 d)
instance Data.Singletons.SingI1 Data.Singletons.Base.Enum.EfdtNatSym1
instance Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Singletons.Base.Enum.EfdtNatSym2 d)
instance Data.Singletons.SingI1 Data.Singletons.Base.Enum.EfdtNatUpSym1
instance Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.Singletons.Base.Enum.EfdtNatUpSym2 d)
instance Data.Singletons.SingI1 Data.Singletons.Base.Enum.EftNatSym1
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI1 Data.Singletons.Base.Enum.EnumFromThenToSym1
instance forall a (d :: a). (Data.Singletons.Base.Enum.SEnum a, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Singletons.Base.Enum.EnumFromThenToSym2 d)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI1 Data.Singletons.Base.Enum.EnumFromToSym1
instance Data.Singletons.SingI2 Data.Singletons.Base.Enum.EfdtNatDnSym2
instance Data.Singletons.SingI2 Data.Singletons.Base.Enum.EfdtNatSym2
instance Data.Singletons.SingI2 Data.Singletons.Base.Enum.EfdtNatUpSym2
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI2 Data.Singletons.Base.Enum.EnumFromThenToSym2
instance Data.Singletons.SingI Data.Singletons.Base.Enum.EfdtNatDnSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatDnSym1 d)
instance (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatDnSym2 d1 d2)
instance Data.Singletons.SingI Data.Singletons.Base.Enum.EfdtNatSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatSym1 d)
instance (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatSym2 d1 d2)
instance Data.Singletons.SingI Data.Singletons.Base.Enum.EfdtNatUpSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatUpSym1 d)
instance (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EfdtNatUpSym2 d1 d2)
instance Data.Singletons.SingI Data.Singletons.Base.Enum.EftNatSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.Singletons.Base.Enum.EftNatSym1 d)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.EnumFromThenToSym0
instance forall a (d :: a). (Data.Singletons.Base.Enum.SEnum a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EnumFromThenToSym1 d)
instance forall a (d1 :: a) (d2 :: a). (Data.Singletons.Base.Enum.SEnum a, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EnumFromThenToSym2 d1 d2)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.EnumFromToSym0
instance forall a (d :: a). (Data.Singletons.Base.Enum.SEnum a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Singletons.Base.Enum.EnumFromToSym1 d)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.FromEnumSym0
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.PredSym0
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.SuccSym0
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.SingI Data.Singletons.Base.Enum.ToEnumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EfdtNatDnSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatDnSym1 a6989586621679618443)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatDnSym2 a6989586621679618443 a6989586621679618444)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EfdtNatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatSym1 a6989586621679618517)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatSym2 a6989586621679618517 a6989586621679618518)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EfdtNatUpSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatUpSym1 a6989586621679618480)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EfdtNatUpSym2 a6989586621679618480 a6989586621679618481)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EftNatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EftNatSym1 a6989586621679618535)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromThenToSym0
instance forall a (a6989586621679618577 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenToSym1 a6989586621679618577)
instance forall a (a6989586621679618577 :: a) (a6989586621679618578 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenToSym2 a6989586621679618577 a6989586621679618578)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618616Sym0
instance forall a (a6989586621679618622 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618616Sym1 a6989586621679618622)
instance forall a (a6989586621679618622 :: a) (a6989586621679618623 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618616Sym2 a6989586621679618622 a6989586621679618623)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618674Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618674Sym1 a6989586621679618686)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromThenTo_6989586621679618674Sym2 a6989586621679618686 a6989586621679618687)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromToSym0
instance forall a (a6989586621679618571 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromToSym1 a6989586621679618571)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromTo_6989586621679618604Sym0
instance forall a (a6989586621679618609 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromTo_6989586621679618604Sym1 a6989586621679618609)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.EnumFromTo_6989586621679618658Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.EnumFromTo_6989586621679618658Sym1 a6989586621679618667)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnum_6989586621679618650Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnum_6989586621679618702Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnum_6989586621679646395Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnum_6989586621679646418Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.FromEnum_6989586621679646435Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Lambda_6989586621679618589Sym0
instance forall k1 k2 (a_69895866216796185836989586621679618588 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Lambda_6989586621679618589Sym1 a_69895866216796185836989586621679618588)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym0
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym1 x16989586621679618451)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym2 x16989586621679618451 x26989586621679618452)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k2) (y6989586621679618453 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym3 x16989586621679618451 x26989586621679618452 y6989586621679618453)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k2) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym4 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k2) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k3) (arg_69895866216796183756989586621679618447 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618456Scrutinee_6989586621679618379Sym5 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446 arg_69895866216796183756989586621679618447)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym0
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym1 x16989586621679618451)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym2 x16989586621679618451 x26989586621679618452)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym3 x16989586621679618451 x26989586621679618452 y6989586621679618453)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k2) (arg_69895866216796183736989586621679618446 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym4 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446)
instance forall k1 k2 k3 k4 k5 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k2) (arg_69895866216796183736989586621679618446 :: k3) (arg_69895866216796183756989586621679618447 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461DeltaSym5 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446 arg_69895866216796183756989586621679618447)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym0
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym1 x16989586621679618451)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym2 x16989586621679618451 x26989586621679618452)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym3 x16989586621679618451 x26989586621679618452 y6989586621679618453)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym4 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k2) (arg_69895866216796183756989586621679618447 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym5 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446 arg_69895866216796183756989586621679618447)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k2) (arg_69895866216796183756989586621679618447 :: k3) (arg_69895866216796183776989586621679618448 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Go_dnSym6 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446 arg_69895866216796183756989586621679618447 arg_69895866216796183776989586621679618448)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym0
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym1 x16989586621679618451)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym2 x16989586621679618451 x26989586621679618452)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym3 x16989586621679618451 x26989586621679618452 y6989586621679618453)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym4 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446)
instance forall k1 k2 k3 k4 (x16989586621679618451 :: k1) (x26989586621679618452 :: k1) (y6989586621679618453 :: k1) (arg_69895866216796183736989586621679618446 :: k2) (arg_69895866216796183756989586621679618447 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618461Y'Sym5 x16989586621679618451 x26989586621679618452 y6989586621679618453 arg_69895866216796183736989586621679618446 arg_69895866216796183756989586621679618447)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym0
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym1 x16989586621679618488)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym2 x16989586621679618488 x26989586621679618489)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k2) (y6989586621679618490 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym3 x16989586621679618488 x26989586621679618489 y6989586621679618490)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k2) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym4 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k2) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k3) (arg_69895866216796183656989586621679618484 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618493Scrutinee_6989586621679618369Sym5 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483 arg_69895866216796183656989586621679618484)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym0
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym1 x16989586621679618488)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym2 x16989586621679618488 x26989586621679618489)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym3 x16989586621679618488 x26989586621679618489 y6989586621679618490)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k2) (arg_69895866216796183636989586621679618483 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym4 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483)
instance forall k1 k2 k3 k4 k5 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k2) (arg_69895866216796183636989586621679618483 :: k3) (arg_69895866216796183656989586621679618484 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498DeltaSym5 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483 arg_69895866216796183656989586621679618484)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym0
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym1 x16989586621679618488)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym2 x16989586621679618488 x26989586621679618489)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym3 x16989586621679618488 x26989586621679618489 y6989586621679618490)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym4 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k2) (arg_69895866216796183656989586621679618484 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym5 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483 arg_69895866216796183656989586621679618484)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k2) (arg_69895866216796183656989586621679618484 :: k3) (arg_69895866216796183676989586621679618485 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Go_upSym6 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483 arg_69895866216796183656989586621679618484 arg_69895866216796183676989586621679618485)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym0
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym1 x16989586621679618488)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym2 x16989586621679618488 x26989586621679618489)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym3 x16989586621679618488 x26989586621679618489 y6989586621679618490)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym4 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483)
instance forall k1 k2 k3 k4 (x16989586621679618488 :: k1) (x26989586621679618489 :: k1) (y6989586621679618490 :: k1) (arg_69895866216796183636989586621679618483 :: k2) (arg_69895866216796183656989586621679618484 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618498Y'Sym5 x16989586621679618488 x26989586621679618489 y6989586621679618490 arg_69895866216796183636989586621679618483 arg_69895866216796183656989586621679618484)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618543GoSym0
instance forall k1 k2 k3 k4 (x06989586621679618541 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618543GoSym1 x06989586621679618541)
instance forall k1 k2 k3 k4 (x06989586621679618541 :: k1) (y6989586621679618542 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618543GoSym2 x06989586621679618541 y6989586621679618542)
instance forall k1 k2 k3 k4 (x06989586621679618541 :: k1) (y6989586621679618542 :: k2) (arg_69895866216796183516989586621679618537 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618543GoSym3 x06989586621679618541 y6989586621679618542 arg_69895866216796183516989586621679618537)
instance forall k1 k2 k3 k4 (x06989586621679618541 :: k1) (y6989586621679618542 :: k2) (arg_69895866216796183516989586621679618537 :: k3) (arg_69895866216796183536989586621679618538 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618543GoSym4 x06989586621679618541 y6989586621679618542 arg_69895866216796183516989586621679618537 arg_69895866216796183536989586621679618538)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Let6989586621679618547Scrutinee_6989586621679618355Sym0
instance forall k1 k2 k3 k4 (x6989586621679618546 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618547Scrutinee_6989586621679618355Sym1 x6989586621679618546)
instance forall k1 k2 k3 k4 (x6989586621679618546 :: k1) (x06989586621679618541 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618547Scrutinee_6989586621679618355Sym2 x6989586621679618546 x06989586621679618541)
instance forall k1 k2 k3 k4 (x6989586621679618546 :: k1) (x06989586621679618541 :: k2) (y6989586621679618542 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618547Scrutinee_6989586621679618355Sym3 x6989586621679618546 x06989586621679618541 y6989586621679618542)
instance forall k1 k2 k3 k4 (x6989586621679618546 :: k1) (x06989586621679618541 :: k2) (y6989586621679618542 :: k1) (arg_69895866216796183516989586621679618537 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.Enum.Let6989586621679618547Scrutinee_6989586621679618355Sym4 x6989586621679618546 x06989586621679618541 y6989586621679618542 arg_69895866216796183516989586621679618537)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.PredSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Pred_6989586621679618594Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Pred_6989586621679618636Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.SuccSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Succ_6989586621679618581Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.Succ_6989586621679618629Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnum_6989586621679618643Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnum_6989586621679618693Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnum_6989586621679646382Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnum_6989586621679646402Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.Enum.ToEnum_6989586621679646425Sym0
-- | Defines a drop-in replacement for TypeError (from
-- GHC.TypeLits) that can be used at the value level as well.
-- Since this is a drop-in replacement, it is not recommended to import
-- all of GHC.TypeLits and Data.Singletons.Base.TypeError
-- at the same time, as many of the definitions in the latter
-- deliberately clash with the former.
module Data.Singletons.Base.TypeError
-- | A drop-in replacement for TypeError. This also exists at the
-- value-level as typeError.
type family TypeError (x :: PErrorMessage) :: a
-- | The singleton for typeError.
--
-- Note that this is not quite as expressive as TypeError, as it
-- is unable to handle ShowType constructors at all.
sTypeError :: forall {k} (err :: PErrorMessage). HasCallStack => Sing err -> Sing (TypeError err :: k)
-- | The value-level counterpart to TypeError.
--
-- Note that this is not quite as expressive as TypeError, as it
-- is unable to print the contents of ShowType constructors (it
-- will simply print "<type>" in their place).
typeError :: HasCallStack => ErrorMessage -> a
-- | A description of a custom type error.
--
-- This is a variation on ErrorMessage that is parameterized over
-- what text type is used in the Text constructor. Instantiating
-- it with Text gives you ErrorMessage, and instantiating
-- it with Symbol gives you PErrorMessage.
data ErrorMessage' s
-- | Show the text as is.
Text :: s -> ErrorMessage' s
-- | Pretty print the type. ShowType :: k -> ErrorMessage
ShowType :: t -> ErrorMessage' s
-- | Put two pieces of error message next to each other.
(:<>:) :: ErrorMessage' s -> ErrorMessage' s -> ErrorMessage' s
-- | Stack two pieces of error message on top of each other.
(:$$:) :: ErrorMessage' s -> ErrorMessage' s -> ErrorMessage' s
infixl 6 :<>:
infixl 5 :$$:
-- | A value-level ErrorMessage' which uses Text as its text
-- type.
type ErrorMessage = ErrorMessage' Text
-- | A type-level ErrorMessage' which uses Symbol as its text
-- kind.
type PErrorMessage = ErrorMessage' Symbol
type family Sing :: k -> Type
data SErrorMessage (a :: PErrorMessage)
[SText] :: forall (t :: Symbol). Sing t -> SErrorMessage ('Text t)
[SShowType] :: forall {k} (ty :: k). Sing ty -> SErrorMessage ('ShowType ty :: ErrorMessage' Symbol)
[:%<>:] :: forall (e1 :: ErrorMessage' Symbol) (e2 :: ErrorMessage' Symbol). Sing e1 -> Sing e2 -> SErrorMessage (e1 ':<>: e2)
[:%$$:] :: forall (e1 :: ErrorMessage' Symbol) (e2 :: ErrorMessage' Symbol). Sing e1 -> Sing e2 -> SErrorMessage (e1 ':$$: e2)
infixl 6 :%<>:
infixl 5 :%$$:
-- | Convert a PErrorMessage to a ErrorMessage from
-- GHC.TypeLits.
type family ConvertPErrorMessage (a :: PErrorMessage) :: ErrorMessage
-- | Convert an ErrorMessage into a human-readable String.
showErrorMessage :: ErrorMessage -> String
data TextSym0 (a :: TyFun s ErrorMessage' s)
type family TextSym1 (a6989586621680216361 :: s) :: ErrorMessage' s
data ShowTypeSym0 (a :: TyFun t ErrorMessage' s)
type family ShowTypeSym1 (a6989586621680216363 :: t) :: ErrorMessage' s
data (a :: TyFun ErrorMessage' s ErrorMessage' s ~> ErrorMessage' s) :<>:@#@$
infixl 6 :<>:@#@$
data (a6989586621680216365 :: ErrorMessage' s) :<>:@#@$$ (b :: TyFun ErrorMessage' s ErrorMessage' s)
infixl 6 :<>:@#@$$
type family (a6989586621680216365 :: ErrorMessage' s) :<>:@#@$$$ (a6989586621680216366 :: ErrorMessage' s) :: ErrorMessage' s
infixl 6 :<>:@#@$$$
data (a :: TyFun ErrorMessage' s ErrorMessage' s ~> ErrorMessage' s) :$$:@#@$
infixl 5 :$$:@#@$
data (a6989586621680216368 :: ErrorMessage' s) :$$:@#@$$ (b :: TyFun ErrorMessage' s ErrorMessage' s)
infixl 5 :$$:@#@$$
type family (a6989586621680216368 :: ErrorMessage' s) :$$:@#@$$$ (a6989586621680216369 :: ErrorMessage' s) :: ErrorMessage' s
infixl 5 :$$:@#@$$$
data TypeErrorSym0 (a1 :: TyFun PErrorMessage a)
type family TypeErrorSym1 (a6989586621680216371 :: PErrorMessage) :: a
instance Data.Singletons.SingI e1 => Data.Singletons.SingI1 (('Data.Singletons.Base.TypeError.:$$:) e1)
instance Data.Singletons.SingI e1 => Data.Singletons.SingI1 (('Data.Singletons.Base.TypeError.:<>:) e1)
instance Data.Singletons.SingI1 (Data.Singletons.Base.TypeError.:$$:@#@$$)
instance Data.Singletons.SingI1 (Data.Singletons.Base.TypeError.:<>:@#@$$)
instance Data.Singletons.SingI1 'Data.Singletons.Base.TypeError.Text
instance Data.Singletons.SingI1 'Data.Singletons.Base.TypeError.ShowType
instance Data.Singletons.SingI2 ('Data.Singletons.Base.TypeError.:$$:)
instance Data.Singletons.SingI2 ('Data.Singletons.Base.TypeError.:<>:)
instance (Data.Singletons.SingI e1, Data.Singletons.SingI e2) => Data.Singletons.SingI (e1 'Data.Singletons.Base.TypeError.:$$: e2)
instance (Data.Singletons.SingI e1, Data.Singletons.SingI e2) => Data.Singletons.SingI (e1 'Data.Singletons.Base.TypeError.:<>: e2)
instance forall t (ty :: t). Data.Singletons.SingI ty => Data.Singletons.SingI ('Data.Singletons.Base.TypeError.ShowType ty)
instance Data.Singletons.SingI t => Data.Singletons.SingI ('Data.Singletons.Base.TypeError.Text t)
instance Data.Singletons.SingI (Data.Singletons.Base.TypeError.:$$:@#@$)
instance Data.Singletons.SingI x => Data.Singletons.SingI ((Data.Singletons.Base.TypeError.:$$:@#@$$) x)
instance Data.Singletons.SingI (Data.Singletons.Base.TypeError.:<>:@#@$)
instance Data.Singletons.SingI x => Data.Singletons.SingI ((Data.Singletons.Base.TypeError.:<>:@#@$$) x)
instance Data.Singletons.SingI Data.Singletons.Base.TypeError.ShowTypeSym0
instance Data.Singletons.SingI Data.Singletons.Base.TypeError.TextSym0
instance Data.Singletons.SingI Data.Singletons.Base.TypeError.TypeErrorSym0
instance Data.Singletons.SingKind Data.Singletons.Base.TypeError.PErrorMessage
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.TypeError.:$$:@#@$)
instance forall s (a6989586621680216368 :: Data.Singletons.Base.TypeError.ErrorMessage' s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Base.TypeError.:$$:@#@$$) a6989586621680216368)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Base.TypeError.:<>:@#@$)
instance forall s (a6989586621680216365 :: Data.Singletons.Base.TypeError.ErrorMessage' s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Base.TypeError.:<>:@#@$$) a6989586621680216365)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.TypeError.ShowTypeSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.TypeError.TextSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Base.TypeError.TypeErrorSym0
-- | Defines the SShow singleton version of the Show type class.
module Text.Show.Singletons
class PShow a where {
type ShowsPrec (arg :: Natural) (arg1 :: a) (arg2 :: Symbol) :: Symbol;
type Show_ (arg :: a) :: Symbol;
type ShowList (arg :: [a]) (arg1 :: Symbol) :: Symbol;
type ShowsPrec arg :: Natural arg1 :: a arg2 :: Symbol = Apply Apply Apply ShowsPrec_6989586621680220103Sym0 :: TyFun Natural a ~> Symbol ~> Symbol -> Type arg arg1 arg2;
type Show_ arg :: a = Apply Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type arg;
type ShowList arg :: [a] arg1 :: Symbol = Apply Apply ShowList_6989586621680220123Sym0 :: TyFun [a] Symbol ~> Symbol -> Type arg arg1;
}
class SShow a
sShowsPrec :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
($dmsShowsPrec) :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). (SShow a, Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (ShowsPrec_6989586621680220103Sym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
sShow_ :: forall (t :: a). SShow a => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
($dmsShow_) :: forall (t :: a). (SShow a, Apply (Show_Sym0 :: TyFun a Symbol -> Type) t ~ Apply (Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type) t) => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
sShowList :: forall (t1 :: [a]) (t2 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
($dmsShowList) :: forall (t1 :: [a]) (t2 :: Symbol). (SShow a, Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2 ~ Apply (Apply (ShowList_6989586621680220123Sym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
-- | The shows functions return a function that prepends the
-- output Symbol to an existing Symbol. This allows
-- constant-time concatenation of results using function composition.
type SymbolS = Symbol -> Symbol
-- | show, but with an extra underscore so that its promoted
-- counterpart (Show_) will not clash with the Show
-- class.
show_ :: Show a => a -> String
type family Shows (a1 :: a) (a2 :: Symbol) :: Symbol
sShows :: forall a (t1 :: a) (t2 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowsSym0 :: TyFun a (Symbol ~> Symbol) -> Type) t1) t2)
type family ShowListWith (a1 :: a ~> Symbol ~> Symbol) (a2 :: [a]) (a3 :: Symbol) :: Symbol
sShowListWith :: forall a (t1 :: a ~> (Symbol ~> Symbol)) (t2 :: [a]) (t3 :: Symbol). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowListWithSym0 :: TyFun (a ~> (Symbol ~> Symbol)) ([a] ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
type family ShowChar (a :: Char) (a1 :: Symbol) :: Symbol
sShowChar :: forall (t1 :: Char) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowCharSym0 t1) t2)
type family ShowString (a :: Symbol) (a1 :: Symbol) :: Symbol
sShowString :: forall (t1 :: Symbol) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowStringSym0 t1) t2)
type family ShowParen (a :: Bool) (a1 :: Symbol ~> Symbol) (a2 :: Symbol) :: Symbol
sShowParen :: forall (t1 :: Bool) (t2 :: Symbol ~> Symbol) (t3 :: Symbol). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ShowParenSym0 t1) t2) t3)
type family ShowSpace (a :: Symbol) :: Symbol
sShowSpace :: forall (t :: Symbol). Sing t -> Sing (Apply ShowSpaceSym0 t)
type family ShowCommaSpace (a :: Symbol) :: Symbol
sShowCommaSpace :: forall (t :: Symbol). Sing t -> Sing (Apply ShowCommaSpaceSym0 t)
type family AppPrec :: Natural
sAppPrec :: Sing AppPrecSym0
type family AppPrec1 :: Natural
sAppPrec1 :: Sing AppPrec1Sym0
data ShowsPrecSym0 (a1 :: TyFun Natural a ~> Symbol ~> Symbol)
data ShowsPrecSym1 (a6989586621680220089 :: Natural) (b :: TyFun a Symbol ~> Symbol)
data ShowsPrecSym2 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (c :: TyFun Symbol Symbol)
type family ShowsPrecSym3 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (a6989586621680220091 :: Symbol) :: Symbol
data Show_Sym0 (a1 :: TyFun a Symbol)
type family Show_Sym1 (a6989586621680220094 :: a) :: Symbol
data ShowListSym0 (a1 :: TyFun [a] Symbol ~> Symbol)
data ShowListSym1 (a6989586621680220098 :: [a]) (b :: TyFun Symbol Symbol)
type family ShowListSym2 (a6989586621680220098 :: [a]) (a6989586621680220099 :: Symbol) :: Symbol
data ShowsSym0 (a1 :: TyFun a Symbol ~> Symbol)
data ShowsSym1 (a6989586621680220081 :: a) (b :: TyFun Symbol Symbol)
type family ShowsSym2 (a6989586621680220081 :: a) (a6989586621680220082 :: Symbol) :: Symbol
data ShowListWithSym0 (a1 :: TyFun a ~> Symbol ~> Symbol [a] ~> Symbol ~> Symbol)
data ShowListWithSym1 (a6989586621680220063 :: a ~> Symbol ~> Symbol) (b :: TyFun [a] Symbol ~> Symbol)
data ShowListWithSym2 (a6989586621680220063 :: a ~> Symbol ~> Symbol) (a6989586621680220064 :: [a]) (c :: TyFun Symbol Symbol)
type family ShowListWithSym3 (a6989586621680220063 :: a ~> Symbol ~> Symbol) (a6989586621680220064 :: [a]) (a6989586621680220065 :: Symbol) :: Symbol
data ShowCharSym0 (a :: TyFun Char Symbol ~> Symbol)
data ShowCharSym1 (a6989586621680220055 :: Char) (b :: TyFun Symbol Symbol)
type family ShowCharSym2 (a6989586621680220055 :: Char) (a6989586621680220056 :: Symbol) :: Symbol
data ShowStringSym0 (a :: TyFun Symbol Symbol ~> Symbol)
data ShowStringSym1 (a6989586621680220044 :: Symbol) (b :: TyFun Symbol Symbol)
type family ShowStringSym2 (a6989586621680220044 :: Symbol) (a6989586621680220045 :: Symbol) :: Symbol
data ShowParenSym0 (a :: TyFun Bool Symbol ~> Symbol ~> Symbol ~> Symbol)
data ShowParenSym1 (a6989586621680220028 :: Bool) (b :: TyFun Symbol ~> Symbol Symbol ~> Symbol)
data ShowParenSym2 (a6989586621680220028 :: Bool) (a6989586621680220029 :: Symbol ~> Symbol) (c :: TyFun Symbol Symbol)
data ShowSpaceSym0 (a :: TyFun Symbol Symbol)
type family ShowSpaceSym1 (a6989586621680220016 :: Symbol) :: Symbol
data ShowCommaSpaceSym0 (a :: TyFun Symbol Symbol)
type family ShowCommaSpaceSym1 (a6989586621680220010 :: Symbol) :: Symbol
type family AppPrecSym0 :: Natural
type family AppPrec1Sym0 :: Natural
instance Text.Show.Singletons.PShow GHC.Types.Bool
instance Text.Show.Singletons.PShow GHC.Types.Char
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Either.Either a b)
instance Text.Show.Singletons.PShow [a]
instance Text.Show.Singletons.PShow (GHC.Internal.Maybe.Maybe a)
instance Text.Show.Singletons.PShow GHC.Num.Natural.Natural
instance Text.Show.Singletons.PShow (GHC.Internal.Base.NonEmpty a)
instance Text.Show.Singletons.PShow GHC.Types.Ordering
instance Text.Show.Singletons.PShow GHC.Types.Symbol
instance Text.Show.Singletons.PShow (a, b)
instance Text.Show.Singletons.PShow (a, b, c)
instance Text.Show.Singletons.PShow (a, b, c, d)
instance Text.Show.Singletons.PShow (a, b, c, d, e)
instance Text.Show.Singletons.PShow (a, b, c, d, e, f)
instance Text.Show.Singletons.PShow (a, b, c, d, e, f, g)
instance Text.Show.Singletons.PShow ()
instance Text.Show.Singletons.PShow GHC.Internal.Base.Void
instance Text.Show.Singletons.SShow GHC.Types.Bool
instance Text.Show.Singletons.SShow GHC.Types.Char
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b) => Text.Show.Singletons.SShow (GHC.Internal.Data.Either.Either a b)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow [a]
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Maybe.Maybe a)
instance Text.Show.Singletons.SShow GHC.Num.Natural.Natural
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow [a]) => Text.Show.Singletons.SShow (GHC.Internal.Base.NonEmpty a)
instance Text.Show.Singletons.SShow GHC.Types.Ordering
instance Text.Show.Singletons.SShow GHC.Types.Symbol
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b) => Text.Show.Singletons.SShow (a, b)
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b, Text.Show.Singletons.SShow c) => Text.Show.Singletons.SShow (a, b, c)
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b, Text.Show.Singletons.SShow c, Text.Show.Singletons.SShow d) => Text.Show.Singletons.SShow (a, b, c, d)
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b, Text.Show.Singletons.SShow c, Text.Show.Singletons.SShow d, Text.Show.Singletons.SShow e) => Text.Show.Singletons.SShow (a, b, c, d, e)
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b, Text.Show.Singletons.SShow c, Text.Show.Singletons.SShow d, Text.Show.Singletons.SShow e, Text.Show.Singletons.SShow f) => Text.Show.Singletons.SShow (a, b, c, d, e, f)
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b, Text.Show.Singletons.SShow c, Text.Show.Singletons.SShow d, Text.Show.Singletons.SShow e, Text.Show.Singletons.SShow f, Text.Show.Singletons.SShow g) => Text.Show.Singletons.SShow (a, b, c, d, e, f, g)
instance Text.Show.Singletons.SShow ()
instance Text.Show.Singletons.SShow GHC.Internal.Base.Void
instance Data.Singletons.SingI1 Text.Show.Singletons.ShowParenSym1
instance Data.Singletons.SingI1 Text.Show.Singletons.ShowCharSym1
instance Data.Singletons.SingI1 Text.Show.Singletons.ShowListWithSym1
instance Data.Singletons.SingI d => Data.Singletons.SingI1 (Text.Show.Singletons.ShowParenSym2 d)
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI1 Text.Show.Singletons.ShowListSym1
instance forall a (d :: a Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)). Data.Singletons.SingI d => Data.Singletons.SingI1 (Text.Show.Singletons.ShowListWithSym2 d)
instance Data.Singletons.SingI1 Text.Show.Singletons.Show_tupleSym1
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI1 Text.Show.Singletons.ShowsPrecSym1
instance Data.Singletons.SingI1 Text.Show.Singletons.ShowStringSym1
instance (Text.Show.Singletons.SShow a, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Text.Show.Singletons.ShowsPrecSym2 d)
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI1 Text.Show.Singletons.ShowsSym1
instance Data.Singletons.SingI2 Text.Show.Singletons.ShowParenSym2
instance Data.Singletons.SingI2 Text.Show.Singletons.ShowListWithSym2
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI2 Text.Show.Singletons.ShowsPrecSym2
instance Data.Singletons.SingI Text.Show.Singletons.ShowCharSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Text.Show.Singletons.ShowCharSym1 d)
instance Data.Singletons.SingI Text.Show.Singletons.ShowCommaSpaceSym0
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI Text.Show.Singletons.ShowListSym0
instance forall a (d :: [a]). (Text.Show.Singletons.SShow a, Data.Singletons.SingI d) => Data.Singletons.SingI (Text.Show.Singletons.ShowListSym1 d)
instance Data.Singletons.SingI Text.Show.Singletons.ShowListWithSym0
instance forall a (d :: a Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)). Data.Singletons.SingI d => Data.Singletons.SingI (Text.Show.Singletons.ShowListWithSym1 d)
instance forall a (d1 :: a Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)) (d2 :: [a]). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Text.Show.Singletons.ShowListWithSym2 d1 d2)
instance Data.Singletons.SingI Text.Show.Singletons.ShowParenSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Text.Show.Singletons.ShowParenSym1 d)
instance (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Text.Show.Singletons.ShowParenSym2 d1 d2)
instance Data.Singletons.SingI Text.Show.Singletons.ShowSpaceSym0
instance Data.Singletons.SingI Text.Show.Singletons.ShowStringSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Text.Show.Singletons.ShowStringSym1 d)
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI Text.Show.Singletons.Show_Sym0
instance Data.Singletons.SingI Text.Show.Singletons.Show_tupleSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Text.Show.Singletons.Show_tupleSym1 d)
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI Text.Show.Singletons.ShowsPrecSym0
instance (Text.Show.Singletons.SShow a, Data.Singletons.SingI d) => Data.Singletons.SingI (Text.Show.Singletons.ShowsPrecSym1 d)
instance forall a (d1 :: GHC.Num.Natural.Natural) (d2 :: a). (Text.Show.Singletons.SShow a, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Text.Show.Singletons.ShowsPrecSym2 d1 d2)
instance Text.Show.Singletons.SShow a => Data.Singletons.SingI Text.Show.Singletons.ShowsSym0
instance forall a (d :: a). (Text.Show.Singletons.SShow a, Data.Singletons.SingI d) => Data.Singletons.SingI (Text.Show.Singletons.ShowsSym1 d)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.IsDecSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Lambda_6989586621680219999Sym0
instance forall k1 k2 c a (ss6989586621680219997 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680219999Sym1 ss6989586621680219997)
instance forall k1 k2 c a (ss6989586621680219997 :: k1) (a_69895866216802199906989586621680219998 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680219999Sym2 ss6989586621680219997 a_69895866216802199906989586621680219998)
instance forall k1 k2 c a (ss6989586621680219997 :: k1) (a_69895866216802199906989586621680219998 :: k2) (s6989586621680220001 :: GHC.Types.Symbol Data.Singletons.~> c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680219999Sym3 ss6989586621680219997 a_69895866216802199906989586621680219998 s6989586621680220001)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Lambda_6989586621680220018Sym0
instance forall k (a_69895866216802200126989586621680220017 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680220018Sym1 a_69895866216802200126989586621680220017)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Lambda_6989586621680243338Sym0
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym1 s6989586621680243337)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym2 s6989586621680243337 c6989586621680243324)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2) (s6989586621680243325 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym3 s6989586621680243337 c6989586621680243324 s6989586621680243325)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2) (s6989586621680243325 :: k3) (c6989586621680243316 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym4 s6989586621680243337 c6989586621680243324 s6989586621680243325 c6989586621680243316)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2) (s6989586621680243325 :: k3) (c6989586621680243316 :: k4) (s6989586621680243317 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym5 s6989586621680243337 c6989586621680243324 s6989586621680243325 c6989586621680243316 s6989586621680243317)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2) (s6989586621680243325 :: k3) (c6989586621680243316 :: k4) (s6989586621680243317 :: k5) (arg_69895866216802432106989586621680243312 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym6 s6989586621680243337 c6989586621680243324 s6989586621680243325 c6989586621680243316 s6989586621680243317 arg_69895866216802432106989586621680243312)
instance forall k1 k2 k3 k4 k5 k6 k7 (s6989586621680243337 :: k1) (c6989586621680243324 :: k2) (s6989586621680243325 :: k3) (c6989586621680243316 :: k4) (s6989586621680243317 :: k5) (arg_69895866216802432106989586621680243312 :: k6) (arg_69895866216802432126989586621680243313 :: k7). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Lambda_6989586621680243338Sym7 s6989586621680243337 c6989586621680243324 s6989586621680243325 c6989586621680243316 s6989586621680243317 arg_69895866216802432106989586621680243312 arg_69895866216802432126989586621680243313)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Let6989586621680220071ShowlSym0
instance forall k1 k2 k3 (showx6989586621680220067 :: k1 Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680220071ShowlSym1 showx6989586621680220067)
instance forall k1 k2 k3 (showx6989586621680220067 :: k1 Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)) (x6989586621680220068 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680220071ShowlSym2 showx6989586621680220067 x6989586621680220068)
instance forall k1 k2 k3 (showx6989586621680220067 :: k1 Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)) (x6989586621680220068 :: k2) (xs6989586621680220069 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680220071ShowlSym3 showx6989586621680220067 x6989586621680220068 xs6989586621680220069)
instance forall k1 k2 k3 (showx6989586621680220067 :: k1 Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)) (x6989586621680220068 :: k2) (xs6989586621680220069 :: k3) (s6989586621680220070 :: GHC.Types.Symbol). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680220071ShowlSym4 showx6989586621680220067 x6989586621680220068 xs6989586621680220069 s6989586621680220070)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Let6989586621680243261ContSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243261ContSym1 p6989586621680243258)
instance forall k1 k2 (p6989586621680243258 :: GHC.Types.Char Data.Singletons.~> GHC.Types.Bool) (f6989586621680243259 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243261ContSym2 p6989586621680243258 f6989586621680243259)
instance forall k1 k2 (p6989586621680243258 :: GHC.Types.Char Data.Singletons.~> GHC.Types.Bool) (f6989586621680243259 :: k1) (a_69895866216802432496989586621680243260 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243261ContSym3 p6989586621680243258 f6989586621680243259 a_69895866216802432496989586621680243260)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Let6989586621680243265Scrutinee_6989586621680243224Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243265Scrutinee_6989586621680243224Sym1 s6989586621680243264)
instance forall k1 k2 k3 (s6989586621680243264 :: GHC.Types.Symbol) (p6989586621680243258 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243265Scrutinee_6989586621680243224Sym2 s6989586621680243264 p6989586621680243258)
instance forall k1 k2 k3 (s6989586621680243264 :: GHC.Types.Symbol) (p6989586621680243258 :: k1) (f6989586621680243259 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243265Scrutinee_6989586621680243224Sym3 s6989586621680243264 p6989586621680243258 f6989586621680243259)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Let6989586621680243288Scrutinee_6989586621680243216Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Let6989586621680243288Scrutinee_6989586621680243216Sym1 sym6989586621680243286)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ProtectEscSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ProtectEscSym1 a6989586621680243255)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ProtectEscSym2 a6989586621680243255 a6989586621680243256)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowCharListSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowCharListSym1 a6989586621680243363)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowCharSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowCharSym1 a6989586621680220055)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowCommaSpaceSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowListSym0
instance forall a (a6989586621680220098 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowListSym1 a6989586621680220098)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowListWithSym0
instance forall a (a6989586621680220063 :: a Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowListWithSym1 a6989586621680220063)
instance forall a (a6989586621680220063 :: a Data.Singletons.~> (GHC.Types.Symbol Data.Singletons.~> GHC.Types.Symbol)) (a6989586621680220064 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowListWithSym2 a6989586621680220063 a6989586621680220064)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowList_6989586621680220123Sym0
instance forall a (a6989586621680220128 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowList_6989586621680220123Sym1 a6989586621680220128)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowLitCharSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowLitCharSym1 a6989586621680243310)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowLitStringSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowLitStringSym1 a6989586621680243299)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowLitSymbolSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowLitSymbolSym1 a6989586621680243284)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowParenSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowParenSym1 a6989586621680220028)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowParenSym2 a6989586621680220028 a6989586621680220029)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowSpaceSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowStringSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowStringSym1 a6989586621680220044)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowSymbolSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowSymbolSym1 a6989586621680243354)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Show_Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Show__6989586621680220115Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.Show_tupleSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.Show_tupleSym1 a6989586621680219995)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsCharPrecSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsCharPrecSym1 a6989586621680243375)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsCharPrecSym2 a6989586621680243375 a6989586621680243376)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsNatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsNatSym1 a6989586621680241109)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrecSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrecSym1 a6989586621680220089)
instance forall a (a6989586621680220089 :: GHC.Num.Natural.Natural) (a6989586621680220090 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrecSym2 a6989586621680220089 a6989586621680220090)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220103Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220103Sym1 a6989586621680220109)
instance forall a (a6989586621680220109 :: GHC.Num.Natural.Natural) (a6989586621680220110 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220103Sym2 a6989586621680220109 a6989586621680220110)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220135Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220135Sym1 a6989586621680220145)
instance forall a (a6989586621680220145 :: GHC.Num.Natural.Natural) (a6989586621680220146 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220135Sym2 a6989586621680220145 a6989586621680220146)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220153Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220153Sym1 a6989586621680220159)
instance forall a b (a6989586621680220159 :: GHC.Num.Natural.Natural) (a6989586621680220160 :: (a, b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220153Sym2 a6989586621680220159 a6989586621680220160)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220168Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220168Sym1 a6989586621680220174)
instance forall a b c (a6989586621680220174 :: GHC.Num.Natural.Natural) (a6989586621680220175 :: (a, b, c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220168Sym2 a6989586621680220174 a6989586621680220175)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220184Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220184Sym1 a6989586621680220190)
instance forall a b c d (a6989586621680220190 :: GHC.Num.Natural.Natural) (a6989586621680220191 :: (a, b, c, d)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220184Sym2 a6989586621680220190 a6989586621680220191)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220201Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220201Sym1 a6989586621680220207)
instance forall a b c d e (a6989586621680220207 :: GHC.Num.Natural.Natural) (a6989586621680220208 :: (a, b, c, d, e)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220201Sym2 a6989586621680220207 a6989586621680220208)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220219Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220219Sym1 a6989586621680220225)
instance forall a b c d e f (a6989586621680220225 :: GHC.Num.Natural.Natural) (a6989586621680220226 :: (a, b, c, d, e, f)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220219Sym2 a6989586621680220225 a6989586621680220226)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680220238Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220238Sym1 a6989586621680220244)
instance forall a b c d e f g (a6989586621680220244 :: GHC.Num.Natural.Natural) (a6989586621680220245 :: (a, b, c, d, e, f, g)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680220238Sym2 a6989586621680220244 a6989586621680220245)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250769Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250769Sym1 a6989586621680250777)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250769Sym2 a6989586621680250777 a6989586621680250778)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250798Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250798Sym1 a6989586621680250808)
instance forall a (a6989586621680250808 :: GHC.Num.Natural.Natural) (a6989586621680250809 :: GHC.Internal.Maybe.Maybe a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250798Sym2 a6989586621680250808 a6989586621680250809)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250844Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250844Sym1 a6989586621680250854)
instance forall a b (a6989586621680250854 :: GHC.Num.Natural.Natural) (a6989586621680250855 :: GHC.Internal.Data.Either.Either a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250844Sym2 a6989586621680250854 a6989586621680250855)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250875Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250875Sym1 a6989586621680250883)
instance forall a (a6989586621680250883 :: GHC.Num.Natural.Natural) (a6989586621680250884 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250875Sym2 a6989586621680250883 a6989586621680250884)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250895Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250895Sym1 a6989586621680250905)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250895Sym2 a6989586621680250905 a6989586621680250906)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250915Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250915Sym1 a6989586621680250927)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250915Sym2 a6989586621680250927 a6989586621680250928)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsPrec_6989586621680250940Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250940Sym1 a6989586621680250948)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsPrec_6989586621680250940Sym2 a6989586621680250948 a6989586621680250949)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Text.Show.Singletons.ShowsSym0
instance forall a (a6989586621680220081 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Text.Show.Singletons.ShowsSym1 a6989586621680220081)
-- | Defines the promoted version of Monoid, PMonoid, and the
-- singleton version, SMonoid.
module Data.Monoid.Singletons
class PMonoid a where {
type Mempty :: a;
type Mappend (arg :: a) (arg1 :: a) :: a;
type Mconcat (arg :: [a]) :: a;
type Mappend arg :: a arg1 :: a = Apply Apply Mappend_6989586621680304347Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Mconcat arg :: [a] = Apply Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type arg;
}
class SSemigroup a => SMonoid a
sMempty :: SMonoid a => Sing (MemptySym0 :: a)
sMappend :: forall (t1 :: a) (t2 :: a). SMonoid a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMappend) :: forall (t1 :: a) (t2 :: a). (SMonoid a, Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Mappend_6989586621680304347Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMconcat :: forall (t :: [a]). SMonoid a => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
($dmsMconcat) :: forall (t :: [a]). (SMonoid a, Apply (MconcatSym0 :: TyFun [a] a -> Type) t ~ Apply (Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type) t) => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
type family Sing :: k -> Type
data SDual (a1 :: Dual a)
[SDual] :: forall a (n :: a). Sing n -> SDual ('Dual n)
data SAll (a :: All)
[SAll] :: forall (n :: Bool). Sing n -> SAll ('All n)
data SAny (a :: Any)
[SAny] :: forall (n :: Bool). Sing n -> SAny ('Any n)
data SSum (a1 :: Sum a)
[SSum] :: forall a (n :: a). Sing n -> SSum ('Sum n)
data SProduct (a1 :: Product a)
[SProduct] :: forall a (n :: a). Sing n -> SProduct ('Product n)
data SFirst (a1 :: First a)
[SFirst] :: forall a (n :: Maybe a). Sing n -> SFirst ('First n)
data SLast (a1 :: Last a)
[SLast] :: forall a (n :: Maybe a). Sing n -> SLast ('Last n)
type family GetDual (a1 :: Dual a) :: a
type family GetAll (a :: All) :: Bool
type family GetAny (a :: Any) :: Bool
type family GetSum (a1 :: Sum a) :: a
type family GetProduct (a1 :: Product a) :: a
type family GetFirst (a1 :: First a) :: Maybe a
type family GetLast (a1 :: Last a) :: Maybe a
sGetDual :: forall a (t :: Dual a). Sing t -> Sing (Apply (GetDualSym0 :: TyFun (Dual a) a -> Type) t)
sGetAll :: forall (t :: All). Sing t -> Sing (Apply GetAllSym0 t)
sGetAny :: forall (t :: Any). Sing t -> Sing (Apply GetAnySym0 t)
sGetSum :: forall a (t :: Sum a). Sing t -> Sing (Apply (GetSumSym0 :: TyFun (Sum a) a -> Type) t)
sGetProduct :: forall a (t :: Product a). Sing t -> Sing (Apply (GetProductSym0 :: TyFun (Product a) a -> Type) t)
sGetFirst :: forall a (t :: First a). Sing t -> Sing (Apply (GetFirstSym0 :: TyFun (First a) (Maybe a) -> Type) t)
sGetLast :: forall a (t :: Last a). Sing t -> Sing (Apply (GetLastSym0 :: TyFun (Last a) (Maybe a) -> Type) t)
type family MemptySym0 :: a
data MappendSym0 (a1 :: TyFun a a ~> a)
data MappendSym1 (a6989586621680304340 :: a) (b :: TyFun a a)
type family MappendSym2 (a6989586621680304340 :: a) (a6989586621680304341 :: a) :: a
data MconcatSym0 (a1 :: TyFun [a] a)
type family MconcatSym1 (a6989586621680304344 :: [a]) :: a
data DualSym0 (a1 :: TyFun a Dual a)
type family DualSym1 (a6989586621679693488 :: a) :: Dual a
data GetDualSym0 (a1 :: TyFun Dual a a)
type family GetDualSym1 (a6989586621679693491 :: Dual a) :: a
data AllSym0 (a :: TyFun Bool All)
type family AllSym1 (a6989586621679693504 :: Bool) :: All
data GetAllSym0 (a :: TyFun All Bool)
type family GetAllSym1 (a6989586621679693507 :: All) :: Bool
data AnySym0 (a :: TyFun Bool Any)
type family AnySym1 (a6989586621679693520 :: Bool) :: Any
data GetAnySym0 (a :: TyFun Any Bool)
type family GetAnySym1 (a6989586621679693523 :: Any) :: Bool
data SumSym0 (a1 :: TyFun a Sum a)
type family SumSym1 (a6989586621679693539 :: a) :: Sum a
data GetSumSym0 (a1 :: TyFun Sum a a)
type family GetSumSym1 (a6989586621679693542 :: Sum a) :: a
data ProductSym0 (a1 :: TyFun a Product a)
type family ProductSym1 (a6989586621679693558 :: a) :: Product a
data GetProductSym0 (a1 :: TyFun Product a a)
type family GetProductSym1 (a6989586621679693561 :: Product a) :: a
data FirstSym0 (a1 :: TyFun Maybe a First a)
type family FirstSym1 (a6989586621680308684 :: Maybe a) :: First a
data GetFirstSym0 (a1 :: TyFun First a Maybe a)
type family GetFirstSym1 (a6989586621680308687 :: First a) :: Maybe a
data LastSym0 (a1 :: TyFun Maybe a Last a)
type family LastSym1 (a6989586621680308707 :: Maybe a) :: Last a
data GetLastSym0 (a1 :: TyFun Last a Maybe a)
type family GetLastSym1 (a6989586621680308710 :: Last a) :: Maybe a
instance forall a (z :: GHC.Internal.Data.Monoid.First a). GHC.Classes.Eq (Data.Monoid.Singletons.SFirst z)
instance forall a (z :: GHC.Internal.Data.Monoid.Last a). GHC.Classes.Eq (Data.Monoid.Singletons.SLast z)
instance Control.Monad.Singletons.Internal.PApplicative GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.PApplicative GHC.Internal.Data.Monoid.Last
instance Data.Eq.Singletons.PEq (GHC.Internal.Data.Monoid.First a)
instance Data.Eq.Singletons.PEq (GHC.Internal.Data.Monoid.Last a)
instance Control.Monad.Singletons.Internal.PFunctor GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.PFunctor GHC.Internal.Data.Monoid.Last
instance Control.Monad.Singletons.Internal.PMonad GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.PMonad GHC.Internal.Data.Monoid.Last
instance Data.Monoid.Singletons.PMonoid GHC.Internal.Data.Semigroup.Internal.All
instance Data.Monoid.Singletons.PMonoid GHC.Internal.Data.Semigroup.Internal.Any
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Ord.Down a)
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Semigroup.Internal.Dual a)
instance Data.Monoid.Singletons.PMonoid (a Data.Singletons.~> b)
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Monoid.First a)
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Monoid.Last a)
instance Data.Monoid.Singletons.PMonoid [a]
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Maybe.Maybe a)
instance Data.Monoid.Singletons.PMonoid GHC.Types.Ordering
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Semigroup.Internal.Product a)
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Semigroup.Internal.Sum a)
instance Data.Monoid.Singletons.PMonoid GHC.Types.Symbol
instance Data.Monoid.Singletons.PMonoid (a, b)
instance Data.Monoid.Singletons.PMonoid (a, b, c)
instance Data.Monoid.Singletons.PMonoid (a, b, c, d)
instance Data.Monoid.Singletons.PMonoid (a, b, c, d, e)
instance Data.Monoid.Singletons.PMonoid ()
instance Data.Ord.Singletons.POrd (GHC.Internal.Data.Monoid.First a)
instance Data.Ord.Singletons.POrd (GHC.Internal.Data.Monoid.Last a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Monoid.First a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Monoid.Last a)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Monoid.First a)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Monoid.Last a)
instance Control.Monad.Singletons.Internal.SApplicative GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.SApplicative GHC.Internal.Data.Monoid.Last
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => Data.Singletons.Decide.SDecide (GHC.Internal.Data.Monoid.First a)
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => Data.Singletons.Decide.SDecide (GHC.Internal.Data.Monoid.Last a)
instance Data.Eq.Singletons.SEq (GHC.Internal.Maybe.Maybe a) => Data.Eq.Singletons.SEq (GHC.Internal.Data.Monoid.First a)
instance Data.Eq.Singletons.SEq (GHC.Internal.Maybe.Maybe a) => Data.Eq.Singletons.SEq (GHC.Internal.Data.Monoid.Last a)
instance Control.Monad.Singletons.Internal.SFunctor GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.SFunctor GHC.Internal.Data.Monoid.Last
instance Control.Monad.Singletons.Internal.SMonad GHC.Internal.Data.Monoid.First
instance Control.Monad.Singletons.Internal.SMonad GHC.Internal.Data.Monoid.Last
instance Data.Monoid.Singletons.SMonoid GHC.Internal.Data.Semigroup.Internal.All
instance Data.Monoid.Singletons.SMonoid GHC.Internal.Data.Semigroup.Internal.Any
instance Data.Monoid.Singletons.SMonoid a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Ord.Down a)
instance Data.Monoid.Singletons.SMonoid a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Semigroup.Internal.Dual a)
instance Data.Monoid.Singletons.SMonoid b => Data.Monoid.Singletons.SMonoid (a Data.Singletons.~> b)
instance Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Monoid.First a)
instance Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Monoid.Last a)
instance Data.Monoid.Singletons.SMonoid [a]
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Maybe.Maybe a)
instance Data.Monoid.Singletons.SMonoid GHC.Types.Ordering
instance GHC.Num.Singletons.SNum a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Semigroup.Internal.Product a)
instance GHC.Num.Singletons.SNum a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Semigroup.Internal.Sum a)
instance Data.Monoid.Singletons.SMonoid GHC.Types.Symbol
instance (Data.Monoid.Singletons.SMonoid a, Data.Monoid.Singletons.SMonoid b) => Data.Monoid.Singletons.SMonoid (a, b)
instance (Data.Monoid.Singletons.SMonoid a, Data.Monoid.Singletons.SMonoid b, Data.Monoid.Singletons.SMonoid c) => Data.Monoid.Singletons.SMonoid (a, b, c)
instance (Data.Monoid.Singletons.SMonoid a, Data.Monoid.Singletons.SMonoid b, Data.Monoid.Singletons.SMonoid c, Data.Monoid.Singletons.SMonoid d) => Data.Monoid.Singletons.SMonoid (a, b, c, d)
instance (Data.Monoid.Singletons.SMonoid a, Data.Monoid.Singletons.SMonoid b, Data.Monoid.Singletons.SMonoid c, Data.Monoid.Singletons.SMonoid d, Data.Monoid.Singletons.SMonoid e) => Data.Monoid.Singletons.SMonoid (a, b, c, d, e)
instance Data.Monoid.Singletons.SMonoid ()
instance Data.Ord.Singletons.SOrd (GHC.Internal.Maybe.Maybe a) => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Monoid.First a)
instance Data.Ord.Singletons.SOrd (GHC.Internal.Maybe.Maybe a) => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Monoid.Last a)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Monoid.First a)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Monoid.Last a)
instance Text.Show.Singletons.SShow (GHC.Internal.Maybe.Maybe a) => Text.Show.Singletons.SShow (GHC.Internal.Data.Monoid.First a)
instance Text.Show.Singletons.SShow (GHC.Internal.Maybe.Maybe a) => Text.Show.Singletons.SShow (GHC.Internal.Data.Monoid.Last a)
instance forall a (z :: GHC.Internal.Data.Monoid.First a). Data.Singletons.ShowSing.ShowSing (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Show.Show (Data.Monoid.Singletons.SFirst z)
instance forall a (z :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.ShowSing.ShowSing (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Show.Show (Data.Monoid.Singletons.SLast z)
instance Data.Singletons.SingI1 'GHC.Internal.Data.Monoid.First
instance Data.Singletons.SingI1 'GHC.Internal.Data.Monoid.Last
instance Data.Monoid.Singletons.SMonoid a => Data.Singletons.SingI1 Data.Monoid.Singletons.MappendSym1
instance Data.Singletons.SingI Data.Monoid.Singletons.FirstSym0
instance Data.Singletons.SingI Data.Monoid.Singletons.GetFirstSym0
instance Data.Singletons.SingI Data.Monoid.Singletons.GetLastSym0
instance Data.Singletons.SingI Data.Monoid.Singletons.LastSym0
instance Data.Monoid.Singletons.SMonoid a => Data.Singletons.SingI Data.Monoid.Singletons.MappendSym0
instance forall a (d :: a). (Data.Monoid.Singletons.SMonoid a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Monoid.Singletons.MappendSym1 d)
instance Data.Monoid.Singletons.SMonoid a => Data.Singletons.SingI Data.Monoid.Singletons.MconcatSym0
instance forall a (n :: GHC.Internal.Maybe.Maybe a). Data.Singletons.SingI n => Data.Singletons.SingI ('GHC.Internal.Data.Monoid.First n)
instance forall a (n :: GHC.Internal.Maybe.Maybe a). Data.Singletons.SingI n => Data.Singletons.SingI ('GHC.Internal.Data.Monoid.Last n)
instance Data.Singletons.SingKind a => Data.Singletons.SingKind (GHC.Internal.Data.Monoid.First a)
instance Data.Singletons.SingKind a => Data.Singletons.SingKind (GHC.Internal.Data.Monoid.Last a)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Compare_6989586621680312180Sym0
instance forall a (a6989586621680312185 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Compare_6989586621680312180Sym1 a6989586621680312185)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Compare_6989586621680312198Sym0
instance forall a (a6989586621680312203 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Compare_6989586621680312198Sym1 a6989586621680312203)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.FirstSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Fmap_6989586621680318654Sym0
instance forall a b (a6989586621680318659 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Fmap_6989586621680318654Sym1 a6989586621680318659)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Fmap_6989586621680318821Sym0
instance forall a b (a6989586621680318826 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Fmap_6989586621680318821Sym1 a6989586621680318826)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.GetFirstSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.GetLastSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Lambda_6989586621680304377Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Lambda_6989586621680318733Sym0
instance forall k k1 a (a6989586621680318731 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Lambda_6989586621680318733Sym1 a6989586621680318731)
instance forall k k1 a (a6989586621680318731 :: k) (k6989586621680318732 :: k1 Data.Singletons.~> GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Lambda_6989586621680318733Sym2 a6989586621680318731 k6989586621680318732)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Lambda_6989586621680318852Sym0
instance forall k k1 a (a6989586621680318850 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Lambda_6989586621680318852Sym1 a6989586621680318850)
instance forall k k1 a (a6989586621680318850 :: k) (k6989586621680318851 :: k1 Data.Singletons.~> GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Lambda_6989586621680318852Sym2 a6989586621680318850 k6989586621680318851)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.LastSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Let6989586621680318736Scrutinee_6989586621680318273Sym0
instance forall k1 k2 k3 (x6989586621680318735 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Let6989586621680318736Scrutinee_6989586621680318273Sym1 x6989586621680318735)
instance forall k1 k2 k3 (x6989586621680318735 :: k1) (a6989586621680318731 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Let6989586621680318736Scrutinee_6989586621680318273Sym2 x6989586621680318735 a6989586621680318731)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Let6989586621680318794ASym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Let6989586621680318855Scrutinee_6989586621680318280Sym0
instance forall k1 k2 k3 (x6989586621680318854 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Let6989586621680318855Scrutinee_6989586621680318280Sym1 x6989586621680318854)
instance forall k1 k2 k3 (x6989586621680318854 :: k1) (a6989586621680318850 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Let6989586621680318855Scrutinee_6989586621680318280Sym2 x6989586621680318854 a6989586621680318850)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Let6989586621680318873BSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.MappendSym0
instance forall a (a6989586621680304340 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.MappendSym1 a6989586621680304340)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Mappend_6989586621680304347Sym0
instance forall a (a6989586621680304356 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.Mappend_6989586621680304347Sym1 a6989586621680304356)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.MconcatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Mconcat_6989586621680304361Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Mconcat_6989586621680304388Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Pure_6989586621680318573Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.Pure_6989586621680318800Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.ShowsPrec_6989586621680314148Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.ShowsPrec_6989586621680314148Sym1 a6989586621680314156)
instance forall a (a6989586621680314156 :: GHC.Num.Natural.Natural) (a6989586621680314157 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.ShowsPrec_6989586621680314148Sym2 a6989586621680314156 a6989586621680314157)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.ShowsPrec_6989586621680314193Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.ShowsPrec_6989586621680314193Sym1 a6989586621680314201)
instance forall a (a6989586621680314201 :: GHC.Num.Natural.Natural) (a6989586621680314202 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.ShowsPrec_6989586621680314193Sym2 a6989586621680314201 a6989586621680314202)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680310418Sym0
instance forall a (a6989586621680310423 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680310418Sym1 a6989586621680310423)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680310436Sym0
instance forall a (a6989586621680310441 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680310436Sym1 a6989586621680310441)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318583Sym0
instance forall a b (a6989586621680318588 :: GHC.Internal.Data.Monoid.First (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318583Sym1 a6989586621680318588)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318665Sym0
instance forall a b (a6989586621680318670 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318665Sym1 a6989586621680318670)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318724Sym0
instance forall a b (a6989586621680318729 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318724Sym1 a6989586621680318729)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318785Sym0
instance forall a (a6989586621680318790 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318785Sym1 a6989586621680318790)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318810Sym0
instance forall a b (a6989586621680318815 :: GHC.Internal.Data.Monoid.Last (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318810Sym1 a6989586621680318815)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318832Sym0
instance forall a b (a6989586621680318837 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318832Sym1 a6989586621680318837)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318843Sym0
instance forall a b (a6989586621680318848 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318843Sym1 a6989586621680318848)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Monoid.Singletons.TFHelper_6989586621680318864Sym0
instance forall a (a6989586621680318869 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Monoid.Singletons.TFHelper_6989586621680318864Sym1 a6989586621680318869)
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Monoid.Singletons.SFirst
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Monoid.Singletons.SLast
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Data.Type.Equality.TestEquality Data.Monoid.Singletons.SFirst
instance Data.Singletons.Decide.SDecide (GHC.Internal.Maybe.Maybe a) => GHC.Internal.Data.Type.Equality.TestEquality Data.Monoid.Singletons.SLast
-- | Exports promoted and singled versions of the definitions in
-- Data.Proxy.
module Data.Proxy.Singletons
type family Sing :: k -> Type
data SProxy (a :: Proxy t)
[SProxy] :: forall {k} (t :: k). SProxy ('Proxy :: Proxy t)
type family AsProxyTypeOf (a1 :: a) (a2 :: proxy a) :: a
sAsProxyTypeOf :: forall a (proxy :: Type -> Type) (t1 :: a) (t2 :: proxy a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (AsProxyTypeOfSym0 :: TyFun a (proxy a ~> a) -> Type) t1) t2)
type family ProxySym0 :: forall {k} (t :: k). () => Proxy t
data AsProxyTypeOfSym0 (a1 :: TyFun a proxy a ~> a)
data AsProxyTypeOfSym1 (a6989586621680368535 :: a) (b :: TyFun proxy a a)
type family AsProxyTypeOfSym2 (a6989586621680368535 :: a) (a6989586621680368536 :: proxy a) :: a
instance forall k (t :: k) (z :: GHC.Internal.Data.Proxy.Proxy t). GHC.Classes.Eq (Data.Proxy.Singletons.SProxy z)
instance forall k (t :: k) (z :: GHC.Internal.Data.Proxy.Proxy t). GHC.Classes.Ord (Data.Proxy.Singletons.SProxy z)
instance Control.Monad.Singletons.Internal.PAlternative GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.PApplicative GHC.Internal.Data.Proxy.Proxy
instance forall k (s :: k). Data.Singletons.Base.Enum.PBounded (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Singletons.Base.Enum.PEnum (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Eq.Singletons.PEq (GHC.Internal.Data.Proxy.Proxy s)
instance Control.Monad.Singletons.Internal.PFunctor GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.PMonadPlus GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.PMonad GHC.Internal.Data.Proxy.Proxy
instance forall k (s :: k). Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Ord.Singletons.POrd (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Text.Show.Singletons.PShow (GHC.Internal.Data.Proxy.Proxy s)
instance Control.Monad.Singletons.Internal.SAlternative GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.SApplicative GHC.Internal.Data.Proxy.Proxy
instance forall k (s :: k). Data.Singletons.Base.Enum.SBounded (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (t :: k). Data.Singletons.Decide.SDecide (GHC.Internal.Data.Proxy.Proxy t)
instance forall k (s :: k). Data.Singletons.Base.Enum.SEnum (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Eq.Singletons.SEq (GHC.Internal.Data.Proxy.Proxy s)
instance Control.Monad.Singletons.Internal.SFunctor GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.SMonadPlus GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Singletons.Internal.SMonad GHC.Internal.Data.Proxy.Proxy
instance forall k (s :: k). Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Ord.Singletons.SOrd (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (s :: k). Text.Show.Singletons.SShow (GHC.Internal.Data.Proxy.Proxy s)
instance forall k (t :: k) (z :: GHC.Internal.Data.Proxy.Proxy t). GHC.Internal.Show.Show (Data.Proxy.Singletons.SProxy z)
instance Data.Singletons.SingI1 Data.Proxy.Singletons.AsProxyTypeOfSym1
instance Data.Singletons.SingI Data.Proxy.Singletons.AsProxyTypeOfSym0
instance forall a (d :: a) (proxy :: * -> *). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Proxy.Singletons.AsProxyTypeOfSym1 d)
instance forall k (t :: k). Data.Singletons.SingI 'GHC.Internal.Data.Proxy.Proxy
instance forall k (t :: k). Data.Singletons.SingKind (GHC.Internal.Data.Proxy.Proxy t)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.AsProxyTypeOfSym0
instance forall a (proxy :: * -> *) (a6989586621680368535 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.AsProxyTypeOfSym1 a6989586621680368535)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Compare_6989586621680368670Sym0
instance forall k (s :: k) (a6989586621680368675 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.Compare_6989586621680368670Sym1 a6989586621680368675)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.EnumFromThenTo_6989586621680368798Sym0
instance forall k (s :: k) (a6989586621680368804 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.EnumFromThenTo_6989586621680368798Sym1 a6989586621680368804)
instance forall k (s :: k) (a6989586621680368804 :: GHC.Internal.Data.Proxy.Proxy s) (a6989586621680368805 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.EnumFromThenTo_6989586621680368798Sym2 a6989586621680368804 a6989586621680368805)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.EnumFromTo_6989586621680368809Sym0
instance forall k (s :: k) (a6989586621680368814 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.EnumFromTo_6989586621680368809Sym1 a6989586621680368814)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Fmap_6989586621680369090Sym0
instance forall a b (a6989586621680369095 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.Fmap_6989586621680369090Sym1 a6989586621680369095)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.FromEnum_6989586621680368778Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Let6989586621680368790Scrutinee_6989586621680367784Sym0
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Mconcat_6989586621680369043Sym0
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Pred_6989586621680368772Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Pure_6989586621680369158Sym0
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Sconcat_6989586621680368846Sym0
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.ShowsPrec_6989586621680368708Sym0
instance forall k (s :: k) (a6989586621680368716 :: GHC.Num.Natural.Natural). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.ShowsPrec_6989586621680368708Sym1 a6989586621680368716)
instance forall k (s :: k) (a6989586621680368716 :: GHC.Num.Natural.Natural) (a6989586621680368717 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.ShowsPrec_6989586621680368708Sym2 a6989586621680368716 a6989586621680368717)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.Succ_6989586621680368766Sym0
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.TFHelper_6989586621680368609Sym0
instance forall k (s :: k) (a6989586621680368614 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.TFHelper_6989586621680368609Sym1 a6989586621680368614)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.TFHelper_6989586621680368838Sym0
instance forall k (s :: k) (a6989586621680368843 :: GHC.Internal.Data.Proxy.Proxy s). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.TFHelper_6989586621680368838Sym1 a6989586621680368843)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.TFHelper_6989586621680369165Sym0
instance forall a b (a6989586621680369170 :: GHC.Internal.Data.Proxy.Proxy (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.TFHelper_6989586621680369165Sym1 a6989586621680369170)
instance forall k (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.TFHelper_6989586621680369201Sym0
instance forall k (a :: k) (a6989586621680369206 :: GHC.Internal.Data.Proxy.Proxy a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.TFHelper_6989586621680369201Sym1 a6989586621680369206)
instance forall a k (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.TFHelper_6989586621680369242Sym0
instance forall a k (b :: k) (a6989586621680369247 :: GHC.Internal.Data.Proxy.Proxy a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Proxy.Singletons.TFHelper_6989586621680369242Sym1 a6989586621680369247)
instance forall k (s :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Proxy.Singletons.ToEnum_6989586621680368784Sym0
instance forall k (t :: k). GHC.Internal.Data.Type.Coercion.TestCoercion Data.Proxy.Singletons.SProxy
instance forall k (t :: k). GHC.Internal.Data.Type.Equality.TestEquality Data.Proxy.Singletons.SProxy
-- | Defines the promoted and singled versions of the Foldable type
-- class.
module Data.Foldable.Singletons
class PFoldable (t :: Type -> Type) where {
type Fold (arg :: t m) :: m;
type FoldMap (arg :: a ~> m) (arg1 :: t a) :: m;
type Foldr (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldr' (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldl (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldl' (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldr1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type Foldl1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type ToList (arg :: t a) :: [a];
type Null (arg :: t a) :: Bool;
type Length (arg :: t a) :: Natural;
type Elem (arg :: a) (arg1 :: t a) :: Bool;
type Maximum (arg :: t a) :: a;
type Minimum (arg :: t a) :: a;
type Sum (arg :: t a) :: a;
type Product (arg :: t a) :: a;
type Fold arg :: t m = Apply Fold_6989586621680404343Sym0 :: TyFun t m m -> Type arg;
type FoldMap arg :: a ~> m arg1 :: t a = Apply Apply FoldMap_6989586621680404353Sym0 :: TyFun a ~> m t a ~> m -> Type arg arg1;
type Foldr arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr_6989586621680404367Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr' arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr'_6989586621680404382Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl_6989586621680404405Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl' arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl'_6989586621680404420Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldr1_6989586621680404442Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type Foldl1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldl1_6989586621680404463Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type ToList arg :: t a = Apply ToList_6989586621680404483Sym0 :: TyFun t a [a] -> Type arg;
type Null arg :: t a = Apply Null_6989586621680404492Sym0 :: TyFun t a Bool -> Type arg;
type Length arg :: t a = Apply Length_6989586621680404509Sym0 :: TyFun t a Natural -> Type arg;
type Elem arg :: a arg1 :: t a = Apply Apply Elem_6989586621680404528Sym0 :: TyFun a t a ~> Bool -> Type arg arg1;
type Maximum arg :: t a = Apply Maximum_6989586621680404542Sym0 :: TyFun t a a -> Type arg;
type Minimum arg :: t a = Apply Minimum_6989586621680404557Sym0 :: TyFun t a a -> Type arg;
type Sum arg :: t a = Apply Sum_6989586621680404572Sym0 :: TyFun t a a -> Type arg;
type Product arg :: t a = Apply Product_6989586621680404581Sym0 :: TyFun t a a -> Type arg;
}
class SFoldable (t :: Type -> Type)
sFold :: forall m (t1 :: t m). (SFoldable t, SMonoid m) => Sing t1 -> Sing (Apply (FoldSym0 :: TyFun (t m) m -> Type) t1)
($dmsFold) :: forall m (t1 :: t m). (SFoldable t, Apply (FoldSym0 :: TyFun (t m) m -> Type) t1 ~ Apply (Fold_6989586621680404343Sym0 :: TyFun (t m) m -> Type) t1, SMonoid m) => Sing t1 -> Sing (Apply (FoldSym0 :: TyFun (t m) m -> Type) t1)
sFoldMap :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
($dmsFoldMap) :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2 ~ Apply (Apply (FoldMap_6989586621680404353Sym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
sFoldr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldr) :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldr_6989586621680404367Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldr' :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldr') :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldr'_6989586621680404382Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldl) :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldl_6989586621680404405Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldl' :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldl') :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldl'_6989586621680404420Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldr1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldr1_6989586621680404442Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sFoldl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldl1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldl1_6989586621680404463Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sToList :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1)
($dmsToList) :: forall a (t1 :: t a). (SFoldable t, Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1 ~ Apply (ToList_6989586621680404483Sym0 :: TyFun (t a) [a] -> Type) t1) => Sing t1 -> Sing (Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1)
sNull :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
($dmsNull) :: forall a (t1 :: t a). (SFoldable t, Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1 ~ Apply (Null_6989586621680404492Sym0 :: TyFun (t a) Bool -> Type) t1) => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
sLength :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
($dmsLength) :: forall a (t1 :: t a). (SFoldable t, Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1 ~ Apply (Length_6989586621680404509Sym0 :: TyFun (t a) Natural -> Type) t1) => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
sElem :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
($dmsElem) :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (Elem_6989586621680404528Sym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
sMaximum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMaximum) :: forall a (t1 :: t a). (SFoldable t, Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Maximum_6989586621680404542Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
sMinimum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMinimum) :: forall a (t1 :: t a). (SFoldable t, Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Minimum_6989586621680404557Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
sSum :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
($dmsSum) :: forall a (t1 :: t a). (SFoldable t, Apply (SumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Sum_6989586621680404572Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
sProduct :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
($dmsProduct) :: forall a (t1 :: t a). (SFoldable t, Apply (ProductSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Product_6989586621680404581Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
type family FoldrM (a1 :: a ~> b ~> m b) (a2 :: b) (a3 :: t a) :: m b
sFoldrM :: forall a b (m :: Type -> Type) (t1 :: Type -> Type) (t2 :: a ~> (b ~> m b)) (t3 :: b) (t4 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (FoldrMSym0 :: TyFun (a ~> (b ~> m b)) (b ~> (t1 a ~> m b)) -> Type) t2) t3) t4)
type family FoldlM (a1 :: b ~> a ~> m b) (a2 :: b) (a3 :: t a) :: m b
sFoldlM :: forall b a (m :: Type -> Type) (t1 :: Type -> Type) (t2 :: b ~> (a ~> m b)) (t3 :: b) (t4 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (FoldlMSym0 :: TyFun (b ~> (a ~> m b)) (b ~> (t1 a ~> m b)) -> Type) t2) t3) t4)
type family Traverse_ (a1 :: a ~> f b) (a2 :: t a) :: f ()
sTraverse_ :: forall a (f :: Type -> Type) b (t1 :: Type -> Type) (t2 :: a ~> f b) (t3 :: t1 a). (SFoldable t1, SApplicative f) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (Traverse_Sym0 :: TyFun (a ~> f b) (t1 a ~> f ()) -> Type) t2) t3)
type family For_ (a1 :: t a) (a2 :: a ~> f b) :: f ()
sFor_ :: forall (t1 :: Type -> Type) a (f :: Type -> Type) b (t2 :: t1 a) (t3 :: a ~> f b). (SFoldable t1, SApplicative f) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (For_Sym0 :: TyFun (t1 a) ((a ~> f b) ~> f ()) -> Type) t2) t3)
type family SequenceA_ (a1 :: t f a) :: f ()
sSequenceA_ :: forall (t1 :: Type -> Type) (f :: Type -> Type) a (t2 :: t1 (f a)). (SFoldable t1, SApplicative f) => Sing t2 -> Sing (Apply (SequenceA_Sym0 :: TyFun (t1 (f a)) (f ()) -> Type) t2)
type family Asum (a1 :: t f a) :: f a
sAsum :: forall (t1 :: Type -> Type) (f :: Type -> Type) a (t2 :: t1 (f a)). (SFoldable t1, SAlternative f) => Sing t2 -> Sing (Apply (AsumSym0 :: TyFun (t1 (f a)) (f a) -> Type) t2)
type family MapM_ (a1 :: a ~> m b) (a2 :: t a) :: m ()
sMapM_ :: forall a (m :: Type -> Type) b (t1 :: Type -> Type) (t2 :: a ~> m b) (t3 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MapM_Sym0 :: TyFun (a ~> m b) (t1 a ~> m ()) -> Type) t2) t3)
type family ForM_ (a1 :: t a) (a2 :: a ~> m b) :: m ()
sForM_ :: forall (t1 :: Type -> Type) a (m :: Type -> Type) b (t2 :: t1 a) (t3 :: a ~> m b). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ForM_Sym0 :: TyFun (t1 a) ((a ~> m b) ~> m ()) -> Type) t2) t3)
type family Sequence_ (a1 :: t m a) :: m ()
sSequence_ :: forall (t1 :: Type -> Type) (m :: Type -> Type) a (t2 :: t1 (m a)). (SFoldable t1, SMonad m) => Sing t2 -> Sing (Apply (Sequence_Sym0 :: TyFun (t1 (m a)) (m ()) -> Type) t2)
type family Msum (a1 :: t m a) :: m a
sMsum :: forall (t1 :: Type -> Type) (m :: Type -> Type) a (t2 :: t1 (m a)). (SFoldable t1, SMonadPlus m) => Sing t2 -> Sing (Apply (MsumSym0 :: TyFun (t1 (m a)) (m a) -> Type) t2)
type family Concat (a1 :: t [a]) :: [a]
sConcat :: forall (t1 :: Type -> Type) a (t2 :: t1 [a]). SFoldable t1 => Sing t2 -> Sing (Apply (ConcatSym0 :: TyFun (t1 [a]) [a] -> Type) t2)
type family ConcatMap (a1 :: a ~> [b]) (a2 :: t a) :: [b]
sConcatMap :: forall a b (t1 :: Type -> Type) (t2 :: a ~> [b]) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ConcatMapSym0 :: TyFun (a ~> [b]) (t1 a ~> [b]) -> Type) t2) t3)
type family And (a :: t Bool) :: Bool
sAnd :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (AndSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Or (a :: t Bool) :: Bool
sOr :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (OrSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Any (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAny :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AnySym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family All (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAll :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AllSym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family MaximumBy (a1 :: a ~> a ~> Ordering) (a2 :: t a) :: a
sMaximumBy :: forall a (t1 :: Type -> Type) (t2 :: a ~> (a ~> Ordering)) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MaximumBySym0 :: TyFun (a ~> (a ~> Ordering)) (t1 a ~> a) -> Type) t2) t3)
type family MinimumBy (a1 :: a ~> a ~> Ordering) (a2 :: t a) :: a
sMinimumBy :: forall a (t1 :: Type -> Type) (t2 :: a ~> (a ~> Ordering)) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MinimumBySym0 :: TyFun (a ~> (a ~> Ordering)) (t1 a ~> a) -> Type) t2) t3)
type family NotElem (a1 :: a) (a2 :: t a) :: Bool
sNotElem :: forall a (t1 :: Type -> Type) (t2 :: a) (t3 :: t1 a). (SFoldable t1, SEq a) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (NotElemSym0 :: TyFun a (t1 a ~> Bool) -> Type) t2) t3)
type family Find (a1 :: a ~> Bool) (a2 :: t a) :: Maybe a
sFind :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (FindSym0 :: TyFun (a ~> Bool) (t1 a ~> Maybe a) -> Type) t2) t3)
data FoldSym0 (a :: TyFun t m m)
type family FoldSym1 (a6989586621680404272 :: t m) :: m
data FoldMapSym0 (a1 :: TyFun a ~> m t a ~> m)
data FoldMapSym1 (a6989586621680404276 :: a ~> m) (b :: TyFun t a m)
type family FoldMapSym2 (a6989586621680404276 :: a ~> m) (a6989586621680404277 :: t a) :: m
data FoldrSym0 (a1 :: TyFun a ~> b ~> b b ~> t a ~> b)
data FoldrSym1 (a6989586621680404282 :: a ~> b ~> b) (b1 :: TyFun b t a ~> b)
data FoldrSym2 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (c :: TyFun t a b)
type family FoldrSym3 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (a6989586621680404284 :: t a) :: b
data Foldr'Sym0 (a1 :: TyFun a ~> b ~> b b ~> t a ~> b)
data Foldr'Sym1 (a6989586621680404289 :: a ~> b ~> b) (b1 :: TyFun b t a ~> b)
data Foldr'Sym2 (a6989586621680404289 :: a ~> b ~> b) (a6989586621680404290 :: b) (c :: TyFun t a b)
type family Foldr'Sym3 (a6989586621680404289 :: a ~> b ~> b) (a6989586621680404290 :: b) (a6989586621680404291 :: t a) :: b
data FoldlSym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data FoldlSym1 (a6989586621680404296 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data FoldlSym2 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (c :: TyFun t a b)
type family FoldlSym3 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (a6989586621680404298 :: t a) :: b
data Foldl'Sym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data Foldl'Sym1 (a6989586621680404303 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data Foldl'Sym2 (a6989586621680404303 :: b ~> a ~> b) (a6989586621680404304 :: b) (c :: TyFun t a b)
type family Foldl'Sym3 (a6989586621680404303 :: b ~> a ~> b) (a6989586621680404304 :: b) (a6989586621680404305 :: t a) :: b
data Foldr1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldr1Sym1 (a6989586621680404309 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldr1Sym2 (a6989586621680404309 :: a ~> a ~> a) (a6989586621680404310 :: t a) :: a
data Foldl1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldl1Sym1 (a6989586621680404314 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldl1Sym2 (a6989586621680404314 :: a ~> a ~> a) (a6989586621680404315 :: t a) :: a
data ToListSym0 (a1 :: TyFun t a [a])
type family ToListSym1 (a6989586621680404318 :: t a) :: [a]
data NullSym0 (a1 :: TyFun t a Bool)
type family NullSym1 (a6989586621680404321 :: t a) :: Bool
data LengthSym0 (a1 :: TyFun t a Natural)
type family LengthSym1 (a6989586621680404324 :: t a) :: Natural
data ElemSym0 (a1 :: TyFun a t a ~> Bool)
data ElemSym1 (a6989586621680404328 :: a) (b :: TyFun t a Bool)
type family ElemSym2 (a6989586621680404328 :: a) (a6989586621680404329 :: t a) :: Bool
data MaximumSym0 (a1 :: TyFun t a a)
type family MaximumSym1 (a6989586621680404332 :: t a) :: a
data MinimumSym0 (a1 :: TyFun t a a)
type family MinimumSym1 (a6989586621680404335 :: t a) :: a
data SumSym0 (a1 :: TyFun t a a)
type family SumSym1 (a6989586621680404338 :: t a) :: a
data ProductSym0 (a1 :: TyFun t a a)
type family ProductSym1 (a6989586621680404341 :: t a) :: a
data FoldrMSym0 (a1 :: TyFun a ~> b ~> m b b ~> t a ~> m b)
data FoldrMSym1 (a6989586621680404256 :: a ~> b ~> m b) (b1 :: TyFun b t a ~> m b)
data FoldrMSym2 (a6989586621680404256 :: a ~> b ~> m b) (a6989586621680404257 :: b) (c :: TyFun t a m b)
type family FoldrMSym3 (a6989586621680404256 :: a ~> b ~> m b) (a6989586621680404257 :: b) (a6989586621680404258 :: t a) :: m b
data FoldlMSym0 (a1 :: TyFun b ~> a ~> m b b ~> t a ~> m b)
data FoldlMSym1 (a6989586621680404238 :: b ~> a ~> m b) (b1 :: TyFun b t a ~> m b)
data FoldlMSym2 (a6989586621680404238 :: b ~> a ~> m b) (a6989586621680404239 :: b) (c :: TyFun t a m b)
type family FoldlMSym3 (a6989586621680404238 :: b ~> a ~> m b) (a6989586621680404239 :: b) (a6989586621680404240 :: t a) :: m b
data Traverse_Sym0 (a1 :: TyFun a ~> f b t a ~> f ())
data Traverse_Sym1 (a6989586621680404230 :: a ~> f b) (b1 :: TyFun t a f ())
type family Traverse_Sym2 (a6989586621680404230 :: a ~> f b) (a6989586621680404231 :: t a) :: f ()
data For_Sym0 (a1 :: TyFun t a a ~> f b ~> f ())
data For_Sym1 (a6989586621680404221 :: t a) (b1 :: TyFun a ~> f b f ())
type family For_Sym2 (a6989586621680404221 :: t a) (a6989586621680404222 :: a ~> f b) :: f ()
data SequenceA_Sym0 (a1 :: TyFun t f a f ())
type family SequenceA_Sym1 (a6989586621680404192 :: t f a) :: f ()
data AsumSym0 (a1 :: TyFun t f a f a)
type family AsumSym1 (a6989586621680404180 :: t f a) :: f a
data MapM_Sym0 (a1 :: TyFun a ~> m b t a ~> m ())
data MapM_Sym1 (a6989586621680404210 :: a ~> m b) (b1 :: TyFun t a m ())
type family MapM_Sym2 (a6989586621680404210 :: a ~> m b) (a6989586621680404211 :: t a) :: m ()
data ForM_Sym0 (a1 :: TyFun t a a ~> m b ~> m ())
data ForM_Sym1 (a6989586621680404201 :: t a) (b1 :: TyFun a ~> m b m ())
type family ForM_Sym2 (a6989586621680404201 :: t a) (a6989586621680404202 :: a ~> m b) :: m ()
data Sequence_Sym0 (a1 :: TyFun t m a m ())
type family Sequence_Sym1 (a6989586621680404186 :: t m a) :: m ()
data MsumSym0 (a1 :: TyFun t m a m a)
type family MsumSym1 (a6989586621680404174 :: t m a) :: m a
data ConcatSym0 (a1 :: TyFun t [a] [a])
type family ConcatSym1 (a6989586621680404163 :: t [a]) :: [a]
data ConcatMapSym0 (a1 :: TyFun a ~> [b] t a ~> [b])
data ConcatMapSym1 (a6989586621680404152 :: a ~> [b]) (b1 :: TyFun t a [b])
type family ConcatMapSym2 (a6989586621680404152 :: a ~> [b]) (a6989586621680404153 :: t a) :: [b]
data AndSym0 (a :: TyFun t Bool Bool)
type family AndSym1 (a6989586621680404147 :: t Bool) :: Bool
data OrSym0 (a :: TyFun t Bool Bool)
type family OrSym1 (a6989586621680404141 :: t Bool) :: Bool
data AnySym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AnySym1 (a6989586621680404133 :: a ~> Bool) (b :: TyFun t a Bool)
type family AnySym2 (a6989586621680404133 :: a ~> Bool) (a6989586621680404134 :: t a) :: Bool
data AllSym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AllSym1 (a6989586621680404124 :: a ~> Bool) (b :: TyFun t a Bool)
type family AllSym2 (a6989586621680404124 :: a ~> Bool) (a6989586621680404125 :: t a) :: Bool
data MaximumBySym0 (a1 :: TyFun a ~> a ~> Ordering t a ~> a)
data MaximumBySym1 (a6989586621680404104 :: a ~> a ~> Ordering) (b :: TyFun t a a)
type family MaximumBySym2 (a6989586621680404104 :: a ~> a ~> Ordering) (a6989586621680404105 :: t a) :: a
data MinimumBySym0 (a1 :: TyFun a ~> a ~> Ordering t a ~> a)
data MinimumBySym1 (a6989586621680404084 :: a ~> a ~> Ordering) (b :: TyFun t a a)
type family MinimumBySym2 (a6989586621680404084 :: a ~> a ~> Ordering) (a6989586621680404085 :: t a) :: a
data NotElemSym0 (a1 :: TyFun a t a ~> Bool)
data NotElemSym1 (a6989586621680404075 :: a) (b :: TyFun t a Bool)
type family NotElemSym2 (a6989586621680404075 :: a) (a6989586621680404076 :: t a) :: Bool
data FindSym0 (a1 :: TyFun a ~> Bool t a ~> Maybe a)
data FindSym1 (a6989586621680404057 :: a ~> Bool) (b :: TyFun t a Maybe a)
type family FindSym2 (a6989586621680404057 :: a ~> Bool) (a6989586621680404058 :: t a) :: Maybe a
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Semigroup.Internal.Dual
instance Data.Foldable.Singletons.PFoldable (GHC.Internal.Data.Either.Either a)
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Monoid.First
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Monoid.Last
instance Data.Foldable.Singletons.PFoldable []
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Maybe.Maybe
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Base.NonEmpty
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Semigroup.Internal.Product
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Proxy.Proxy
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Semigroup.Internal.Sum
instance Data.Foldable.Singletons.PFoldable ((,) a)
instance Data.Monoid.Singletons.PMonoid (Data.Foldable.Singletons.Endo a)
instance Data.Monoid.Singletons.PMonoid (Data.Foldable.Singletons.MaxInternal a)
instance Data.Monoid.Singletons.PMonoid (Data.Foldable.Singletons.MinInternal a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Foldable.Singletons.Endo a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Foldable.Singletons.MaxInternal a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Foldable.Singletons.MinInternal a)
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Semigroup.Internal.Dual
instance Data.Foldable.Singletons.SFoldable (GHC.Internal.Data.Either.Either a)
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Monoid.First
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Monoid.Last
instance Data.Foldable.Singletons.SFoldable []
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Maybe.Maybe
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Base.NonEmpty
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Semigroup.Internal.Product
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Proxy.Proxy
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Semigroup.Internal.Sum
instance Data.Foldable.Singletons.SFoldable ((,) a)
instance Data.Monoid.Singletons.SMonoid (Data.Foldable.Singletons.Endo a)
instance Data.Ord.Singletons.SOrd a => Data.Monoid.Singletons.SMonoid (Data.Foldable.Singletons.MaxInternal a)
instance Data.Ord.Singletons.SOrd a => Data.Monoid.Singletons.SMonoid (Data.Foldable.Singletons.MinInternal a)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Foldable.Singletons.Endo a)
instance Data.Ord.Singletons.SOrd a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Foldable.Singletons.MaxInternal a)
instance Data.Ord.Singletons.SOrd a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Foldable.Singletons.MinInternal a)
instance Data.Singletons.SingI1 Data.Foldable.Singletons.AppEndoSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.AllSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.AnySym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.ConcatMapSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.FindSym1
instance (Data.Foldable.Singletons.SFoldable t, Data.Monoid.Singletons.SMonoid m) => Data.Singletons.SingI1 Data.Foldable.Singletons.FoldMapSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.Foldl'Sym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.Foldl1Sym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Foldable.Singletons.FoldlMSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.FoldlSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.Foldr'Sym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.Foldr1Sym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Foldable.Singletons.FoldrMSym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.FoldrSym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Foldable.Singletons.MapM_Sym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.MaximumBySym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI1 Data.Foldable.Singletons.MinimumBySym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI1 Data.Foldable.Singletons.Traverse_Sym1
instance Data.Singletons.SingI1 'Data.Foldable.Singletons.MaxInternal
instance Data.Singletons.SingI1 'Data.Foldable.Singletons.MinInternal
instance (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a) => Data.Singletons.SingI1 Data.Foldable.Singletons.ElemSym1
instance (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a) => Data.Singletons.SingI1 Data.Foldable.Singletons.NotElemSym1
instance forall (t :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.Foldl'Sym2 d)
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.FoldlMSym2 d)
instance forall (t :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.FoldlSym2 d)
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.Foldr'Sym2 d)
instance forall (t :: * -> *) (m :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.FoldrMSym2 d)
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Foldable.Singletons.FoldrSym2 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Foldable.Singletons.ForM_Sym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI1 Data.Foldable.Singletons.For_Sym1
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI2 Data.Foldable.Singletons.Foldl'Sym2
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI2 Data.Foldable.Singletons.FoldlMSym2
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI2 Data.Foldable.Singletons.FoldlSym2
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI2 Data.Foldable.Singletons.Foldr'Sym2
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI2 Data.Foldable.Singletons.FoldrMSym2
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI2 Data.Foldable.Singletons.FoldrSym2
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.AllSym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> GHC.Types.Bool). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.AllSym1 d)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.AndSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.AnySym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> GHC.Types.Bool). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.AnySym1 d)
instance Data.Singletons.SingI Data.Foldable.Singletons.AppEndoSym0
instance forall a (d :: Data.Foldable.Singletons.Endo a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Foldable.Singletons.AppEndoSym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SAlternative f) => Data.Singletons.SingI Data.Foldable.Singletons.AsumSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.ConcatMapSym0
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> [b]). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.ConcatMapSym1 d)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.ConcatSym0
instance (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a) => Data.Singletons.SingI Data.Foldable.Singletons.ElemSym0
instance forall (t :: * -> *) a (d :: a). (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.ElemSym1 d)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.FindSym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> GHC.Types.Bool). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FindSym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Data.Monoid.Singletons.SMonoid m) => Data.Singletons.SingI Data.Foldable.Singletons.FoldMapSym0
instance forall (t :: * -> *) m a (d :: a Data.Singletons.~> m). (Data.Foldable.Singletons.SFoldable t, Data.Monoid.Singletons.SMonoid m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldMapSym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Data.Monoid.Singletons.SMonoid m) => Data.Singletons.SingI Data.Foldable.Singletons.FoldSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.Foldl'Sym0
instance forall (t :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldl'Sym1 d)
instance forall (t :: * -> *) b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldl'Sym2 d1 d2)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.Foldl1Sym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> (a Data.Singletons.~> a)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldl1Sym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Foldable.Singletons.FoldlMSym0
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldlMSym1 d)
instance forall (t :: * -> *) (m :: * -> *) b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldlMSym2 d1 d2)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.FoldlSym0
instance forall (t :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldlSym1 d)
instance forall (t :: * -> *) b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldlSym2 d1 d2)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.Foldr'Sym0
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldr'Sym1 d)
instance forall (t :: * -> *) a b (d1 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldr'Sym2 d1 d2)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.Foldr1Sym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> (a Data.Singletons.~> a)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.Foldr1Sym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Foldable.Singletons.FoldrMSym0
instance forall (t :: * -> *) (m :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldrMSym1 d)
instance forall (t :: * -> *) (m :: * -> *) a b (d1 :: a Data.Singletons.~> (b Data.Singletons.~> m b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldrMSym2 d1 d2)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.FoldrSym0
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldrSym1 d)
instance forall (t :: * -> *) a b (d1 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Foldable.Singletons.FoldrSym2 d1 d2)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Foldable.Singletons.ForM_Sym0
instance forall (t :: * -> *) (m :: * -> *) a (d :: t a) b. (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.ForM_Sym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Foldable.Singletons.For_Sym0
instance forall (t :: * -> *) (f :: * -> *) a (d :: t a) b. (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.For_Sym1 d)
instance Data.Singletons.SingI Data.Foldable.Singletons.GetMaxInternalSym0
instance Data.Singletons.SingI Data.Foldable.Singletons.GetMinInternalSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.LengthSym0
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Foldable.Singletons.MapM_Sym0
instance forall (t :: * -> *) (m :: * -> *) a b (d :: a Data.Singletons.~> m b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.MapM_Sym1 d)
instance Data.Singletons.SingI Data.Foldable.Singletons.MaxInternalSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.MaximumBySym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.MaximumBySym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Data.Ord.Singletons.SOrd a) => Data.Singletons.SingI Data.Foldable.Singletons.MaximumSym0
instance Data.Singletons.SingI Data.Foldable.Singletons.MinInternalSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.MinimumBySym0
instance forall (t :: * -> *) a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). (Data.Foldable.Singletons.SFoldable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.MinimumBySym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Data.Ord.Singletons.SOrd a) => Data.Singletons.SingI Data.Foldable.Singletons.MinimumSym0
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonadPlus m) => Data.Singletons.SingI Data.Foldable.Singletons.MsumSym0
instance (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a) => Data.Singletons.SingI Data.Foldable.Singletons.NotElemSym0
instance forall (t :: * -> *) a (d :: a). (Data.Foldable.Singletons.SFoldable t, Data.Eq.Singletons.SEq a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.NotElemSym1 d)
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.NullSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.OrSym0
instance (Data.Foldable.Singletons.SFoldable t, GHC.Num.Singletons.SNum a) => Data.Singletons.SingI Data.Foldable.Singletons.ProductSym0
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Foldable.Singletons.SequenceA_Sym0
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Foldable.Singletons.Sequence_Sym0
instance (Data.Foldable.Singletons.SFoldable t, GHC.Num.Singletons.SNum a) => Data.Singletons.SingI Data.Foldable.Singletons.SumSym0
instance Data.Foldable.Singletons.SFoldable t => Data.Singletons.SingI Data.Foldable.Singletons.ToListSym0
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Foldable.Singletons.Traverse_Sym0
instance forall (t :: * -> *) (f :: * -> *) a b (d :: a Data.Singletons.~> f b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SApplicative f, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Foldable.Singletons.Traverse_Sym1 d)
instance forall a (n :: GHC.Internal.Maybe.Maybe a). Data.Singletons.SingI n => Data.Singletons.SingI ('Data.Foldable.Singletons.MaxInternal n)
instance forall a (n :: GHC.Internal.Maybe.Maybe a). Data.Singletons.SingI n => Data.Singletons.SingI ('Data.Foldable.Singletons.MinInternal n)
instance Data.Singletons.SingKind a => Data.Singletons.SingKind (Data.Foldable.Singletons.MaxInternal a)
instance Data.Singletons.SingKind a => Data.Singletons.SingKind (Data.Foldable.Singletons.MinInternal a)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.AllSym0
instance forall a (t :: * -> *) (a6989586621680404124 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.AllSym1 a6989586621680404124)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.AndSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.AnySym0
instance forall a (t :: * -> *) (a6989586621680404133 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.AnySym1 a6989586621680404133)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.AppEndoSym0
instance forall a (a6989586621680390262 :: Data.Foldable.Singletons.Endo a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.AppEndoSym1 a6989586621680390262)
instance forall (t :: * -> *) k (f :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.AsumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ConcatMapSym0
instance forall a b (t :: * -> *) (a6989586621680404152 :: a Data.Singletons.~> [b]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.ConcatMapSym1 a6989586621680404152)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ConcatSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ElemSym0
instance forall a (t :: * -> *) (a6989586621680404328 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.ElemSym1 a6989586621680404328)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680404528Sym0
instance forall a (t :: * -> *) (a6989586621680404537 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680404528Sym1 a6989586621680404537)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680404638Sym0
instance forall a (a6989586621680404647 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680404638Sym1 a6989586621680404647)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680405014Sym0
instance forall a (a6989586621680405019 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680405014Sym1 a6989586621680405019)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680405046Sym0
instance forall a (a6989586621680405055 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680405046Sym1 a6989586621680405055)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680405221Sym0
instance forall a (a6989586621680405230 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680405221Sym1 a6989586621680405230)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Elem_6989586621680405396Sym0
instance forall a (a6989586621680405405 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Elem_6989586621680405396Sym1 a6989586621680405405)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FindSym0
instance forall a (t :: * -> *) (a6989586621680404057 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FindSym1 a6989586621680404057)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMapSym0
instance forall a m (t :: * -> *) (a6989586621680404276 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMapSym1 a6989586621680404276)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680404353Sym0
instance forall a m (t :: * -> *) (a6989586621680404360 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680404353Sym1 a6989586621680404360)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680404591Sym0
instance forall a m (a6989586621680404600 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680404591Sym1 a6989586621680404600)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680404873Sym0
instance forall a m (a6989586621680404878 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680404873Sym1 a6989586621680404878)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680404901Sym0
instance forall a1 m a2 (a6989586621680404906 :: a1 Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680404901Sym1 a6989586621680404906)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680404943Sym0
instance forall a m (a6989586621680404948 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680404943Sym1 a6989586621680404948)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680405035Sym0
instance forall a m (a6989586621680405040 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680405035Sym1 a6989586621680405040)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680405210Sym0
instance forall a m (a6989586621680405215 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680405210Sym1 a6989586621680405215)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680405385Sym0
instance forall a m (a6989586621680405390 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680405385Sym1 a6989586621680405390)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680499112Sym0
instance forall a1 m a2 (a6989586621680499117 :: a1 Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680499112Sym1 a6989586621680499117)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680499149Sym0
instance forall a m (a6989586621680499154 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680499149Sym1 a6989586621680499154)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldMap_6989586621680499180Sym0
instance forall a m (a6989586621680499185 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldMap_6989586621680499180Sym1 a6989586621680499185)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Fold_6989586621680404343Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Fold_6989586621680404884Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Fold_6989586621680404951Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'Sym0
instance forall b a (t :: * -> *) (a6989586621680404303 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'Sym1 a6989586621680404303)
instance forall b a (t :: * -> *) (a6989586621680404303 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404304 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'Sym2 a6989586621680404303 a6989586621680404304)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'_6989586621680404420Sym0
instance forall b a (t :: * -> *) (a6989586621680404426 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680404420Sym1 a6989586621680404426)
instance forall b a (t :: * -> *) (a6989586621680404426 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404427 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680404420Sym2 a6989586621680404426 a6989586621680404427)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'_6989586621680404675Sym0
instance forall b a (a6989586621680404687 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680404675Sym1 a6989586621680404687)
instance forall b a (a6989586621680404687 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404688 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680404675Sym2 a6989586621680404687 a6989586621680404688)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'_6989586621680405081Sym0
instance forall b a (a6989586621680405087 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405081Sym1 a6989586621680405087)
instance forall b a (a6989586621680405087 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405088 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405081Sym2 a6989586621680405087 a6989586621680405088)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'_6989586621680405256Sym0
instance forall b a (a6989586621680405262 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405256Sym1 a6989586621680405262)
instance forall b a (a6989586621680405262 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405263 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405256Sym2 a6989586621680405262 a6989586621680405263)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl'_6989586621680405431Sym0
instance forall b a (a6989586621680405437 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405431Sym1 a6989586621680405437)
instance forall b a (a6989586621680405437 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405438 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl'_6989586621680405431Sym2 a6989586621680405437 a6989586621680405438)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1Sym0
instance forall a (t :: * -> *) (a6989586621680404314 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1Sym1 a6989586621680404314)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680404463Sym0
instance forall a (t :: * -> *) (a6989586621680404468 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680404463Sym1 a6989586621680404468)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680404695Sym0
instance forall a (a6989586621680404704 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680404695Sym1 a6989586621680404704)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680404841Sym0
instance forall a (a6989586621680404846 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680404841Sym1 a6989586621680404846)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680404984Sym0
instance forall a (a6989586621680404989 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680404984Sym1 a6989586621680404989)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680405095Sym0
instance forall a (a6989586621680405102 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680405095Sym1 a6989586621680405102)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680405270Sym0
instance forall a (a6989586621680405277 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680405270Sym1 a6989586621680405277)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl1_6989586621680405445Sym0
instance forall a (a6989586621680405452 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl1_6989586621680405445Sym1 a6989586621680405452)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldlMSym0
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621680404238 :: b Data.Singletons.~> (a Data.Singletons.~> m b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldlMSym1 a6989586621680404238)
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621680404238 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (a6989586621680404239 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldlMSym2 a6989586621680404238 a6989586621680404239)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldlSym0
instance forall b a (t :: * -> *) (a6989586621680404296 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldlSym1 a6989586621680404296)
instance forall b a (t :: * -> *) (a6989586621680404296 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404297 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldlSym2 a6989586621680404296 a6989586621680404297)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680404405Sym0
instance forall b a (t :: * -> *) (a6989586621680404411 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404405Sym1 a6989586621680404411)
instance forall b a (t :: * -> *) (a6989586621680404411 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404412 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404405Sym2 a6989586621680404411 a6989586621680404412)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680404623Sym0
instance forall b a (a6989586621680404629 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404623Sym1 a6989586621680404629)
instance forall b a (a6989586621680404629 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404630 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404623Sym2 a6989586621680404629 a6989586621680404630)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680404654Sym0
instance forall b a (a6989586621680404666 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404654Sym1 a6989586621680404666)
instance forall b a (a6989586621680404666 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404667 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404654Sym2 a6989586621680404666 a6989586621680404667)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680404826Sym0
instance forall b a (a6989586621680404832 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404826Sym1 a6989586621680404832)
instance forall b a (a6989586621680404832 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404833 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404826Sym2 a6989586621680404832 a6989586621680404833)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680404972Sym0
instance forall b a (a6989586621680404978 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404972Sym1 a6989586621680404978)
instance forall b a (a6989586621680404978 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680404979 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680404972Sym2 a6989586621680404978 a6989586621680404979)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680405066Sym0
instance forall b a (a6989586621680405072 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405066Sym1 a6989586621680405072)
instance forall b a (a6989586621680405072 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405073 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405066Sym2 a6989586621680405072 a6989586621680405073)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680405241Sym0
instance forall b a (a6989586621680405247 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405241Sym1 a6989586621680405247)
instance forall b a (a6989586621680405247 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405248 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405241Sym2 a6989586621680405247 a6989586621680405248)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldl_6989586621680405416Sym0
instance forall b a (a6989586621680405422 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405416Sym1 a6989586621680405422)
instance forall b a (a6989586621680405422 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680405423 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldl_6989586621680405416Sym2 a6989586621680405422 a6989586621680405423)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr'Sym0
instance forall a b (t :: * -> *) (a6989586621680404289 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'Sym1 a6989586621680404289)
instance forall a b (t :: * -> *) (a6989586621680404289 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404290 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'Sym2 a6989586621680404289 a6989586621680404290)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr'_6989586621680404382Sym0
instance forall a b (t :: * -> *) (a6989586621680404388 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680404382Sym1 a6989586621680404388)
instance forall a b (t :: * -> *) (a6989586621680404388 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404389 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680404382Sym2 a6989586621680404388 a6989586621680404389)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr'_6989586621680405123Sym0
instance forall a b (a6989586621680405135 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405123Sym1 a6989586621680405135)
instance forall a b (a6989586621680405135 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405136 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405123Sym2 a6989586621680405135 a6989586621680405136)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr'_6989586621680405298Sym0
instance forall a b (a6989586621680405310 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405298Sym1 a6989586621680405310)
instance forall a b (a6989586621680405310 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405311 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405298Sym2 a6989586621680405310 a6989586621680405311)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr'_6989586621680405473Sym0
instance forall a b (a6989586621680405485 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405473Sym1 a6989586621680405485)
instance forall a b (a6989586621680405485 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405486 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr'_6989586621680405473Sym2 a6989586621680405485 a6989586621680405486)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1Sym0
instance forall a (t :: * -> *) (a6989586621680404309 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1Sym1 a6989586621680404309)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680404442Sym0
instance forall a (t :: * -> *) (a6989586621680404447 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680404442Sym1 a6989586621680404447)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680404731Sym0
instance forall a (a6989586621680404740 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680404731Sym1 a6989586621680404740)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680404853Sym0
instance forall a (a6989586621680404858 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680404853Sym1 a6989586621680404858)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680404993Sym0
instance forall a (a6989586621680404998 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680404993Sym1 a6989586621680404998)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680405143Sym0
instance forall a (a6989586621680405150 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680405143Sym1 a6989586621680405150)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680405318Sym0
instance forall a (a6989586621680405325 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680405318Sym1 a6989586621680405325)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr1_6989586621680405493Sym0
instance forall a (a6989586621680405500 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr1_6989586621680405493Sym1 a6989586621680405500)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldrMSym0
instance forall a b (m :: * -> *) (t :: * -> *) (a6989586621680404256 :: a Data.Singletons.~> (b Data.Singletons.~> m b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldrMSym1 a6989586621680404256)
instance forall a b (m :: * -> *) (t :: * -> *) (a6989586621680404256 :: a Data.Singletons.~> (b Data.Singletons.~> m b)) (a6989586621680404257 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldrMSym2 a6989586621680404256 a6989586621680404257)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.FoldrSym0
instance forall a b (t :: * -> *) (a6989586621680404282 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldrSym1 a6989586621680404282)
instance forall a b (t :: * -> *) (a6989586621680404282 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404283 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.FoldrSym2 a6989586621680404282 a6989586621680404283)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404367Sym0
instance forall a b (t :: * -> *) (a6989586621680404373 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404367Sym1 a6989586621680404373)
instance forall a b (t :: * -> *) (a6989586621680404373 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404374 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404367Sym2 a6989586621680404373 a6989586621680404374)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404607Sym0
instance forall a b (a6989586621680404613 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404607Sym1 a6989586621680404613)
instance forall a b (a6989586621680404613 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404614 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404607Sym2 a6989586621680404613 a6989586621680404614)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404711Sym0
instance forall a b (a6989586621680404723 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404711Sym1 a6989586621680404723)
instance forall a b (a6989586621680404723 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404724 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404711Sym2 a6989586621680404723 a6989586621680404724)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404810Sym0
instance forall a b (a6989586621680404816 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404810Sym1 a6989586621680404816)
instance forall a b (a6989586621680404816 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404817 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404810Sym2 a6989586621680404816 a6989586621680404817)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404913Sym0
instance forall a1 b a2 (a6989586621680404919 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404913Sym1 a6989586621680404919)
instance forall a1 b a2 (a6989586621680404919 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404920 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404913Sym2 a6989586621680404919 a6989586621680404920)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680404959Sym0
instance forall a b (a6989586621680404965 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404959Sym1 a6989586621680404965)
instance forall a b (a6989586621680404965 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680404966 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680404959Sym2 a6989586621680404965 a6989586621680404966)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680405108Sym0
instance forall a b (a6989586621680405114 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405108Sym1 a6989586621680405114)
instance forall a b (a6989586621680405114 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405115 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405108Sym2 a6989586621680405114 a6989586621680405115)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680405283Sym0
instance forall a b (a6989586621680405289 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405283Sym1 a6989586621680405289)
instance forall a b (a6989586621680405289 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405290 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405283Sym2 a6989586621680405289 a6989586621680405290)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680405458Sym0
instance forall a b (a6989586621680405464 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405458Sym1 a6989586621680405464)
instance forall a b (a6989586621680405464 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680405465 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680405458Sym2 a6989586621680405464 a6989586621680405465)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680499129Sym0
instance forall a1 b a2 (a6989586621680499135 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499129Sym1 a6989586621680499135)
instance forall a1 b a2 (a6989586621680499135 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680499136 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499129Sym2 a6989586621680499135 a6989586621680499136)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680499161Sym0
instance forall a b (a6989586621680499167 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499161Sym1 a6989586621680499167)
instance forall a b (a6989586621680499167 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680499168 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499161Sym2 a6989586621680499167 a6989586621680499168)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Foldr_6989586621680499192Sym0
instance forall a b (a6989586621680499198 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499192Sym1 a6989586621680499198)
instance forall a b (a6989586621680499198 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680499199 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Foldr_6989586621680499192Sym2 a6989586621680499198 a6989586621680499199)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ForM_Sym0
instance forall (t :: * -> *) a (m :: * -> *) b (a6989586621680404201 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.ForM_Sym1 a6989586621680404201)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.For_Sym0
instance forall (t :: * -> *) a (f :: * -> *) b (a6989586621680404221 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.For_Sym1 a6989586621680404221)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.GetMaxInternalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.GetMinInternalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680404061Sym0
instance forall a k (p6989586621680404059 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404061Sym1 p6989586621680404059)
instance forall a k (p6989586621680404059 :: a Data.Singletons.~> GHC.Types.Bool) (a_69895866216804040526989586621680404060 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404061Sym2 p6989586621680404059 a_69895866216804040526989586621680404060)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680404156Sym0
instance forall k1 (t :: * -> *) a k (f6989586621680404154 :: k1 Data.Singletons.~> t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404156Sym1 f6989586621680404154)
instance forall k1 (t :: * -> *) a k (f6989586621680404154 :: k1 Data.Singletons.~> t a) (xs6989586621680404155 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404156Sym2 f6989586621680404154 xs6989586621680404155)
instance forall k1 (t :: * -> *) a k (f6989586621680404154 :: k1 Data.Singletons.~> t a) (xs6989586621680404155 :: k) (x6989586621680404158 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404156Sym3 f6989586621680404154 xs6989586621680404155 x6989586621680404158)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680404165Sym0
instance forall k (t :: * -> *) a (xs6989586621680404164 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404165Sym1 xs6989586621680404164)
instance forall k (t :: * -> *) a (xs6989586621680404164 :: k) (x6989586621680404167 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404165Sym2 xs6989586621680404164 x6989586621680404167)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680404500Sym0
instance forall k1 k2 k3 (a_69895866216804044946989586621680404499 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404500Sym1 a_69895866216804044946989586621680404499)
instance forall k1 k2 k3 (a_69895866216804044946989586621680404499 :: k1) (arg_69895866216804039006989586621680404502 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404500Sym2 a_69895866216804044946989586621680404499 arg_69895866216804039006989586621680404502)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680404517Sym0
instance forall k1 k2 k3 (a_69895866216804045116989586621680404516 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404517Sym1 a_69895866216804045116989586621680404516)
instance forall k1 k2 k3 (a_69895866216804045116989586621680404516 :: k1) (arg_69895866216804039046989586621680404519 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680404517Sym2 a_69895866216804045116989586621680404516 arg_69895866216804039046989586621680404519)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680405059Sym0
instance forall k1 k2 b c (a_69895866216804050486989586621680405057 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405059Sym1 a_69895866216804050486989586621680405057)
instance forall k1 k2 b c (a_69895866216804050486989586621680405057 :: k1) (a_69895866216804050506989586621680405058 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405059Sym2 a_69895866216804050486989586621680405057 a_69895866216804050506989586621680405058)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680405234Sym0
instance forall k1 k2 b c (a_69895866216804052236989586621680405232 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405234Sym1 a_69895866216804052236989586621680405232)
instance forall k1 k2 b c (a_69895866216804052236989586621680405232 :: k1) (a_69895866216804052256989586621680405233 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405234Sym2 a_69895866216804052236989586621680405232 a_69895866216804052256989586621680405233)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680405409Sym0
instance forall k1 k2 b c (a_69895866216804053986989586621680405407 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405409Sym1 a_69895866216804053986989586621680405407)
instance forall k1 k2 b c (a_69895866216804053986989586621680405407 :: k1) (a_69895866216804054006989586621680405408 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680405409Sym2 a_69895866216804053986989586621680405407 a_69895866216804054006989586621680405408)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680499122Sym0
instance forall k1 k2 k3 k4 k5 (_f_69895866216804990306989586621680499119 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499122Sym1 _f_69895866216804990306989586621680499119)
instance forall k1 k2 k3 k4 k5 (_f_69895866216804990306989586621680499119 :: k1) (a_69895866216804990366989586621680499120 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499122Sym2 _f_69895866216804990306989586621680499119 a_69895866216804990366989586621680499120)
instance forall k1 k2 k3 k4 k5 (_f_69895866216804990306989586621680499119 :: k1) (a_69895866216804990366989586621680499120 :: k2) (a_69895866216804990386989586621680499121 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499122Sym3 _f_69895866216804990306989586621680499119 a_69895866216804990366989586621680499120 a_69895866216804990386989586621680499121)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680499142Sym0
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216804990306989586621680499138 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499142Sym1 _f_69895866216804990306989586621680499138)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216804990306989586621680499138 :: k1) (_z_69895866216804990326989586621680499139 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499142Sym2 _f_69895866216804990306989586621680499138 _z_69895866216804990326989586621680499139)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216804990306989586621680499138 :: k1) (_z_69895866216804990326989586621680499139 :: k2) (a_69895866216804990446989586621680499140 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499142Sym3 _f_69895866216804990306989586621680499138 _z_69895866216804990326989586621680499139 a_69895866216804990446989586621680499140)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216804990306989586621680499138 :: k1) (_z_69895866216804990326989586621680499139 :: k2) (a_69895866216804990446989586621680499140 :: k3) (a_69895866216804990466989586621680499141 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499142Sym4 _f_69895866216804990306989586621680499138 _z_69895866216804990326989586621680499139 a_69895866216804990446989586621680499140 a_69895866216804990466989586621680499141)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216804990306989586621680499138 :: k1) (_z_69895866216804990326989586621680499139 :: k2) (a_69895866216804990446989586621680499140 :: k3) (a_69895866216804990466989586621680499141 :: k4) (n1_69895866216804990406989586621680499144 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499142Sym5 _f_69895866216804990306989586621680499138 _z_69895866216804990326989586621680499139 a_69895866216804990446989586621680499140 a_69895866216804990466989586621680499141 n1_69895866216804990406989586621680499144)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680499173Sym0
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990556989586621680499170 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499173Sym1 _f_69895866216804990556989586621680499170)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990556989586621680499170 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990576989586621680499171 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499173Sym2 _f_69895866216804990556989586621680499170 _z_69895866216804990576989586621680499171)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990556989586621680499170 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990576989586621680499171 :: k2) (a_69895866216804990776989586621680499172 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499173Sym3 _f_69895866216804990556989586621680499170 _z_69895866216804990576989586621680499171 a_69895866216804990776989586621680499172)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990556989586621680499170 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990576989586621680499171 :: k2) (a_69895866216804990776989586621680499172 :: k3) (n1_69895866216804990736989586621680499175 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499173Sym4 _f_69895866216804990556989586621680499170 _z_69895866216804990576989586621680499171 a_69895866216804990776989586621680499172 n1_69895866216804990736989586621680499175)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Lambda_6989586621680499204Sym0
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990866989586621680499201 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499204Sym1 _f_69895866216804990866989586621680499201)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990866989586621680499201 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990886989586621680499202 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499204Sym2 _f_69895866216804990866989586621680499201 _z_69895866216804990886989586621680499202)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990866989586621680499201 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990886989586621680499202 :: k2) (a_69895866216804991086989586621680499203 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499204Sym3 _f_69895866216804990866989586621680499201 _z_69895866216804990886989586621680499202 a_69895866216804991086989586621680499203)
instance forall a k1 k2 k3 (t :: * -> *) (_f_69895866216804990866989586621680499201 :: a Data.Singletons.~> (k1 Data.Singletons.~> k1)) (_z_69895866216804990886989586621680499202 :: k2) (a_69895866216804991086989586621680499203 :: k3) (n1_69895866216804991046989586621680499206 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Lambda_6989586621680499204Sym4 _f_69895866216804990866989586621680499201 _z_69895866216804990886989586621680499202 a_69895866216804991086989586621680499203 n1_69895866216804991046989586621680499206)
instance forall k (t :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.LengthSym0
instance forall k (t :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680404509Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680404745Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680404927Sym0
instance forall k (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680405001Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680405154Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680405329Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Length_6989586621680405504Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393752MSym0
instance forall k1 k (x6989586621680393750 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393752MSym1 x6989586621680393750)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393752NSym0
instance forall k k1 (x6989586621680393750 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393752NSym1 x6989586621680393750)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393755Scrutinee_6989586621680393723Sym0
instance forall k1 (x6989586621680393750 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393755Scrutinee_6989586621680393723Sym1 x6989586621680393750)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393776MSym0
instance forall k1 k (x6989586621680393774 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393776MSym1 x6989586621680393774)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393776NSym0
instance forall k k1 (x6989586621680393774 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393776NSym1 x6989586621680393774)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680393779Scrutinee_6989586621680393725Sym0
instance forall k1 (x6989586621680393774 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680393779Scrutinee_6989586621680393725Sym1 x6989586621680393774)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404064Scrutinee_6989586621680403918Sym0
instance forall k1 k2 k3 (x6989586621680404063 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404064Scrutinee_6989586621680403918Sym1 x6989586621680404063)
instance forall k1 k2 k3 (x6989586621680404063 :: k1) (p6989586621680404059 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404064Scrutinee_6989586621680403918Sym2 x6989586621680404063 p6989586621680404059)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404088Min'Sym0
instance forall k1 k2 (cmp6989586621680404086 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404088Min'Sym1 cmp6989586621680404086)
instance forall k1 k2 (cmp6989586621680404086 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)) (a_69895866216804040796989586621680404087 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404088Min'Sym2 cmp6989586621680404086 a_69895866216804040796989586621680404087)
instance forall k1 k2 (cmp6989586621680404086 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)) (a_69895866216804040796989586621680404087 :: k2) (a6989586621680404089 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404088Min'Sym3 cmp6989586621680404086 a_69895866216804040796989586621680404087 a6989586621680404089)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404094Scrutinee_6989586621680403916Sym0
instance forall k2 k3 k4 k5 (x6989586621680404092 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404094Scrutinee_6989586621680403916Sym1 x6989586621680404092)
instance forall k2 k3 k4 k5 (x6989586621680404092 :: k2) (y6989586621680404093 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404094Scrutinee_6989586621680403916Sym2 x6989586621680404092 y6989586621680404093)
instance forall k2 k3 k4 k5 (x6989586621680404092 :: k2) (y6989586621680404093 :: k3) (cmp6989586621680404086 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404094Scrutinee_6989586621680403916Sym3 x6989586621680404092 y6989586621680404093 cmp6989586621680404086)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404108Max'Sym0
instance forall k1 k2 (cmp6989586621680404106 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404108Max'Sym1 cmp6989586621680404106)
instance forall k1 k2 (cmp6989586621680404106 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)) (a_69895866216804040996989586621680404107 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404108Max'Sym2 cmp6989586621680404106 a_69895866216804040996989586621680404107)
instance forall k1 k2 (cmp6989586621680404106 :: k1 Data.Singletons.~> (k1 Data.Singletons.~> GHC.Types.Ordering)) (a_69895866216804040996989586621680404107 :: k2) (a6989586621680404109 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404108Max'Sym3 cmp6989586621680404106 a_69895866216804040996989586621680404107 a6989586621680404109)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404114Scrutinee_6989586621680403914Sym0
instance forall k2 k3 k4 k5 (x6989586621680404112 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404114Scrutinee_6989586621680403914Sym1 x6989586621680404112)
instance forall k2 k3 k4 k5 (x6989586621680404112 :: k2) (y6989586621680404113 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404114Scrutinee_6989586621680403914Sym2 x6989586621680404112 y6989586621680404113)
instance forall k2 k3 k4 k5 (x6989586621680404112 :: k2) (y6989586621680404113 :: k3) (cmp6989586621680404106 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404114Scrutinee_6989586621680403914Sym3 x6989586621680404112 y6989586621680404113 cmp6989586621680404106)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404244F'Sym0
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404241 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404244F'Sym1 f6989586621680404241)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404241 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404242 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404244F'Sym2 f6989586621680404241 z06989586621680404242)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404241 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404242 :: k4) (xs6989586621680404243 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404244F'Sym3 f6989586621680404241 z06989586621680404242 xs6989586621680404243)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404241 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404242 :: k4) (xs6989586621680404243 :: k5) (a6989586621680404245 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404244F'Sym4 f6989586621680404241 z06989586621680404242 xs6989586621680404243 a6989586621680404245)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404241 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404242 :: k4) (xs6989586621680404243 :: k5) (a6989586621680404245 :: k3) (a6989586621680404246 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404244F'Sym5 f6989586621680404241 z06989586621680404242 xs6989586621680404243 a6989586621680404245 a6989586621680404246)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404262F'Sym0
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404259 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404262F'Sym1 f6989586621680404259)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404259 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404260 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404262F'Sym2 f6989586621680404259 z06989586621680404260)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404259 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404260 :: k4) (xs6989586621680404261 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404262F'Sym3 f6989586621680404259 z06989586621680404260 xs6989586621680404261)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404259 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404260 :: k4) (xs6989586621680404261 :: k5) (a6989586621680404263 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404262F'Sym4 f6989586621680404259 z06989586621680404260 xs6989586621680404261 a6989586621680404263)
instance forall k2 k3 (m :: * -> *) a k4 k5 b (f6989586621680404259 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> m a)) (z06989586621680404260 :: k4) (xs6989586621680404261 :: k5) (a6989586621680404263 :: a Data.Singletons.~> m b) (a6989586621680404264 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404262F'Sym5 f6989586621680404259 z06989586621680404260 xs6989586621680404261 a6989586621680404263 a6989586621680404264)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404394F'Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404391 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404394F'Sym1 f6989586621680404391)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404391 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404392 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404394F'Sym2 f6989586621680404391 z06989586621680404392)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404391 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404392 :: k5) (xs6989586621680404393 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404394F'Sym3 f6989586621680404391 z06989586621680404392 xs6989586621680404393)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404391 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404392 :: k5) (xs6989586621680404393 :: k6) (a6989586621680404395 :: k4 Data.Singletons.~> k7). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404394F'Sym4 f6989586621680404391 z06989586621680404392 xs6989586621680404393 a6989586621680404395)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404391 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404392 :: k5) (xs6989586621680404393 :: k6) (a6989586621680404395 :: k4 Data.Singletons.~> k7) (a6989586621680404396 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404394F'Sym5 f6989586621680404391 z06989586621680404392 xs6989586621680404393 a6989586621680404395 a6989586621680404396)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404432F'Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404429 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404432F'Sym1 f6989586621680404429)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404429 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404430 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404432F'Sym2 f6989586621680404429 z06989586621680404430)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404429 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404430 :: k5) (xs6989586621680404431 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404432F'Sym3 f6989586621680404429 z06989586621680404430 xs6989586621680404431)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404429 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404430 :: k5) (xs6989586621680404431 :: k6) (a6989586621680404433 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404432F'Sym4 f6989586621680404429 z06989586621680404430 xs6989586621680404431 a6989586621680404433)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404429 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (z06989586621680404430 :: k5) (xs6989586621680404431 :: k6) (a6989586621680404433 :: k3) (a6989586621680404434 :: k4 Data.Singletons.~> k7). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404432F'Sym5 f6989586621680404429 z06989586621680404430 xs6989586621680404431 a6989586621680404433 a6989586621680404434)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404451MfSym0
instance forall k2 k3 k (f6989586621680404449 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404451MfSym1 f6989586621680404449)
instance forall k2 k3 k (f6989586621680404449 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k2)) (xs6989586621680404450 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404451MfSym2 f6989586621680404449 xs6989586621680404450)
instance forall k2 k3 k (f6989586621680404449 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k2)) (xs6989586621680404450 :: k) (a6989586621680404452 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404451MfSym3 f6989586621680404449 xs6989586621680404450 a6989586621680404452)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404472MfSym0
instance forall k2 k3 k (f6989586621680404470 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404472MfSym1 f6989586621680404470)
instance forall k2 k3 k (f6989586621680404470 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k3)) (xs6989586621680404471 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404472MfSym2 f6989586621680404470 xs6989586621680404471)
instance forall k2 k3 k (f6989586621680404470 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k3)) (xs6989586621680404471 :: k) (a6989586621680404473 :: GHC.Internal.Maybe.Maybe k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404472MfSym3 f6989586621680404470 xs6989586621680404471 a6989586621680404473)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404550MkJustSym0
instance forall k a6989586621680403736 (a_69895866216804045446989586621680404549 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404550MkJustSym1 a_69895866216804045446989586621680404549)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404565MkJustSym0
instance forall k a6989586621680403737 (a_69895866216804045596989586621680404564 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404565MkJustSym1 a_69895866216804045596989586621680404564)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Let6989586621680404863GoSym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404860 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404863GoSym1 f6989586621680404860)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404860 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (p6989586621680404861 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404863GoSym2 f6989586621680404860 p6989586621680404861)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404860 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (p6989586621680404861 :: k5) (ps6989586621680404862 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404863GoSym3 f6989586621680404860 p6989586621680404861 ps6989586621680404862)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404860 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (p6989586621680404861 :: k5) (ps6989586621680404862 :: k6) (a6989586621680404864 :: k7). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404863GoSym4 f6989586621680404860 p6989586621680404861 ps6989586621680404862 a6989586621680404864)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680404860 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (p6989586621680404861 :: k5) (ps6989586621680404862 :: k6) (a6989586621680404864 :: k7) (a6989586621680404865 :: k7 Data.Singletons.~> k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Let6989586621680404863GoSym5 f6989586621680404860 p6989586621680404861 ps6989586621680404862 a6989586621680404864 a6989586621680404865)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MapM_Sym0
instance forall a (m :: * -> *) b (t :: * -> *) (a6989586621680404210 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.MapM_Sym1 a6989586621680404210)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MaxInternalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MaximumBySym0
instance forall a (t :: * -> *) (a6989586621680404104 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.MaximumBySym1 a6989586621680404104)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MaximumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Maximum_6989586621680404542Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Maximum_6989586621680404754Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Maximum_6989586621680405160Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Maximum_6989586621680405335Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Maximum_6989586621680405510Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MinInternalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MinimumBySym0
instance forall a (t :: * -> *) (a6989586621680404084 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.MinimumBySym1 a6989586621680404084)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MinimumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Minimum_6989586621680404557Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Minimum_6989586621680404763Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Minimum_6989586621680405169Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Minimum_6989586621680405344Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Minimum_6989586621680405519Sym0
instance forall (t :: * -> *) k (m :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.MsumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.NotElemSym0
instance forall a (t :: * -> *) (a6989586621680404075 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.NotElemSym1 a6989586621680404075)
instance forall k (t :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.NullSym0
instance forall k (t :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680404492Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680404772Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680404933Sym0
instance forall k (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680405007Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680405178Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680405353Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Null_6989586621680405528Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.OrSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ProductSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680404581Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680404781Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680405028Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680405184Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680405359Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Product_6989586621680405534Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.SequenceA_Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sequence_Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.SumSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680404572Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680404790Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680405022Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680405193Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680405368Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Sum_6989586621680405543Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.TFHelper_6989586621680390268Sym0
instance forall a (a6989586621680390273 :: Data.Foldable.Singletons.Endo a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.TFHelper_6989586621680390268Sym1 a6989586621680390273)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.TFHelper_6989586621680393741Sym0
instance forall a (a6989586621680393746 :: Data.Foldable.Singletons.MaxInternal a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.TFHelper_6989586621680393741Sym1 a6989586621680393746)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.TFHelper_6989586621680393765Sym0
instance forall a (a6989586621680393770 :: Data.Foldable.Singletons.MinInternal a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.TFHelper_6989586621680393765Sym1 a6989586621680393770)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToListSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680404483Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680404799Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680404892Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680405202Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680405377Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.ToList_6989586621680405552Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Foldable.Singletons.Traverse_Sym0
instance forall a (f :: * -> *) b (t :: * -> *) (a6989586621680404230 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Foldable.Singletons.Traverse_Sym1 a6989586621680404230)
-- | Exports the promoted and singled versions of the Identity data
-- type.
module Data.Functor.Identity.Singletons
type family Sing :: k -> Type
data SIdentity (a1 :: Identity a)
[SIdentity] :: forall a (n :: a). Sing n -> SIdentity ('Identity n)
type family RunIdentity (a1 :: Identity a) :: a
sRunIdentity :: forall a (t :: Identity a). Sing t -> Sing (Apply (RunIdentitySym0 :: TyFun (Identity a) a -> Type) t)
data IdentitySym0 (a1 :: TyFun a Identity a)
type family IdentitySym1 (a6989586621679048063 :: a) :: Identity a
data RunIdentitySym0 (a1 :: TyFun Identity a a)
type family RunIdentitySym1 (a6989586621679048066 :: Identity a) :: a
instance Control.Monad.Singletons.Internal.PApplicative GHC.Internal.Data.Functor.Identity.Identity
instance Data.Singletons.Base.Enum.PEnum (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Foldable.Singletons.PFoldable GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Singletons.Internal.PFunctor GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Singletons.Internal.PMonad GHC.Internal.Data.Functor.Identity.Identity
instance Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Functor.Identity.Identity a)
instance GHC.Num.Singletons.PNum (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Functor.Identity.Identity a)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Functor.Identity.Identity a)
instance Control.Monad.Singletons.Internal.SApplicative GHC.Internal.Data.Functor.Identity.Identity
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Foldable.Singletons.SFoldable GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Singletons.Internal.SFunctor GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Singletons.Internal.SMonad GHC.Internal.Data.Functor.Identity.Identity
instance Data.Monoid.Singletons.SMonoid a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Functor.Identity.Identity a)
instance GHC.Num.Singletons.SNum a => GHC.Num.Singletons.SNum (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Functor.Identity.Identity a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Abs_6989586621680656893Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Elem_6989586621680658185Sym0
instance forall a (a6989586621680658190 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Elem_6989586621680658185Sym1 a6989586621680658190)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.EnumFromThenTo_6989586621680656718Sym0
instance forall a (a6989586621680656724 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.EnumFromThenTo_6989586621680656718Sym1 a6989586621680656724)
instance forall a (a6989586621680656724 :: GHC.Internal.Data.Functor.Identity.Identity a) (a6989586621680656725 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.EnumFromThenTo_6989586621680656718Sym2 a6989586621680656724 a6989586621680656725)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.EnumFromTo_6989586621680656706Sym0
instance forall a (a6989586621680656711 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.EnumFromTo_6989586621680656706Sym1 a6989586621680656711)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Fmap_6989586621680656973Sym0
instance forall a b (a6989586621680656978 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Fmap_6989586621680656973Sym1 a6989586621680656978)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.FoldMap_6989586621680658174Sym0
instance forall a m (a6989586621680658179 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.FoldMap_6989586621680658174Sym1 a6989586621680658179)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldl'_6989586621680658212Sym0
instance forall b a (a6989586621680658218 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldl'_6989586621680658212Sym1 a6989586621680658218)
instance forall b a (a6989586621680658218 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680658219 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldl'_6989586621680658212Sym2 a6989586621680658218 a6989586621680658219)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldl1_6989586621680658226Sym0
instance forall a (a6989586621680658231 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldl1_6989586621680658226Sym1 a6989586621680658231)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldl_6989586621680658197Sym0
instance forall b a (a6989586621680658203 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldl_6989586621680658197Sym1 a6989586621680658203)
instance forall b a (a6989586621680658203 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621680658204 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldl_6989586621680658197Sym2 a6989586621680658203 a6989586621680658204)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldr'_6989586621680658252Sym0
instance forall a b (a6989586621680658264 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldr'_6989586621680658252Sym1 a6989586621680658264)
instance forall a b (a6989586621680658264 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680658265 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldr'_6989586621680658252Sym2 a6989586621680658264 a6989586621680658265)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldr1_6989586621680658272Sym0
instance forall a (a6989586621680658277 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldr1_6989586621680658272Sym1 a6989586621680658277)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Foldr_6989586621680658237Sym0
instance forall a b (a6989586621680658243 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldr_6989586621680658237Sym1 a6989586621680658243)
instance forall a b (a6989586621680658243 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680658244 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Foldr_6989586621680658237Sym2 a6989586621680658243 a6989586621680658244)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.FromEnum_6989586621680656698Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.FromInteger_6989586621680656907Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Lambda_6989586621680656993Sym0
instance forall k1 k2 k3 (_z_69895866216806566686989586621680656991 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Lambda_6989586621680656993Sym1 _z_69895866216806566686989586621680656991)
instance forall k1 k2 k3 (_z_69895866216806566686989586621680656991 :: k1) (a_69895866216806566746989586621680656992 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.Lambda_6989586621680656993Sym2 _z_69895866216806566686989586621680656991 a_69895866216806566746989586621680656992)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Length_6989586621680658281Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.LiftA2_6989586621680658350Sym0
instance forall a b c (a6989586621680658356 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.LiftA2_6989586621680658350Sym1 a6989586621680658356)
instance forall a b c (a6989586621680658356 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680658357 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.LiftA2_6989586621680658350Sym2 a6989586621680658356 a6989586621680658357)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Maximum_6989586621680658287Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Minimum_6989586621680658294Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Negate_6989586621680656886Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Null_6989586621680658301Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Pred_6989586621680656684Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Product_6989586621680658307Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Pure_6989586621680658328Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.ShowsPrec_6989586621680656957Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.ShowsPrec_6989586621680656957Sym1 a6989586621680656965)
instance forall a (a6989586621680656965 :: GHC.Num.Natural.Natural) (a6989586621680656966 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.ShowsPrec_6989586621680656957Sym2 a6989586621680656965 a6989586621680656966)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Signum_6989586621680656900Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Succ_6989586621680656677Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.Sum_6989586621680658314Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680656854Sym0
instance forall a (a6989586621680656859 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680656854Sym1 a6989586621680656859)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680656865Sym0
instance forall a (a6989586621680656870 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680656865Sym1 a6989586621680656870)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680656876Sym0
instance forall a (a6989586621680656881 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680656876Sym1 a6989586621680656881)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680656945Sym0
instance forall a (a6989586621680656950 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680656945Sym1 a6989586621680656950)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680656984Sym0
instance forall a b (a6989586621680656989 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680656984Sym1 a6989586621680656989)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680658338Sym0
instance forall a b (a6989586621680658343 :: GHC.Internal.Data.Functor.Identity.Identity (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680658338Sym1 a6989586621680658343)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.TFHelper_6989586621680658364Sym0
instance forall a b (a6989586621680658369 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Identity.Singletons.TFHelper_6989586621680658364Sym1 a6989586621680658369)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.ToEnum_6989586621680656691Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Identity.Singletons.ToList_6989586621680658321Sym0
-- | Exports the promoted and singled versions of the Const data
-- type.
module Data.Functor.Const.Singletons
type family Sing :: k -> Type
data SConst (a1 :: Const a b)
[SConst] :: forall {k} a (b :: k) (x :: a). Sing x -> SConst ('Const x :: Const a b)
type family GetConst (a1 :: Const a b) :: a
sGetConst :: forall {k} a (b :: k) (t :: Const a b). Sing t -> Sing (Apply (GetConstSym0 :: TyFun (Const a b) a -> Type) t)
data ConstSym0 (z :: TyFun a Const a b)
type family ConstSym1 (x :: a) :: Const a b
data GetConstSym0 (a1 :: TyFun Const a b a)
type family GetConstSym1 (a6989586621680696986 :: Const a b) :: a
instance forall k a (b :: k) (z :: GHC.Internal.Data.Functor.Const.Const a b). GHC.Classes.Eq (Data.Functor.Const.Singletons.SConst z)
instance forall k a (b :: k) (z :: GHC.Internal.Data.Functor.Const.Const a b). GHC.Classes.Ord (Data.Functor.Const.Singletons.SConst z)
instance Control.Monad.Singletons.Internal.PApplicative (GHC.Internal.Data.Functor.Const.Const m)
instance forall k a (b :: k). Data.Singletons.Base.Enum.PBounded (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Base.Enum.PEnum (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Eq.Singletons.PEq (GHC.Internal.Data.Functor.Const.Const a b)
instance Data.Foldable.Singletons.PFoldable (GHC.Internal.Data.Functor.Const.Const m)
instance Control.Monad.Singletons.Internal.PFunctor (GHC.Internal.Data.Functor.Const.Const m)
instance forall k a (b :: k). Data.Monoid.Singletons.PMonoid (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). GHC.Num.Singletons.PNum (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Ord.Singletons.POrd (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Semigroup.Singletons.Internal.Classes.PSemigroup (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Text.Show.Singletons.PShow (GHC.Internal.Data.Functor.Const.Const a b)
instance Data.Monoid.Singletons.SMonoid m => Control.Monad.Singletons.Internal.SApplicative (GHC.Internal.Data.Functor.Const.Const m)
instance forall k a (b :: k). Data.Singletons.Base.Enum.SBounded a => Data.Singletons.Base.Enum.SBounded (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => Data.Singletons.Decide.SDecide (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Eq.Singletons.SEq a => Data.Eq.Singletons.SEq (GHC.Internal.Data.Functor.Const.Const a b)
instance Data.Foldable.Singletons.SFoldable (GHC.Internal.Data.Functor.Const.Const m)
instance Control.Monad.Singletons.Internal.SFunctor (GHC.Internal.Data.Functor.Const.Const m)
instance forall k a (b :: k). Data.Monoid.Singletons.SMonoid a => Data.Monoid.Singletons.SMonoid (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). GHC.Num.Singletons.SNum a => GHC.Num.Singletons.SNum (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Ord.Singletons.SOrd a => Data.Ord.Singletons.SOrd (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Semigroup.Singletons.Internal.Classes.SSemigroup a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k1 k (b :: k). Data.Singletons.SingI1 'GHC.Internal.Data.Functor.Const.Const
instance forall a1 k (b :: k) (a2 :: a1). Data.Singletons.SingI a2 => Data.Singletons.SingI ('GHC.Internal.Data.Functor.Const.Const a2)
instance forall a k (b :: k). Data.Singletons.SingI Data.Functor.Const.Singletons.ConstSym0
instance forall k a (b :: k). Data.Singletons.SingI Data.Functor.Const.Singletons.GetConstSym0
instance forall k a (b :: k). Data.Singletons.SingKind a => Data.Singletons.SingKind (GHC.Internal.Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Abs_6989586621680697114Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Compare_6989586621680697007Sym0
instance forall k a (b :: k) (a6989586621680697012 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Compare_6989586621680697007Sym1 a6989586621680697012)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.EnumFromThenTo_6989586621680697058Sym0
instance forall k a (b :: k) (a6989586621680697064 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.EnumFromThenTo_6989586621680697058Sym1 a6989586621680697064)
instance forall k a (b :: k) (a6989586621680697064 :: GHC.Internal.Data.Functor.Const.Const a b) (a6989586621680697065 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.EnumFromThenTo_6989586621680697058Sym2 a6989586621680697064 a6989586621680697065)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.EnumFromTo_6989586621680697046Sym0
instance forall k a (b :: k) (a6989586621680697051 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.EnumFromTo_6989586621680697046Sym1 a6989586621680697051)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Fmap_6989586621680697164Sym0
instance forall a b m (a6989586621680697169 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Fmap_6989586621680697164Sym1 a6989586621680697169)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.FoldMap_6989586621680697194Sym0
instance forall a m1 m2 (a6989586621680697199 :: a Data.Singletons.~> m1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.FoldMap_6989586621680697194Sym1 a6989586621680697199)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Foldr_6989586621680697210Sym0
instance forall a b m (a6989586621680697216 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Foldr_6989586621680697210Sym1 a6989586621680697216)
instance forall a b m (a6989586621680697216 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680697217 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Foldr_6989586621680697210Sym2 a6989586621680697216 a6989586621680697217)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.FromEnum_6989586621680697038Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.FromInteger_6989586621680697128Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.GetConstSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Lambda_6989586621680697173Sym0
instance forall k1 k2 k3 (_f_69895866216806969556989586621680697171 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697173Sym1 _f_69895866216806969556989586621680697171)
instance forall k1 k2 k3 (_f_69895866216806969556989586621680697171 :: k1) (a_69895866216806969616989586621680697172 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697173Sym2 _f_69895866216806969556989586621680697171 a_69895866216806969616989586621680697172)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Lambda_6989586621680697188Sym0
instance forall k1 k2 k3 (_z_69895866216806969576989586621680697186 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697188Sym1 _z_69895866216806969576989586621680697186)
instance forall k1 k2 k3 (_z_69895866216806969576989586621680697186 :: k1) (a_69895866216806969656989586621680697187 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697188Sym2 _z_69895866216806969576989586621680697186 a_69895866216806969656989586621680697187)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Lambda_6989586621680697203Sym0
instance forall k1 k2 k3 k4 (_f_69895866216806969706989586621680697201 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697203Sym1 _f_69895866216806969706989586621680697201)
instance forall k1 k2 k3 k4 (_f_69895866216806969706989586621680697201 :: k1) (a_69895866216806969766989586621680697202 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697203Sym2 _f_69895866216806969706989586621680697201 a_69895866216806969766989586621680697202)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Lambda_6989586621680697222Sym0
instance forall k1 k2 k3 k4 k5 (_f_69895866216806969706989586621680697219 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697222Sym1 _f_69895866216806969706989586621680697219)
instance forall k1 k2 k3 k4 k5 (_f_69895866216806969706989586621680697219 :: k1) (_z_69895866216806969726989586621680697220 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697222Sym2 _f_69895866216806969706989586621680697219 _z_69895866216806969726989586621680697220)
instance forall k1 k2 k3 k4 k5 (_f_69895866216806969706989586621680697219 :: k1) (_z_69895866216806969726989586621680697220 :: k2) (a_69895866216806969826989586621680697221 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697222Sym3 _f_69895866216806969706989586621680697219 _z_69895866216806969726989586621680697220 a_69895866216806969826989586621680697221)
instance forall k1 k2 k3 k4 k5 (_f_69895866216806969706989586621680697219 :: k1) (_z_69895866216806969726989586621680697220 :: k2) (a_69895866216806969826989586621680697221 :: k3) (n1_69895866216806969786989586621680697224 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.Lambda_6989586621680697222Sym4 _f_69895866216806969706989586621680697219 _z_69895866216806969726989586621680697220 a_69895866216806969826989586621680697221 n1_69895866216806969786989586621680697224)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.LiftA2_6989586621680697236Sym0
instance forall a b c m (a6989586621680697242 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.LiftA2_6989586621680697236Sym1 a6989586621680697242)
instance forall a b c m (a6989586621680697242 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680697243 :: GHC.Internal.Data.Functor.Const.Const m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.LiftA2_6989586621680697236Sym2 a6989586621680697242 a6989586621680697243)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Negate_6989586621680697107Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Pred_6989586621680697024Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Pure_6989586621680697228Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.ShowsPrec_6989586621680697148Sym0
instance forall k a (b :: k) (a6989586621680697156 :: GHC.Num.Natural.Natural). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.ShowsPrec_6989586621680697148Sym1 a6989586621680697156)
instance forall k a (b :: k) (a6989586621680697156 :: GHC.Num.Natural.Natural) (a6989586621680697157 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.ShowsPrec_6989586621680697148Sym2 a6989586621680697156 a6989586621680697157)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Signum_6989586621680697121Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.Succ_6989586621680697017Sym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680696996Sym0
instance forall k a (b :: k) (a6989586621680697001 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680696996Sym1 a6989586621680697001)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697075Sym0
instance forall k a (b :: k) (a6989586621680697080 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697075Sym1 a6989586621680697080)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697086Sym0
instance forall k a (b :: k) (a6989586621680697091 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697086Sym1 a6989586621680697091)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697097Sym0
instance forall k a (b :: k) (a6989586621680697102 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697097Sym1 a6989586621680697102)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697136Sym0
instance forall k a (b :: k) (a6989586621680697141 :: GHC.Internal.Data.Functor.Const.Const a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697136Sym1 a6989586621680697141)
instance forall a k m (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697179Sym0
instance forall a k m (b :: k) (a6989586621680697184 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697179Sym1 a6989586621680697184)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.TFHelper_6989586621680697249Sym0
instance forall m a b (a6989586621680697254 :: GHC.Internal.Data.Functor.Const.Const m (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Const.Singletons.TFHelper_6989586621680697249Sym1 a6989586621680697254)
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Const.Singletons.ToEnum_6989586621680697031Sym0
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Functor.Const.Singletons.SConst
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => GHC.Internal.Data.Type.Equality.TestEquality Data.Functor.Const.Singletons.SConst
-- | Defines the promoted and singled versions of the Traversable
-- type class.
module Data.Traversable.Singletons
class PTraversable (t :: Type -> Type) where {
type Traverse (arg :: a ~> f b) (arg1 :: t a) :: f t b;
type SequenceA (arg :: t f a) :: f t a;
type MapM (arg :: a ~> m b) (arg1 :: t a) :: m t b;
type Sequence (arg :: t m a) :: m t a;
type Traverse arg :: a ~> f b arg1 :: t a = Apply Apply Traverse_6989586621680749126Sym0 :: TyFun a ~> f b t a ~> f t b -> Type arg arg1;
type SequenceA arg :: t f a = Apply SequenceA_6989586621680749138Sym0 :: TyFun t f a f t a -> Type arg;
type MapM arg :: a ~> m b arg1 :: t a = Apply Apply MapM_6989586621680749148Sym0 :: TyFun a ~> m b t a ~> m t b -> Type arg arg1;
type Sequence arg :: t m a = Apply Sequence_6989586621680749162Sym0 :: TyFun t m a m t a -> Type arg;
}
class (SFunctor t, SFoldable t) => STraversable (t :: Type -> Type)
sTraverse :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
($dmsTraverse) :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2 ~ Apply (Apply (Traverse_6989586621680749126Sym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
sSequenceA :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
($dmsSequenceA) :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1 ~ Apply (SequenceA_6989586621680749138Sym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
sMapM :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
($dmsMapM) :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2 ~ Apply (Apply (MapM_6989586621680749148Sym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
sSequence :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
($dmsSequence) :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1 ~ Apply (Sequence_6989586621680749162Sym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
type family For (a1 :: t a) (a2 :: a ~> f b) :: f t b
sFor :: forall (t1 :: Type -> Type) a (f :: Type -> Type) b (t2 :: t1 a) (t3 :: a ~> f b). (STraversable t1, SApplicative f) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ForSym0 :: TyFun (t1 a) ((a ~> f b) ~> f (t1 b)) -> Type) t2) t3)
type family ForM (a1 :: t a) (a2 :: a ~> m b) :: m t b
sForM :: forall (t1 :: Type -> Type) a (m :: Type -> Type) b (t2 :: t1 a) (t3 :: a ~> m b). (STraversable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ForMSym0 :: TyFun (t1 a) ((a ~> m b) ~> m (t1 b)) -> Type) t2) t3)
type family MapAccumL (a1 :: a ~> b ~> (a, c)) (a2 :: a) (a3 :: t b) :: (a, t c)
sMapAccumL :: forall (t1 :: Type -> Type) a b c (t2 :: a ~> (b ~> (a, c))) (t3 :: a) (t4 :: t1 b). STraversable t1 => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (MapAccumLSym0 :: TyFun (a ~> (b ~> (a, c))) (a ~> (t1 b ~> (a, t1 c))) -> Type) t2) t3) t4)
type family MapAccumR (a1 :: a ~> b ~> (a, c)) (a2 :: a) (a3 :: t b) :: (a, t c)
sMapAccumR :: forall a b c (t1 :: Type -> Type) (t2 :: a ~> (b ~> (a, c))) (t3 :: a) (t4 :: t1 b). STraversable t1 => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (MapAccumRSym0 :: TyFun (a ~> (b ~> (a, c))) (a ~> (t1 b ~> (a, t1 c))) -> Type) t2) t3) t4)
type family FmapDefault (a1 :: a ~> b) (a2 :: t a) :: t b
sFmapDefault :: forall (t1 :: Type -> Type) a b (t2 :: a ~> b) (t3 :: t1 a). STraversable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (FmapDefaultSym0 :: TyFun (a ~> b) (t1 a ~> t1 b) -> Type) t2) t3)
type family FoldMapDefault (a1 :: a ~> m) (a2 :: t a) :: m
sFoldMapDefault :: forall (t1 :: Type -> Type) m a (t2 :: a ~> m) (t3 :: t1 a). (STraversable t1, SMonoid m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (FoldMapDefaultSym0 :: TyFun (a ~> m) (t1 a ~> m) -> Type) t2) t3)
data TraverseSym0 (a1 :: TyFun a ~> f b t a ~> f t b)
data TraverseSym1 (a6989586621680749111 :: a ~> f b) (b1 :: TyFun t a f t b)
type family TraverseSym2 (a6989586621680749111 :: a ~> f b) (a6989586621680749112 :: t a) :: f t b
data SequenceASym0 (a1 :: TyFun t f a f t a)
type family SequenceASym1 (a6989586621680749115 :: t f a) :: f t a
data MapMSym0 (a1 :: TyFun a ~> m b t a ~> m t b)
data MapMSym1 (a6989586621680749119 :: a ~> m b) (b1 :: TyFun t a m t b)
type family MapMSym2 (a6989586621680749119 :: a ~> m b) (a6989586621680749120 :: t a) :: m t b
data SequenceSym0 (a1 :: TyFun t m a m t a)
type family SequenceSym1 (a6989586621680749123 :: t m a) :: m t a
data ForSym0 (a1 :: TyFun t a a ~> f b ~> f t b)
data ForSym1 (a6989586621680756759 :: t a) (b1 :: TyFun a ~> f b f t b)
type family ForSym2 (a6989586621680756759 :: t a) (a6989586621680756760 :: a ~> f b) :: f t b
data ForMSym0 (a1 :: TyFun t a a ~> m b ~> m t b)
data ForMSym1 (a6989586621680756748 :: t a) (b1 :: TyFun a ~> m b m t b)
type family ForMSym2 (a6989586621680756748 :: t a) (a6989586621680756749 :: a ~> m b) :: m t b
data MapAccumLSym0 (a1 :: TyFun a ~> b ~> (a, c) a ~> t b ~> (a, t c))
data MapAccumLSym1 (a6989586621680756735 :: a ~> b ~> (a, c)) (b1 :: TyFun a t b ~> (a, t c))
data MapAccumLSym2 (a6989586621680756735 :: a ~> b ~> (a, c)) (a6989586621680756736 :: a) (c1 :: TyFun t b (a, t c))
type family MapAccumLSym3 (a6989586621680756735 :: a ~> b ~> (a, c)) (a6989586621680756736 :: a) (a6989586621680756737 :: t b) :: (a, t c)
data MapAccumRSym0 (a1 :: TyFun a ~> b ~> (a, c) a ~> t b ~> (a, t c))
data MapAccumRSym1 (a6989586621680756725 :: a ~> b ~> (a, c)) (b1 :: TyFun a t b ~> (a, t c))
data MapAccumRSym2 (a6989586621680756725 :: a ~> b ~> (a, c)) (a6989586621680756726 :: a) (c1 :: TyFun t b (a, t c))
type family MapAccumRSym3 (a6989586621680756725 :: a ~> b ~> (a, c)) (a6989586621680756726 :: a) (a6989586621680756727 :: t b) :: (a, t c)
data FmapDefaultSym0 (a1 :: TyFun a ~> b t a ~> t b)
data FmapDefaultSym1 (a6989586621680756711 :: a ~> b) (b1 :: TyFun t a t b)
type family FmapDefaultSym2 (a6989586621680756711 :: a ~> b) (a6989586621680756712 :: t a) :: t b
data FoldMapDefaultSym0 (a1 :: TyFun a ~> m t a ~> m)
data FoldMapDefaultSym1 (a6989586621680756692 :: a ~> m) (b :: TyFun t a m)
type family FoldMapDefaultSym2 (a6989586621680756692 :: a ~> m) (a6989586621680756693 :: t a) :: m
instance Control.Monad.Singletons.Internal.PApplicative (Data.Traversable.Singletons.StateL s)
instance Control.Monad.Singletons.Internal.PApplicative (Data.Traversable.Singletons.StateR s)
instance Control.Monad.Singletons.Internal.PFunctor (Data.Traversable.Singletons.StateL s)
instance Control.Monad.Singletons.Internal.PFunctor (Data.Traversable.Singletons.StateR s)
instance Data.Traversable.Singletons.PTraversable (GHC.Internal.Data.Functor.Const.Const m)
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Semigroup.Internal.Dual
instance Data.Traversable.Singletons.PTraversable (GHC.Internal.Data.Either.Either a)
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Monoid.First
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Functor.Identity.Identity
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Monoid.Last
instance Data.Traversable.Singletons.PTraversable []
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Maybe.Maybe
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Base.NonEmpty
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Semigroup.Internal.Product
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Proxy.Proxy
instance Data.Traversable.Singletons.PTraversable GHC.Internal.Data.Semigroup.Internal.Sum
instance Data.Traversable.Singletons.PTraversable ((,) a)
instance Control.Monad.Singletons.Internal.SApplicative (Data.Traversable.Singletons.StateL s)
instance Control.Monad.Singletons.Internal.SApplicative (Data.Traversable.Singletons.StateR s)
instance Control.Monad.Singletons.Internal.SFunctor (Data.Traversable.Singletons.StateL s)
instance Control.Monad.Singletons.Internal.SFunctor (Data.Traversable.Singletons.StateR s)
instance Data.Traversable.Singletons.STraversable (GHC.Internal.Data.Functor.Const.Const m)
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Semigroup.Internal.Dual
instance Data.Traversable.Singletons.STraversable (GHC.Internal.Data.Either.Either a)
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Monoid.First
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Functor.Identity.Identity
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Monoid.Last
instance Data.Traversable.Singletons.STraversable []
instance Data.Traversable.Singletons.STraversable GHC.Internal.Maybe.Maybe
instance Data.Traversable.Singletons.STraversable GHC.Internal.Base.NonEmpty
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Semigroup.Internal.Product
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Proxy.Proxy
instance Data.Traversable.Singletons.STraversable GHC.Internal.Data.Semigroup.Internal.Sum
instance Data.Traversable.Singletons.STraversable ((,) a)
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI1 Data.Traversable.Singletons.FmapDefaultSym1
instance (Data.Traversable.Singletons.STraversable t, Data.Monoid.Singletons.SMonoid m) => Data.Singletons.SingI1 Data.Traversable.Singletons.FoldMapDefaultSym1
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI1 Data.Traversable.Singletons.MapAccumLSym1
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI1 Data.Traversable.Singletons.MapAccumRSym1
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Traversable.Singletons.MapMSym1
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI1 Data.Traversable.Singletons.TraverseSym1
instance Data.Singletons.SingI1 Data.Traversable.Singletons.RunStateLSym1
instance Data.Singletons.SingI1 Data.Traversable.Singletons.RunStateRSym1
instance forall (t :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Traversable.Singletons.MapAccumLSym2 d)
instance forall (t :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Data.Traversable.Singletons.MapAccumRSym2 d)
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Data.Traversable.Singletons.ForMSym1
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI1 Data.Traversable.Singletons.ForSym1
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI2 Data.Traversable.Singletons.MapAccumLSym2
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI2 Data.Traversable.Singletons.MapAccumRSym2
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI Data.Traversable.Singletons.FmapDefaultSym0
instance forall (t :: * -> *) a b (d :: a Data.Singletons.~> b). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.FmapDefaultSym1 d)
instance (Data.Traversable.Singletons.STraversable t, Data.Monoid.Singletons.SMonoid m) => Data.Singletons.SingI Data.Traversable.Singletons.FoldMapDefaultSym0
instance forall (t :: * -> *) m a (d :: a Data.Singletons.~> m). (Data.Traversable.Singletons.STraversable t, Data.Monoid.Singletons.SMonoid m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.FoldMapDefaultSym1 d)
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Traversable.Singletons.ForMSym0
instance forall (t :: * -> *) (m :: * -> *) a (d :: t a) b. (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.ForMSym1 d)
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Traversable.Singletons.ForSym0
instance forall (t :: * -> *) (f :: * -> *) a (d :: t a) b. (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.ForSym1 d)
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI Data.Traversable.Singletons.MapAccumLSym0
instance forall (t :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.MapAccumLSym1 d)
instance forall (t :: * -> *) a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))) (d2 :: a). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Traversable.Singletons.MapAccumLSym2 d1 d2)
instance Data.Traversable.Singletons.STraversable t => Data.Singletons.SingI Data.Traversable.Singletons.MapAccumRSym0
instance forall (t :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.MapAccumRSym1 d)
instance forall (t :: * -> *) a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))) (d2 :: a). (Data.Traversable.Singletons.STraversable t, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.Traversable.Singletons.MapAccumRSym2 d1 d2)
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Traversable.Singletons.MapMSym0
instance forall (t :: * -> *) (m :: * -> *) a b (d :: a Data.Singletons.~> m b). (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.MapMSym1 d)
instance Data.Singletons.SingI Data.Traversable.Singletons.RunStateLSym0
instance forall s a (d :: Data.Traversable.Singletons.StateL s a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Traversable.Singletons.RunStateLSym1 d)
instance Data.Singletons.SingI Data.Traversable.Singletons.RunStateRSym0
instance forall s a (d :: Data.Traversable.Singletons.StateR s a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.Traversable.Singletons.RunStateRSym1 d)
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Traversable.Singletons.SequenceASym0
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Data.Traversable.Singletons.SequenceSym0
instance (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f) => Data.Singletons.SingI Data.Traversable.Singletons.TraverseSym0
instance forall (t :: * -> *) (f :: * -> *) a b (d :: a Data.Singletons.~> f b). (Data.Traversable.Singletons.STraversable t, Control.Monad.Singletons.Internal.SApplicative f, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.Traversable.Singletons.TraverseSym1 d)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.FmapDefaultSym0
instance forall a b (t :: * -> *) (a6989586621680756711 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.FmapDefaultSym1 a6989586621680756711)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Fmap_6989586621680756964Sym0
instance forall a b s (a6989586621680756969 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Fmap_6989586621680756964Sym1 a6989586621680756969)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Fmap_6989586621680757162Sym0
instance forall a b s (a6989586621680757167 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Fmap_6989586621680757162Sym1 a6989586621680757167)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.FoldMapDefaultSym0
instance forall a m (t :: * -> *) (a6989586621680756692 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.FoldMapDefaultSym1 a6989586621680756692)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.ForMSym0
instance forall (t :: * -> *) a (m :: * -> *) b (a6989586621680756748 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.ForMSym1 a6989586621680756748)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.ForSym0
instance forall (t :: * -> *) a (f :: * -> *) b (a6989586621680756759 :: t a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.ForSym1 a6989586621680756759)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680756973Sym0
instance forall k2 k3 k4 k (f6989586621680756971 :: k2 Data.Singletons.~> k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680756973Sym1 f6989586621680756971)
instance forall k2 k3 k4 k (f6989586621680756971 :: k2 Data.Singletons.~> k3) (k6989586621680756972 :: k4 Data.Singletons.~> (k, k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680756973Sym2 f6989586621680756971 k6989586621680756972)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757052Sym0
instance forall k2 k3 (x6989586621680757051 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757052Sym1 x6989586621680757051)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757067Sym0
instance forall k2 k3 k4 k5 k (kf6989586621680757065 :: k2 Data.Singletons.~> (k3, k4 Data.Singletons.~> k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757067Sym1 kf6989586621680757065)
instance forall k2 k3 k4 k5 k (kf6989586621680757065 :: k2 Data.Singletons.~> (k3, k4 Data.Singletons.~> k5)) (kv6989586621680757066 :: k3 Data.Singletons.~> (k, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757067Sym2 kf6989586621680757065 kv6989586621680757066)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757121Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757118 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757121Sym1 f6989586621680757118)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757118 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (kx6989586621680757119 :: k5 Data.Singletons.~> (k6, k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757121Sym2 f6989586621680757118 kx6989586621680757119)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757118 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (kx6989586621680757119 :: k5 Data.Singletons.~> (k6, k2)) (ky6989586621680757120 :: k6 Data.Singletons.~> (k7, k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757121Sym3 f6989586621680757118 kx6989586621680757119 ky6989586621680757120)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757171Sym0
instance forall k2 k3 k4 k (f6989586621680757169 :: k2 Data.Singletons.~> k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757171Sym1 f6989586621680757169)
instance forall k2 k3 k4 k (f6989586621680757169 :: k2 Data.Singletons.~> k3) (k6989586621680757170 :: k4 Data.Singletons.~> (k, k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757171Sym2 f6989586621680757169 k6989586621680757170)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757200Sym0
instance forall k2 k3 (x6989586621680757199 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757200Sym1 x6989586621680757199)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757215Sym0
instance forall k2 k3 k4 k5 k6 (kf6989586621680757213 :: k2 Data.Singletons.~> (k3, k4 Data.Singletons.~> k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757215Sym1 kf6989586621680757213)
instance forall k2 k3 k4 k5 k6 (kf6989586621680757213 :: k2 Data.Singletons.~> (k3, k4 Data.Singletons.~> k5)) (kv6989586621680757214 :: k6 Data.Singletons.~> (k2, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757215Sym2 kf6989586621680757213 kv6989586621680757214)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Lambda_6989586621680757269Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757266 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757269Sym1 f6989586621680757266)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757266 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (kx6989586621680757267 :: k5 Data.Singletons.~> (k6, k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757269Sym2 f6989586621680757266 kx6989586621680757267)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757266 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> k4)) (kx6989586621680757267 :: k5 Data.Singletons.~> (k6, k2)) (ky6989586621680757268 :: k7 Data.Singletons.~> (k5, k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Lambda_6989586621680757269Sym3 f6989586621680757266 kx6989586621680757267 ky6989586621680757268)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756696MkConstSym0
instance forall k1 k2 k3 k4 m6989586621680756261 (t6989586621680756260 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756696MkConstSym1 t6989586621680756260)
instance forall k1 k2 k3 k4 m1 (t6989586621680756260 :: k1) m2. Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756696MkConstSym2 t6989586621680756260 m2)
instance forall k1 k2 k3 k4 m1 (t6989586621680756260 :: k1) m2 (a6989586621680756262 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756696MkConstSym3 t6989586621680756260 m2 a6989586621680756262)
instance forall k1 k2 k3 k4 m1 (t6989586621680756260 :: k1) m2 (a6989586621680756262 :: k2) (f6989586621680756694 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756696MkConstSym4 t6989586621680756260 m2 a6989586621680756262 f6989586621680756694)
instance forall k1 k2 k3 k4 (t6989586621680756260 :: k1) m6989586621680756261 (a6989586621680756262 :: k2) (f6989586621680756694 :: k3) (x6989586621680756695 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756696MkConstSym5 t6989586621680756260 m6989586621680756261 a6989586621680756262 f6989586621680756694 x6989586621680756695)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756702Scrutinee_6989586621680756355Sym0
instance forall k1 k2 a m (t :: * -> *) (t6989586621680756260 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756702Scrutinee_6989586621680756355Sym1 t6989586621680756260)
instance forall k1 k2 a m (t :: * -> *) (t6989586621680756260 :: k1) m6989586621680756261. Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756702Scrutinee_6989586621680756355Sym2 t6989586621680756260 m6989586621680756261)
instance forall k1 k2 a m (t :: * -> *) (t6989586621680756260 :: k1) m6989586621680756261 (a6989586621680756262 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756702Scrutinee_6989586621680756355Sym3 t6989586621680756260 m6989586621680756261 a6989586621680756262)
instance forall k1 k2 a m (t :: * -> *) (t6989586621680756260 :: k1) m6989586621680756261 (a6989586621680756262 :: k2) (f6989586621680756694 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756702Scrutinee_6989586621680756355Sym4 t6989586621680756260 m6989586621680756261 a6989586621680756262 f6989586621680756694)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756715Scrutinee_6989586621680756352Sym0
instance forall k1 k2 k3 a b (t :: * -> *) (t6989586621680756263 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756715Scrutinee_6989586621680756352Sym1 t6989586621680756263)
instance forall k1 k2 k3 a b (t :: * -> *) (t6989586621680756263 :: k1) (a6989586621680756264 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756715Scrutinee_6989586621680756352Sym2 t6989586621680756263 a6989586621680756264)
instance forall k1 k2 k3 a b (t :: * -> *) (t6989586621680756263 :: k1) (a6989586621680756264 :: k2) (b6989586621680756265 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756715Scrutinee_6989586621680756352Sym3 t6989586621680756263 a6989586621680756264 b6989586621680756265)
instance forall k1 k2 k3 a b (t :: * -> *) (t6989586621680756263 :: k1) (a6989586621680756264 :: k2) (b6989586621680756265 :: k3) (f6989586621680756713 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756715Scrutinee_6989586621680756352Sym4 t6989586621680756263 a6989586621680756264 b6989586621680756265 f6989586621680756713)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756976S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680756975 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976S'Sym1 s6989586621680756975)
instance forall k1 k2 k3 k4 (s6989586621680756975 :: k1) (f6989586621680756971 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976S'Sym2 s6989586621680756975 f6989586621680756971)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756976VSym0
instance forall k1 k2 k3 k4 (s6989586621680756975 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976VSym1 s6989586621680756975)
instance forall k1 k2 k3 k4 (s6989586621680756975 :: k1) (f6989586621680756971 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976VSym2 s6989586621680756975 f6989586621680756971)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680756976X_6989586621680756977Sym0
instance forall k1 k2 k3 (s6989586621680756975 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976X_6989586621680756977Sym1 s6989586621680756975)
instance forall k1 k2 k3 (s6989586621680756975 :: k1) (f6989586621680756971 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680756976X_6989586621680756977Sym2 s6989586621680756975 f6989586621680756971)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070FSym0
instance forall k1 k2 k3 k4 (s6989586621680757069 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070FSym1 s6989586621680757069)
instance forall k1 k2 k3 k4 (s6989586621680757069 :: k1) (kf6989586621680757065 :: k1 Data.Singletons.~> (k2, k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070FSym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070S''Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757069 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070S''Sym1 s6989586621680757069)
instance forall k2 k3 k4 k5 k6 (s6989586621680757069 :: k2) (kf6989586621680757065 :: k2 Data.Singletons.~> (k3, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070S''Sym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680757069 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070S'Sym1 s6989586621680757069)
instance forall k1 k2 k3 k4 (s6989586621680757069 :: k1) (kf6989586621680757065 :: k1 Data.Singletons.~> (k2, k3)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070S'Sym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070VSym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757069 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070VSym1 s6989586621680757069)
instance forall k2 k3 k4 k5 k6 (s6989586621680757069 :: k2) (kf6989586621680757065 :: k2 Data.Singletons.~> (k3, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070VSym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757071Sym0
instance forall k1 k2 k3 (s6989586621680757069 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757071Sym1 s6989586621680757069)
instance forall k1 k2 k3 (s6989586621680757069 :: k1) (kf6989586621680757065 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757071Sym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757077Sym0
instance forall k2 k3 k4 k5 (s6989586621680757069 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757077Sym1 s6989586621680757069)
instance forall k2 k3 k4 k5 (s6989586621680757069 :: k2) (kf6989586621680757065 :: k2 Data.Singletons.~> (k3, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757070X_6989586621680757077Sym2 s6989586621680757069 kf6989586621680757065)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124S''Sym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S''Sym1 s6989586621680757123)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S''Sym2 s6989586621680757123 f6989586621680757118)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3) (kx6989586621680757119 :: k2 Data.Singletons.~> (k4, k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S''Sym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124S'Sym0
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S'Sym1 s6989586621680757123)
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S'Sym2 s6989586621680757123 f6989586621680757118)
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2) (kx6989586621680757119 :: k1 Data.Singletons.~> (k3, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124S'Sym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124XSym0
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124XSym1 s6989586621680757123)
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124XSym2 s6989586621680757123 f6989586621680757118)
instance forall k1 k2 k3 k4 k5 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2) (kx6989586621680757119 :: k1 Data.Singletons.~> (k3, k4)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124XSym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757125Sym0
instance forall k1 k2 k3 k4 (s6989586621680757123 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757125Sym1 s6989586621680757123)
instance forall k1 k2 k3 k4 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757125Sym2 s6989586621680757123 f6989586621680757118)
instance forall k1 k2 k3 k4 (s6989586621680757123 :: k1) (f6989586621680757118 :: k2) (kx6989586621680757119 :: k1 Data.Singletons.~> k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757125Sym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757131Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757123 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757131Sym1 s6989586621680757123)
instance forall k2 k3 k4 k5 k6 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757131Sym2 s6989586621680757123 f6989586621680757118)
instance forall k2 k3 k4 k5 k6 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3) (kx6989586621680757119 :: k2 Data.Singletons.~> (k4, k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124X_6989586621680757131Sym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757124YSym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124YSym1 s6989586621680757123)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124YSym2 s6989586621680757123 f6989586621680757118)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757123 :: k2) (f6989586621680757118 :: k3) (kx6989586621680757119 :: k2 Data.Singletons.~> (k4, k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757124YSym3 s6989586621680757123 f6989586621680757118 kx6989586621680757119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757174S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680757173 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174S'Sym1 s6989586621680757173)
instance forall k1 k2 k3 k4 (s6989586621680757173 :: k1) (f6989586621680757169 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174S'Sym2 s6989586621680757173 f6989586621680757169)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757174VSym0
instance forall k1 k2 k3 k4 (s6989586621680757173 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174VSym1 s6989586621680757173)
instance forall k1 k2 k3 k4 (s6989586621680757173 :: k1) (f6989586621680757169 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174VSym2 s6989586621680757173 f6989586621680757169)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757174X_6989586621680757175Sym0
instance forall k1 k2 k3 (s6989586621680757173 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174X_6989586621680757175Sym1 s6989586621680757173)
instance forall k1 k2 k3 (s6989586621680757173 :: k1) (f6989586621680757169 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757174X_6989586621680757175Sym2 s6989586621680757173 f6989586621680757169)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218FSym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757217 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218FSym1 s6989586621680757217)
instance forall k2 k3 k4 k5 k6 (s6989586621680757217 :: k2) (kf6989586621680757213 :: k3 Data.Singletons.~> (k4, k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218FSym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218S''Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757217 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218S''Sym1 s6989586621680757217)
instance forall k2 k3 k4 k5 k6 (s6989586621680757217 :: k2) (kf6989586621680757213 :: k3 Data.Singletons.~> (k4, k5)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218S''Sym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680757217 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218S'Sym1 s6989586621680757217)
instance forall k1 k2 k3 k4 (s6989586621680757217 :: k1) (kf6989586621680757213 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218S'Sym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218VSym0
instance forall k1 k2 k3 k4 (s6989586621680757217 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218VSym1 s6989586621680757217)
instance forall k1 k2 k3 k4 (s6989586621680757217 :: k1) (kf6989586621680757213 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218VSym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757219Sym0
instance forall k1 k2 k3 (s6989586621680757217 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757219Sym1 s6989586621680757217)
instance forall k1 k2 k3 (s6989586621680757217 :: k1) (kf6989586621680757213 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757219Sym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757225Sym0
instance forall k2 k3 k4 k5 (s6989586621680757217 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757225Sym1 s6989586621680757217)
instance forall k2 k3 k4 k5 (s6989586621680757217 :: k2) (kf6989586621680757213 :: k3 Data.Singletons.~> k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757218X_6989586621680757225Sym2 s6989586621680757217 kf6989586621680757213)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272S''Sym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S''Sym1 s6989586621680757271)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S''Sym2 s6989586621680757271 f6989586621680757266)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3) (kx6989586621680757267 :: k4 Data.Singletons.~> (k5, k6)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S''Sym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272S'Sym0
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S'Sym1 s6989586621680757271)
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S'Sym2 s6989586621680757271 f6989586621680757266)
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2) (kx6989586621680757267 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272S'Sym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272XSym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272XSym1 s6989586621680757271)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272XSym2 s6989586621680757271 f6989586621680757266)
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3) (kx6989586621680757267 :: k4 Data.Singletons.~> (k5, k6)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272XSym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757273Sym0
instance forall k1 k2 k3 k4 (s6989586621680757271 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757273Sym1 s6989586621680757271)
instance forall k1 k2 k3 k4 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757273Sym2 s6989586621680757271 f6989586621680757266)
instance forall k1 k2 k3 k4 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2) (kx6989586621680757267 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757273Sym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757279Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680757271 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757279Sym1 s6989586621680757271)
instance forall k2 k3 k4 k5 k6 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757279Sym2 s6989586621680757271 f6989586621680757266)
instance forall k2 k3 k4 k5 k6 (s6989586621680757271 :: k2) (f6989586621680757266 :: k3) (kx6989586621680757267 :: k4 Data.Singletons.~> k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272X_6989586621680757279Sym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Let6989586621680757272YSym0
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272YSym1 s6989586621680757271)
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272YSym2 s6989586621680757271 f6989586621680757266)
instance forall k1 k2 k3 k4 k5 (s6989586621680757271 :: k1) (f6989586621680757266 :: k2) (kx6989586621680757267 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Let6989586621680757272YSym3 s6989586621680757271 f6989586621680757266 kx6989586621680757267)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.LiftA2_6989586621680757109Sym0
instance forall a b c s (a6989586621680757115 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.LiftA2_6989586621680757109Sym1 a6989586621680757115)
instance forall a b c s (a6989586621680757115 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680757116 :: Data.Traversable.Singletons.StateL s a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.LiftA2_6989586621680757109Sym2 a6989586621680757115 a6989586621680757116)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.LiftA2_6989586621680757257Sym0
instance forall a b c s (a6989586621680757263 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.LiftA2_6989586621680757257Sym1 a6989586621680757263)
instance forall a b c s (a6989586621680757263 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680757264 :: Data.Traversable.Singletons.StateR s a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.LiftA2_6989586621680757257Sym2 a6989586621680757263 a6989586621680757264)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.MapAccumLSym0
instance forall a b c (t :: * -> *) (a6989586621680756735 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapAccumLSym1 a6989586621680756735)
instance forall a b c (t :: * -> *) (a6989586621680756735 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))) (a6989586621680756736 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapAccumLSym2 a6989586621680756735 a6989586621680756736)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.MapAccumRSym0
instance forall a b c (t :: * -> *) (a6989586621680756725 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapAccumRSym1 a6989586621680756725)
instance forall a b c (t :: * -> *) (a6989586621680756725 :: a Data.Singletons.~> (b Data.Singletons.~> (a, c))) (a6989586621680756726 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapAccumRSym2 a6989586621680756725 a6989586621680756726)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.MapMSym0
instance forall a (m :: * -> *) b (t :: * -> *) (a6989586621680749119 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapMSym1 a6989586621680749119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.MapM_6989586621680749148Sym0
instance forall a (m :: * -> *) b (t :: * -> *) (a6989586621680749157 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapM_6989586621680749148Sym1 a6989586621680749157)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.MapM_6989586621680756842Sym0
instance forall a (m :: * -> *) b (a6989586621680756847 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.MapM_6989586621680756842Sym1 a6989586621680756847)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Pure_6989586621680757046Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Pure_6989586621680757194Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.RunStateLSym0
instance forall s a (a6989586621680747479 :: Data.Traversable.Singletons.StateL s a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.RunStateLSym1 a6989586621680747479)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.RunStateRSym0
instance forall s a (a6989586621680747470 :: Data.Traversable.Singletons.StateR s a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.RunStateRSym1 a6989586621680747470)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.SequenceASym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.SequenceA_6989586621680749138Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.SequenceA_6989586621680756835Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.SequenceSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Sequence_6989586621680749162Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Sequence_6989586621680756850Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.TFHelper_6989586621680757058Sym0
instance forall s a b (a6989586621680757063 :: Data.Traversable.Singletons.StateL s (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.TFHelper_6989586621680757058Sym1 a6989586621680757063)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.TFHelper_6989586621680757206Sym0
instance forall s a b (a6989586621680757211 :: Data.Traversable.Singletons.StateR s (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.TFHelper_6989586621680757206Sym1 a6989586621680757211)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.TraverseSym0
instance forall a (f :: * -> *) b (t :: * -> *) (a6989586621680749111 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.TraverseSym1 a6989586621680749111)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680749126Sym0
instance forall a (f :: * -> *) b (t :: * -> *) (a6989586621680749133 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680749126Sym1 a6989586621680749133)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756765Sym0
instance forall a (f :: * -> *) b (a6989586621680756770 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756765Sym1 a6989586621680756770)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756777Sym0
instance forall a (f :: * -> *) b (a6989586621680756782 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756777Sym1 a6989586621680756782)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756790Sym0
instance forall a (f :: * -> *) b (a6989586621680756795 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756790Sym1 a6989586621680756795)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756802Sym0
instance forall a1 (f :: * -> *) b a2 (a6989586621680756807 :: a1 Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756802Sym1 a6989586621680756807)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756815Sym0
instance forall a1 (f :: * -> *) b a2 (a6989586621680756820 :: a1 Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756815Sym1 a6989586621680756820)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756827Sym0
instance forall a (f :: * -> *) b (a6989586621680756832 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756827Sym1 a6989586621680756832)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756857Sym0
instance forall a (f :: * -> *) b m (a6989586621680756862 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756857Sym1 a6989586621680756862)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756868Sym0
instance forall a (f :: * -> *) b (a6989586621680756873 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756868Sym1 a6989586621680756873)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756879Sym0
instance forall a (f :: * -> *) b (a6989586621680756884 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756879Sym1 a6989586621680756884)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756890Sym0
instance forall a (f :: * -> *) b (a6989586621680756895 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756890Sym1 a6989586621680756895)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756901Sym0
instance forall a (f :: * -> *) b (a6989586621680756906 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756901Sym1 a6989586621680756906)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756912Sym0
instance forall a (f :: * -> *) b (a6989586621680756917 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756912Sym1 a6989586621680756917)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Traversable.Singletons.Traverse_6989586621680756923Sym0
instance forall a (f :: * -> *) b (a6989586621680756928 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Traversable.Singletons.Traverse_6989586621680756923Sym1 a6989586621680756928)
-- | Defines the promoted version of Semigroup, PSemigroup,
-- and the singleton version, SSemigroup.
module Data.Semigroup.Singletons
class PSemigroup a where {
type (arg :: a) <> (arg1 :: a) :: a;
type Sconcat (arg :: NonEmpty a) :: a;
type Sconcat arg :: NonEmpty a = Apply Sconcat_6989586621679209741Sym0 :: TyFun NonEmpty a a -> Type arg;
}
infixr 6 <>
class SSemigroup a
(%<>) :: forall (t1 :: a) (t2 :: a). SSemigroup a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<>@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
sSconcat :: forall (t :: NonEmpty a). SSemigroup a => Sing t -> Sing (Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t)
($dmsSconcat) :: forall (t :: NonEmpty a). (SSemigroup a, Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t ~ Apply (Sconcat_6989586621679209741Sym0 :: TyFun (NonEmpty a) a -> Type) t) => Sing t -> Sing (Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t)
infixr 6 %<>
type family Sing :: k -> Type
data SMin (a1 :: Min a)
[SMin] :: forall a (n :: a). Sing n -> SMin ('Min n)
data SMax (a1 :: Max a)
[SMax] :: forall a (n :: a). Sing n -> SMax ('Max n)
data SFirst (a1 :: First a)
[SFirst] :: forall a (n :: a). Sing n -> SFirst ('First n)
data SLast (a1 :: Last a)
[SLast] :: forall a (n :: a). Sing n -> SLast ('Last n)
data SWrappedMonoid (a :: WrappedMonoid m)
[SWrapMonoid] :: forall m (n :: m). Sing n -> SWrappedMonoid ('WrapMonoid n)
data SDual (a1 :: Dual a)
[SDual] :: forall a (n :: a). Sing n -> SDual ('Dual n)
data SAll (a :: All)
[SAll] :: forall (n :: Bool). Sing n -> SAll ('All n)
data SAny (a :: Any)
[SAny] :: forall (n :: Bool). Sing n -> SAny ('Any n)
data SSum (a1 :: Sum a)
[SSum] :: forall a (n :: a). Sing n -> SSum ('Sum n)
data SProduct (a1 :: Product a)
[SProduct] :: forall a (n :: a). Sing n -> SProduct ('Product n)
data SArg (a1 :: Arg a b)
[SArg] :: forall a b (n1 :: a) (n2 :: b). Sing n1 -> Sing n2 -> SArg ('Arg n1 n2)
type family GetMin (a1 :: Min a) :: a
type family GetMax (a1 :: Max a) :: a
type family GetFirst (a1 :: First a) :: a
type family GetLast (a1 :: Last a) :: a
type family UnwrapMonoid (a :: WrappedMonoid m) :: m
type family GetDual (a1 :: Dual a) :: a
type family GetAll (a :: All) :: Bool
type family GetAny (a :: Any) :: Bool
type family GetSum (a1 :: Sum a) :: a
type family GetProduct (a1 :: Product a) :: a
sGetMin :: forall a (t :: Min a). Sing t -> Sing (Apply (GetMinSym0 :: TyFun (Min a) a -> Type) t)
sGetMax :: forall a (t :: Max a). Sing t -> Sing (Apply (GetMaxSym0 :: TyFun (Max a) a -> Type) t)
sGetFirst :: forall a (t :: First a). Sing t -> Sing (Apply (GetFirstSym0 :: TyFun (First a) a -> Type) t)
sGetLast :: forall a (t :: Last a). Sing t -> Sing (Apply (GetLastSym0 :: TyFun (Last a) a -> Type) t)
sUnwrapMonoid :: forall m (t :: WrappedMonoid m). Sing t -> Sing (Apply (UnwrapMonoidSym0 :: TyFun (WrappedMonoid m) m -> Type) t)
sGetDual :: forall a (t :: Dual a). Sing t -> Sing (Apply (GetDualSym0 :: TyFun (Dual a) a -> Type) t)
sGetAll :: forall (t :: All). Sing t -> Sing (Apply GetAllSym0 t)
sGetAny :: forall (t :: Any). Sing t -> Sing (Apply GetAnySym0 t)
sGetSum :: forall a (t :: Sum a). Sing t -> Sing (Apply (GetSumSym0 :: TyFun (Sum a) a -> Type) t)
sGetProduct :: forall a (t :: Product a). Sing t -> Sing (Apply (GetProductSym0 :: TyFun (Product a) a -> Type) t)
data (a1 :: TyFun a a ~> a) <>@#@$
infixr 6 <>@#@$
data (a6989586621679209735 :: a) <>@#@$$ (b :: TyFun a a)
infixr 6 <>@#@$$
type family (a6989586621679209735 :: a) <>@#@$$$ (a6989586621679209736 :: a) :: a
infixr 6 <>@#@$$$
data SconcatSym0 (a1 :: TyFun NonEmpty a a)
type family SconcatSym1 (a6989586621679209739 :: NonEmpty a) :: a
data MinSym0 (a1 :: TyFun a Min a)
type family MinSym1 (a6989586621679693577 :: a) :: Min a
data GetMinSym0 (a1 :: TyFun Min a a)
type family GetMinSym1 (a6989586621679693580 :: Min a) :: a
data MaxSym0 (a1 :: TyFun a Max a)
type family MaxSym1 (a6989586621679693596 :: a) :: Max a
data GetMaxSym0 (a1 :: TyFun Max a a)
type family GetMaxSym1 (a6989586621679693599 :: Max a) :: a
data FirstSym0 (a1 :: TyFun a First a)
type family FirstSym1 (a6989586621679693615 :: a) :: First a
data GetFirstSym0 (a1 :: TyFun First a a)
type family GetFirstSym1 (a6989586621679693618 :: First a) :: a
data LastSym0 (a1 :: TyFun a Last a)
type family LastSym1 (a6989586621679693634 :: a) :: Last a
data GetLastSym0 (a1 :: TyFun Last a a)
type family GetLastSym1 (a6989586621679693637 :: Last a) :: a
data WrapMonoidSym0 (a :: TyFun m WrappedMonoid m)
type family WrapMonoidSym1 (a6989586621679693653 :: m) :: WrappedMonoid m
data UnwrapMonoidSym0 (a :: TyFun WrappedMonoid m m)
type family UnwrapMonoidSym1 (a6989586621679693656 :: WrappedMonoid m) :: m
data DualSym0 (a1 :: TyFun a Dual a)
type family DualSym1 (a6989586621679693488 :: a) :: Dual a
data GetDualSym0 (a1 :: TyFun Dual a a)
type family GetDualSym1 (a6989586621679693491 :: Dual a) :: a
data AllSym0 (a :: TyFun Bool All)
type family AllSym1 (a6989586621679693504 :: Bool) :: All
data GetAllSym0 (a :: TyFun All Bool)
type family GetAllSym1 (a6989586621679693507 :: All) :: Bool
data AnySym0 (a :: TyFun Bool Any)
type family AnySym1 (a6989586621679693520 :: Bool) :: Any
data GetAnySym0 (a :: TyFun Any Bool)
type family GetAnySym1 (a6989586621679693523 :: Any) :: Bool
data SumSym0 (a1 :: TyFun a Sum a)
type family SumSym1 (a6989586621679693539 :: a) :: Sum a
data GetSumSym0 (a1 :: TyFun Sum a a)
type family GetSumSym1 (a6989586621679693542 :: Sum a) :: a
data ProductSym0 (a1 :: TyFun a Product a)
type family ProductSym1 (a6989586621679693558 :: a) :: Product a
data GetProductSym0 (a1 :: TyFun Product a a)
type family GetProductSym1 (a6989586621679693561 :: Product a) :: a
data ArgSym0 (a1 :: TyFun a b ~> Arg a b)
data ArgSym1 (a6989586621680878139 :: a) (b1 :: TyFun b Arg a b)
type family ArgSym2 (a6989586621680878139 :: a) (a6989586621680878140 :: b) :: Arg a b
instance forall a b (z :: Data.Semigroup.Arg a b). GHC.Classes.Eq (Data.Semigroup.Singletons.SArg z)
instance forall a b (z :: Data.Semigroup.Arg a b). GHC.Classes.Ord (Data.Semigroup.Singletons.SArg z)
instance Control.Monad.Singletons.Internal.PApplicative Data.Semigroup.First
instance Control.Monad.Singletons.Internal.PApplicative Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.PApplicative Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.PApplicative Data.Semigroup.Min
instance Data.Singletons.Base.Enum.PEnum (Data.Semigroup.First a)
instance Data.Singletons.Base.Enum.PEnum (Data.Semigroup.Last a)
instance Data.Singletons.Base.Enum.PEnum (Data.Semigroup.Max a)
instance Data.Singletons.Base.Enum.PEnum (Data.Semigroup.Min a)
instance Data.Singletons.Base.Enum.PEnum (Data.Semigroup.WrappedMonoid a)
instance Data.Eq.Singletons.PEq (Data.Semigroup.Arg a b)
instance Data.Foldable.Singletons.PFoldable (Data.Semigroup.Arg a)
instance Data.Foldable.Singletons.PFoldable Data.Semigroup.First
instance Data.Foldable.Singletons.PFoldable Data.Semigroup.Last
instance Data.Foldable.Singletons.PFoldable Data.Semigroup.Max
instance Data.Foldable.Singletons.PFoldable Data.Semigroup.Min
instance Control.Monad.Singletons.Internal.PFunctor (Data.Semigroup.Arg a)
instance Control.Monad.Singletons.Internal.PFunctor Data.Semigroup.First
instance Control.Monad.Singletons.Internal.PFunctor Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.PFunctor Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.PFunctor Data.Semigroup.Min
instance Control.Monad.Singletons.Internal.PMonad Data.Semigroup.First
instance Control.Monad.Singletons.Internal.PMonad Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.PMonad Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.PMonad Data.Semigroup.Min
instance Data.Monoid.Singletons.PMonoid (Data.Semigroup.Max a)
instance Data.Monoid.Singletons.PMonoid (Data.Semigroup.Min a)
instance Data.Monoid.Singletons.PMonoid (Data.Semigroup.WrappedMonoid m)
instance GHC.Num.Singletons.PNum (Data.Semigroup.Max a)
instance GHC.Num.Singletons.PNum (Data.Semigroup.Min a)
instance Data.Ord.Singletons.POrd (Data.Semigroup.Arg a b)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Semigroup.First a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Semigroup.Last a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Semigroup.Max a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Semigroup.Min a)
instance Data.Semigroup.Singletons.Internal.Classes.PSemigroup (Data.Semigroup.WrappedMonoid m)
instance Text.Show.Singletons.PShow GHC.Internal.Data.Semigroup.Internal.All
instance Text.Show.Singletons.PShow GHC.Internal.Data.Semigroup.Internal.Any
instance Text.Show.Singletons.PShow (Data.Semigroup.Arg a b)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Semigroup.Internal.Dual a)
instance Text.Show.Singletons.PShow (Data.Semigroup.First a)
instance Text.Show.Singletons.PShow (Data.Semigroup.Last a)
instance Text.Show.Singletons.PShow (Data.Semigroup.Max a)
instance Text.Show.Singletons.PShow (Data.Semigroup.Min a)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Semigroup.Internal.Product a)
instance Text.Show.Singletons.PShow (GHC.Internal.Data.Semigroup.Internal.Sum a)
instance Text.Show.Singletons.PShow (Data.Semigroup.WrappedMonoid m)
instance Data.Traversable.Singletons.PTraversable (Data.Semigroup.Arg a)
instance Data.Traversable.Singletons.PTraversable Data.Semigroup.First
instance Data.Traversable.Singletons.PTraversable Data.Semigroup.Last
instance Data.Traversable.Singletons.PTraversable Data.Semigroup.Max
instance Data.Traversable.Singletons.PTraversable Data.Semigroup.Min
instance Control.Monad.Singletons.Internal.SApplicative Data.Semigroup.First
instance Control.Monad.Singletons.Internal.SApplicative Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.SApplicative Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.SApplicative Data.Semigroup.Min
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (Data.Semigroup.First a)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (Data.Semigroup.Last a)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (Data.Semigroup.Max a)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (Data.Semigroup.Min a)
instance Data.Singletons.Base.Enum.SEnum a => Data.Singletons.Base.Enum.SEnum (Data.Semigroup.WrappedMonoid a)
instance Data.Eq.Singletons.SEq a => Data.Eq.Singletons.SEq (Data.Semigroup.Arg a b)
instance Data.Foldable.Singletons.SFoldable (Data.Semigroup.Arg a)
instance Data.Foldable.Singletons.SFoldable Data.Semigroup.First
instance Data.Foldable.Singletons.SFoldable Data.Semigroup.Last
instance Data.Foldable.Singletons.SFoldable Data.Semigroup.Max
instance Data.Foldable.Singletons.SFoldable Data.Semigroup.Min
instance Control.Monad.Singletons.Internal.SFunctor (Data.Semigroup.Arg a)
instance Control.Monad.Singletons.Internal.SFunctor Data.Semigroup.First
instance Control.Monad.Singletons.Internal.SFunctor Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.SFunctor Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.SFunctor Data.Semigroup.Min
instance Control.Monad.Singletons.Internal.SMonad Data.Semigroup.First
instance Control.Monad.Singletons.Internal.SMonad Data.Semigroup.Last
instance Control.Monad.Singletons.Internal.SMonad Data.Semigroup.Max
instance Control.Monad.Singletons.Internal.SMonad Data.Semigroup.Min
instance (Data.Ord.Singletons.SOrd a, Data.Singletons.Base.Enum.SBounded a) => Data.Monoid.Singletons.SMonoid (Data.Semigroup.Max a)
instance (Data.Ord.Singletons.SOrd a, Data.Singletons.Base.Enum.SBounded a) => Data.Monoid.Singletons.SMonoid (Data.Semigroup.Min a)
instance Data.Monoid.Singletons.SMonoid m => Data.Monoid.Singletons.SMonoid (Data.Semigroup.WrappedMonoid m)
instance GHC.Num.Singletons.SNum a => GHC.Num.Singletons.SNum (Data.Semigroup.Max a)
instance GHC.Num.Singletons.SNum a => GHC.Num.Singletons.SNum (Data.Semigroup.Min a)
instance Data.Ord.Singletons.SOrd a => Data.Ord.Singletons.SOrd (Data.Semigroup.Arg a b)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Semigroup.First a)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Semigroup.Last a)
instance Data.Ord.Singletons.SOrd a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Semigroup.Max a)
instance Data.Ord.Singletons.SOrd a => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Semigroup.Min a)
instance Data.Monoid.Singletons.SMonoid m => Data.Semigroup.Singletons.Internal.Classes.SSemigroup (Data.Semigroup.WrappedMonoid m)
instance Text.Show.Singletons.SShow GHC.Types.Bool => Text.Show.Singletons.SShow GHC.Internal.Data.Semigroup.Internal.All
instance Text.Show.Singletons.SShow GHC.Types.Bool => Text.Show.Singletons.SShow GHC.Internal.Data.Semigroup.Internal.Any
instance (Text.Show.Singletons.SShow a, Text.Show.Singletons.SShow b) => Text.Show.Singletons.SShow (Data.Semigroup.Arg a b)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Data.Semigroup.Internal.Dual a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (Data.Semigroup.First a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (Data.Semigroup.Last a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (Data.Semigroup.Max a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (Data.Semigroup.Min a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Data.Semigroup.Internal.Product a)
instance Text.Show.Singletons.SShow a => Text.Show.Singletons.SShow (GHC.Internal.Data.Semigroup.Internal.Sum a)
instance Text.Show.Singletons.SShow m => Text.Show.Singletons.SShow (Data.Semigroup.WrappedMonoid m)
instance Data.Traversable.Singletons.STraversable (Data.Semigroup.Arg a)
instance Data.Traversable.Singletons.STraversable Data.Semigroup.First
instance Data.Traversable.Singletons.STraversable Data.Semigroup.Last
instance Data.Traversable.Singletons.STraversable Data.Semigroup.Max
instance Data.Traversable.Singletons.STraversable Data.Semigroup.Min
instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SAll z)
instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SAny z)
instance forall a b (z :: Data.Semigroup.Arg a b). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Internal.Show.Show (Data.Semigroup.Singletons.SArg z)
instance forall a (z :: GHC.Internal.Data.Semigroup.Internal.Dual a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SDual z)
instance forall a (z :: Data.Semigroup.First a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SFirst z)
instance forall a (z :: Data.Semigroup.Last a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SLast z)
instance forall a (z :: Data.Semigroup.Max a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SMax z)
instance forall a (z :: Data.Semigroup.Min a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SMin z)
instance forall a (z :: GHC.Internal.Data.Semigroup.Internal.Product a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SProduct z)
instance forall a (z :: GHC.Internal.Data.Semigroup.Internal.Sum a). Data.Singletons.ShowSing.ShowSing a => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SSum z)
instance forall m (z :: Data.Semigroup.WrappedMonoid m). Data.Singletons.ShowSing.ShowSing m => GHC.Internal.Show.Show (Data.Semigroup.Singletons.Internal.Wrappers.SWrappedMonoid z)
instance Data.Singletons.SingI1 Data.Semigroup.Singletons.ArgSym1
instance forall k1 a (n :: a). Data.Singletons.SingI n => Data.Singletons.SingI1 ('Data.Semigroup.Arg n)
instance Data.Singletons.SingI2 'Data.Semigroup.Arg
instance forall a (n1 :: a) b (n2 :: b). (Data.Singletons.SingI n1, Data.Singletons.SingI n2) => Data.Singletons.SingI ('Data.Semigroup.Arg n1 n2)
instance Data.Singletons.SingI Data.Semigroup.Singletons.ArgSym0
instance forall a (d :: a) b. Data.Singletons.SingI d => Data.Singletons.SingI (Data.Semigroup.Singletons.ArgSym1 d)
instance (Data.Singletons.SingKind a, Data.Singletons.SingKind b) => Data.Singletons.SingKind (Data.Semigroup.Arg a b)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Abs_6989586621680899785Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Abs_6989586621680900550Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ArgSym0
instance forall a b (a6989586621680878139 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ArgSym1 a6989586621680878139)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Compare_6989586621680900729Sym0
instance forall a b (a6989586621680900734 :: Data.Semigroup.Arg a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Compare_6989586621680900729Sym1 a6989586621680900734)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromThenTo_6989586621680899483Sym0
instance forall a (a6989586621680899489 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680899483Sym1 a6989586621680899489)
instance forall a (a6989586621680899489 :: Data.Semigroup.Min a) (a6989586621680899490 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680899483Sym2 a6989586621680899489 a6989586621680899490)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900431Sym0
instance forall a (a6989586621680900437 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900431Sym1 a6989586621680900437)
instance forall a (a6989586621680900437 :: Data.Semigroup.Max a) (a6989586621680900438 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900431Sym2 a6989586621680900437 a6989586621680900438)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900950Sym0
instance forall a (a6989586621680900956 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900950Sym1 a6989586621680900956)
instance forall a (a6989586621680900956 :: Data.Semigroup.First a) (a6989586621680900957 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680900950Sym2 a6989586621680900956 a6989586621680900957)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901158Sym0
instance forall a (a6989586621680901164 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901158Sym1 a6989586621680901164)
instance forall a (a6989586621680901164 :: Data.Semigroup.Last a) (a6989586621680901165 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901158Sym2 a6989586621680901164 a6989586621680901165)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901327Sym0
instance forall a (a6989586621680901333 :: Data.Semigroup.WrappedMonoid a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901327Sym1 a6989586621680901333)
instance forall a (a6989586621680901333 :: Data.Semigroup.WrappedMonoid a) (a6989586621680901334 :: Data.Semigroup.WrappedMonoid a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromThenTo_6989586621680901327Sym2 a6989586621680901333 a6989586621680901334)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromTo_6989586621680899471Sym0
instance forall a (a6989586621680899476 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromTo_6989586621680899471Sym1 a6989586621680899476)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromTo_6989586621680900419Sym0
instance forall a (a6989586621680900424 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromTo_6989586621680900419Sym1 a6989586621680900424)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromTo_6989586621680900938Sym0
instance forall a (a6989586621680900943 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromTo_6989586621680900938Sym1 a6989586621680900943)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromTo_6989586621680901146Sym0
instance forall a (a6989586621680901151 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromTo_6989586621680901146Sym1 a6989586621680901151)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.EnumFromTo_6989586621680901315Sym0
instance forall a (a6989586621680901320 :: Data.Semigroup.WrappedMonoid a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.EnumFromTo_6989586621680901315Sym1 a6989586621680901320)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Fmap_6989586621680899535Sym0
instance forall a b (a6989586621680899540 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Fmap_6989586621680899535Sym1 a6989586621680899540)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Fmap_6989586621680900445Sym0
instance forall a b (a6989586621680900450 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Fmap_6989586621680900445Sym1 a6989586621680900450)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Fmap_6989586621680900645Sym0
instance forall a1 b a2 (a6989586621680900650 :: a1 Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Fmap_6989586621680900645Sym1 a6989586621680900650)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Fmap_6989586621680900964Sym0
instance forall a b (a6989586621680900969 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Fmap_6989586621680900964Sym1 a6989586621680900969)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Fmap_6989586621680901172Sym0
instance forall a b (a6989586621680901177 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Fmap_6989586621680901172Sym1 a6989586621680901177)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FoldMap_6989586621680899891Sym0
instance forall a m (a6989586621680899896 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.FoldMap_6989586621680899891Sym1 a6989586621680899896)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FoldMap_6989586621680900574Sym0
instance forall a m (a6989586621680900579 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.FoldMap_6989586621680900574Sym1 a6989586621680900579)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FoldMap_6989586621680900806Sym0
instance forall a1 m a2 (a6989586621680900811 :: a1 Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.FoldMap_6989586621680900806Sym1 a6989586621680900811)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FoldMap_6989586621680901026Sym0
instance forall a m (a6989586621680901031 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.FoldMap_6989586621680901026Sym1 a6989586621680901031)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FoldMap_6989586621680901234Sym0
instance forall a m (a6989586621680901239 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.FoldMap_6989586621680901234Sym1 a6989586621680901239)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Foldr_6989586621680899903Sym0
instance forall a b (a6989586621680899909 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680899903Sym1 a6989586621680899909)
instance forall a b (a6989586621680899909 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680899910 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680899903Sym2 a6989586621680899909 a6989586621680899910)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Foldr_6989586621680900586Sym0
instance forall a b (a6989586621680900592 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680900586Sym1 a6989586621680900592)
instance forall a b (a6989586621680900592 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680900593 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680900586Sym2 a6989586621680900592 a6989586621680900593)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Foldr_6989586621680900823Sym0
instance forall a1 b a2 (a6989586621680900829 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680900823Sym1 a6989586621680900829)
instance forall a1 b a2 (a6989586621680900829 :: a1 Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680900830 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680900823Sym2 a6989586621680900829 a6989586621680900830)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Foldr_6989586621680901038Sym0
instance forall a b (a6989586621680901044 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680901038Sym1 a6989586621680901044)
instance forall a b (a6989586621680901044 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680901045 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680901038Sym2 a6989586621680901044 a6989586621680901045)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Foldr_6989586621680901246Sym0
instance forall a b (a6989586621680901252 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680901246Sym1 a6989586621680901252)
instance forall a b (a6989586621680901252 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621680901253 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Foldr_6989586621680901246Sym2 a6989586621680901252 a6989586621680901253)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromEnum_6989586621680899463Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromEnum_6989586621680900411Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromEnum_6989586621680900930Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromEnum_6989586621680901138Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromEnum_6989586621680901307Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromInteger_6989586621680899799Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.FromInteger_6989586621680900564Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680899555Sym0
instance forall k1 k2 k3 (_z_69895866216808990466989586621680899553 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680899555Sym1 _z_69895866216808990466989586621680899553)
instance forall k1 k2 k3 (_z_69895866216808990466989586621680899553 :: k1) (a_69895866216808990526989586621680899554 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680899555Sym2 _z_69895866216808990466989586621680899553 a_69895866216808990526989586621680899554)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900465Sym0
instance forall k1 k2 k3 (_z_69895866216808990716989586621680900463 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900465Sym1 _z_69895866216808990716989586621680900463)
instance forall k1 k2 k3 (_z_69895866216808990716989586621680900463 :: k1) (a_69895866216808990776989586621680900464 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900465Sym2 _z_69895866216808990716989586621680900463 a_69895866216808990776989586621680900464)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900655Sym0
instance forall k1 k2 k3 k4 (_f_69895866216808990956989586621680900652 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900655Sym1 _f_69895866216808990956989586621680900652)
instance forall k1 k2 k3 k4 (_f_69895866216808990956989586621680900652 :: k1) (a_69895866216808991016989586621680900653 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900655Sym2 _f_69895866216808990956989586621680900652 a_69895866216808991016989586621680900653)
instance forall k1 k2 k3 k4 (_f_69895866216808990956989586621680900652 :: k1) (a_69895866216808991016989586621680900653 :: k2) (a_69895866216808991036989586621680900654 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900655Sym3 _f_69895866216808990956989586621680900652 a_69895866216808991016989586621680900653 a_69895866216808991036989586621680900654)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900671Sym0
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900671Sym1 _z_69895866216808990976989586621680900668)
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1) (a_69895866216808991096989586621680900669 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900671Sym2 _z_69895866216808990976989586621680900668 a_69895866216808991096989586621680900669)
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1) (a_69895866216808991096989586621680900669 :: k2) (a_69895866216808991116989586621680900670 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900671Sym3 _z_69895866216808990976989586621680900668 a_69895866216808991096989586621680900669 a_69895866216808991116989586621680900670)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900675Sym0
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900675Sym1 _z_69895866216808990976989586621680900668)
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1) (a_69895866216808991096989586621680900669 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900675Sym2 _z_69895866216808990976989586621680900668 a_69895866216808991096989586621680900669)
instance forall k1 k2 k3 k4 (_z_69895866216808990976989586621680900668 :: k1) (a_69895866216808991096989586621680900669 :: k2) (a_69895866216808991116989586621680900670 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900675Sym3 _z_69895866216808990976989586621680900668 a_69895866216808991096989586621680900669 a_69895866216808991116989586621680900670)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900816Sym0
instance forall k1 k2 k3 k4 k5 (_f_69895866216808991236989586621680900813 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900816Sym1 _f_69895866216808991236989586621680900813)
instance forall k1 k2 k3 k4 k5 (_f_69895866216808991236989586621680900813 :: k1) (a_69895866216808991296989586621680900814 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900816Sym2 _f_69895866216808991236989586621680900813 a_69895866216808991296989586621680900814)
instance forall k1 k2 k3 k4 k5 (_f_69895866216808991236989586621680900813 :: k1) (a_69895866216808991296989586621680900814 :: k2) (a_69895866216808991316989586621680900815 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900816Sym3 _f_69895866216808991236989586621680900813 a_69895866216808991296989586621680900814 a_69895866216808991316989586621680900815)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900836Sym0
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808991236989586621680900832 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900836Sym1 _f_69895866216808991236989586621680900832)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808991236989586621680900832 :: k1) (_z_69895866216808991256989586621680900833 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900836Sym2 _f_69895866216808991236989586621680900832 _z_69895866216808991256989586621680900833)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808991236989586621680900832 :: k1) (_z_69895866216808991256989586621680900833 :: k2) (a_69895866216808991376989586621680900834 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900836Sym3 _f_69895866216808991236989586621680900832 _z_69895866216808991256989586621680900833 a_69895866216808991376989586621680900834)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808991236989586621680900832 :: k1) (_z_69895866216808991256989586621680900833 :: k2) (a_69895866216808991376989586621680900834 :: k3) (a_69895866216808991396989586621680900835 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900836Sym4 _f_69895866216808991236989586621680900832 _z_69895866216808991256989586621680900833 a_69895866216808991376989586621680900834 a_69895866216808991396989586621680900835)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808991236989586621680900832 :: k1) (_z_69895866216808991256989586621680900833 :: k2) (a_69895866216808991376989586621680900834 :: k3) (a_69895866216808991396989586621680900835 :: k4) (n1_69895866216808991336989586621680900838 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900836Sym5 _f_69895866216808991236989586621680900832 _z_69895866216808991256989586621680900833 a_69895866216808991376989586621680900834 a_69895866216808991396989586621680900835 n1_69895866216808991336989586621680900838)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680900984Sym0
instance forall k1 k2 k3 (_z_69895866216808991526989586621680900982 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900984Sym1 _z_69895866216808991526989586621680900982)
instance forall k1 k2 k3 (_z_69895866216808991526989586621680900982 :: k1) (a_69895866216808991586989586621680900983 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680900984Sym2 _z_69895866216808991526989586621680900982 a_69895866216808991586989586621680900983)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Lambda_6989586621680901192Sym0
instance forall k1 k2 k3 (_z_69895866216808991776989586621680901190 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680901192Sym1 _z_69895866216808991776989586621680901190)
instance forall k1 k2 k3 (_z_69895866216808991776989586621680901190 :: k1) (a_69895866216808991836989586621680901191 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Lambda_6989586621680901192Sym2 _z_69895866216808991776989586621680901190 a_69895866216808991836989586621680901191)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Let6989586621680900755XSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755XSym1 a6989586621680900751)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755XSym2 a6989586621680900751 wild_69895866216808988796989586621680900752)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755XSym3 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4) (wild_69895866216808988816989586621680900754 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755XSym4 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753 wild_69895866216808988816989586621680900754)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4) (wild_69895866216808988816989586621680900754 :: k5) (arg_69895866216808988756989586621680900747 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755XSym5 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753 wild_69895866216808988816989586621680900754 arg_69895866216808988756989586621680900747)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Let6989586621680900755YSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755YSym1 a6989586621680900751)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755YSym2 a6989586621680900751 wild_69895866216808988796989586621680900752)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755YSym3 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4) (wild_69895866216808988816989586621680900754 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755YSym4 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753 wild_69895866216808988816989586621680900754)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900751 :: k2) (wild_69895866216808988796989586621680900752 :: k3) (b6989586621680900753 :: k4) (wild_69895866216808988816989586621680900754 :: k5) (arg_69895866216808988756989586621680900747 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900755YSym5 a6989586621680900751 wild_69895866216808988796989586621680900752 b6989586621680900753 wild_69895866216808988816989586621680900754 arg_69895866216808988756989586621680900747)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Let6989586621680900779XSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779XSym1 a6989586621680900775)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779XSym2 a6989586621680900775 wild_69895866216808988916989586621680900776)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779XSym3 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4) (wild_69895866216808988936989586621680900778 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779XSym4 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777 wild_69895866216808988936989586621680900778)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4) (wild_69895866216808988936989586621680900778 :: k5) (arg_69895866216808988876989586621680900771 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779XSym5 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777 wild_69895866216808988936989586621680900778 arg_69895866216808988876989586621680900771)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Let6989586621680900779YSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779YSym1 a6989586621680900775)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779YSym2 a6989586621680900775 wild_69895866216808988916989586621680900776)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779YSym3 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4) (wild_69895866216808988936989586621680900778 :: k5). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779YSym4 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777 wild_69895866216808988936989586621680900778)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680900775 :: k2) (wild_69895866216808988916989586621680900776 :: k3) (b6989586621680900777 :: k4) (wild_69895866216808988936989586621680900778 :: k5) (arg_69895866216808988876989586621680900771 :: k6). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Let6989586621680900779YSym5 a6989586621680900775 wild_69895866216808988916989586621680900776 b6989586621680900777 wild_69895866216808988936989586621680900778 arg_69895866216808988876989586621680900771)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.LiftA2_6989586621680899346Sym0
instance forall a b c (a6989586621680899352 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680899346Sym1 a6989586621680899352)
instance forall a b c (a6989586621680899352 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680899353 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680899346Sym2 a6989586621680899352 a6989586621680899353)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.LiftA2_6989586621680900375Sym0
instance forall a b c (a6989586621680900381 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680900375Sym1 a6989586621680900381)
instance forall a b c (a6989586621680900381 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680900382 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680900375Sym2 a6989586621680900381 a6989586621680900382)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.LiftA2_6989586621680900894Sym0
instance forall a b c (a6989586621680900900 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680900894Sym1 a6989586621680900900)
instance forall a b c (a6989586621680900900 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680900901 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680900894Sym2 a6989586621680900900 a6989586621680900901)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.LiftA2_6989586621680901102Sym0
instance forall a b c (a6989586621680901108 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680901102Sym1 a6989586621680901108)
instance forall a b c (a6989586621680901108 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621680901109 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.LiftA2_6989586621680901102Sym2 a6989586621680901108 a6989586621680901109)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Max_6989586621680900764Sym0
instance forall a b (a6989586621680900769 :: Data.Semigroup.Arg a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Max_6989586621680900764Sym1 a6989586621680900769)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Min_6989586621680900740Sym0
instance forall a b (a6989586621680900745 :: Data.Semigroup.Arg a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Min_6989586621680900740Sym1 a6989586621680900745)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Negate_6989586621680899778Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Negate_6989586621680900543Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pred_6989586621680899447Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pred_6989586621680900395Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pred_6989586621680900914Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pred_6989586621680901122Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pred_6989586621680901291Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pure_6989586621680899304Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pure_6989586621680900333Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pure_6989586621680900854Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Pure_6989586621680901062Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680879972Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680879972Sym1 a6989586621680879980)
instance forall a (a6989586621680879980 :: GHC.Num.Natural.Natural) (a6989586621680879981 :: GHC.Internal.Data.Semigroup.Internal.Dual a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680879972Sym2 a6989586621680879980 a6989586621680879981)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680879993Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680879993Sym1 a6989586621680880001)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680879993Sym2 a6989586621680880001 a6989586621680880002)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880014Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880014Sym1 a6989586621680880022)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880014Sym2 a6989586621680880022 a6989586621680880023)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880038Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880038Sym1 a6989586621680880046)
instance forall a (a6989586621680880046 :: GHC.Num.Natural.Natural) (a6989586621680880047 :: GHC.Internal.Data.Semigroup.Internal.Sum a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880038Sym2 a6989586621680880046 a6989586621680880047)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880062Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880062Sym1 a6989586621680880070)
instance forall a (a6989586621680880070 :: GHC.Num.Natural.Natural) (a6989586621680880071 :: GHC.Internal.Data.Semigroup.Internal.Product a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880062Sym2 a6989586621680880070 a6989586621680880071)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880086Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880086Sym1 a6989586621680880094)
instance forall a (a6989586621680880094 :: GHC.Num.Natural.Natural) (a6989586621680880095 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880086Sym2 a6989586621680880094 a6989586621680880095)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880110Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880110Sym1 a6989586621680880118)
instance forall a (a6989586621680880118 :: GHC.Num.Natural.Natural) (a6989586621680880119 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880110Sym2 a6989586621680880118 a6989586621680880119)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880134Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880134Sym1 a6989586621680880142)
instance forall a (a6989586621680880142 :: GHC.Num.Natural.Natural) (a6989586621680880143 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880134Sym2 a6989586621680880142 a6989586621680880143)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880158Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880158Sym1 a6989586621680880166)
instance forall a (a6989586621680880166 :: GHC.Num.Natural.Natural) (a6989586621680880167 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880158Sym2 a6989586621680880166 a6989586621680880167)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680880182Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880182Sym1 a6989586621680880190)
instance forall m (a6989586621680880190 :: GHC.Num.Natural.Natural) (a6989586621680880191 :: Data.Semigroup.WrappedMonoid m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680880182Sym2 a6989586621680880190 a6989586621680880191)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ShowsPrec_6989586621680900789Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680900789Sym1 a6989586621680900797)
instance forall a b (a6989586621680900797 :: GHC.Num.Natural.Natural) (a6989586621680900798 :: Data.Semigroup.Arg a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.ShowsPrec_6989586621680900789Sym2 a6989586621680900797 a6989586621680900798)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Signum_6989586621680899792Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Signum_6989586621680900557Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Succ_6989586621680899440Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Succ_6989586621680900388Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Succ_6989586621680900907Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Succ_6989586621680901115Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Succ_6989586621680901284Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899314Sym0
instance forall a b (a6989586621680899319 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899314Sym1 a6989586621680899319)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899324Sym0
instance forall a b (a6989586621680899329 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899324Sym1 a6989586621680899329)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899334Sym0
instance forall a b (a6989586621680899339 :: Data.Semigroup.Min (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899334Sym1 a6989586621680899339)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899546Sym0
instance forall a b (a6989586621680899551 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899546Sym1 a6989586621680899551)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899571Sym0
instance forall a b (a6989586621680899580 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899571Sym1 a6989586621680899580)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899586Sym0
instance forall a b (a6989586621680899591 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899586Sym1 a6989586621680899591)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899620Sym0
instance forall a (a6989586621680899625 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899620Sym1 a6989586621680899625)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899746Sym0
instance forall a (a6989586621680899751 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899746Sym1 a6989586621680899751)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899757Sym0
instance forall a (a6989586621680899762 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899757Sym1 a6989586621680899762)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680899768Sym0
instance forall a (a6989586621680899773 :: Data.Semigroup.Min a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680899768Sym1 a6989586621680899773)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900343Sym0
instance forall a b (a6989586621680900348 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900343Sym1 a6989586621680900348)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900353Sym0
instance forall a b (a6989586621680900358 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900353Sym1 a6989586621680900358)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900363Sym0
instance forall a b (a6989586621680900368 :: Data.Semigroup.Max (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900363Sym1 a6989586621680900368)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900456Sym0
instance forall a b (a6989586621680900461 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900456Sym1 a6989586621680900461)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900471Sym0
instance forall a b (a6989586621680900480 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900471Sym1 a6989586621680900480)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900486Sym0
instance forall a b (a6989586621680900491 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900486Sym1 a6989586621680900491)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900497Sym0
instance forall a (a6989586621680900502 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900497Sym1 a6989586621680900502)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900511Sym0
instance forall a (a6989586621680900516 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900511Sym1 a6989586621680900516)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900522Sym0
instance forall a (a6989586621680900527 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900522Sym1 a6989586621680900527)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900533Sym0
instance forall a (a6989586621680900538 :: Data.Semigroup.Max a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900533Sym1 a6989586621680900538)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900634Sym0
instance forall a b (a6989586621680900639 :: Data.Semigroup.Arg a b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900634Sym1 a6989586621680900639)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900661Sym0
instance forall a1 a2 b (a6989586621680900666 :: a1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900661Sym1 a6989586621680900666)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900862Sym0
instance forall a b (a6989586621680900867 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900862Sym1 a6989586621680900867)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900872Sym0
instance forall a b (a6989586621680900877 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900872Sym1 a6989586621680900877)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900882Sym0
instance forall a b (a6989586621680900887 :: Data.Semigroup.First (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900882Sym1 a6989586621680900887)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900975Sym0
instance forall a b (a6989586621680900980 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900975Sym1 a6989586621680900980)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680900990Sym0
instance forall a b (a6989586621680900999 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680900990Sym1 a6989586621680900999)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901005Sym0
instance forall a b (a6989586621680901010 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901005Sym1 a6989586621680901010)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901016Sym0
instance forall a (a6989586621680901021 :: Data.Semigroup.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901016Sym1 a6989586621680901021)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901070Sym0
instance forall a b (a6989586621680901075 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901070Sym1 a6989586621680901075)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901080Sym0
instance forall a b (a6989586621680901085 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901080Sym1 a6989586621680901085)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901090Sym0
instance forall a b (a6989586621680901095 :: Data.Semigroup.Last (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901090Sym1 a6989586621680901095)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901183Sym0
instance forall a b (a6989586621680901188 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901183Sym1 a6989586621680901188)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901198Sym0
instance forall a b (a6989586621680901207 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901198Sym1 a6989586621680901207)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901213Sym0
instance forall a b (a6989586621680901218 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901213Sym1 a6989586621680901218)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901224Sym0
instance forall a (a6989586621680901229 :: Data.Semigroup.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901224Sym1 a6989586621680901229)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.TFHelper_6989586621680901271Sym0
instance forall m (a6989586621680901276 :: Data.Semigroup.WrappedMonoid m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.TFHelper_6989586621680901271Sym1 a6989586621680901276)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ToEnum_6989586621680899454Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ToEnum_6989586621680900402Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ToEnum_6989586621680900921Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ToEnum_6989586621680901129Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.ToEnum_6989586621680901298Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Traverse_6989586621680900323Sym0
instance forall a (f :: * -> *) b (a6989586621680900328 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Traverse_6989586621680900323Sym1 a6989586621680900328)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Traverse_6989586621680900600Sym0
instance forall a (f :: * -> *) b (a6989586621680900605 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Traverse_6989586621680900600Sym1 a6989586621680900605)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Traverse_6989586621680900843Sym0
instance forall a1 (f :: * -> *) b a2 (a6989586621680900848 :: a1 Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Traverse_6989586621680900843Sym1 a6989586621680900848)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Traverse_6989586621680901052Sym0
instance forall a (f :: * -> *) b (a6989586621680901057 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Traverse_6989586621680901052Sym1 a6989586621680901057)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Semigroup.Singletons.Traverse_6989586621680901260Sym0
instance forall a (f :: * -> *) b (a6989586621680901265 :: a Data.Singletons.~> f b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Semigroup.Singletons.Traverse_6989586621680901260Sym1 a6989586621680901265)
-- | Defines functions and datatypes relating to the singleton for '[]',
-- including singled versions of a few of the definitions in
-- Data.List.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.List. Also, please excuse
-- the apparent repeated variable names. This is due to an interaction
-- between Template Haskell and Haddock.
module Data.List.Singletons
type family Sing :: k -> Type
data SList (a1 :: [a])
[SNil] :: forall a. SList ('[] :: [a])
[SCons] :: forall a (n1 :: a) (n2 :: [a]). Sing n1 -> Sing n2 -> SList (n1 ': n2)
infixr 5 `SCons`
type family (a1 :: [a]) ++ (a2 :: [a]) :: [a]
infixr 5 ++
(%++) :: forall a (t1 :: [a]) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((++@#@$) :: TyFun [a] ([a] ~> [a]) -> Type) t1) t2)
infixr 5 %++
type family Head (a1 :: [a]) :: a
sHead :: forall a (t :: [a]). Sing t -> Sing (Apply (HeadSym0 :: TyFun [a] a -> Type) t)
type family Last (a1 :: [a]) :: a
sLast :: forall a (t :: [a]). Sing t -> Sing (Apply (LastSym0 :: TyFun [a] a -> Type) t)
type family Tail (a1 :: [a]) :: [a]
sTail :: forall a (t :: [a]). Sing t -> Sing (Apply (TailSym0 :: TyFun [a] [a] -> Type) t)
type family Init (a1 :: [a]) :: [a]
sInit :: forall a (t :: [a]). Sing t -> Sing (Apply (InitSym0 :: TyFun [a] [a] -> Type) t)
type family Null (arg :: t a) :: Bool
sNull :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
type family Length (arg :: t a) :: Natural
sLength :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
type family Map (a1 :: a ~> b) (a2 :: [a]) :: [b]
sMap :: forall a b (t1 :: a ~> b) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapSym0 :: TyFun (a ~> b) ([a] ~> [b]) -> Type) t1) t2)
type family Reverse (a1 :: [a]) :: [a]
sReverse :: forall a (t :: [a]). Sing t -> Sing (Apply (ReverseSym0 :: TyFun [a] [a] -> Type) t)
type family Intersperse (a1 :: a) (a2 :: [a]) :: [a]
sIntersperse :: forall a (t1 :: a) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (IntersperseSym0 :: TyFun a ([a] ~> [a]) -> Type) t1) t2)
type family Intercalate (a1 :: [a]) (a2 :: [[a]]) :: [a]
sIntercalate :: forall a (t1 :: [a]) (t2 :: [[a]]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (IntercalateSym0 :: TyFun [a] ([[a]] ~> [a]) -> Type) t1) t2)
type family Transpose (a1 :: [[a]]) :: [[a]]
sTranspose :: forall a (t :: [[a]]). Sing t -> Sing (Apply (TransposeSym0 :: TyFun [[a]] [[a]] -> Type) t)
type family Subsequences (a1 :: [a]) :: [[a]]
sSubsequences :: forall a (t :: [a]). Sing t -> Sing (Apply (SubsequencesSym0 :: TyFun [a] [[a]] -> Type) t)
type family Permutations (a1 :: [a]) :: [[a]]
sPermutations :: forall a (t :: [a]). Sing t -> Sing (Apply (PermutationsSym0 :: TyFun [a] [[a]] -> Type) t)
type family Foldl (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b
sFoldl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
type family Foldl' (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b
sFoldl' :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
type family Foldl1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a
sFoldl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
type family Foldl1' (a1 :: a ~> a ~> a) (a2 :: [a]) :: a
sFoldl1' :: forall a (t1 :: a ~> (a ~> a)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1'Sym0 :: TyFun (a ~> (a ~> a)) ([a] ~> a) -> Type) t1) t2)
type family Foldr (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b
sFoldr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
type family Foldr1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a
sFoldr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
type family Concat (a1 :: t [a]) :: [a]
sConcat :: forall (t1 :: Type -> Type) a (t2 :: t1 [a]). SFoldable t1 => Sing t2 -> Sing (Apply (ConcatSym0 :: TyFun (t1 [a]) [a] -> Type) t2)
type family ConcatMap (a1 :: a ~> [b]) (a2 :: t a) :: [b]
sConcatMap :: forall a b (t1 :: Type -> Type) (t2 :: a ~> [b]) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ConcatMapSym0 :: TyFun (a ~> [b]) (t1 a ~> [b]) -> Type) t2) t3)
type family And (a :: t Bool) :: Bool
sAnd :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (AndSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Or (a :: t Bool) :: Bool
sOr :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (OrSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Any (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAny :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AnySym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family All (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAll :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AllSym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family Sum (arg :: t a) :: a
sSum :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
type family Product (arg :: t a) :: a
sProduct :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
type family Maximum (arg :: t a) :: a
sMaximum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
type family Minimum (arg :: t a) :: a
sMinimum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
type family Scanl (a1 :: b ~> a ~> b) (a2 :: b) (a3 :: [a]) :: [b]
sScanl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanlSym0 :: TyFun (b ~> (a ~> b)) (b ~> ([a] ~> [b])) -> Type) t1) t2) t3)
type family Scanl1 (a1 :: a ~> a ~> a) (a2 :: [a]) :: [a]
sScanl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanl1Sym0 :: TyFun (a ~> (a ~> a)) ([a] ~> [a]) -> Type) t1) t2)
type family Scanr (a1 :: a ~> b ~> b) (a2 :: b) (a3 :: [a]) :: [b]
sScanr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanrSym0 :: TyFun (a ~> (b ~> b)) (b ~> ([a] ~> [b])) -> Type) t1) t2) t3)
type family Scanr1 (a1 :: a ~> a ~> a) (a2 :: [a]) :: [a]
sScanr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanr1Sym0 :: TyFun (a ~> (a ~> a)) ([a] ~> [a]) -> Type) t1) t2)
type family MapAccumL (a1 :: a ~> b ~> (a, c)) (a2 :: a) (a3 :: t b) :: (a, t c)
sMapAccumL :: forall (t1 :: Type -> Type) a b c (t2 :: a ~> (b ~> (a, c))) (t3 :: a) (t4 :: t1 b). STraversable t1 => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (MapAccumLSym0 :: TyFun (a ~> (b ~> (a, c))) (a ~> (t1 b ~> (a, t1 c))) -> Type) t2) t3) t4)
type family MapAccumR (a1 :: a ~> b ~> (a, c)) (a2 :: a) (a3 :: t b) :: (a, t c)
sMapAccumR :: forall a b c (t1 :: Type -> Type) (t2 :: a ~> (b ~> (a, c))) (t3 :: a) (t4 :: t1 b). STraversable t1 => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (MapAccumRSym0 :: TyFun (a ~> (b ~> (a, c))) (a ~> (t1 b ~> (a, t1 c))) -> Type) t2) t3) t4)
type family Replicate (a1 :: Natural) (a2 :: a) :: [a]
sReplicate :: forall a (t1 :: Natural) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ReplicateSym0 :: TyFun Natural (a ~> [a]) -> Type) t1) t2)
type family Unfoldr (a1 :: b ~> Maybe (a, b)) (a2 :: b) :: [a]
sUnfoldr :: forall b a (t1 :: b ~> Maybe (a, b)) (t2 :: b). Sing t1 -> Sing t2 -> Sing (Apply (Apply (UnfoldrSym0 :: TyFun (b ~> Maybe (a, b)) (b ~> [a]) -> Type) t1) t2)
type family Take (a1 :: Natural) (a2 :: [a]) :: [a]
sTake :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeSym0 :: TyFun Natural ([a] ~> [a]) -> Type) t1) t2)
type family Drop (a1 :: Natural) (a2 :: [a]) :: [a]
sDrop :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropSym0 :: TyFun Natural ([a] ~> [a]) -> Type) t1) t2)
type family SplitAt (a1 :: Natural) (a2 :: [a]) :: ([a], [a])
sSplitAt :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SplitAtSym0 :: TyFun Natural ([a] ~> ([a], [a])) -> Type) t1) t2)
type family TakeWhile (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sTakeWhile :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeWhileSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family DropWhile (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sDropWhile :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropWhileSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family DropWhileEnd (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sDropWhileEnd :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropWhileEndSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family Span (a1 :: a ~> Bool) (a2 :: [a]) :: ([a], [a])
sSpan :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SpanSym0 :: TyFun (a ~> Bool) ([a] ~> ([a], [a])) -> Type) t1) t2)
type family Break (a1 :: a ~> Bool) (a2 :: [a]) :: ([a], [a])
sBreak :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (BreakSym0 :: TyFun (a ~> Bool) ([a] ~> ([a], [a])) -> Type) t1) t2)
type family StripPrefix (a1 :: [a]) (a2 :: [a]) :: Maybe [a]
type family Group (a1 :: [a]) :: [[a]]
sGroup :: forall a (t :: [a]). SEq a => Sing t -> Sing (Apply (GroupSym0 :: TyFun [a] [[a]] -> Type) t)
type family Inits (a1 :: [a]) :: [[a]]
sInits :: forall a (t :: [a]). Sing t -> Sing (Apply (InitsSym0 :: TyFun [a] [[a]] -> Type) t)
type family Tails (a1 :: [a]) :: [[a]]
sTails :: forall a (t :: [a]). Sing t -> Sing (Apply (TailsSym0 :: TyFun [a] [[a]] -> Type) t)
type family IsPrefixOf (a1 :: [a]) (a2 :: [a]) :: Bool
sIsPrefixOf :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (IsPrefixOfSym0 :: TyFun [a] ([a] ~> Bool) -> Type) t1) t2)
type family IsSuffixOf (a1 :: [a]) (a2 :: [a]) :: Bool
sIsSuffixOf :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (IsSuffixOfSym0 :: TyFun [a] ([a] ~> Bool) -> Type) t1) t2)
type family IsInfixOf (a1 :: [a]) (a2 :: [a]) :: Bool
sIsInfixOf :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (IsInfixOfSym0 :: TyFun [a] ([a] ~> Bool) -> Type) t1) t2)
type family Elem (arg :: a) (arg1 :: t a) :: Bool
sElem :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
type family NotElem (a1 :: a) (a2 :: t a) :: Bool
sNotElem :: forall a (t1 :: Type -> Type) (t2 :: a) (t3 :: t1 a). (SFoldable t1, SEq a) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (NotElemSym0 :: TyFun a (t1 a ~> Bool) -> Type) t2) t3)
type family Lookup (a1 :: a) (a2 :: [(a, b)]) :: Maybe b
sLookup :: forall a b (t1 :: a) (t2 :: [(a, b)]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (LookupSym0 :: TyFun a ([(a, b)] ~> Maybe b) -> Type) t1) t2)
type family Find (a1 :: a ~> Bool) (a2 :: t a) :: Maybe a
sFind :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (FindSym0 :: TyFun (a ~> Bool) (t1 a ~> Maybe a) -> Type) t2) t3)
type family Filter (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sFilter :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FilterSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family Partition (a1 :: a ~> Bool) (a2 :: [a]) :: ([a], [a])
sPartition :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (PartitionSym0 :: TyFun (a ~> Bool) ([a] ~> ([a], [a])) -> Type) t1) t2)
type family (a1 :: [a]) !! (a2 :: Natural) :: a
infixl 9 !!
(%!!) :: forall a (t1 :: [a]) (t2 :: Natural). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((!!@#@$) :: TyFun [a] (Natural ~> a) -> Type) t1) t2)
infixl 9 %!!
type family ElemIndex (a1 :: a) (a2 :: [a]) :: Maybe Natural
sElemIndex :: forall a (t1 :: a) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemIndexSym0 :: TyFun a ([a] ~> Maybe Natural) -> Type) t1) t2)
type family ElemIndices (a1 :: a) (a2 :: [a]) :: [Natural]
sElemIndices :: forall a (t1 :: a) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemIndicesSym0 :: TyFun a ([a] ~> [Natural]) -> Type) t1) t2)
type family FindIndex (a1 :: a ~> Bool) (a2 :: [a]) :: Maybe Natural
sFindIndex :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FindIndexSym0 :: TyFun (a ~> Bool) ([a] ~> Maybe Natural) -> Type) t1) t2)
type family FindIndices (a1 :: a ~> Bool) (a2 :: [a]) :: [Natural]
sFindIndices :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FindIndicesSym0 :: TyFun (a ~> Bool) ([a] ~> [Natural]) -> Type) t1) t2)
type family Zip (a1 :: [a]) (a2 :: [b]) :: [(a, b)]
sZip :: forall a b (t1 :: [a]) (t2 :: [b]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ZipSym0 :: TyFun [a] ([b] ~> [(a, b)]) -> Type) t1) t2)
type family Zip3 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) :: [(a, b, c)]
sZip3 :: forall a b c (t1 :: [a]) (t2 :: [b]) (t3 :: [c]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Zip3Sym0 :: TyFun [a] ([b] ~> ([c] ~> [(a, b, c)])) -> Type) t1) t2) t3)
type family Zip4 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) (a4 :: [d]) :: [(a, b, c, d)]
type family Zip5 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) (a4 :: [d]) (a5 :: [e]) :: [(a, b, c, d, e)]
type family Zip6 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) (a4 :: [d]) (a5 :: [e]) (a6 :: [f]) :: [(a, b, c, d, e, f)]
type family Zip7 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) (a4 :: [d]) (a5 :: [e]) (a6 :: [f]) (a7 :: [g]) :: [(a, b, c, d, e, f, g)]
type family ZipWith (a1 :: a ~> b ~> c) (a2 :: [a]) (a3 :: [b]) :: [c]
sZipWith :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: [a]) (t3 :: [b]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ZipWithSym0 :: TyFun (a ~> (b ~> c)) ([a] ~> ([b] ~> [c])) -> Type) t1) t2) t3)
type family ZipWith3 (a1 :: a ~> b ~> c ~> d) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) :: [d]
sZipWith3 :: forall a b c d (t1 :: a ~> (b ~> (c ~> d))) (t2 :: [a]) (t3 :: [b]) (t4 :: [c]). Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (Apply (ZipWith3Sym0 :: TyFun (a ~> (b ~> (c ~> d))) ([a] ~> ([b] ~> ([c] ~> [d]))) -> Type) t1) t2) t3) t4)
type family ZipWith4 (a1 :: a ~> b ~> c ~> d ~> e) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) (a5 :: [d]) :: [e]
type family ZipWith5 (a1 :: a ~> b ~> c ~> d ~> e ~> f) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) (a5 :: [d]) (a6 :: [e]) :: [f]
type family ZipWith6 (a1 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) (a5 :: [d]) (a6 :: [e]) (a7 :: [f]) :: [g]
type family ZipWith7 (a1 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) (a5 :: [d]) (a6 :: [e]) (a7 :: [f]) (a8 :: [g]) :: [h]
type family Unzip (a1 :: [(a, b)]) :: ([a], [b])
sUnzip :: forall a b (t :: [(a, b)]). Sing t -> Sing (Apply (UnzipSym0 :: TyFun [(a, b)] ([a], [b]) -> Type) t)
type family Unzip3 (a1 :: [(a, b, c)]) :: ([a], [b], [c])
sUnzip3 :: forall a b c (t :: [(a, b, c)]). Sing t -> Sing (Apply (Unzip3Sym0 :: TyFun [(a, b, c)] ([a], [b], [c]) -> Type) t)
type family Unzip4 (a1 :: [(a, b, c, d)]) :: ([a], [b], [c], [d])
sUnzip4 :: forall a b c d (t :: [(a, b, c, d)]). Sing t -> Sing (Apply (Unzip4Sym0 :: TyFun [(a, b, c, d)] ([a], [b], [c], [d]) -> Type) t)
type family Unzip5 (a1 :: [(a, b, c, d, e)]) :: ([a], [b], [c], [d], [e])
sUnzip5 :: forall a b c d e (t :: [(a, b, c, d, e)]). Sing t -> Sing (Apply (Unzip5Sym0 :: TyFun [(a, b, c, d, e)] ([a], [b], [c], [d], [e]) -> Type) t)
type family Unzip6 (a1 :: [(a, b, c, d, e, f)]) :: ([a], [b], [c], [d], [e], [f])
sUnzip6 :: forall a b c d e f (t :: [(a, b, c, d, e, f)]). Sing t -> Sing (Apply (Unzip6Sym0 :: TyFun [(a, b, c, d, e, f)] ([a], [b], [c], [d], [e], [f]) -> Type) t)
type family Unzip7 (a1 :: [(a, b, c, d, e, f, g)]) :: ([a], [b], [c], [d], [e], [f], [g])
sUnzip7 :: forall a b c d e f g (t :: [(a, b, c, d, e, f, g)]). Sing t -> Sing (Apply (Unzip7Sym0 :: TyFun [(a, b, c, d, e, f, g)] ([a], [b], [c], [d], [e], [f], [g]) -> Type) t)
type family Unlines (a :: [Symbol]) :: Symbol
sUnlines :: forall (t :: [Symbol]). Sing t -> Sing (Apply UnlinesSym0 t)
type family Unwords (a :: [Symbol]) :: Symbol
sUnwords :: forall (t :: [Symbol]). Sing t -> Sing (Apply UnwordsSym0 t)
type family Nub (a1 :: [a]) :: [a]
sNub :: forall a (t :: [a]). SEq a => Sing t -> Sing (Apply (NubSym0 :: TyFun [a] [a] -> Type) t)
type family Delete (a1 :: a) (a2 :: [a]) :: [a]
sDelete :: forall a (t1 :: a) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (DeleteSym0 :: TyFun a ([a] ~> [a]) -> Type) t1) t2)
type family (a1 :: [a]) \\ (a2 :: [a]) :: [a]
infix 5 \\
(%\\) :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((\\@#@$) :: TyFun [a] ([a] ~> [a]) -> Type) t1) t2)
infix 5 %\\
type family Union (a1 :: [a]) (a2 :: [a]) :: [a]
sUnion :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (UnionSym0 :: TyFun [a] ([a] ~> [a]) -> Type) t1) t2)
type family Intersect (a1 :: [a]) (a2 :: [a]) :: [a]
sIntersect :: forall a (t1 :: [a]) (t2 :: [a]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (IntersectSym0 :: TyFun [a] ([a] ~> [a]) -> Type) t1) t2)
type family Insert (a1 :: a) (a2 :: [a]) :: [a]
sInsert :: forall a (t1 :: a) (t2 :: [a]). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (InsertSym0 :: TyFun a ([a] ~> [a]) -> Type) t1) t2)
type family Sort (a1 :: [a]) :: [a]
sSort :: forall a (t :: [a]). SOrd a => Sing t -> Sing (Apply (SortSym0 :: TyFun [a] [a] -> Type) t)
type family NubBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) :: [a]
sNubBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (NubBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> [a]) -> Type) t1) t2)
type family DeleteBy (a1 :: a ~> a ~> Bool) (a2 :: a) (a3 :: [a]) :: [a]
sDeleteBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: a) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (DeleteBySym0 :: TyFun (a ~> (a ~> Bool)) (a ~> ([a] ~> [a])) -> Type) t1) t2) t3)
type family DeleteFirstsBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) (a3 :: [a]) :: [a]
sDeleteFirstsBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (DeleteFirstsBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> ([a] ~> [a])) -> Type) t1) t2) t3)
type family UnionBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) (a3 :: [a]) :: [a]
sUnionBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (UnionBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> ([a] ~> [a])) -> Type) t1) t2) t3)
type family IntersectBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) (a3 :: [a]) :: [a]
sIntersectBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (IntersectBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> ([a] ~> [a])) -> Type) t1) t2) t3)
type family GroupBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) :: [[a]]
sGroupBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> [[a]]) -> Type) t1) t2)
type family SortBy (a1 :: a ~> a ~> Ordering) (a2 :: [a]) :: [a]
sSortBy :: forall a (t1 :: a ~> (a ~> Ordering)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SortBySym0 :: TyFun (a ~> (a ~> Ordering)) ([a] ~> [a]) -> Type) t1) t2)
type family InsertBy (a1 :: a ~> a ~> Ordering) (a2 :: a) (a3 :: [a]) :: [a]
sInsertBy :: forall a (t1 :: a ~> (a ~> Ordering)) (t2 :: a) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (InsertBySym0 :: TyFun (a ~> (a ~> Ordering)) (a ~> ([a] ~> [a])) -> Type) t1) t2) t3)
type family MaximumBy (a1 :: a ~> a ~> Ordering) (a2 :: t a) :: a
sMaximumBy :: forall a (t1 :: Type -> Type) (t2 :: a ~> (a ~> Ordering)) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MaximumBySym0 :: TyFun (a ~> (a ~> Ordering)) (t1 a ~> a) -> Type) t2) t3)
type family MinimumBy (a1 :: a ~> a ~> Ordering) (a2 :: t a) :: a
sMinimumBy :: forall a (t1 :: Type -> Type) (t2 :: a ~> (a ~> Ordering)) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MinimumBySym0 :: TyFun (a ~> (a ~> Ordering)) (t1 a ~> a) -> Type) t2) t3)
type family GenericLength (a1 :: [a]) :: i
sGenericLength :: forall a i (t :: [a]). SNum i => Sing t -> Sing (Apply (GenericLengthSym0 :: TyFun [a] i -> Type) t)
type family NilSym0 :: [a]
data (a1 :: TyFun a [a] ~> [a]) :@#@$
infixr 5 :@#@$
data (a6989586621679047148 :: a) :@#@$$ (b :: TyFun [a] [a])
infixr 5 :@#@$$
type family (a6989586621679047148 :: a) :@#@$$$ (a6989586621679047149 :: [a]) :: [a]
infixr 5 :@#@$$$
type family (a6989586621679181814 :: [a]) ++@#@$$$ (a6989586621679181815 :: [a]) :: [a]
infixr 5 ++@#@$$$
data (a6989586621679181814 :: [a]) ++@#@$$ (b :: TyFun [a] [a])
infixr 5 ++@#@$$
data (a1 :: TyFun [a] [a] ~> [a]) ++@#@$
infixr 5 ++@#@$
data HeadSym0 (a1 :: TyFun [a] a)
type family HeadSym1 (a6989586621679825084 :: [a]) :: a
data LastSym0 (a1 :: TyFun [a] a)
type family LastSym1 (a6989586621679825078 :: [a]) :: a
data TailSym0 (a1 :: TyFun [a] [a])
type family TailSym1 (a6989586621679825074 :: [a]) :: [a]
data InitSym0 (a1 :: TyFun [a] [a])
type family InitSym1 (a6989586621679825062 :: [a]) :: [a]
data NullSym0 (a1 :: TyFun t a Bool)
type family NullSym1 (a6989586621680404321 :: t a) :: Bool
data LengthSym0 (a1 :: TyFun t a Natural)
type family LengthSym1 (a6989586621680404324 :: t a) :: Natural
data MapSym0 (a1 :: TyFun a ~> b [a] ~> [b])
data MapSym1 (a6989586621679181823 :: a ~> b) (b1 :: TyFun [a] [b])
type family MapSym2 (a6989586621679181823 :: a ~> b) (a6989586621679181824 :: [a]) :: [b]
data ReverseSym0 (a1 :: TyFun [a] [a])
type family ReverseSym1 (a6989586621679825047 :: [a]) :: [a]
data IntersperseSym0 (a1 :: TyFun a [a] ~> [a])
data IntersperseSym1 (a6989586621679825040 :: a) (b :: TyFun [a] [a])
type family IntersperseSym2 (a6989586621679825040 :: a) (a6989586621679825041 :: [a]) :: [a]
data IntercalateSym0 (a1 :: TyFun [a] [[a]] ~> [a])
data IntercalateSym1 (a6989586621679825033 :: [a]) (b :: TyFun [[a]] [a])
type family IntercalateSym2 (a6989586621679825033 :: [a]) (a6989586621679825034 :: [[a]]) :: [a]
data TransposeSym0 (a1 :: TyFun [[a]] [[a]])
type family TransposeSym1 (a6989586621679823934 :: [[a]]) :: [[a]]
data SubsequencesSym0 (a1 :: TyFun [a] [[a]])
type family SubsequencesSym1 (a6989586621679825028 :: [a]) :: [[a]]
data PermutationsSym0 (a1 :: TyFun [a] [[a]])
type family PermutationsSym1 (a6989586621679824954 :: [a]) :: [[a]]
data FoldlSym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data FoldlSym1 (a6989586621680404296 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data FoldlSym2 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (c :: TyFun t a b)
type family FoldlSym3 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (a6989586621680404298 :: t a) :: b
data Foldl'Sym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data Foldl'Sym1 (a6989586621680404303 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data Foldl'Sym2 (a6989586621680404303 :: b ~> a ~> b) (a6989586621680404304 :: b) (c :: TyFun t a b)
type family Foldl'Sym3 (a6989586621680404303 :: b ~> a ~> b) (a6989586621680404304 :: b) (a6989586621680404305 :: t a) :: b
data Foldl1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldl1Sym1 (a6989586621680404314 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldl1Sym2 (a6989586621680404314 :: a ~> a ~> a) (a6989586621680404315 :: t a) :: a
data Foldl1'Sym0 (a1 :: TyFun a ~> a ~> a [a] ~> a)
data Foldl1'Sym1 (a6989586621679824919 :: a ~> a ~> a) (b :: TyFun [a] a)
type family Foldl1'Sym2 (a6989586621679824919 :: a ~> a ~> a) (a6989586621679824920 :: [a]) :: a
data FoldrSym0 (a1 :: TyFun a ~> b ~> b b ~> t a ~> b)
data FoldrSym1 (a6989586621680404282 :: a ~> b ~> b) (b1 :: TyFun b t a ~> b)
data FoldrSym2 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (c :: TyFun t a b)
type family FoldrSym3 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (a6989586621680404284 :: t a) :: b
data Foldr1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldr1Sym1 (a6989586621680404309 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldr1Sym2 (a6989586621680404309 :: a ~> a ~> a) (a6989586621680404310 :: t a) :: a
data ConcatSym0 (a1 :: TyFun t [a] [a])
type family ConcatSym1 (a6989586621680404163 :: t [a]) :: [a]
data ConcatMapSym0 (a1 :: TyFun a ~> [b] t a ~> [b])
data ConcatMapSym1 (a6989586621680404152 :: a ~> [b]) (b1 :: TyFun t a [b])
type family ConcatMapSym2 (a6989586621680404152 :: a ~> [b]) (a6989586621680404153 :: t a) :: [b]
data AndSym0 (a :: TyFun t Bool Bool)
type family AndSym1 (a6989586621680404147 :: t Bool) :: Bool
data OrSym0 (a :: TyFun t Bool Bool)
type family OrSym1 (a6989586621680404141 :: t Bool) :: Bool
data AnySym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AnySym1 (a6989586621680404133 :: a ~> Bool) (b :: TyFun t a Bool)
type family AnySym2 (a6989586621680404133 :: a ~> Bool) (a6989586621680404134 :: t a) :: Bool
data AllSym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AllSym1 (a6989586621680404124 :: a ~> Bool) (b :: TyFun t a Bool)
type family AllSym2 (a6989586621680404124 :: a ~> Bool) (a6989586621680404125 :: t a) :: Bool
data SumSym0 (a1 :: TyFun t a a)
type family SumSym1 (a6989586621680404338 :: t a) :: a
data ProductSym0 (a1 :: TyFun t a a)
type family ProductSym1 (a6989586621680404341 :: t a) :: a
data MaximumSym0 (a1 :: TyFun t a a)
type family MaximumSym1 (a6989586621680404332 :: t a) :: a
data MinimumSym0 (a1 :: TyFun t a a)
type family MinimumSym1 (a6989586621680404335 :: t a) :: a
data ScanlSym0 (a1 :: TyFun b ~> a ~> b b ~> [a] ~> [b])
data ScanlSym1 (a6989586621679824852 :: b ~> a ~> b) (b1 :: TyFun b [a] ~> [b])
data ScanlSym2 (a6989586621679824852 :: b ~> a ~> b) (a6989586621679824853 :: b) (c :: TyFun [a] [b])
type family ScanlSym3 (a6989586621679824852 :: b ~> a ~> b) (a6989586621679824853 :: b) (a6989586621679824854 :: [a]) :: [b]
data Scanl1Sym0 (a1 :: TyFun a ~> a ~> a [a] ~> [a])
data Scanl1Sym1 (a6989586621679824843 :: a ~> a ~> a) (b :: TyFun [a] [a])
type family Scanl1Sym2 (a6989586621679824843 :: a ~> a ~> a) (a6989586621679824844 :: [a]) :: [a]
data ScanrSym0 (a1 :: TyFun a ~> b ~> b b ~> [a] ~> [b])
data ScanrSym1 (a6989586621679824825 :: a ~> b ~> b) (b1 :: TyFun b [a] ~> [b])
data ScanrSym2 (a6989586621679824825 :: a ~> b ~> b) (a6989586621679824826 :: b) (c :: TyFun [a] [b])
type family ScanrSym3 (a6989586621679824825 :: a ~> b ~> b) (a6989586621679824826 :: b) (a6989586621679824827 :: [a]) :: [b]
data Scanr1Sym0 (a1 :: TyFun a ~> a ~> a [a] ~> [a])
data Scanr1Sym1 (a6989586621679824805 :: a ~> a ~> a) (b :: TyFun [a] [a])
type family Scanr1Sym2 (a6989586621679824805 :: a ~> a ~> a) (a6989586621679824806 :: [a]) :: [a]
data MapAccumLSym0 (a1 :: TyFun a ~> b ~> (a, c) a ~> t b ~> (a, t c))
data MapAccumLSym1 (a6989586621680756735 :: a ~> b ~> (a, c)) (b1 :: TyFun a t b ~> (a, t c))
data MapAccumLSym2 (a6989586621680756735 :: a ~> b ~> (a, c)) (a6989586621680756736 :: a) (c1 :: TyFun t b (a, t c))
type family MapAccumLSym3 (a6989586621680756735 :: a ~> b ~> (a, c)) (a6989586621680756736 :: a) (a6989586621680756737 :: t b) :: (a, t c)
data MapAccumRSym0 (a1 :: TyFun a ~> b ~> (a, c) a ~> t b ~> (a, t c))
data MapAccumRSym1 (a6989586621680756725 :: a ~> b ~> (a, c)) (b1 :: TyFun a t b ~> (a, t c))
data MapAccumRSym2 (a6989586621680756725 :: a ~> b ~> (a, c)) (a6989586621680756726 :: a) (c1 :: TyFun t b (a, t c))
type family MapAccumRSym3 (a6989586621680756725 :: a ~> b ~> (a, c)) (a6989586621680756726 :: a) (a6989586621680756727 :: t b) :: (a, t c)
data ReplicateSym0 (a1 :: TyFun Natural a ~> [a])
data ReplicateSym1 (a6989586621679823942 :: Natural) (b :: TyFun a [a])
type family ReplicateSym2 (a6989586621679823942 :: Natural) (a6989586621679823943 :: a) :: [a]
data UnfoldrSym0 (a1 :: TyFun b ~> Maybe (a, b) b ~> [a])
data UnfoldrSym1 (a6989586621679824697 :: b ~> Maybe (a, b)) (b1 :: TyFun b [a])
type family UnfoldrSym2 (a6989586621679824697 :: b ~> Maybe (a, b)) (a6989586621679824698 :: b) :: [a]
data TakeSym0 (a1 :: TyFun Natural [a] ~> [a])
data TakeSym1 (a6989586621679824097 :: Natural) (b :: TyFun [a] [a])
type family TakeSym2 (a6989586621679824097 :: Natural) (a6989586621679824098 :: [a]) :: [a]
data DropSym0 (a1 :: TyFun Natural [a] ~> [a])
data DropSym1 (a6989586621679824084 :: Natural) (b :: TyFun [a] [a])
type family DropSym2 (a6989586621679824084 :: Natural) (a6989586621679824085 :: [a]) :: [a]
data SplitAtSym0 (a1 :: TyFun Natural [a] ~> ([a], [a]))
data SplitAtSym1 (a6989586621679824077 :: Natural) (b :: TyFun [a] ([a], [a]))
type family SplitAtSym2 (a6989586621679824077 :: Natural) (a6989586621679824078 :: [a]) :: ([a], [a])
data TakeWhileSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data TakeWhileSym1 (a6989586621679824214 :: a ~> Bool) (b :: TyFun [a] [a])
type family TakeWhileSym2 (a6989586621679824214 :: a ~> Bool) (a6989586621679824215 :: [a]) :: [a]
data DropWhileSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data DropWhileSym1 (a6989586621679824199 :: a ~> Bool) (b :: TyFun [a] [a])
type family DropWhileSym2 (a6989586621679824199 :: a ~> Bool) (a6989586621679824200 :: [a]) :: [a]
data DropWhileEndSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data DropWhileEndSym1 (a6989586621679824182 :: a ~> Bool) (b :: TyFun [a] [a])
type family DropWhileEndSym2 (a6989586621679824182 :: a ~> Bool) (a6989586621679824183 :: [a]) :: [a]
data SpanSym0 (a1 :: TyFun a ~> Bool [a] ~> ([a], [a]))
data SpanSym1 (a6989586621679824145 :: a ~> Bool) (b :: TyFun [a] ([a], [a]))
type family SpanSym2 (a6989586621679824145 :: a ~> Bool) (a6989586621679824146 :: [a]) :: ([a], [a])
data BreakSym0 (a1 :: TyFun a ~> Bool [a] ~> ([a], [a]))
data BreakSym1 (a6989586621679824110 :: a ~> Bool) (b :: TyFun [a] ([a], [a]))
type family BreakSym2 (a6989586621679824110 :: a ~> Bool) (a6989586621679824111 :: [a]) :: ([a], [a])
data StripPrefixSym0 (a1 :: TyFun [a] [a] ~> Maybe [a])
data StripPrefixSym1 (a6989586621679975077 :: [a]) (b :: TyFun [a] Maybe [a])
type family StripPrefixSym2 (a6989586621679975077 :: [a]) (a6989586621679975078 :: [a]) :: Maybe [a]
data GroupSym0 (a1 :: TyFun [a] [[a]])
type family GroupSym1 (a6989586621679824072 :: [a]) :: [[a]]
data InitsSym0 (a1 :: TyFun [a] [[a]])
type family InitsSym1 (a6989586621679824687 :: [a]) :: [[a]]
data TailsSym0 (a1 :: TyFun [a] [[a]])
type family TailsSym1 (a6989586621679824679 :: [a]) :: [[a]]
data IsPrefixOfSym0 (a1 :: TyFun [a] [a] ~> Bool)
data IsPrefixOfSym1 (a6989586621679824671 :: [a]) (b :: TyFun [a] Bool)
type family IsPrefixOfSym2 (a6989586621679824671 :: [a]) (a6989586621679824672 :: [a]) :: Bool
data IsSuffixOfSym0 (a1 :: TyFun [a] [a] ~> Bool)
data IsSuffixOfSym1 (a6989586621679824664 :: [a]) (b :: TyFun [a] Bool)
type family IsSuffixOfSym2 (a6989586621679824664 :: [a]) (a6989586621679824665 :: [a]) :: Bool
data IsInfixOfSym0 (a1 :: TyFun [a] [a] ~> Bool)
data IsInfixOfSym1 (a6989586621679824657 :: [a]) (b :: TyFun [a] Bool)
type family IsInfixOfSym2 (a6989586621679824657 :: [a]) (a6989586621679824658 :: [a]) :: Bool
data ElemSym0 (a1 :: TyFun a t a ~> Bool)
data ElemSym1 (a6989586621680404328 :: a) (b :: TyFun t a Bool)
type family ElemSym2 (a6989586621680404328 :: a) (a6989586621680404329 :: t a) :: Bool
data NotElemSym0 (a1 :: TyFun a t a ~> Bool)
data NotElemSym1 (a6989586621680404075 :: a) (b :: TyFun t a Bool)
type family NotElemSym2 (a6989586621680404075 :: a) (a6989586621680404076 :: t a) :: Bool
data LookupSym0 (a1 :: TyFun a [(a, b)] ~> Maybe b)
data LookupSym1 (a6989586621679824005 :: a) (b1 :: TyFun [(a, b)] Maybe b)
type family LookupSym2 (a6989586621679824005 :: a) (a6989586621679824006 :: [(a, b)]) :: Maybe b
data FindSym0 (a1 :: TyFun a ~> Bool t a ~> Maybe a)
data FindSym1 (a6989586621680404057 :: a ~> Bool) (b :: TyFun t a Maybe a)
type family FindSym2 (a6989586621680404057 :: a ~> Bool) (a6989586621680404058 :: t a) :: Maybe a
data FilterSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data FilterSym1 (a6989586621679824314 :: a ~> Bool) (b :: TyFun [a] [a])
type family FilterSym2 (a6989586621679824314 :: a ~> Bool) (a6989586621679824315 :: [a]) :: [a]
data PartitionSym0 (a1 :: TyFun a ~> Bool [a] ~> ([a], [a]))
data PartitionSym1 (a6989586621679823998 :: a ~> Bool) (b :: TyFun [a] ([a], [a]))
type family PartitionSym2 (a6989586621679823998 :: a ~> Bool) (a6989586621679823999 :: [a]) :: ([a], [a])
data (a1 :: TyFun [a] Natural ~> a) !!@#@$
infixl 9 !!@#@$
data (a6989586621679823922 :: [a]) !!@#@$$ (b :: TyFun Natural a)
infixl 9 !!@#@$$
type family (a6989586621679823922 :: [a]) !!@#@$$$ (a6989586621679823923 :: Natural) :: a
infixl 9 !!@#@$$$
data ElemIndexSym0 (a1 :: TyFun a [a] ~> Maybe Natural)
data ElemIndexSym1 (a6989586621679824298 :: a) (b :: TyFun [a] Maybe Natural)
type family ElemIndexSym2 (a6989586621679824298 :: a) (a6989586621679824299 :: [a]) :: Maybe Natural
data ElemIndicesSym0 (a1 :: TyFun a [a] ~> [Natural])
data ElemIndicesSym1 (a6989586621679824289 :: a) (b :: TyFun [a] [Natural])
type family ElemIndicesSym2 (a6989586621679824289 :: a) (a6989586621679824290 :: [a]) :: [Natural]
data FindIndexSym0 (a1 :: TyFun a ~> Bool [a] ~> Maybe Natural)
data FindIndexSym1 (a6989586621679824280 :: a ~> Bool) (b :: TyFun [a] Maybe Natural)
type family FindIndexSym2 (a6989586621679824280 :: a ~> Bool) (a6989586621679824281 :: [a]) :: Maybe Natural
data FindIndicesSym0 (a1 :: TyFun a ~> Bool [a] ~> [Natural])
data FindIndicesSym1 (a6989586621679824257 :: a ~> Bool) (b :: TyFun [a] [Natural])
type family FindIndicesSym2 (a6989586621679824257 :: a ~> Bool) (a6989586621679824258 :: [a]) :: [Natural]
data ZipSym0 (a1 :: TyFun [a] [b] ~> [(a, b)])
data ZipSym1 (a6989586621679824632 :: [a]) (b1 :: TyFun [b] [(a, b)])
type family ZipSym2 (a6989586621679824632 :: [a]) (a6989586621679824633 :: [b]) :: [(a, b)]
data Zip3Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [(a, b, c)])
data Zip3Sym1 (a6989586621679824620 :: [a]) (b1 :: TyFun [b] [c] ~> [(a, b, c)])
data Zip3Sym2 (a6989586621679824620 :: [a]) (a6989586621679824621 :: [b]) (c1 :: TyFun [c] [(a, b, c)])
type family Zip3Sym3 (a6989586621679824620 :: [a]) (a6989586621679824621 :: [b]) (a6989586621679824622 :: [c]) :: [(a, b, c)]
data Zip4Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [(a, b, c, d)])
data Zip4Sym1 (a6989586621679975066 :: [a]) (b1 :: TyFun [b] [c] ~> [d] ~> [(a, b, c, d)])
data Zip4Sym2 (a6989586621679975066 :: [a]) (a6989586621679975067 :: [b]) (c1 :: TyFun [c] [d] ~> [(a, b, c, d)])
data Zip4Sym3 (a6989586621679975066 :: [a]) (a6989586621679975067 :: [b]) (a6989586621679975068 :: [c]) (d1 :: TyFun [d] [(a, b, c, d)])
type family Zip4Sym4 (a6989586621679975066 :: [a]) (a6989586621679975067 :: [b]) (a6989586621679975068 :: [c]) (a6989586621679975069 :: [d]) :: [(a, b, c, d)]
data Zip5Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [(a, b, c, d, e)])
data Zip5Sym1 (a6989586621679975043 :: [a]) (b1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [(a, b, c, d, e)])
data Zip5Sym2 (a6989586621679975043 :: [a]) (a6989586621679975044 :: [b]) (c1 :: TyFun [c] [d] ~> [e] ~> [(a, b, c, d, e)])
data Zip5Sym3 (a6989586621679975043 :: [a]) (a6989586621679975044 :: [b]) (a6989586621679975045 :: [c]) (d1 :: TyFun [d] [e] ~> [(a, b, c, d, e)])
data Zip5Sym4 (a6989586621679975043 :: [a]) (a6989586621679975044 :: [b]) (a6989586621679975045 :: [c]) (a6989586621679975046 :: [d]) (e1 :: TyFun [e] [(a, b, c, d, e)])
type family Zip5Sym5 (a6989586621679975043 :: [a]) (a6989586621679975044 :: [b]) (a6989586621679975045 :: [c]) (a6989586621679975046 :: [d]) (a6989586621679975047 :: [e]) :: [(a, b, c, d, e)]
data Zip6Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [(a, b, c, d, e, f)])
data Zip6Sym1 (a6989586621679975015 :: [a]) (b1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [f] ~> [(a, b, c, d, e, f)])
data Zip6Sym2 (a6989586621679975015 :: [a]) (a6989586621679975016 :: [b]) (c1 :: TyFun [c] [d] ~> [e] ~> [f] ~> [(a, b, c, d, e, f)])
data Zip6Sym3 (a6989586621679975015 :: [a]) (a6989586621679975016 :: [b]) (a6989586621679975017 :: [c]) (d1 :: TyFun [d] [e] ~> [f] ~> [(a, b, c, d, e, f)])
data Zip6Sym4 (a6989586621679975015 :: [a]) (a6989586621679975016 :: [b]) (a6989586621679975017 :: [c]) (a6989586621679975018 :: [d]) (e1 :: TyFun [e] [f] ~> [(a, b, c, d, e, f)])
data Zip6Sym5 (a6989586621679975015 :: [a]) (a6989586621679975016 :: [b]) (a6989586621679975017 :: [c]) (a6989586621679975018 :: [d]) (a6989586621679975019 :: [e]) (f1 :: TyFun [f] [(a, b, c, d, e, f)])
type family Zip6Sym6 (a6989586621679975015 :: [a]) (a6989586621679975016 :: [b]) (a6989586621679975017 :: [c]) (a6989586621679975018 :: [d]) (a6989586621679975019 :: [e]) (a6989586621679975020 :: [f]) :: [(a, b, c, d, e, f)]
data Zip7Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym1 (a6989586621679974982 :: [a]) (b1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [f] ~> [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym2 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (c1 :: TyFun [c] [d] ~> [e] ~> [f] ~> [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym3 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (a6989586621679974984 :: [c]) (d1 :: TyFun [d] [e] ~> [f] ~> [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym4 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (a6989586621679974984 :: [c]) (a6989586621679974985 :: [d]) (e1 :: TyFun [e] [f] ~> [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym5 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (a6989586621679974984 :: [c]) (a6989586621679974985 :: [d]) (a6989586621679974986 :: [e]) (f1 :: TyFun [f] [g] ~> [(a, b, c, d, e, f, g)])
data Zip7Sym6 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (a6989586621679974984 :: [c]) (a6989586621679974985 :: [d]) (a6989586621679974986 :: [e]) (a6989586621679974987 :: [f]) (g1 :: TyFun [g] [(a, b, c, d, e, f, g)])
type family Zip7Sym7 (a6989586621679974982 :: [a]) (a6989586621679974983 :: [b]) (a6989586621679974984 :: [c]) (a6989586621679974985 :: [d]) (a6989586621679974986 :: [e]) (a6989586621679974987 :: [f]) (a6989586621679974988 :: [g]) :: [(a, b, c, d, e, f, g)]
data ZipWithSym0 (a1 :: TyFun a ~> b ~> c [a] ~> [b] ~> [c])
data ZipWithSym1 (a6989586621679824608 :: a ~> b ~> c) (b1 :: TyFun [a] [b] ~> [c])
data ZipWithSym2 (a6989586621679824608 :: a ~> b ~> c) (a6989586621679824609 :: [a]) (c1 :: TyFun [b] [c])
type family ZipWithSym3 (a6989586621679824608 :: a ~> b ~> c) (a6989586621679824609 :: [a]) (a6989586621679824610 :: [b]) :: [c]
data ZipWith3Sym0 (a1 :: TyFun a ~> b ~> c ~> d [a] ~> [b] ~> [c] ~> [d])
data ZipWith3Sym1 (a6989586621679824593 :: a ~> b ~> c ~> d) (b1 :: TyFun [a] [b] ~> [c] ~> [d])
data ZipWith3Sym2 (a6989586621679824593 :: a ~> b ~> c ~> d) (a6989586621679824594 :: [a]) (c1 :: TyFun [b] [c] ~> [d])
data ZipWith3Sym3 (a6989586621679824593 :: a ~> b ~> c ~> d) (a6989586621679824594 :: [a]) (a6989586621679824595 :: [b]) (d1 :: TyFun [c] [d])
type family ZipWith3Sym4 (a6989586621679824593 :: a ~> b ~> c ~> d) (a6989586621679824594 :: [a]) (a6989586621679824595 :: [b]) (a6989586621679824596 :: [c]) :: [d]
data ZipWith4Sym0 (a1 :: TyFun a ~> b ~> c ~> d ~> e [a] ~> [b] ~> [c] ~> [d] ~> [e])
data ZipWith4Sym1 (a6989586621679974946 :: a ~> b ~> c ~> d ~> e) (b1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e])
data ZipWith4Sym2 (a6989586621679974946 :: a ~> b ~> c ~> d ~> e) (a6989586621679974947 :: [a]) (c1 :: TyFun [b] [c] ~> [d] ~> [e])
data ZipWith4Sym3 (a6989586621679974946 :: a ~> b ~> c ~> d ~> e) (a6989586621679974947 :: [a]) (a6989586621679974948 :: [b]) (d1 :: TyFun [c] [d] ~> [e])
data ZipWith4Sym4 (a6989586621679974946 :: a ~> b ~> c ~> d ~> e) (a6989586621679974947 :: [a]) (a6989586621679974948 :: [b]) (a6989586621679974949 :: [c]) (e1 :: TyFun [d] [e])
type family ZipWith4Sym5 (a6989586621679974946 :: a ~> b ~> c ~> d ~> e) (a6989586621679974947 :: [a]) (a6989586621679974948 :: [b]) (a6989586621679974949 :: [c]) (a6989586621679974950 :: [d]) :: [e]
data ZipWith5Sym0 (a1 :: TyFun a ~> b ~> c ~> d ~> e ~> f [a] ~> [b] ~> [c] ~> [d] ~> [e] ~> [f])
data ZipWith5Sym1 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (b1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [f])
data ZipWith5Sym2 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (a6989586621679974924 :: [a]) (c1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [f])
data ZipWith5Sym3 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (a6989586621679974924 :: [a]) (a6989586621679974925 :: [b]) (d1 :: TyFun [c] [d] ~> [e] ~> [f])
data ZipWith5Sym4 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (a6989586621679974924 :: [a]) (a6989586621679974925 :: [b]) (a6989586621679974926 :: [c]) (e1 :: TyFun [d] [e] ~> [f])
data ZipWith5Sym5 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (a6989586621679974924 :: [a]) (a6989586621679974925 :: [b]) (a6989586621679974926 :: [c]) (a6989586621679974927 :: [d]) (f1 :: TyFun [e] [f])
type family ZipWith5Sym6 (a6989586621679974923 :: a ~> b ~> c ~> d ~> e ~> f) (a6989586621679974924 :: [a]) (a6989586621679974925 :: [b]) (a6989586621679974926 :: [c]) (a6989586621679974927 :: [d]) (a6989586621679974928 :: [e]) :: [f]
data ZipWith6Sym0 (a1 :: TyFun a ~> b ~> c ~> d ~> e ~> f ~> g [a] ~> [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [g])
data ZipWith6Sym1 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (b1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [g])
data ZipWith6Sym2 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (c1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [f] ~> [g])
data ZipWith6Sym3 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (a6989586621679974898 :: [b]) (d1 :: TyFun [c] [d] ~> [e] ~> [f] ~> [g])
data ZipWith6Sym4 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (a6989586621679974898 :: [b]) (a6989586621679974899 :: [c]) (e1 :: TyFun [d] [e] ~> [f] ~> [g])
data ZipWith6Sym5 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (a6989586621679974898 :: [b]) (a6989586621679974899 :: [c]) (a6989586621679974900 :: [d]) (f1 :: TyFun [e] [f] ~> [g])
data ZipWith6Sym6 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (a6989586621679974898 :: [b]) (a6989586621679974899 :: [c]) (a6989586621679974900 :: [d]) (a6989586621679974901 :: [e]) (g1 :: TyFun [f] [g])
type family ZipWith6Sym7 (a6989586621679974896 :: a ~> b ~> c ~> d ~> e ~> f ~> g) (a6989586621679974897 :: [a]) (a6989586621679974898 :: [b]) (a6989586621679974899 :: [c]) (a6989586621679974900 :: [d]) (a6989586621679974901 :: [e]) (a6989586621679974902 :: [f]) :: [g]
data ZipWith7Sym0 (a1 :: TyFun a ~> b ~> c ~> d ~> e ~> f ~> g ~> h [a] ~> [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [g] ~> [h])
data ZipWith7Sym1 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (b1 :: TyFun [a] [b] ~> [c] ~> [d] ~> [e] ~> [f] ~> [g] ~> [h])
data ZipWith7Sym2 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (c1 :: TyFun [b] [c] ~> [d] ~> [e] ~> [f] ~> [g] ~> [h])
data ZipWith7Sym3 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (d1 :: TyFun [c] [d] ~> [e] ~> [f] ~> [g] ~> [h])
data ZipWith7Sym4 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (a6989586621679974868 :: [c]) (e1 :: TyFun [d] [e] ~> [f] ~> [g] ~> [h])
data ZipWith7Sym5 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (a6989586621679974868 :: [c]) (a6989586621679974869 :: [d]) (f1 :: TyFun [e] [f] ~> [g] ~> [h])
data ZipWith7Sym6 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (a6989586621679974868 :: [c]) (a6989586621679974869 :: [d]) (a6989586621679974870 :: [e]) (g1 :: TyFun [f] [g] ~> [h])
data ZipWith7Sym7 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (a6989586621679974868 :: [c]) (a6989586621679974869 :: [d]) (a6989586621679974870 :: [e]) (a6989586621679974871 :: [f]) (h1 :: TyFun [g] [h])
type family ZipWith7Sym8 (a6989586621679974865 :: a ~> b ~> c ~> d ~> e ~> f ~> g ~> h) (a6989586621679974866 :: [a]) (a6989586621679974867 :: [b]) (a6989586621679974868 :: [c]) (a6989586621679974869 :: [d]) (a6989586621679974870 :: [e]) (a6989586621679974871 :: [f]) (a6989586621679974872 :: [g]) :: [h]
data UnzipSym0 (a1 :: TyFun [(a, b)] ([a], [b]))
type family UnzipSym1 (a6989586621679824574 :: [(a, b)]) :: ([a], [b])
data Unzip3Sym0 (a1 :: TyFun [(a, b, c)] ([a], [b], [c]))
type family Unzip3Sym1 (a6989586621679824556 :: [(a, b, c)]) :: ([a], [b], [c])
data Unzip4Sym0 (a1 :: TyFun [(a, b, c, d)] ([a], [b], [c], [d]))
type family Unzip4Sym1 (a6989586621679824536 :: [(a, b, c, d)]) :: ([a], [b], [c], [d])
data Unzip5Sym0 (a1 :: TyFun [(a, b, c, d, e)] ([a], [b], [c], [d], [e]))
type family Unzip5Sym1 (a6989586621679824514 :: [(a, b, c, d, e)]) :: ([a], [b], [c], [d], [e])
data Unzip6Sym0 (a1 :: TyFun [(a, b, c, d, e, f)] ([a], [b], [c], [d], [e], [f]))
type family Unzip6Sym1 (a6989586621679824490 :: [(a, b, c, d, e, f)]) :: ([a], [b], [c], [d], [e], [f])
data Unzip7Sym0 (a1 :: TyFun [(a, b, c, d, e, f, g)] ([a], [b], [c], [d], [e], [f], [g]))
type family Unzip7Sym1 (a6989586621679824464 :: [(a, b, c, d, e, f, g)]) :: ([a], [b], [c], [d], [e], [f], [g])
data UnlinesSym0 (a :: TyFun [Symbol] Symbol)
type family UnlinesSym1 (a6989586621679824459 :: [Symbol]) :: Symbol
data UnwordsSym0 (a :: TyFun [Symbol] Symbol)
type family UnwordsSym1 (a6989586621679824449 :: [Symbol]) :: Symbol
data NubSym0 (a1 :: TyFun [a] [a])
type family NubSym1 (a6989586621679823905 :: [a]) :: [a]
data DeleteSym0 (a1 :: TyFun a [a] ~> [a])
data DeleteSym1 (a6989586621679824443 :: a) (b :: TyFun [a] [a])
type family DeleteSym2 (a6989586621679824443 :: a) (a6989586621679824444 :: [a]) :: [a]
data (a1 :: TyFun [a] [a] ~> [a]) \\@#@$
infix 5 \\@#@$
data (a6989586621679824432 :: [a]) \\@#@$$ (b :: TyFun [a] [a])
infix 5 \\@#@$$
type family (a6989586621679824432 :: [a]) \\@#@$$$ (a6989586621679824433 :: [a]) :: [a]
infix 5 \\@#@$$$
data UnionSym0 (a1 :: TyFun [a] [a] ~> [a])
data UnionSym1 (a6989586621679823859 :: [a]) (b :: TyFun [a] [a])
type family UnionSym2 (a6989586621679823859 :: [a]) (a6989586621679823860 :: [a]) :: [a]
data IntersectSym0 (a1 :: TyFun [a] [a] ~> [a])
data IntersectSym1 (a6989586621679824250 :: [a]) (b :: TyFun [a] [a])
type family IntersectSym2 (a6989586621679824250 :: [a]) (a6989586621679824251 :: [a]) :: [a]
data InsertSym0 (a1 :: TyFun a [a] ~> [a])
data InsertSym1 (a6989586621679824052 :: a) (b :: TyFun [a] [a])
type family InsertSym2 (a6989586621679824052 :: a) (a6989586621679824053 :: [a]) :: [a]
data SortSym0 (a1 :: TyFun [a] [a])
type family SortSym1 (a6989586621679824047 :: [a]) :: [a]
data NubBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [a])
data NubBySym1 (a6989586621679823887 :: a ~> a ~> Bool) (b :: TyFun [a] [a])
type family NubBySym2 (a6989586621679823887 :: a ~> a ~> Bool) (a6989586621679823888 :: [a]) :: [a]
data DeleteBySym0 (a1 :: TyFun a ~> a ~> Bool a ~> [a] ~> [a])
data DeleteBySym1 (a6989586621679824413 :: a ~> a ~> Bool) (b :: TyFun a [a] ~> [a])
data DeleteBySym2 (a6989586621679824413 :: a ~> a ~> Bool) (a6989586621679824414 :: a) (c :: TyFun [a] [a])
type family DeleteBySym3 (a6989586621679824413 :: a ~> a ~> Bool) (a6989586621679824414 :: a) (a6989586621679824415 :: [a]) :: [a]
data DeleteFirstsBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [a] ~> [a])
data DeleteFirstsBySym1 (a6989586621679824403 :: a ~> a ~> Bool) (b :: TyFun [a] [a] ~> [a])
data DeleteFirstsBySym2 (a6989586621679824403 :: a ~> a ~> Bool) (a6989586621679824404 :: [a]) (c :: TyFun [a] [a])
type family DeleteFirstsBySym3 (a6989586621679824403 :: a ~> a ~> Bool) (a6989586621679824404 :: [a]) (a6989586621679824405 :: [a]) :: [a]
data UnionBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [a] ~> [a])
data UnionBySym1 (a6989586621679823867 :: a ~> a ~> Bool) (b :: TyFun [a] [a] ~> [a])
data UnionBySym2 (a6989586621679823867 :: a ~> a ~> Bool) (a6989586621679823868 :: [a]) (c :: TyFun [a] [a])
type family UnionBySym3 (a6989586621679823867 :: a ~> a ~> Bool) (a6989586621679823868 :: [a]) (a6989586621679823869 :: [a]) :: [a]
data IntersectBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [a] ~> [a])
data IntersectBySym1 (a6989586621679824228 :: a ~> a ~> Bool) (b :: TyFun [a] [a] ~> [a])
data IntersectBySym2 (a6989586621679824228 :: a ~> a ~> Bool) (a6989586621679824229 :: [a]) (c :: TyFun [a] [a])
type family IntersectBySym3 (a6989586621679824228 :: a ~> a ~> Bool) (a6989586621679824229 :: [a]) (a6989586621679824230 :: [a]) :: [a]
data GroupBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [[a]])
data GroupBySym1 (a6989586621679824020 :: a ~> a ~> Bool) (b :: TyFun [a] [[a]])
type family GroupBySym2 (a6989586621679824020 :: a ~> a ~> Bool) (a6989586621679824021 :: [a]) :: [[a]]
data SortBySym0 (a1 :: TyFun a ~> a ~> Ordering [a] ~> [a])
data SortBySym1 (a6989586621679824391 :: a ~> a ~> Ordering) (b :: TyFun [a] [a])
type family SortBySym2 (a6989586621679824391 :: a ~> a ~> Ordering) (a6989586621679824392 :: [a]) :: [a]
data InsertBySym0 (a1 :: TyFun a ~> a ~> Ordering a ~> [a] ~> [a])
data InsertBySym1 (a6989586621679824371 :: a ~> a ~> Ordering) (b :: TyFun a [a] ~> [a])
data InsertBySym2 (a6989586621679824371 :: a ~> a ~> Ordering) (a6989586621679824372 :: a) (c :: TyFun [a] [a])
type family InsertBySym3 (a6989586621679824371 :: a ~> a ~> Ordering) (a6989586621679824372 :: a) (a6989586621679824373 :: [a]) :: [a]
data MaximumBySym0 (a1 :: TyFun a ~> a ~> Ordering t a ~> a)
data MaximumBySym1 (a6989586621680404104 :: a ~> a ~> Ordering) (b :: TyFun t a a)
type family MaximumBySym2 (a6989586621680404104 :: a ~> a ~> Ordering) (a6989586621680404105 :: t a) :: a
data MinimumBySym0 (a1 :: TyFun a ~> a ~> Ordering t a ~> a)
data MinimumBySym1 (a6989586621680404084 :: a ~> a ~> Ordering) (b :: TyFun t a a)
type family MinimumBySym2 (a6989586621680404084 :: a ~> a ~> Ordering) (a6989586621680404085 :: t a) :: a
data GenericLengthSym0 (a1 :: TyFun [a] i)
type family GenericLengthSym1 (a6989586621679823850 :: [a]) :: i
-- | Defines the promoted and singled versions of the MonadZip
-- type class.
module Control.Monad.Zip.Singletons
class PMonadZip (m :: Type -> Type) where {
type Mzip (arg :: m a) (arg1 :: m b) :: m (a, b);
type MzipWith (arg :: a ~> b ~> c) (arg1 :: m a) (arg2 :: m b) :: m c;
type Munzip (arg :: m (a, b)) :: (m a, m b);
type Mzip arg :: m a arg1 :: m b = Apply Apply Mzip_6989586621681100725Sym0 :: TyFun m a m b ~> m (a, b) -> Type arg arg1;
type MzipWith arg :: a ~> b ~> c arg1 :: m a arg2 :: m b = Apply Apply Apply MzipWith_6989586621681100741Sym0 :: TyFun a ~> b ~> c m a ~> m b ~> m c -> Type arg arg1 arg2;
type Munzip arg :: m (a, b) = Apply Munzip_6989586621681100754Sym0 :: TyFun m (a, b) (m a, m b) -> Type arg;
}
class SMonad m => SMonadZip (m :: Type -> Type)
sMzip :: forall a b (t1 :: m a) (t2 :: m b). SMonadZip m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MzipSym0 :: TyFun (m a) (m b ~> m (a, b)) -> Type) t1) t2)
($dmsMzip) :: forall a b (t1 :: m a) (t2 :: m b). (SMonadZip m, Apply (Apply (MzipSym0 :: TyFun (m a) (m b ~> m (a, b)) -> Type) t1) t2 ~ Apply (Apply (Mzip_6989586621681100725Sym0 :: TyFun (m a) (m b ~> m (a, b)) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MzipSym0 :: TyFun (m a) (m b ~> m (a, b)) -> Type) t1) t2)
sMzipWith :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: m a) (t3 :: m b). SMonadZip m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (MzipWithSym0 :: TyFun (a ~> (b ~> c)) (m a ~> (m b ~> m c)) -> Type) t1) t2) t3)
($dmsMzipWith) :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: m a) (t3 :: m b). (SMonadZip m, Apply (Apply (Apply (MzipWithSym0 :: TyFun (a ~> (b ~> c)) (m a ~> (m b ~> m c)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (MzipWith_6989586621681100741Sym0 :: TyFun (a ~> (b ~> c)) (m a ~> (m b ~> m c)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (MzipWithSym0 :: TyFun (a ~> (b ~> c)) (m a ~> (m b ~> m c)) -> Type) t1) t2) t3)
sMunzip :: forall a b (t :: m (a, b)). SMonadZip m => Sing t -> Sing (Apply (MunzipSym0 :: TyFun (m (a, b)) (m a, m b) -> Type) t)
($dmsMunzip) :: forall a b (t :: m (a, b)). (SMonadZip m, Apply (MunzipSym0 :: TyFun (m (a, b)) (m a, m b) -> Type) t ~ Apply (Munzip_6989586621681100754Sym0 :: TyFun (m (a, b)) (m a, m b) -> Type) t) => Sing t -> Sing (Apply (MunzipSym0 :: TyFun (m (a, b)) (m a, m b) -> Type) t)
data MzipSym0 (a1 :: TyFun m a m b ~> m (a, b))
data MzipSym1 (a6989586621681100711 :: m a) (b1 :: TyFun m b m (a, b))
type family MzipSym2 (a6989586621681100711 :: m a) (a6989586621681100712 :: m b) :: m (a, b)
data MzipWithSym0 (a1 :: TyFun a ~> b ~> c m a ~> m b ~> m c)
data MzipWithSym1 (a6989586621681100717 :: a ~> b ~> c) (b1 :: TyFun m a m b ~> m c)
data MzipWithSym2 (a6989586621681100717 :: a ~> b ~> c) (a6989586621681100718 :: m a) (c1 :: TyFun m b m c)
type family MzipWithSym3 (a6989586621681100717 :: a ~> b ~> c) (a6989586621681100718 :: m a) (a6989586621681100719 :: m b) :: m c
data MunzipSym0 (a1 :: TyFun m (a, b) (m a, m b))
type family MunzipSym1 (a6989586621681100722 :: m (a, b)) :: (m a, m b)
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Semigroup.Internal.Dual
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Monoid.First
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Monoid.Last
instance Control.Monad.Zip.Singletons.PMonadZip []
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Maybe.Maybe
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Semigroup.Internal.Product
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Data.Semigroup.Internal.Sum
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Semigroup.Internal.Dual
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Monoid.First
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Functor.Identity.Identity
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Monoid.Last
instance Control.Monad.Zip.Singletons.SMonadZip []
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Maybe.Maybe
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Semigroup.Internal.Product
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Proxy.Proxy
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Data.Semigroup.Internal.Sum
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI1 Control.Monad.Zip.Singletons.MzipWithSym1
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI1 Control.Monad.Zip.Singletons.MzipSym1
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> c)). (Control.Monad.Zip.Singletons.SMonadZip m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Control.Monad.Zip.Singletons.MzipWithSym2 d)
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI2 Control.Monad.Zip.Singletons.MzipWithSym2
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI Control.Monad.Zip.Singletons.MunzipSym0
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI Control.Monad.Zip.Singletons.MzipSym0
instance forall (m :: * -> *) a (d :: m a) b. (Control.Monad.Zip.Singletons.SMonadZip m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Zip.Singletons.MzipSym1 d)
instance Control.Monad.Zip.Singletons.SMonadZip m => Data.Singletons.SingI Control.Monad.Zip.Singletons.MzipWithSym0
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> c)). (Control.Monad.Zip.Singletons.SMonadZip m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Zip.Singletons.MzipWithSym1 d)
instance forall (m :: * -> *) a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (d2 :: m a). (Control.Monad.Zip.Singletons.SMonadZip m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Control.Monad.Zip.Singletons.MzipWithSym2 d1 d2)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MunzipSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.Munzip_6989586621681100754Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.Munzip_6989586621681100797Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.Munzip_6989586621681100827Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipSym0
instance forall (m :: * -> *) a b (a6989586621681100711 :: m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipSym1 a6989586621681100711)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWithSym0
instance forall a b c (m :: * -> *) (a6989586621681100717 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWithSym1 a6989586621681100717)
instance forall a b c (m :: * -> *) (a6989586621681100717 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100718 :: m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWithSym2 a6989586621681100717 a6989586621681100718)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100741Sym0
instance forall a b c (m :: * -> *) (a6989586621681100747 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100741Sym1 a6989586621681100747)
instance forall a b c (m :: * -> *) (a6989586621681100747 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100748 :: m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100741Sym2 a6989586621681100747 a6989586621681100748)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100778Sym0
instance forall a b c (a6989586621681100790 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100778Sym1 a6989586621681100790)
instance forall a b c (a6989586621681100790 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100791 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100778Sym2 a6989586621681100790 a6989586621681100791)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100808Sym0
instance forall a b c (a6989586621681100820 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100808Sym1 a6989586621681100820)
instance forall a b c (a6989586621681100820 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100821 :: GHC.Internal.Data.Functor.Identity.Identity a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100808Sym2 a6989586621681100820 a6989586621681100821)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100837Sym0
instance forall a b c (a6989586621681100849 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100837Sym1 a6989586621681100849)
instance forall a b c (a6989586621681100849 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100850 :: GHC.Internal.Data.Semigroup.Internal.Dual a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100837Sym2 a6989586621681100849 a6989586621681100850)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100858Sym0
instance forall a b c (a6989586621681100870 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100858Sym1 a6989586621681100870)
instance forall a b c (a6989586621681100870 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100871 :: GHC.Internal.Data.Semigroup.Internal.Sum a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100858Sym2 a6989586621681100870 a6989586621681100871)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100879Sym0
instance forall a b c (a6989586621681100891 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100879Sym1 a6989586621681100891)
instance forall a b c (a6989586621681100891 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100892 :: GHC.Internal.Data.Semigroup.Internal.Product a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100879Sym2 a6989586621681100891 a6989586621681100892)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100900Sym0
instance forall a b c (a6989586621681100912 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100900Sym1 a6989586621681100912)
instance forall a b c (a6989586621681100912 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100913 :: GHC.Internal.Maybe.Maybe a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100900Sym2 a6989586621681100912 a6989586621681100913)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100921Sym0
instance forall a b c (a6989586621681100933 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100921Sym1 a6989586621681100933)
instance forall a b c (a6989586621681100933 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100934 :: GHC.Internal.Data.Monoid.First a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100921Sym2 a6989586621681100933 a6989586621681100934)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100942Sym0
instance forall a b c (a6989586621681100954 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100942Sym1 a6989586621681100954)
instance forall a b c (a6989586621681100954 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100955 :: GHC.Internal.Data.Monoid.Last a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100942Sym2 a6989586621681100954 a6989586621681100955)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.MzipWith_6989586621681100963Sym0
instance forall a b c (a6989586621681100969 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100963Sym1 a6989586621681100969)
instance forall a b c (a6989586621681100969 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681100970 :: GHC.Internal.Data.Proxy.Proxy a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.MzipWith_6989586621681100963Sym2 a6989586621681100969 a6989586621681100970)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.Mzip_6989586621681100725Sym0
instance forall (m :: * -> *) a b (a6989586621681100734 :: m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.Mzip_6989586621681100725Sym1 a6989586621681100734)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Zip.Singletons.Mzip_6989586621681100762Sym0
instance forall a b (a6989586621681100771 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Zip.Singletons.Mzip_6989586621681100762Sym1 a6989586621681100771)
-- | Defines functions and datatypes relating to the singleton for
-- NonEmpty, including singled versions of all the definitions in
-- Data.List.NonEmpty.
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Please look up
-- the corresponding operation in Data.List.NonEmpty. Also,
-- please excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Data.List.NonEmpty.Singletons
type family Sing :: k -> Type
data SNonEmpty (a1 :: NonEmpty a)
[:%|] :: forall a (n1 :: a) (n2 :: [a]). Sing n1 -> Sing n2 -> SNonEmpty (n1 ':| n2)
infixr 5 :%|
type family Map (a1 :: a ~> b) (a2 :: NonEmpty a) :: NonEmpty b
sMap :: forall a b (t1 :: a ~> b) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapSym0 :: TyFun (a ~> b) (NonEmpty a ~> NonEmpty b) -> Type) t1) t2)
type family Intersperse (a1 :: a) (a2 :: NonEmpty a) :: NonEmpty a
sIntersperse :: forall a (t1 :: a) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (IntersperseSym0 :: TyFun a (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Scanl (a1 :: b ~> a ~> b) (a2 :: b) (a3 :: [a]) :: NonEmpty b
sScanl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanlSym0 :: TyFun (b ~> (a ~> b)) (b ~> ([a] ~> NonEmpty b)) -> Type) t1) t2) t3)
type family Scanr (a1 :: a ~> b ~> b) (a2 :: b) (a3 :: [a]) :: NonEmpty b
sScanr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanrSym0 :: TyFun (a ~> (b ~> b)) (b ~> ([a] ~> NonEmpty b)) -> Type) t1) t2) t3)
type family Scanl1 (a1 :: a ~> a ~> a) (a2 :: NonEmpty a) :: NonEmpty a
sScanl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanl1Sym0 :: TyFun (a ~> (a ~> a)) (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Scanr1 (a1 :: a ~> a ~> a) (a2 :: NonEmpty a) :: NonEmpty a
sScanr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanr1Sym0 :: TyFun (a ~> (a ~> a)) (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Transpose (a1 :: NonEmpty NonEmpty a) :: NonEmpty NonEmpty a
sTranspose :: forall a (t :: NonEmpty (NonEmpty a)). Sing t -> Sing (Apply (TransposeSym0 :: TyFun (NonEmpty (NonEmpty a)) (NonEmpty (NonEmpty a)) -> Type) t)
type family SortBy (a1 :: a ~> a ~> Ordering) (a2 :: NonEmpty a) :: NonEmpty a
sSortBy :: forall a (t1 :: a ~> (a ~> Ordering)) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SortBySym0 :: TyFun (a ~> (a ~> Ordering)) (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family SortWith (a1 :: a ~> o) (a2 :: NonEmpty a) :: NonEmpty a
sSortWith :: forall a o (t1 :: a ~> o) (t2 :: NonEmpty a). SOrd o => Sing t1 -> Sing t2 -> Sing (Apply (Apply (SortWithSym0 :: TyFun (a ~> o) (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Length (a1 :: NonEmpty a) :: Natural
sLength :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (LengthSym0 :: TyFun (NonEmpty a) Natural -> Type) t)
type family Head (a1 :: NonEmpty a) :: a
sHead :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (HeadSym0 :: TyFun (NonEmpty a) a -> Type) t)
type family Tail (a1 :: NonEmpty a) :: [a]
sTail :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (TailSym0 :: TyFun (NonEmpty a) [a] -> Type) t)
type family Last (a1 :: NonEmpty a) :: a
sLast :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (LastSym0 :: TyFun (NonEmpty a) a -> Type) t)
type family Init (a1 :: NonEmpty a) :: [a]
sInit :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (InitSym0 :: TyFun (NonEmpty a) [a] -> Type) t)
type family (a1 :: a) <| (a2 :: NonEmpty a) :: NonEmpty a
(%<|) :: forall a (t1 :: a) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<|@#@$) :: TyFun a (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Cons (a1 :: a) (a2 :: NonEmpty a) :: NonEmpty a
sCons :: forall a (t1 :: a) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ConsSym0 :: TyFun a (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family Uncons (a1 :: NonEmpty a) :: (a, Maybe NonEmpty a)
sUncons :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (UnconsSym0 :: TyFun (NonEmpty a) (a, Maybe (NonEmpty a)) -> Type) t)
type family Unfoldr (a1 :: a ~> (b, Maybe a)) (a2 :: a) :: NonEmpty b
sUnfoldr :: forall a b (t1 :: a ~> (b, Maybe a)) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (UnfoldrSym0 :: TyFun (a ~> (b, Maybe a)) (a ~> NonEmpty b) -> Type) t1) t2)
type family Sort (a1 :: NonEmpty a) :: NonEmpty a
sSort :: forall a (t :: NonEmpty a). SOrd a => Sing t -> Sing (Apply (SortSym0 :: TyFun (NonEmpty a) (NonEmpty a) -> Type) t)
type family Reverse (a1 :: NonEmpty a) :: NonEmpty a
sReverse :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (ReverseSym0 :: TyFun (NonEmpty a) (NonEmpty a) -> Type) t)
type family Inits (a1 :: [a]) :: NonEmpty [a]
sInits :: forall a (t :: [a]). Sing t -> Sing (Apply (InitsSym0 :: TyFun [a] (NonEmpty [a]) -> Type) t)
type family Tails (a1 :: [a]) :: NonEmpty [a]
sTails :: forall a (t :: [a]). Sing t -> Sing (Apply (TailsSym0 :: TyFun [a] (NonEmpty [a]) -> Type) t)
type family Unfold (a1 :: a ~> (b, Maybe a)) (a2 :: a) :: NonEmpty b
sUnfold :: forall a b (t1 :: a ~> (b, Maybe a)) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (UnfoldSym0 :: TyFun (a ~> (b, Maybe a)) (a ~> NonEmpty b) -> Type) t1) t2)
type family Insert (a1 :: a) (a2 :: [a]) :: NonEmpty a
sInsert :: forall a (t1 :: a) (t2 :: [a]). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (InsertSym0 :: TyFun a ([a] ~> NonEmpty a) -> Type) t1) t2)
type family Take (a1 :: Natural) (a2 :: NonEmpty a) :: [a]
sTake :: forall a (t1 :: Natural) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeSym0 :: TyFun Natural (NonEmpty a ~> [a]) -> Type) t1) t2)
type family Drop (a1 :: Natural) (a2 :: NonEmpty a) :: [a]
sDrop :: forall a (t1 :: Natural) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropSym0 :: TyFun Natural (NonEmpty a ~> [a]) -> Type) t1) t2)
type family SplitAt (a1 :: Natural) (a2 :: NonEmpty a) :: ([a], [a])
sSplitAt :: forall a (t1 :: Natural) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SplitAtSym0 :: TyFun Natural (NonEmpty a ~> ([a], [a])) -> Type) t1) t2)
type family TakeWhile (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: [a]
sTakeWhile :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeWhileSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> [a]) -> Type) t1) t2)
type family DropWhile (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: [a]
sDropWhile :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropWhileSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> [a]) -> Type) t1) t2)
type family Span (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: ([a], [a])
sSpan :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SpanSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> ([a], [a])) -> Type) t1) t2)
type family Break (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: ([a], [a])
sBreak :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (BreakSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> ([a], [a])) -> Type) t1) t2)
type family Filter (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: [a]
sFilter :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FilterSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> [a]) -> Type) t1) t2)
type family Partition (a1 :: a ~> Bool) (a2 :: NonEmpty a) :: ([a], [a])
sPartition :: forall a (t1 :: a ~> Bool) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (PartitionSym0 :: TyFun (a ~> Bool) (NonEmpty a ~> ([a], [a])) -> Type) t1) t2)
type family Group (a1 :: [a]) :: [NonEmpty a]
sGroup :: forall a (t :: [a]). SEq a => Sing t -> Sing (Apply (GroupSym0 :: TyFun [a] [NonEmpty a] -> Type) t)
type family GroupBy (a1 :: a ~> a ~> Bool) (a2 :: [a]) :: [NonEmpty a]
sGroupBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupBySym0 :: TyFun (a ~> (a ~> Bool)) ([a] ~> [NonEmpty a]) -> Type) t1) t2)
type family GroupWith (a1 :: a ~> b) (a2 :: [a]) :: [NonEmpty a]
sGroupWith :: forall a b (t1 :: a ~> b) (t2 :: [a]). SEq b => Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupWithSym0 :: TyFun (a ~> b) ([a] ~> [NonEmpty a]) -> Type) t1) t2)
type family GroupAllWith (a1 :: a ~> b) (a2 :: [a]) :: [NonEmpty a]
sGroupAllWith :: forall a b (t1 :: a ~> b) (t2 :: [a]). SOrd b => Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupAllWithSym0 :: TyFun (a ~> b) ([a] ~> [NonEmpty a]) -> Type) t1) t2)
type family Group1 (a1 :: NonEmpty a) :: NonEmpty NonEmpty a
sGroup1 :: forall a (t :: NonEmpty a). SEq a => Sing t -> Sing (Apply (Group1Sym0 :: TyFun (NonEmpty a) (NonEmpty (NonEmpty a)) -> Type) t)
type family GroupBy1 (a1 :: a ~> a ~> Bool) (a2 :: NonEmpty a) :: NonEmpty NonEmpty a
sGroupBy1 :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupBy1Sym0 :: TyFun (a ~> (a ~> Bool)) (NonEmpty a ~> NonEmpty (NonEmpty a)) -> Type) t1) t2)
type family GroupWith1 (a1 :: a ~> b) (a2 :: NonEmpty a) :: NonEmpty NonEmpty a
sGroupWith1 :: forall a b (t1 :: a ~> b) (t2 :: NonEmpty a). SEq b => Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupWith1Sym0 :: TyFun (a ~> b) (NonEmpty a ~> NonEmpty (NonEmpty a)) -> Type) t1) t2)
type family GroupAllWith1 (a1 :: a ~> b) (a2 :: NonEmpty a) :: NonEmpty NonEmpty a
sGroupAllWith1 :: forall a b (t1 :: a ~> b) (t2 :: NonEmpty a). SOrd b => Sing t1 -> Sing t2 -> Sing (Apply (Apply (GroupAllWith1Sym0 :: TyFun (a ~> b) (NonEmpty a ~> NonEmpty (NonEmpty a)) -> Type) t1) t2)
type family IsPrefixOf (a1 :: [a]) (a2 :: NonEmpty a) :: Bool
sIsPrefixOf :: forall a (t1 :: [a]) (t2 :: NonEmpty a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (IsPrefixOfSym0 :: TyFun [a] (NonEmpty a ~> Bool) -> Type) t1) t2)
type family Nub (a1 :: NonEmpty a) :: NonEmpty a
sNub :: forall a (t :: NonEmpty a). SEq a => Sing t -> Sing (Apply (NubSym0 :: TyFun (NonEmpty a) (NonEmpty a) -> Type) t)
type family NubBy (a1 :: a ~> a ~> Bool) (a2 :: NonEmpty a) :: NonEmpty a
sNubBy :: forall a (t1 :: a ~> (a ~> Bool)) (t2 :: NonEmpty a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (NubBySym0 :: TyFun (a ~> (a ~> Bool)) (NonEmpty a ~> NonEmpty a) -> Type) t1) t2)
type family (a1 :: NonEmpty a) !! (a2 :: Natural) :: a
(%!!) :: forall a (t1 :: NonEmpty a) (t2 :: Natural). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((!!@#@$) :: TyFun (NonEmpty a) (Natural ~> a) -> Type) t1) t2)
type family Zip (a1 :: NonEmpty a) (a2 :: NonEmpty b) :: NonEmpty (a, b)
sZip :: forall a b (t1 :: NonEmpty a) (t2 :: NonEmpty b). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ZipSym0 :: TyFun (NonEmpty a) (NonEmpty b ~> NonEmpty (a, b)) -> Type) t1) t2)
type family ZipWith (a1 :: a ~> b ~> c) (a2 :: NonEmpty a) (a3 :: NonEmpty b) :: NonEmpty c
sZipWith :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: NonEmpty a) (t3 :: NonEmpty b). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ZipWithSym0 :: TyFun (a ~> (b ~> c)) (NonEmpty a ~> (NonEmpty b ~> NonEmpty c)) -> Type) t1) t2) t3)
type family Unzip (a1 :: NonEmpty (a, b)) :: (NonEmpty a, NonEmpty b)
sUnzip :: forall a b (t :: NonEmpty (a, b)). Sing t -> Sing (Apply (UnzipSym0 :: TyFun (NonEmpty (a, b)) (NonEmpty a, NonEmpty b) -> Type) t)
type family FromList (a1 :: [a]) :: NonEmpty a
sFromList :: forall a (t :: [a]). Sing t -> Sing (Apply (FromListSym0 :: TyFun [a] (NonEmpty a) -> Type) t)
type family ToList (a1 :: NonEmpty a) :: [a]
sToList :: forall a (t :: NonEmpty a). Sing t -> Sing (Apply (ToListSym0 :: TyFun (NonEmpty a) [a] -> Type) t)
type family NonEmpty_ (a1 :: [a]) :: Maybe NonEmpty a
sNonEmpty_ :: forall a (t :: [a]). Sing t -> Sing (Apply (NonEmpty_Sym0 :: TyFun [a] (Maybe (NonEmpty a)) -> Type) t)
type family Xor (a :: NonEmpty Bool) :: Bool
sXor :: forall (t :: NonEmpty Bool). Sing t -> Sing (Apply XorSym0 t)
data (a1 :: TyFun a [a] ~> NonEmpty a) :|@#@$
infixr 5 :|@#@$
data (a6989586621679047221 :: a) :|@#@$$ (b :: TyFun [a] NonEmpty a)
infixr 5 :|@#@$$
type family (a6989586621679047221 :: a) :|@#@$$$ (a6989586621679047222 :: [a]) :: NonEmpty a
infixr 5 :|@#@$$$
data MapSym0 (a1 :: TyFun a ~> b NonEmpty a ~> NonEmpty b)
data MapSym1 (a6989586621681138899 :: a ~> b) (b1 :: TyFun NonEmpty a NonEmpty b)
type family MapSym2 (a6989586621681138899 :: a ~> b) (a6989586621681138900 :: NonEmpty a) :: NonEmpty b
data IntersperseSym0 (a1 :: TyFun a NonEmpty a ~> NonEmpty a)
data IntersperseSym1 (a6989586621681138827 :: a) (b :: TyFun NonEmpty a NonEmpty a)
type family IntersperseSym2 (a6989586621681138827 :: a) (a6989586621681138828 :: NonEmpty a) :: NonEmpty a
data ScanlSym0 (a1 :: TyFun b ~> a ~> b b ~> [a] ~> NonEmpty b)
data ScanlSym1 (a6989586621681138869 :: b ~> a ~> b) (b1 :: TyFun b [a] ~> NonEmpty b)
data ScanlSym2 (a6989586621681138869 :: b ~> a ~> b) (a6989586621681138870 :: b) (c :: TyFun [a] NonEmpty b)
type family ScanlSym3 (a6989586621681138869 :: b ~> a ~> b) (a6989586621681138870 :: b) (a6989586621681138871 :: [a]) :: NonEmpty b
data ScanrSym0 (a1 :: TyFun a ~> b ~> b b ~> [a] ~> NonEmpty b)
data ScanrSym1 (a6989586621681138857 :: a ~> b ~> b) (b1 :: TyFun b [a] ~> NonEmpty b)
data ScanrSym2 (a6989586621681138857 :: a ~> b ~> b) (a6989586621681138858 :: b) (c :: TyFun [a] NonEmpty b)
type family ScanrSym3 (a6989586621681138857 :: a ~> b ~> b) (a6989586621681138858 :: b) (a6989586621681138859 :: [a]) :: NonEmpty b
data Scanl1Sym0 (a1 :: TyFun a ~> a ~> a NonEmpty a ~> NonEmpty a)
data Scanl1Sym1 (a6989586621681138846 :: a ~> a ~> a) (b :: TyFun NonEmpty a NonEmpty a)
type family Scanl1Sym2 (a6989586621681138846 :: a ~> a ~> a) (a6989586621681138847 :: NonEmpty a) :: NonEmpty a
data Scanr1Sym0 (a1 :: TyFun a ~> a ~> a NonEmpty a ~> NonEmpty a)
data Scanr1Sym1 (a6989586621681138838 :: a ~> a ~> a) (b :: TyFun NonEmpty a NonEmpty a)
type family Scanr1Sym2 (a6989586621681138838 :: a ~> a ~> a) (a6989586621681138839 :: NonEmpty a) :: NonEmpty a
data TransposeSym0 (a1 :: TyFun NonEmpty NonEmpty a NonEmpty NonEmpty a)
type family TransposeSym1 (a6989586621681138536 :: NonEmpty NonEmpty a) :: NonEmpty NonEmpty a
data SortBySym0 (a1 :: TyFun a ~> a ~> Ordering NonEmpty a ~> NonEmpty a)
data SortBySym1 (a6989586621681138528 :: a ~> a ~> Ordering) (b :: TyFun NonEmpty a NonEmpty a)
type family SortBySym2 (a6989586621681138528 :: a ~> a ~> Ordering) (a6989586621681138529 :: NonEmpty a) :: NonEmpty a
data SortWithSym0 (a1 :: TyFun a ~> o NonEmpty a ~> NonEmpty a)
data SortWithSym1 (a6989586621681138519 :: a ~> o) (b :: TyFun NonEmpty a NonEmpty a)
type family SortWithSym2 (a6989586621681138519 :: a ~> o) (a6989586621681138520 :: NonEmpty a) :: NonEmpty a
data LengthSym0 (a1 :: TyFun NonEmpty a Natural)
type family LengthSym1 (a6989586621681139029 :: NonEmpty a) :: Natural
data HeadSym0 (a1 :: TyFun NonEmpty a a)
type family HeadSym1 (a6989586621681138964 :: NonEmpty a) :: a
data TailSym0 (a1 :: TyFun NonEmpty a [a])
type family TailSym1 (a6989586621681138960 :: NonEmpty a) :: [a]
data LastSym0 (a1 :: TyFun NonEmpty a a)
type family LastSym1 (a6989586621681138955 :: NonEmpty a) :: a
data InitSym0 (a1 :: TyFun NonEmpty a [a])
type family InitSym1 (a6989586621681138950 :: NonEmpty a) :: [a]
data (a1 :: TyFun a NonEmpty a ~> NonEmpty a) <|@#@$
data (a6989586621681138943 :: a) <|@#@$$ (b :: TyFun NonEmpty a NonEmpty a)
type family (a6989586621681138943 :: a) <|@#@$$$ (a6989586621681138944 :: NonEmpty a) :: NonEmpty a
data ConsSym0 (a1 :: TyFun a NonEmpty a ~> NonEmpty a)
data ConsSym1 (a6989586621681138936 :: a) (b :: TyFun NonEmpty a NonEmpty a)
type family ConsSym2 (a6989586621681138936 :: a) (a6989586621681138937 :: NonEmpty a) :: NonEmpty a
data UnconsSym0 (a1 :: TyFun NonEmpty a (a, Maybe NonEmpty a))
type family UnconsSym1 (a6989586621681138993 :: NonEmpty a) :: (a, Maybe NonEmpty a)
data UnfoldrSym0 (a1 :: TyFun a ~> (b, Maybe a) a ~> NonEmpty b)
data UnfoldrSym1 (a6989586621681138969 :: a ~> (b, Maybe a)) (b1 :: TyFun a NonEmpty b)
type family UnfoldrSym2 (a6989586621681138969 :: a ~> (b, Maybe a)) (a6989586621681138970 :: a) :: NonEmpty b
data SortSym0 (a1 :: TyFun NonEmpty a NonEmpty a)
type family SortSym1 (a6989586621681138927 :: NonEmpty a) :: NonEmpty a
data ReverseSym0 (a1 :: TyFun NonEmpty a NonEmpty a)
type family ReverseSym1 (a6989586621681138822 :: NonEmpty a) :: NonEmpty a
data InitsSym0 (a1 :: TyFun [a] NonEmpty [a])
type family InitsSym1 (a6989586621681138894 :: [a]) :: NonEmpty [a]
data TailsSym0 (a1 :: TyFun [a] NonEmpty [a])
type family TailsSym1 (a6989586621681138888 :: [a]) :: NonEmpty [a]
data UnfoldSym0 (a1 :: TyFun a ~> (b, Maybe a) a ~> NonEmpty b)
data UnfoldSym1 (a6989586621681139004 :: a ~> (b, Maybe a)) (b1 :: TyFun a NonEmpty b)
data InsertSym0 (a1 :: TyFun a [a] ~> NonEmpty a)
data InsertSym1 (a6989586621681138880 :: a) (b :: TyFun [a] NonEmpty a)
type family InsertSym2 (a6989586621681138880 :: a) (a6989586621681138881 :: [a]) :: NonEmpty a
data TakeSym0 (a1 :: TyFun Natural NonEmpty a ~> [a])
data TakeSym1 (a6989586621681138814 :: Natural) (b :: TyFun NonEmpty a [a])
type family TakeSym2 (a6989586621681138814 :: Natural) (a6989586621681138815 :: NonEmpty a) :: [a]
data DropSym0 (a1 :: TyFun Natural NonEmpty a ~> [a])
data DropSym1 (a6989586621681138805 :: Natural) (b :: TyFun NonEmpty a [a])
type family DropSym2 (a6989586621681138805 :: Natural) (a6989586621681138806 :: NonEmpty a) :: [a]
data SplitAtSym0 (a1 :: TyFun Natural NonEmpty a ~> ([a], [a]))
data SplitAtSym1 (a6989586621681138796 :: Natural) (b :: TyFun NonEmpty a ([a], [a]))
type family SplitAtSym2 (a6989586621681138796 :: Natural) (a6989586621681138797 :: NonEmpty a) :: ([a], [a])
data TakeWhileSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> [a])
data TakeWhileSym1 (a6989586621681138787 :: a ~> Bool) (b :: TyFun NonEmpty a [a])
type family TakeWhileSym2 (a6989586621681138787 :: a ~> Bool) (a6989586621681138788 :: NonEmpty a) :: [a]
data DropWhileSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> [a])
data DropWhileSym1 (a6989586621681138778 :: a ~> Bool) (b :: TyFun NonEmpty a [a])
type family DropWhileSym2 (a6989586621681138778 :: a ~> Bool) (a6989586621681138779 :: NonEmpty a) :: [a]
data SpanSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> ([a], [a]))
data SpanSym1 (a6989586621681138769 :: a ~> Bool) (b :: TyFun NonEmpty a ([a], [a]))
type family SpanSym2 (a6989586621681138769 :: a ~> Bool) (a6989586621681138770 :: NonEmpty a) :: ([a], [a])
data BreakSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> ([a], [a]))
data BreakSym1 (a6989586621681138760 :: a ~> Bool) (b :: TyFun NonEmpty a ([a], [a]))
type family BreakSym2 (a6989586621681138760 :: a ~> Bool) (a6989586621681138761 :: NonEmpty a) :: ([a], [a])
data FilterSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> [a])
data FilterSym1 (a6989586621681138751 :: a ~> Bool) (b :: TyFun NonEmpty a [a])
type family FilterSym2 (a6989586621681138751 :: a ~> Bool) (a6989586621681138752 :: NonEmpty a) :: [a]
data PartitionSym0 (a1 :: TyFun a ~> Bool NonEmpty a ~> ([a], [a]))
data PartitionSym1 (a6989586621681138742 :: a ~> Bool) (b :: TyFun NonEmpty a ([a], [a]))
type family PartitionSym2 (a6989586621681138742 :: a ~> Bool) (a6989586621681138743 :: NonEmpty a) :: ([a], [a])
data GroupSym0 (a1 :: TyFun [a] [NonEmpty a])
type family GroupSym1 (a6989586621681138735 :: [a]) :: [NonEmpty a]
data GroupBySym0 (a1 :: TyFun a ~> a ~> Bool [a] ~> [NonEmpty a])
data GroupBySym1 (a6989586621681138702 :: a ~> a ~> Bool) (b :: TyFun [a] [NonEmpty a])
type family GroupBySym2 (a6989586621681138702 :: a ~> a ~> Bool) (a6989586621681138703 :: [a]) :: [NonEmpty a]
data GroupWithSym0 (a1 :: TyFun a ~> b [a] ~> [NonEmpty a])
data GroupWithSym1 (a6989586621681138693 :: a ~> b) (b1 :: TyFun [a] [NonEmpty a])
type family GroupWithSym2 (a6989586621681138693 :: a ~> b) (a6989586621681138694 :: [a]) :: [NonEmpty a]
data GroupAllWithSym0 (a1 :: TyFun a ~> b [a] ~> [NonEmpty a])
data GroupAllWithSym1 (a6989586621681138684 :: a ~> b) (b1 :: TyFun [a] [NonEmpty a])
type family GroupAllWithSym2 (a6989586621681138684 :: a ~> b) (a6989586621681138685 :: [a]) :: [NonEmpty a]
data Group1Sym0 (a1 :: TyFun NonEmpty a NonEmpty NonEmpty a)
type family Group1Sym1 (a6989586621681138677 :: NonEmpty a) :: NonEmpty NonEmpty a
data GroupBy1Sym0 (a1 :: TyFun a ~> a ~> Bool NonEmpty a ~> NonEmpty NonEmpty a)
data GroupBy1Sym1 (a6989586621681138650 :: a ~> a ~> Bool) (b :: TyFun NonEmpty a NonEmpty NonEmpty a)
type family GroupBy1Sym2 (a6989586621681138650 :: a ~> a ~> Bool) (a6989586621681138651 :: NonEmpty a) :: NonEmpty NonEmpty a
data GroupWith1Sym0 (a1 :: TyFun a ~> b NonEmpty a ~> NonEmpty NonEmpty a)
data GroupWith1Sym1 (a6989586621681138643 :: a ~> b) (b1 :: TyFun NonEmpty a NonEmpty NonEmpty a)
type family GroupWith1Sym2 (a6989586621681138643 :: a ~> b) (a6989586621681138644 :: NonEmpty a) :: NonEmpty NonEmpty a
data GroupAllWith1Sym0 (a1 :: TyFun a ~> b NonEmpty a ~> NonEmpty NonEmpty a)
data GroupAllWith1Sym1 (a6989586621681138634 :: a ~> b) (b1 :: TyFun NonEmpty a NonEmpty NonEmpty a)
type family GroupAllWith1Sym2 (a6989586621681138634 :: a ~> b) (a6989586621681138635 :: NonEmpty a) :: NonEmpty NonEmpty a
data IsPrefixOfSym0 (a1 :: TyFun [a] NonEmpty a ~> Bool)
data IsPrefixOfSym1 (a6989586621681138623 :: [a]) (b :: TyFun NonEmpty a Bool)
type family IsPrefixOfSym2 (a6989586621681138623 :: [a]) (a6989586621681138624 :: NonEmpty a) :: Bool
data NubSym0 (a1 :: TyFun NonEmpty a NonEmpty a)
type family NubSym1 (a6989586621681138554 :: NonEmpty a) :: NonEmpty a
data NubBySym0 (a1 :: TyFun a ~> a ~> Bool NonEmpty a ~> NonEmpty a)
data NubBySym1 (a6989586621681138541 :: a ~> a ~> Bool) (b :: TyFun NonEmpty a NonEmpty a)
type family NubBySym2 (a6989586621681138541 :: a ~> a ~> Bool) (a6989586621681138542 :: NonEmpty a) :: NonEmpty a
data (a1 :: TyFun NonEmpty a Natural ~> a) !!@#@$
data (a6989586621681138604 :: NonEmpty a) !!@#@$$ (b :: TyFun Natural a)
type family (a6989586621681138604 :: NonEmpty a) !!@#@$$$ (a6989586621681138605 :: Natural) :: a
data ZipSym0 (a1 :: TyFun NonEmpty a NonEmpty b ~> NonEmpty (a, b))
data ZipSym1 (a6989586621681138595 :: NonEmpty a) (b1 :: TyFun NonEmpty b NonEmpty (a, b))
type family ZipSym2 (a6989586621681138595 :: NonEmpty a) (a6989586621681138596 :: NonEmpty b) :: NonEmpty (a, b)
data ZipWithSym0 (a1 :: TyFun a ~> b ~> c NonEmpty a ~> NonEmpty b ~> NonEmpty c)
data ZipWithSym1 (a6989586621681138584 :: a ~> b ~> c) (b1 :: TyFun NonEmpty a NonEmpty b ~> NonEmpty c)
data ZipWithSym2 (a6989586621681138584 :: a ~> b ~> c) (a6989586621681138585 :: NonEmpty a) (c1 :: TyFun NonEmpty b NonEmpty c)
type family ZipWithSym3 (a6989586621681138584 :: a ~> b ~> c) (a6989586621681138585 :: NonEmpty a) (a6989586621681138586 :: NonEmpty b) :: NonEmpty c
data UnzipSym0 (a1 :: TyFun NonEmpty (a, b) (NonEmpty a, NonEmpty b))
type family UnzipSym1 (a6989586621681138558 :: NonEmpty (a, b)) :: (NonEmpty a, NonEmpty b)
data FromListSym0 (a1 :: TyFun [a] NonEmpty a)
type family FromListSym1 (a6989586621681138920 :: [a]) :: NonEmpty a
data ToListSym0 (a1 :: TyFun NonEmpty a [a])
type family ToListSym1 (a6989586621681138915 :: NonEmpty a) :: [a]
data NonEmpty_Sym0 (a1 :: TyFun [a] Maybe NonEmpty a)
type family NonEmpty_Sym1 (a6989586621681138998 :: [a]) :: Maybe NonEmpty a
data XorSym0 (a :: TyFun NonEmpty Bool Bool)
type family XorSym1 (a6989586621681139018 :: NonEmpty Bool) :: Bool
instance Control.Monad.Zip.Singletons.PMonadZip GHC.Internal.Base.NonEmpty
instance Control.Monad.Zip.Singletons.SMonadZip GHC.Internal.Base.NonEmpty
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.BreakSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.DropWhileSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.FilterSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.FmapSym1
instance Data.Ord.Singletons.SOrd b => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupAllWith1Sym1
instance Data.Ord.Singletons.SOrd b => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupAllWithSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupBy1Sym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupBySym1
instance Data.Eq.Singletons.SEq b => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupWith1Sym1
instance Data.Eq.Singletons.SEq b => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.GroupWithSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.LiftSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.MapSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.NubBySym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.PartitionSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.Scanl1Sym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.ScanlSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.Scanr1Sym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.ScanrSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.SortBySym1
instance Data.Ord.Singletons.SOrd o => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.SortWithSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.SpanSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.TakeWhileSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.UnfoldSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.UnfoldrSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.ZipWithSym1
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.IsPrefixOfSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.DropSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.SplitAtSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.TakeSym1
instance Data.Singletons.SingI1 (Data.List.NonEmpty.Singletons.!!@#@$$)
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.ZipSym1
instance forall a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.List.NonEmpty.Singletons.ZipWithSym2 d)
instance Data.Singletons.SingI1 (Data.List.NonEmpty.Singletons.<|@#@$$)
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.ConsSym1
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.InsertSym1
instance Data.Singletons.SingI1 Data.List.NonEmpty.Singletons.IntersperseSym1
instance forall b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.List.NonEmpty.Singletons.ScanlSym2 d)
instance forall a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.SingI d => Data.Singletons.SingI1 (Data.List.NonEmpty.Singletons.ScanrSym2 d)
instance Data.Singletons.SingI2 Data.List.NonEmpty.Singletons.ZipWithSym2
instance Data.Singletons.SingI2 Data.List.NonEmpty.Singletons.ScanlSym2
instance Data.Singletons.SingI2 Data.List.NonEmpty.Singletons.ScanrSym2
instance Data.Singletons.SingI (Data.List.NonEmpty.Singletons.!!@#@$)
instance forall a (d :: GHC.Internal.Base.NonEmpty a). Data.Singletons.SingI d => Data.Singletons.SingI ((Data.List.NonEmpty.Singletons.!!@#@$$) d)
instance Data.Singletons.SingI (Data.List.NonEmpty.Singletons.<|@#@$)
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI ((Data.List.NonEmpty.Singletons.<|@#@$$) d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.BreakSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.BreakSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ConsSym0
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ConsSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.DropSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.DropSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.DropWhileSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.DropWhileSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.FilterSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.FilterSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.FmapSym0
instance forall a b (d :: a Data.Singletons.~> b). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.FmapSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.FromListSym0
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.Group1Sym0
instance Data.Ord.Singletons.SOrd b => Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupAllWith1Sym0
instance forall b a (d :: a Data.Singletons.~> b). (Data.Ord.Singletons.SOrd b, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupAllWith1Sym1 d)
instance Data.Ord.Singletons.SOrd b => Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupAllWithSym0
instance forall b a (d :: a Data.Singletons.~> b). (Data.Ord.Singletons.SOrd b, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupAllWithSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupBy1Sym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupBy1Sym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupBySym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupBySym1 d)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupSym0
instance Data.Eq.Singletons.SEq b => Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupWith1Sym0
instance forall b a (d :: a Data.Singletons.~> b). (Data.Eq.Singletons.SEq b, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupWith1Sym1 d)
instance Data.Eq.Singletons.SEq b => Data.Singletons.SingI Data.List.NonEmpty.Singletons.GroupWithSym0
instance forall b a (d :: a Data.Singletons.~> b). (Data.Eq.Singletons.SEq b, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.GroupWithSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.HeadSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.InitSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.InitsSym0
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.InsertSym0
instance forall a (d :: a). (Data.Ord.Singletons.SOrd a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.InsertSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.IntersperseSym0
instance forall a (d :: a). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.IntersperseSym1 d)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.IsPrefixOfSym0
instance forall a (d :: [a]). (Data.Eq.Singletons.SEq a, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.IsPrefixOfSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.LastSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.LengthSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.LiftSym0
instance forall a b (d :: [a] Data.Singletons.~> [b]). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.LiftSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.MapSym0
instance forall a b (d :: a Data.Singletons.~> b). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.MapSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.NonEmpty_Sym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.NubBySym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.NubBySym1 d)
instance Data.Eq.Singletons.SEq a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.NubSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.PartitionSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.PartitionSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ReverseSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.Scanl1Sym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.Scanl1Sym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ScanlSym0
instance forall b a (d :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ScanlSym1 d)
instance forall b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (d2 :: b). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ScanlSym2 d1 d2)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.Scanr1Sym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.Scanr1Sym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ScanrSym0
instance forall a b (d :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ScanrSym1 d)
instance forall a b (d1 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (d2 :: b). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ScanrSym2 d1 d2)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.SortBySym0
instance forall a (d :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.SortBySym1 d)
instance Data.Ord.Singletons.SOrd a => Data.Singletons.SingI Data.List.NonEmpty.Singletons.SortSym0
instance Data.Ord.Singletons.SOrd o => Data.Singletons.SingI Data.List.NonEmpty.Singletons.SortWithSym0
instance forall o a (d :: a Data.Singletons.~> o). (Data.Ord.Singletons.SOrd o, Data.Singletons.SingI d) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.SortWithSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.SpanSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.SpanSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.SplitAtSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.SplitAtSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.TailSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.TailsSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.TakeSym0
instance Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.TakeSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.TakeWhileSym0
instance forall a (d :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.TakeWhileSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ToListSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.TransposeSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.UnconsSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.UnfoldSym0
instance forall a b (d :: a Data.Singletons.~> (b, GHC.Internal.Maybe.Maybe a)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.UnfoldSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.UnfoldrSym0
instance forall a b (d :: a Data.Singletons.~> (b, GHC.Internal.Maybe.Maybe a)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.UnfoldrSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.UnzipSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.XorSym0
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ZipSym0
instance forall a (d :: GHC.Internal.Base.NonEmpty a) b. Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ZipSym1 d)
instance Data.Singletons.SingI Data.List.NonEmpty.Singletons.ZipWithSym0
instance forall a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.SingI d => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ZipWithSym1 d)
instance forall a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (d2 :: GHC.Internal.Base.NonEmpty a). (Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Data.List.NonEmpty.Singletons.ZipWithSym2 d1 d2)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.!!@#@$)
instance forall a (a6989586621681138604 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.List.NonEmpty.Singletons.!!@#@$$) a6989586621681138604)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.<|@#@$)
instance forall a (a6989586621681138943 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.List.NonEmpty.Singletons.<|@#@$$) a6989586621681138943)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.BreakSym0
instance forall a (a6989586621681138760 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.BreakSym1 a6989586621681138760)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ConsSym0
instance forall a (a6989586621681138936 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ConsSym1 a6989586621681138936)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.DropSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.DropSym1 a6989586621681138805)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.DropWhileSym0
instance forall a (a6989586621681138778 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.DropWhileSym1 a6989586621681138778)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.FilterSym0
instance forall a (a6989586621681138751 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.FilterSym1 a6989586621681138751)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.FmapSym0
instance forall a b (a6989586621681139034 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.FmapSym1 a6989586621681139034)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.FromListSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Group1Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupAllWith1Sym0
instance forall a b (a6989586621681138634 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupAllWith1Sym1 a6989586621681138634)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupAllWithSym0
instance forall a b (a6989586621681138684 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupAllWithSym1 a6989586621681138684)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupBy1Sym0
instance forall a (a6989586621681138650 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupBy1Sym1 a6989586621681138650)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupBySym0
instance forall a (a6989586621681138702 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupBySym1 a6989586621681138702)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupWith1Sym0
instance forall a b (a6989586621681138643 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupWith1Sym1 a6989586621681138643)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.GroupWithSym0
instance forall a b (a6989586621681138693 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.GroupWithSym1 a6989586621681138693)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.HeadSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.InitSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.InitsSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.InsertSym0
instance forall a (a6989586621681138880 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.InsertSym1 a6989586621681138880)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.IntersperseSym0
instance forall a (a6989586621681138827 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.IntersperseSym1 a6989586621681138827)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.IsPrefixOfSym0
instance forall a (a6989586621681138623 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.IsPrefixOfSym1 a6989586621681138623)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Lambda_6989586621681138546Sym0
instance forall k2 k3 k (eq6989586621681138543 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Lambda_6989586621681138546Sym1 eq6989586621681138543)
instance forall k2 k3 k (eq6989586621681138543 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> GHC.Types.Bool)) (a6989586621681138544 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Lambda_6989586621681138546Sym2 eq6989586621681138543 a6989586621681138544)
instance forall k2 k3 k (eq6989586621681138543 :: k2 Data.Singletons.~> (k3 Data.Singletons.~> GHC.Types.Bool)) (a6989586621681138544 :: k2) (as6989586621681138545 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Lambda_6989586621681138546Sym3 eq6989586621681138543 a6989586621681138544 as6989586621681138545)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.LastSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.LengthSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138562AsSym0
instance forall k1 k2 a b (a6989586621681138559 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562AsSym1 a6989586621681138559)
instance forall k1 k2 a b (a6989586621681138559 :: k1) (b6989586621681138560 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562AsSym2 a6989586621681138559 b6989586621681138560)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138562BsSym0
instance forall k1 k2 a b (a6989586621681138559 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562BsSym1 a6989586621681138559)
instance forall k1 k2 a b (a6989586621681138559 :: k1) (b6989586621681138560 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562BsSym2 a6989586621681138559 b6989586621681138560)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138562X_6989586621681138563Sym0
instance forall k1 k2 a b (a6989586621681138559 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562X_6989586621681138563Sym1 a6989586621681138559)
instance forall k1 k2 a b (a6989586621681138559 :: k1) (b6989586621681138560 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138562X_6989586621681138563Sym2 a6989586621681138559 b6989586621681138560)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138655X_6989586621681138656Sym0
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655X_6989586621681138656Sym1 eq6989586621681138652)
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138653 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655X_6989586621681138656Sym2 eq6989586621681138652 x6989586621681138653)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138655YsSym0
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655YsSym1 eq6989586621681138652)
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138653 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655YsSym2 eq6989586621681138652 x6989586621681138653)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138655ZsSym0
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655ZsSym1 eq6989586621681138652)
instance forall k1 a (eq6989586621681138652 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138653 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138655ZsSym2 eq6989586621681138652 x6989586621681138653)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138706GoSym0
instance forall k1 k2 a (eq06989586621681138704 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138706GoSym1 eq06989586621681138704)
instance forall k1 k2 a (eq06989586621681138704 :: k1) (a_69895866216811386976989586621681138705 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138706GoSym2 eq06989586621681138704 a_69895866216811386976989586621681138705)
instance forall k1 k2 a (eq06989586621681138704 :: k1) (a_69895866216811386976989586621681138705 :: k2) (a6989586621681138707 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138706GoSym3 eq06989586621681138704 a_69895866216811386976989586621681138705 a6989586621681138707)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138713X_6989586621681138714Sym0
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713X_6989586621681138714Sym1 eq6989586621681138710)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713X_6989586621681138714Sym2 eq6989586621681138710 x6989586621681138711)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713X_6989586621681138714Sym3 eq6989586621681138710 x6989586621681138711 xs6989586621681138712)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]) (eq06989586621681138704 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713X_6989586621681138714Sym4 eq6989586621681138710 x6989586621681138711 xs6989586621681138712 eq06989586621681138704)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138713YsSym0
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713YsSym1 eq6989586621681138710)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713YsSym2 eq6989586621681138710 x6989586621681138711)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713YsSym3 eq6989586621681138710 x6989586621681138711 xs6989586621681138712)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]) (eq06989586621681138704 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713YsSym4 eq6989586621681138710 x6989586621681138711 xs6989586621681138712 eq06989586621681138704)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138713ZsSym0
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713ZsSym1 eq6989586621681138710)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713ZsSym2 eq6989586621681138710 x6989586621681138711)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713ZsSym3 eq6989586621681138710 x6989586621681138711 xs6989586621681138712)
instance forall k1 a k2 k3 (eq6989586621681138710 :: k1 Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)) (x6989586621681138711 :: k1) (xs6989586621681138712 :: [a]) (eq06989586621681138704 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138713ZsSym4 eq6989586621681138710 x6989586621681138711 xs6989586621681138712 eq06989586621681138704)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138973GoSym0
instance forall k2 k3 k (f6989586621681138971 :: k2 Data.Singletons.~> (k3, GHC.Internal.Maybe.Maybe k2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138973GoSym1 f6989586621681138971)
instance forall k2 k3 k (f6989586621681138971 :: k2 Data.Singletons.~> (k3, GHC.Internal.Maybe.Maybe k2)) (a6989586621681138972 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138973GoSym2 f6989586621681138971 a6989586621681138972)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138977Scrutinee_6989586621681137552Sym0
instance forall k1 k2 k3 (c6989586621681138976 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138977Scrutinee_6989586621681137552Sym1 c6989586621681138976)
instance forall k1 k2 k3 (c6989586621681138976 :: k1) (f6989586621681138971 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138977Scrutinee_6989586621681137552Sym2 c6989586621681138976 f6989586621681138971)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681138984Scrutinee_6989586621681137548Sym0
instance forall k1 k (f6989586621681138971 :: k1 Data.Singletons.~> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681138984Scrutinee_6989586621681137548Sym1 f6989586621681138971)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681139008Scrutinee_6989586621681137538Sym0
instance forall k1 k (f6989586621681139006 :: k1 Data.Singletons.~> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681139008Scrutinee_6989586621681137538Sym1 f6989586621681139006)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Let6989586621681139021Xor'Sym0
instance forall k1 k2 (x6989586621681139019 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681139021Xor'Sym1 x6989586621681139019)
instance forall k1 k2 (x6989586621681139019 :: k1) (xs6989586621681139020 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681139021Xor'Sym2 x6989586621681139019 xs6989586621681139020)
instance forall k1 k2 (x6989586621681139019 :: k1) (xs6989586621681139020 :: k2) (a6989586621681139022 :: GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Let6989586621681139021Xor'Sym3 x6989586621681139019 xs6989586621681139020 a6989586621681139022)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.LiftSym0
instance forall a b (a6989586621681138909 :: [a] Data.Singletons.~> [b]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.LiftSym1 a6989586621681138909)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.MapSym0
instance forall a b (a6989586621681138899 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.MapSym1 a6989586621681138899)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Munzip_6989586621681139323Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.MzipWith_6989586621681139304Sym0
instance forall a b c (a6989586621681139316 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.MzipWith_6989586621681139304Sym1 a6989586621681139316)
instance forall a b c (a6989586621681139316 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681139317 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.MzipWith_6989586621681139304Sym2 a6989586621681139316 a6989586621681139317)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Mzip_6989586621681139288Sym0
instance forall a b (a6989586621681139297 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Mzip_6989586621681139288Sym1 a6989586621681139297)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.NonEmpty_Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.NubBySym0
instance forall a (a6989586621681138541 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Bool)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.NubBySym1 a6989586621681138541)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.NubSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.PartitionSym0
instance forall a (a6989586621681138742 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.PartitionSym1 a6989586621681138742)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ReverseSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Scanl1Sym0
instance forall a (a6989586621681138846 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Scanl1Sym1 a6989586621681138846)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ScanlSym0
instance forall b a (a6989586621681138869 :: b Data.Singletons.~> (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ScanlSym1 a6989586621681138869)
instance forall b a (a6989586621681138869 :: b Data.Singletons.~> (a Data.Singletons.~> b)) (a6989586621681138870 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ScanlSym2 a6989586621681138869 a6989586621681138870)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.Scanr1Sym0
instance forall a (a6989586621681138838 :: a Data.Singletons.~> (a Data.Singletons.~> a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.Scanr1Sym1 a6989586621681138838)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ScanrSym0
instance forall a b (a6989586621681138857 :: a Data.Singletons.~> (b Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ScanrSym1 a6989586621681138857)
instance forall a b (a6989586621681138857 :: a Data.Singletons.~> (b Data.Singletons.~> b)) (a6989586621681138858 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ScanrSym2 a6989586621681138857 a6989586621681138858)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.SortBySym0
instance forall a (a6989586621681138528 :: a Data.Singletons.~> (a Data.Singletons.~> GHC.Types.Ordering)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.SortBySym1 a6989586621681138528)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.SortSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.SortWithSym0
instance forall a o (a6989586621681138519 :: a Data.Singletons.~> o). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.SortWithSym1 a6989586621681138519)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.SpanSym0
instance forall a (a6989586621681138769 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.SpanSym1 a6989586621681138769)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.SplitAtSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.SplitAtSym1 a6989586621681138796)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.TailSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.TailsSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.TakeSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.TakeSym1 a6989586621681138814)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.TakeWhileSym0
instance forall a (a6989586621681138787 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.TakeWhileSym1 a6989586621681138787)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ToListSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.TransposeSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.UnconsSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.UnfoldSym0
instance forall a b (a6989586621681139004 :: a Data.Singletons.~> (b, GHC.Internal.Maybe.Maybe a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.UnfoldSym1 a6989586621681139004)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.UnfoldrSym0
instance forall a b (a6989586621681138969 :: a Data.Singletons.~> (b, GHC.Internal.Maybe.Maybe a)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.UnfoldrSym1 a6989586621681138969)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.UnzipSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.XorSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ZipSym0
instance forall a b (a6989586621681138595 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ZipSym1 a6989586621681138595)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.List.NonEmpty.Singletons.ZipWithSym0
instance forall a b c (a6989586621681138584 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ZipWithSym1 a6989586621681138584)
instance forall a b c (a6989586621681138584 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681138585 :: GHC.Internal.Base.NonEmpty a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.List.NonEmpty.Singletons.ZipWithSym2 a6989586621681138584 a6989586621681138585)
-- | Exports the promoted and singled versions of the Sum data type.
module Data.Functor.Sum.Singletons
type family Sing :: k -> Type
data SSum (a1 :: Sum f g a)
[SInL] :: forall {k} (f :: k -> Type) (g :: k -> Type) (a :: k) (x :: f a). Sing x -> SSum ('InL x :: Sum f g a)
[SInR] :: forall {k} (f :: k -> Type) (g :: k -> Type) (a :: k) (y :: g a). Sing y -> SSum ('InR y :: Sum f g a)
data InLSym0 (z :: TyFun f a Sum f g a)
type family InLSym1 (x :: f a) :: Sum f g a
data InRSym0 (z :: TyFun g a Sum f g a)
type family InRSym1 (x :: g a) :: Sum f g a
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (z :: Data.Functor.Sum.Sum f g a). GHC.Classes.Eq (Data.Functor.Sum.Singletons.SSum z)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (z :: Data.Functor.Sum.Sum f g a). GHC.Classes.Ord (Data.Functor.Sum.Singletons.SSum z)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Eq.Singletons.PEq (Data.Functor.Sum.Sum f g a)
instance Data.Foldable.Singletons.PFoldable (Data.Functor.Sum.Sum f g)
instance Control.Monad.Singletons.Internal.PFunctor (Data.Functor.Sum.Sum f g)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Ord.Singletons.POrd (Data.Functor.Sum.Sum f g a)
instance Data.Traversable.Singletons.PTraversable (Data.Functor.Sum.Sum f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => Data.Singletons.Decide.SDecide (Data.Functor.Sum.Sum f g a)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Eq.Singletons.SEq (f a), Data.Eq.Singletons.SEq (g a)) => Data.Eq.Singletons.SEq (Data.Functor.Sum.Sum f g a)
instance (Data.Foldable.Singletons.SFoldable f, Data.Foldable.Singletons.SFoldable g) => Data.Foldable.Singletons.SFoldable (Data.Functor.Sum.Sum f g)
instance (Control.Monad.Singletons.Internal.SFunctor f, Control.Monad.Singletons.Internal.SFunctor g) => Control.Monad.Singletons.Internal.SFunctor (Data.Functor.Sum.Sum f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Ord.Singletons.SOrd (f a), Data.Ord.Singletons.SOrd (g a)) => Data.Ord.Singletons.SOrd (Data.Functor.Sum.Sum f g a)
instance (Data.Traversable.Singletons.STraversable f, Data.Traversable.Singletons.STraversable g) => Data.Traversable.Singletons.STraversable (Data.Functor.Sum.Sum f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). Data.Singletons.SingI1 'Data.Functor.Sum.InL
instance forall k (g :: k -> *) (a :: k) (f :: k -> *). Data.Singletons.SingI1 'Data.Functor.Sum.InR
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). Data.Singletons.SingI Data.Functor.Sum.Singletons.InLSym0
instance forall k (g :: k -> *) (a :: k) (f :: k -> *). Data.Singletons.SingI Data.Functor.Sum.Singletons.InRSym0
instance forall k (f :: k -> *) (a :: k) (g :: k -> *) (x :: f a). Data.Singletons.SingI x => Data.Singletons.SingI ('Data.Functor.Sum.InL x)
instance forall k (g :: k -> *) (a :: k) (f :: k -> *) (y :: g a). Data.Singletons.SingI y => Data.Singletons.SingI ('Data.Functor.Sum.InR y)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.Compare_6989586621681190258Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681190263 :: Data.Functor.Sum.Sum f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.Compare_6989586621681190258Sym1 a6989586621681190263)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.Fmap_6989586621681190378Sym0
instance forall a b (f :: * -> *) (g :: * -> *) (a6989586621681190383 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.Fmap_6989586621681190378Sym1 a6989586621681190383)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.FoldMap_6989586621681190730Sym0
instance forall a m (f :: * -> *) (g :: * -> *) (a6989586621681190735 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.FoldMap_6989586621681190730Sym1 a6989586621681190735)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.TFHelper_6989586621681190197Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681190202 :: Data.Functor.Sum.Sum f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.TFHelper_6989586621681190197Sym1 a6989586621681190202)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.TFHelper_6989586621681190391Sym0
instance forall a (f :: * -> *) (g :: * -> *) b (a6989586621681190396 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.TFHelper_6989586621681190391Sym1 a6989586621681190396)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Sum.Singletons.Traverse_6989586621681190870Sym0
instance forall a (f1 :: * -> *) b (f2 :: * -> *) (g :: * -> *) (a6989586621681190875 :: a Data.Singletons.~> f1 b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Sum.Singletons.Traverse_6989586621681190870Sym1 a6989586621681190875)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Functor.Sum.Singletons.SSum
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => GHC.Internal.Data.Type.Equality.TestEquality Data.Functor.Sum.Singletons.SSum
-- | Defines and exports a promoted and singled version of the
-- IsString type class from Data.String.
module Data.String.Singletons
class PIsString a where {
type FromString (arg :: Symbol) :: a;
}
class SIsString a
sFromString :: forall (t :: Symbol). SIsString a => Sing t -> Sing (Apply (FromStringSym0 :: TyFun Symbol a -> Type) t)
data FromStringSym0 (a1 :: TyFun Symbol a)
type family FromStringSym1 (a6989586621681198181 :: Symbol) :: a
instance forall a k (b :: k). Data.String.Singletons.PIsString (GHC.Internal.Data.Functor.Const.Const a b)
instance Data.String.Singletons.PIsString (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.String.Singletons.PIsString GHC.Types.Symbol
instance forall a k (b :: k). Data.String.Singletons.SIsString a => Data.String.Singletons.SIsString (GHC.Internal.Data.Functor.Const.Const a b)
instance Data.String.Singletons.SIsString a => Data.String.Singletons.SIsString (GHC.Internal.Data.Functor.Identity.Identity a)
instance Data.String.Singletons.SIsString GHC.Types.Symbol
instance Data.String.Singletons.SIsString a => Data.Singletons.SingI Data.String.Singletons.FromStringSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.String.Singletons.FromStringSym0
instance forall k a (b :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.String.Singletons.FromString_6989586621681198183Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.String.Singletons.FromString_6989586621681198190Sym0
-- | Provides the SomeSing data type along with instances of
-- Eq, Ord, etc., which are defined as orphans due to
-- SomeSing originally being defined in a separate library
-- (singletons).
module Data.Singletons.Base.SomeSing
data SomeSing k
[SomeSing] :: forall k (a :: k). Sing a -> SomeSing k
instance Data.Singletons.Base.Enum.SBounded k => GHC.Internal.Enum.Bounded (Data.Singletons.SomeSing k)
instance Data.Singletons.Base.Enum.SEnum k => GHC.Internal.Enum.Enum (Data.Singletons.SomeSing k)
instance Data.Eq.Singletons.SEq k => GHC.Classes.Eq (Data.Singletons.SomeSing k)
instance Data.String.Singletons.SIsString k => GHC.Internal.Data.String.IsString (Data.Singletons.SomeSing k)
instance Data.Monoid.Singletons.SMonoid k => GHC.Internal.Base.Monoid (Data.Singletons.SomeSing k)
instance GHC.Num.Singletons.SNum k => GHC.Internal.Num.Num (Data.Singletons.SomeSing k)
instance Data.Ord.Singletons.SOrd k => GHC.Classes.Ord (Data.Singletons.SomeSing k)
instance Data.Semigroup.Singletons.Internal.Classes.SSemigroup k => GHC.Internal.Base.Semigroup (Data.Singletons.SomeSing k)
instance Data.Singletons.ShowSing.ShowSing k => GHC.Internal.Show.Show (Data.Singletons.SomeSing k)
-- | Defines the promoted and singled versions of the Applicative
-- type class.
module Control.Applicative.Singletons
class PApplicative (f :: Type -> Type) where {
type Pure (arg :: a) :: f a;
type (arg :: f a ~> b) <*> (arg1 :: f a) :: f b;
type LiftA2 (arg :: a ~> b ~> c) (arg1 :: f a) (arg2 :: f b) :: f c;
type (arg :: f a) *> (arg1 :: f b) :: f b;
type (arg :: f a) <* (arg1 :: f b) :: f a;
type arg :: f a ~> b <*> arg1 :: f a = Apply Apply TFHelper_6989586621679351193Sym0 :: TyFun f a ~> b f a ~> f b -> Type arg arg1;
type LiftA2 arg :: a ~> b ~> c arg1 :: f a arg2 :: f b = Apply Apply Apply LiftA2_6989586621679351209Sym0 :: TyFun a ~> b ~> c f a ~> f b ~> f c -> Type arg arg1 arg2;
type arg :: f a *> arg1 :: f b = Apply Apply TFHelper_6989586621679351225Sym0 :: TyFun f a f b ~> f b -> Type arg arg1;
type arg :: f a <* arg1 :: f b = Apply Apply TFHelper_6989586621679351236Sym0 :: TyFun f a f b ~> f a -> Type arg arg1;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f => SApplicative (f :: Type -> Type)
sPure :: forall a (t :: a). SApplicative f => Sing t -> Sing (Apply (PureSym0 :: TyFun a (f a) -> Type) t)
(%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
($dm%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). (SApplicative f, Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351193Sym0 :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
sLiftA2 :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
($dmsLiftA2) :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). (SApplicative f, Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (LiftA2_6989586621679351209Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
(%*>) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
($dm%*>) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351225Sym0 :: TyFun (f a) (f b ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
(%<*) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
($dm%<*) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351236Sym0 :: TyFun (f a) (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
class PAlternative (f :: k -> Type) where {
type Empty :: f a;
type (arg :: f a) <|> (arg1 :: f a) :: f a;
}
infixl 3 <|>
class SApplicative f => SAlternative (f :: Type -> Type)
sEmpty :: SAlternative f => Sing (EmptySym0 :: f a)
(%<|>) :: forall a (t1 :: f a) (t2 :: f a). SAlternative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<|>@#@$) :: TyFun (f a) (f a ~> f a) -> Type) t1) t2)
infixl 3 %<|>
type family Sing :: k -> Type
data SConst (a1 :: Const a b)
[SConst] :: forall {k} a (b :: k) (x :: a). Sing x -> SConst ('Const x :: Const a b)
-- | The Const functor.
--
-- Examples
--
--
-- >>> fmap (++ "World") (Const "Hello")
-- Const "Hello"
--
--
-- Because we ignore the second type parameter to Const, the
-- Applicative instance, which has (<*>) :: Monoid m
-- => Const m (a -> b) -> Const m a -> Const m b
-- essentially turns into Monoid m => m -> m -> m,
-- which is (<>)
--
--
-- >>> Const [1, 2, 3] <*> Const [4, 5, 6]
-- Const [1,2,3,4,5,6]
--
data Const a (b :: k)
type family GetConst (a1 :: Const a b) :: a
sGetConst :: forall {k} a (b :: k) (t :: Const a b). Sing t -> Sing (Apply (GetConstSym0 :: TyFun (Const a b) a -> Type) t)
type family (a1 :: a ~> b) <$> (a2 :: f a) :: f b
infixl 4 <$>
(%<$>) :: forall a b (f :: Type -> Type) (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$>@#@$) :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
infixl 4 %<$>
type family (arg :: a) <$ (arg1 :: f b) :: f a
infixl 4 <$
(%<$) :: forall a b (t1 :: a) (t2 :: f b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
infixl 4 %<$
type family (a1 :: f a) <**> (a2 :: f a ~> b) :: f b
infixl 4 <**>
(%<**>) :: forall (f :: Type -> Type) a b (t1 :: f a) (t2 :: f (a ~> b)). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<**>@#@$) :: TyFun (f a) (f (a ~> b) ~> f b) -> Type) t1) t2)
infixl 4 %<**>
type family LiftA (a1 :: a ~> b) (a2 :: f a) :: f b
sLiftA :: forall a b (f :: Type -> Type) (t1 :: a ~> b) (t2 :: f a). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (LiftASym0 :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
type family LiftA3 (a1 :: a ~> b ~> c ~> d) (a2 :: f a) (a3 :: f b) (a4 :: f c) :: f d
sLiftA3 :: forall a b c d (f :: Type -> Type) (t1 :: a ~> (b ~> (c ~> d))) (t2 :: f a) (t3 :: f b) (t4 :: f c). SApplicative f => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (Apply (LiftA3Sym0 :: TyFun (a ~> (b ~> (c ~> d))) (f a ~> (f b ~> (f c ~> f d))) -> Type) t1) t2) t3) t4)
type family Optional (a1 :: f a) :: f Maybe a
sOptional :: forall (f :: Type -> Type) a (t :: f a). SAlternative f => Sing t -> Sing (Apply (OptionalSym0 :: TyFun (f a) (f (Maybe a)) -> Type) t)
data PureSym0 (a1 :: TyFun a f a)
type family PureSym1 (a6989586621679351168 :: a) :: f a
data (a1 :: TyFun f a ~> b f a ~> f b) <*>@#@$
infixl 4 <*>@#@$
data (a6989586621679351172 :: f a ~> b) <*>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <*>@#@$$
type family (a6989586621679351172 :: f a ~> b) <*>@#@$$$ (a6989586621679351173 :: f a) :: f b
infixl 4 <*>@#@$$$
data (a1 :: TyFun f a f b ~> f b) *>@#@$
infixl 4 *>@#@$
data (a6989586621679351184 :: f a) *>@#@$$ (b1 :: TyFun f b f b)
infixl 4 *>@#@$$
type family (a6989586621679351184 :: f a) *>@#@$$$ (a6989586621679351185 :: f b) :: f b
infixl 4 *>@#@$$$
data (a1 :: TyFun f a f b ~> f a) <*@#@$
infixl 4 <*@#@$
data (a6989586621679351189 :: f a) <*@#@$$ (b1 :: TyFun f b f a)
infixl 4 <*@#@$$
type family (a6989586621679351189 :: f a) <*@#@$$$ (a6989586621679351190 :: f b) :: f a
infixl 4 <*@#@$$$
type family EmptySym0 :: f a
data (a1 :: TyFun f a f a ~> f a) <|>@#@$
infixl 3 <|>@#@$
data (a6989586621679351293 :: f a) <|>@#@$$ (b :: TyFun f a f a)
infixl 3 <|>@#@$$
type family (a6989586621679351293 :: f a) <|>@#@$$$ (a6989586621679351294 :: f a) :: f a
infixl 3 <|>@#@$$$
data ConstSym0 (z :: TyFun a Const a b)
type family ConstSym1 (x :: a) :: Const a b
data GetConstSym0 (a1 :: TyFun Const a b a)
type family GetConstSym1 (a6989586621680696986 :: Const a b) :: a
data (a1 :: TyFun a ~> b f a ~> f b) <$>@#@$
infixl 4 <$>@#@$
data (a6989586621679536195 :: a ~> b) <$>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <$>@#@$$
type family (a6989586621679536195 :: a ~> b) <$>@#@$$$ (a6989586621679536196 :: f a) :: f b
infixl 4 <$>@#@$$$
data (a1 :: TyFun a f b ~> f a) <$@#@$
infixl 4 <$@#@$
data (a6989586621679351149 :: a) <$@#@$$ (b1 :: TyFun f b f a)
infixl 4 <$@#@$$
type family (a6989586621679351149 :: a) <$@#@$$$ (a6989586621679351150 :: f b) :: f a
infixl 4 <$@#@$$$
data (a1 :: TyFun f a f a ~> b ~> f b) <**>@#@$
infixl 4 <**>@#@$
data (a6989586621679351132 :: f a) <**>@#@$$ (b1 :: TyFun f a ~> b f b)
infixl 4 <**>@#@$$
type family (a6989586621679351132 :: f a) <**>@#@$$$ (a6989586621679351133 :: f a ~> b) :: f b
infixl 4 <**>@#@$$$
data LiftASym0 (a1 :: TyFun a ~> b f a ~> f b)
data LiftASym1 (a6989586621679351121 :: a ~> b) (b1 :: TyFun f a f b)
type family LiftASym2 (a6989586621679351121 :: a ~> b) (a6989586621679351122 :: f a) :: f b
data LiftA2Sym0 (a1 :: TyFun a ~> b ~> c f a ~> f b ~> f c)
data LiftA2Sym1 (a6989586621679351178 :: a ~> b ~> c) (b1 :: TyFun f a f b ~> f c)
data LiftA2Sym2 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (c1 :: TyFun f b f c)
type family LiftA2Sym3 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (a6989586621679351180 :: f b) :: f c
data LiftA3Sym0 (a1 :: TyFun a ~> b ~> c ~> d f a ~> f b ~> f c ~> f d)
data LiftA3Sym1 (a6989586621679351110 :: a ~> b ~> c ~> d) (b1 :: TyFun f a f b ~> f c ~> f d)
data LiftA3Sym2 (a6989586621679351110 :: a ~> b ~> c ~> d) (a6989586621679351111 :: f a) (c1 :: TyFun f b f c ~> f d)
data LiftA3Sym3 (a6989586621679351110 :: a ~> b ~> c ~> d) (a6989586621679351111 :: f a) (a6989586621679351112 :: f b) (d1 :: TyFun f c f d)
data OptionalSym0 (a1 :: TyFun f a f Maybe a)
type family OptionalSym1 (a6989586621681200918 :: f a) :: f Maybe a
instance Control.Monad.Singletons.Internal.PApplicative GHC.Internal.Data.Ord.Down
instance Control.Monad.Singletons.Internal.PApplicative ((,) a)
instance Control.Monad.Singletons.Internal.SApplicative GHC.Internal.Data.Ord.Down
instance Data.Monoid.Singletons.SMonoid a => Control.Monad.Singletons.Internal.SApplicative ((,) a)
instance Control.Monad.Singletons.Internal.SAlternative f => Data.Singletons.SingI Control.Applicative.Singletons.OptionalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.LiftA2_6989586621681200943Sym0
instance forall a1 b c a2 (a6989586621681200949 :: a1 Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Applicative.Singletons.LiftA2_6989586621681200943Sym1 a6989586621681200949)
instance forall a1 b c a2 (a6989586621681200949 :: a1 Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681200950 :: (a2, a1)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Applicative.Singletons.LiftA2_6989586621681200943Sym2 a6989586621681200949 a6989586621681200950)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.OptionalSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.Pure_6989586621681200921Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.Pure_6989586621681200958Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.TFHelper_6989586621681200929Sym0
instance forall a1 a2 b (a6989586621681200934 :: (a1, a2 Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Applicative.Singletons.TFHelper_6989586621681200929Sym1 a6989586621681200934)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Applicative.Singletons.TFHelper_6989586621681200968Sym0
instance forall a b (a6989586621681200973 :: GHC.Internal.Data.Ord.Down (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Applicative.Singletons.TFHelper_6989586621681200968Sym1 a6989586621681200973)
-- | This module contains everything you need to derive your own singletons
-- via Template Haskell, exporting both Template Haskell functionality
-- and definitions that are likely to be mentioned in promoted or singled
-- code. For a version of this module that only contains the Template
-- Haskell functionality and nothing else, see Data.Singletons.TH
-- from the singletons-th library.
module Data.Singletons.Base.TH
singletons :: OptionsMonad q => q [Dec] -> q [Dec]
singletonsOnly :: OptionsMonad q => q [Dec] -> q [Dec]
genSingletons :: OptionsMonad q => [Name] -> q [Dec]
promote :: OptionsMonad q => q [Dec] -> q [Dec]
promoteOnly :: OptionsMonad q => q [Dec] -> q [Dec]
genDefunSymbols :: OptionsMonad q => [Name] -> q [Dec]
genPromotions :: OptionsMonad q => [Name] -> q [Dec]
promoteEqInstances :: OptionsMonad q => [Name] -> q [Dec]
promoteEqInstance :: OptionsMonad q => Name -> q [Dec]
singEqInstances :: OptionsMonad q => [Name] -> q [Dec]
singEqInstance :: OptionsMonad q => Name -> q [Dec]
singDecideInstances :: OptionsMonad q => [Name] -> q [Dec]
singDecideInstance :: OptionsMonad q => Name -> q [Dec]
promoteOrdInstances :: OptionsMonad q => [Name] -> q [Dec]
promoteOrdInstance :: OptionsMonad q => Name -> q [Dec]
singOrdInstances :: OptionsMonad q => [Name] -> q [Dec]
singOrdInstance :: OptionsMonad q => Name -> q [Dec]
promoteBoundedInstances :: OptionsMonad q => [Name] -> q [Dec]
promoteBoundedInstance :: OptionsMonad q => Name -> q [Dec]
singBoundedInstances :: OptionsMonad q => [Name] -> q [Dec]
singBoundedInstance :: OptionsMonad q => Name -> q [Dec]
promoteEnumInstances :: OptionsMonad q => [Name] -> q [Dec]
promoteEnumInstance :: OptionsMonad q => Name -> q [Dec]
singEnumInstances :: OptionsMonad q => [Name] -> q [Dec]
singEnumInstance :: OptionsMonad q => Name -> q [Dec]
promoteShowInstances :: OptionsMonad q => [Name] -> q [Dec]
promoteShowInstance :: OptionsMonad q => Name -> q [Dec]
singShowInstances :: OptionsMonad q => [Name] -> q [Dec]
singShowInstance :: OptionsMonad q => Name -> q [Dec]
showSingInstances :: OptionsMonad q => [Name] -> q [Dec]
showSingInstance :: OptionsMonad q => Name -> q [Dec]
singITyConInstances :: DsMonad q => [Int] -> q [Dec]
singITyConInstance :: DsMonad q => Int -> q Dec
cases :: DsMonad q => Name -> q Exp -> q Exp -> q Exp
sCases :: OptionsMonad q => Name -> q Exp -> q Exp -> q Exp
data SList (a1 :: [a])
[SNil] :: forall a. SList ('[] :: [a])
[SCons] :: forall a (n1 :: a) (n2 :: [a]). Sing n1 -> Sing n2 -> SList (n1 ': n2)
infixr 5 `SCons`
data SBool (a :: Bool)
[SFalse] :: SBool 'False
[STrue] :: SBool 'True
data STuple0 (a :: ())
[STuple0] :: STuple0 '()
data STuple2 (a1 :: (a, b))
[STuple2] :: forall a b (n1 :: a) (n2 :: b). Sing n1 -> Sing n2 -> STuple2 '(n1, n2)
data STuple3 (a1 :: (a, b, c))
[STuple3] :: forall a b c (n1 :: a) (n2 :: b) (n3 :: c). Sing n1 -> Sing n2 -> Sing n3 -> STuple3 '(n1, n2, n3)
data STuple4 (a1 :: (a, b, c, d))
[STuple4] :: forall a b c d (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> STuple4 '(n1, n2, n3, n4)
data STuple5 (a1 :: (a, b, c, d, e))
[STuple5] :: forall a b c d e (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> STuple5 '(n1, n2, n3, n4, n5)
data STuple6 (a1 :: (a, b, c, d, e, f))
[STuple6] :: forall a b c d e f (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> STuple6 '(n1, n2, n3, n4, n5, n6)
data STuple7 (a1 :: (a, b, c, d, e, f, g))
[STuple7] :: forall a b c d e f g (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f) (n7 :: g). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> Sing n7 -> STuple7 '(n1, n2, n3, n4, n5, n6, n7)
data SOrdering (a :: Ordering)
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
data family TyCon :: forall k1 k2 unmatchable_fun. () => k1 -> k2 -> unmatchable_fun
-- | Proxy is a type that holds no data, but has a phantom parameter
-- of arbitrary type (or even kind). Its use is to provide type
-- information, even though there is no value available of that type (or
-- it may be too costly to create one).
--
-- Historically, Proxy :: Proxy a is a safer
-- alternative to the undefined :: a idiom.
--
--
-- >>> Proxy :: Proxy (Void, Int -> Int)
-- Proxy
--
--
-- Proxy can even hold types of higher kinds,
--
--
-- >>> Proxy :: Proxy Either
-- Proxy
--
--
--
-- >>> Proxy :: Proxy Functor
-- Proxy
--
--
--
-- >>> Proxy :: Proxy complicatedStructure
-- Proxy
--
data Proxy (t :: k)
Proxy :: Proxy (t :: k)
class SingKind k where {
type Demote k = (r :: Type) | r -> k;
}
fromSing :: forall (a :: k). SingKind k => Sing a -> Demote k
toSing :: SingKind k => Demote k -> SomeSing k
class SingI (a :: k)
sing :: SingI a => Sing a
type family Sing :: k -> Type
pattern Sing :: forall k (a :: k). () => SingI a => Sing a
data SomeSing k
[SomeSing] :: forall k (a :: k). Sing a -> SomeSing k
type (a :: k1 ~> k2) @@ (b :: k1) = Apply a b
(@@) :: forall k1 k2 (f :: k1 ~> k2) (t :: k1). Sing f -> Sing t -> Sing (f @@ t)
pattern FromSing :: forall k (a :: k). SingKind k => Sing a -> Demote k
pattern SLambda2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). SingFunction2 f -> Sing f
pattern SLambda3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). SingFunction3 f -> Sing f
pattern SLambda4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). SingFunction4 f -> Sing f
pattern SLambda5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). SingFunction5 f -> Sing f
pattern SLambda6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). SingFunction6 f -> Sing f
pattern SLambda7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). SingFunction7 f -> Sing f
pattern SLambda8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). SingFunction8 f -> Sing f
applySing2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). Sing f -> SingFunction2 f
applySing3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). Sing f -> SingFunction3 f
applySing4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). Sing f -> SingFunction4 f
applySing5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). Sing f -> SingFunction5 f
applySing6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). Sing f -> SingFunction6 f
applySing7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). Sing f -> SingFunction7 f
applySing8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). Sing f -> SingFunction8 f
demote :: forall {k} (a :: k). (SingKind k, SingI a) => Demote k
demote1 :: forall {k1} {k2} (f :: k1 -> k2) (x :: k1). (SingKind k2, SingI1 f, SingI x) => Demote k2
demote2 :: forall {k1} {k2} {k3} (f :: k1 -> k2 -> k3) (x :: k1) (y :: k2). (SingKind k3, SingI2 f, SingI x, SingI y) => Demote k3
sing1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1). (SingI1 f, SingI x) => Sing (f x)
sing2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2). (SingI2 f, SingI x, SingI y) => Sing (f x y)
singByProxy :: forall {k} (a :: k) proxy. SingI a => proxy a -> Sing a
singByProxy# :: forall {k} (a :: k). SingI a => Proxy# a -> Sing a
singByProxy1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) proxy. (SingI1 f, SingI x) => proxy (f x) -> Sing (f x)
singByProxy1# :: forall {k1} {k} (f :: k1 -> k) (x :: k1). (SingI1 f, SingI x) => Proxy# (f x) -> Sing (f x)
singByProxy2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) proxy. (SingI2 f, SingI x, SingI y) => proxy (f x y) -> Sing (f x y)
singByProxy2# :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2). (SingI2 f, SingI x, SingI y) => Proxy# (f x y) -> Sing (f x y)
singFun1 :: forall {a1} {b} (f :: a1 ~> b). SingFunction1 f -> Sing f
singFun2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). SingFunction2 f -> Sing f
singFun3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). SingFunction3 f -> Sing f
singFun4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). SingFunction4 f -> Sing f
singFun5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). SingFunction5 f -> Sing f
singFun6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). SingFunction6 f -> Sing f
singFun7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). SingFunction7 f -> Sing f
singFun8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). SingFunction8 f -> Sing f
singInstance :: forall k (a :: k). Sing a -> SingInstance a
singThat :: forall k (a :: k). (SingKind k, SingI a) => (Demote k -> Bool) -> Maybe (Sing a)
singThat1 :: forall k1 k2 (f :: k1 -> k2) (x :: k1). (SingKind k2, SingI1 f, SingI x) => (Demote k2 -> Bool) -> Maybe (Sing (f x))
singThat2 :: forall k1 k2 k3 (f :: k1 -> k2 -> k3) (x :: k1) (y :: k2). (SingKind k3, SingI2 f, SingI x, SingI y) => (Demote k3 -> Bool) -> Maybe (Sing (f x y))
unSingFun1 :: forall {a1} {b} (f :: a1 ~> b). Sing f -> SingFunction1 f
unSingFun2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). Sing f -> SingFunction2 f
unSingFun3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). Sing f -> SingFunction3 f
unSingFun4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). Sing f -> SingFunction4 f
unSingFun5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). Sing f -> SingFunction5 f
unSingFun6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). Sing f -> SingFunction6 f
unSingFun7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). Sing f -> SingFunction7 f
unSingFun8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). Sing f -> SingFunction8 f
usingSingI1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) r. (SingI1 f, SingI x) => (SingI (f x) => r) -> r
usingSingI2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) r. (SingI2 f, SingI x, SingI y) => (SingI (f x y) => r) -> r
withSing :: forall {k} (a :: k) b. SingI a => (Sing a -> b) -> b
withSing1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) b. (SingI1 f, SingI x) => (Sing (f x) -> b) -> b
withSing2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) b. (SingI2 f, SingI x, SingI y) => (Sing (f x y) -> b) -> b
withSingI :: forall {k} (n :: k) r. Sing n -> (SingI n => r) -> r
withSomeSing :: SingKind k => Demote k -> (forall (a :: k). () => Sing a -> r) -> r
data (a1 :: TyFun a ~> b a ~> b) @@@#@$
data (a1 :: a ~> b) @@@#@$$ (b1 :: TyFun a b)
type (f :: a ~> b) @@@#@$$$ (x :: a) = f @@ x
type family Apply (f :: k1 ~> k2) (x :: k1) :: k2
data ApplySym0 (a1 :: TyFun a ~> b a ~> b)
data ApplySym1 (a1 :: a ~> b) (b1 :: TyFun a b)
type ApplySym2 (f :: a ~> b) (x :: a) = Apply f x
type family ApplyTyCon :: k1 -> k2 -> TyFun k1 unmatchable_fun -> Type
data ApplyTyConAux1 (a :: k1 -> k2) (b :: TyFun k1 k2)
data ApplyTyConAux2 (a :: k1 -> k2 -> k3) (b :: TyFun k1 unmatchable_fun)
type family Demote k = (r :: Type) | r -> k
data DemoteSym0 (a :: TyFun Type Type)
type DemoteSym1 x = Demote x
type KindOf (a :: k) = k
data KindOfSym0 (a :: TyFun k Type)
type KindOfSym1 (x :: k) = KindOf x
newtype SLambda (f :: k1 ~> k2)
SLambda :: (forall (t :: k1). () => Sing t -> Sing (f @@ t)) -> SLambda (f :: k1 ~> k2)
[applySing] :: SLambda (f :: k1 ~> k2) -> forall (t :: k1). () => Sing t -> Sing (f @@ t)
newtype SWrappedSing (a1 :: WrappedSing a)
[SWrapSing] :: forall k (a :: k) (a1 :: WrappedSing a). Sing a -> SWrappedSing a1
type SameKind (a :: k) (b :: k) = ()
data SameKindSym0 (a :: TyFun k k ~> Constraint)
data SameKindSym1 (a :: k) (b :: TyFun k Constraint)
type SameKindSym2 (x :: k) (y :: k) = SameKind x y
type SingFunction1 (f :: a1 ~> b) = forall (t :: a1). () => Sing t -> Sing f @@ t
type SingFunction2 (f :: a1 ~> a2 ~> b) = forall (t1 :: a1) (t2 :: a2). () => Sing t1 -> Sing t2 -> Sing f @@ t1 @@ t2
type SingFunction3 (f :: a1 ~> a2 ~> a3 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing f @@ t1 @@ t2 @@ t3
type SingFunction4 (f :: a1 ~> a2 ~> a3 ~> a4 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4
type SingFunction5 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5
type SingFunction6 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6
type SingFunction7 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> a7 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6) (t7 :: a7). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing t7 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6 @@ t7
type SingFunction8 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> a7 ~> a8 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6) (t7 :: a7) (t8 :: a8). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing t7 -> Sing t8 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6 @@ t7 @@ t8
class forall (x :: k1). SingI x => SingI f x => SingI1 (f :: k1 -> k2)
liftSing :: forall (x :: k1). SingI1 f => Sing x -> Sing (f x)
class forall (x :: k1) (y :: k2). (SingI x, SingI y) => SingI f x y => SingI2 (f :: k1 -> k2 -> k3)
liftSing2 :: forall (x :: k1) (y :: k2). SingI2 f => Sing x -> Sing y -> Sing (f x y)
data SingInstance (a :: k)
[SingInstance] :: forall {k} (a :: k). SingI a => SingInstance a
type TyCon1 = TyCon
type TyCon2 = TyCon
type TyCon3 = TyCon
type TyCon4 = TyCon
type TyCon5 = TyCon
type TyCon6 = TyCon
type TyCon7 = TyCon
type TyCon8 = TyCon
data TyFun a b
type family UnwrapSing (ws :: WrappedSing a) :: Sing a
newtype WrappedSing (a :: k)
[WrapSing] :: forall k (a :: k). Sing a -> WrappedSing a
type a ~> b = TyFun a b -> Type
data (a :: TyFun Type Type ~> Type) ~>@#@$
data a ~>@#@$$ (b :: TyFun Type Type)
type x ~>@#@$$$ y = x ~> y
class PEq a where {
type (arg :: a) == (arg1 :: a) :: Bool;
type (arg :: a) /= (arg1 :: a) :: Bool;
type arg :: a == arg1 :: a = Apply Apply TFHelper_6989586621679139564Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a /= arg1 :: a = Apply Apply TFHelper_6989586621679139553Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
}
infix 4 ==
infix 4 /=
-- | Type-level If. If True a b ==> a; If
-- False a b ==> b
type family If (cond :: Bool) (tru :: k) (fls :: k) :: k
-- | Conditional over singletons
sIf :: forall {k} (a :: Bool) (b :: k) (c :: k). Sing a -> Sing b -> Sing c -> Sing (If a b c)
-- | Type-level "and"
type family (a :: Bool) && (b :: Bool) :: Bool
infixr 3 &&
-- | Conjunction of singletons
(%&&) :: forall (a :: Bool) (b :: Bool). Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
class SEq a
(%==) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%==) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139564Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%/=) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%/=) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139553Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
infix 4 %==
infix 4 %/=
class POrd a where {
type Compare (arg :: a) (arg1 :: a) :: Ordering;
type (arg :: a) < (arg1 :: a) :: Bool;
type (arg :: a) <= (arg1 :: a) :: Bool;
type (arg :: a) > (arg1 :: a) :: Bool;
type (arg :: a) >= (arg1 :: a) :: Bool;
type Max (arg :: a) (arg1 :: a) :: a;
type Min (arg :: a) (arg1 :: a) :: a;
type Compare arg :: a arg1 :: a = Apply Apply Compare_6989586621679239102Sym0 :: TyFun a a ~> Ordering -> Type arg arg1;
type arg :: a < arg1 :: a = Apply Apply TFHelper_6989586621679239123Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a <= arg1 :: a = Apply Apply TFHelper_6989586621679239139Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a > arg1 :: a = Apply Apply TFHelper_6989586621679239155Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a >= arg1 :: a = Apply Apply TFHelper_6989586621679239171Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type Max arg :: a arg1 :: a = Apply Apply Max_6989586621679239187Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Min arg :: a arg1 :: a = Apply Apply Min_6989586621679239203Sym0 :: TyFun a a ~> a -> Type arg arg1;
}
infix 4 <
infix 4 <=
infix 4 >
infix 4 >=
class SEq a => SOrd a
sCompare :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
($dmsCompare) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2 ~ Apply (Apply (Compare_6989586621679239102Sym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
(%<) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239123Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%<=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239139Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239155Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239171Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
sMax :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMax) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Max_6989586621679239187Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMin :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMin) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Min_6989586621679239203Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
infix 4 %<
infix 4 %<=
infix 4 %>
infix 4 %>=
class SDecide k
(%~) :: forall (a :: k) (b :: k). SDecide k => Sing a -> Sing b -> Decision (a :~: b)
-- | Propositional equality. If a :~: b is inhabited by some
-- terminating value, then the type a is the same as the type
-- b. To use this equality in practice, pattern-match on the
-- a :~: b to get out the Refl constructor; in the body
-- of the pattern-match, the compiler knows that a ~ b.
--
-- @since base-4.7.0.0
data (a :: k) :~: (b :: k)
[Refl] :: forall {k} (a :: k). a :~: a
infix 4 :~:
-- | Uninhabited data type
--
-- @since base-4.8.0.0
data Void
type Refuted a = a -> Void
data Decision a
Proved :: a -> Decision a
Disproved :: Refuted a -> Decision a
class PBounded a where {
type MinBound :: a;
type MaxBound :: a;
}
class SBounded a
sMinBound :: SBounded a => Sing (MinBoundSym0 :: a)
sMaxBound :: SBounded a => Sing (MaxBoundSym0 :: a)
class PEnum a where {
type ToEnum (arg :: Natural) :: a;
type FromEnum (arg :: a) :: Natural;
type Succ arg :: a = Apply Succ_6989586621679618581Sym0 :: TyFun a a -> Type arg;
type Pred arg :: a = Apply Pred_6989586621679618594Sym0 :: TyFun a a -> Type arg;
type EnumFromTo arg :: a arg1 :: a = Apply Apply EnumFromTo_6989586621679618604Sym0 :: TyFun a a ~> [a] -> Type arg arg1;
type EnumFromThenTo arg :: a arg1 :: a arg2 :: a = Apply Apply Apply EnumFromThenTo_6989586621679618616Sym0 :: TyFun a a ~> a ~> [a] -> Type arg arg1 arg2;
}
class SEnum a
sToEnum :: forall (t :: Natural). SEnum a => Sing t -> Sing (Apply (ToEnumSym0 :: TyFun Natural a -> Type) t)
sFromEnum :: forall (t :: a). SEnum a => Sing t -> Sing (Apply (FromEnumSym0 :: TyFun a Natural -> Type) t)
class PShow a where {
type ShowsPrec (arg :: Natural) (arg1 :: a) (arg2 :: Symbol) :: Symbol;
type Show_ (arg :: a) :: Symbol;
type ShowList (arg :: [a]) (arg1 :: Symbol) :: Symbol;
type ShowsPrec arg :: Natural arg1 :: a arg2 :: Symbol = Apply Apply Apply ShowsPrec_6989586621680220103Sym0 :: TyFun Natural a ~> Symbol ~> Symbol -> Type arg arg1 arg2;
type Show_ arg :: a = Apply Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type arg;
type ShowList arg :: [a] arg1 :: Symbol = Apply Apply ShowList_6989586621680220123Sym0 :: TyFun [a] Symbol ~> Symbol -> Type arg arg1;
}
class SShow a
sShowsPrec :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
($dmsShowsPrec) :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). (SShow a, Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (ShowsPrec_6989586621680220103Sym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
sShow_ :: forall (t :: a). SShow a => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
($dmsShow_) :: forall (t :: a). (SShow a, Apply (Show_Sym0 :: TyFun a Symbol -> Type) t ~ Apply (Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type) t) => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
sShowList :: forall (t1 :: [a]) (t2 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
($dmsShowList) :: forall (t1 :: [a]) (t2 :: Symbol). (SShow a, Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2 ~ Apply (Apply (ShowList_6989586621680220123Sym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
class PIsString a where {
type FromString (arg :: Symbol) :: a;
}
class SIsString a
sFromString :: forall (t :: Symbol). SIsString a => Sing t -> Sing (Apply (FromStringSym0 :: TyFun Symbol a -> Type) t)
type family ShowString (a :: Symbol) (a1 :: Symbol) :: Symbol
sShowString :: forall (t1 :: Symbol) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowStringSym0 t1) t2)
type family ShowParen (a :: Bool) (a1 :: Symbol ~> Symbol) (a2 :: Symbol) :: Symbol
sShowParen :: forall (t1 :: Bool) (t2 :: Symbol ~> Symbol) (t3 :: Symbol). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ShowParenSym0 t1) t2) t3)
type family ShowSpace (a :: Symbol) :: Symbol
sShowSpace :: forall (t :: Symbol). Sing t -> Sing (Apply ShowSpaceSym0 t)
type family ShowChar (a :: Char) (a1 :: Symbol) :: Symbol
sShowChar :: forall (t1 :: Char) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowCharSym0 t1) t2)
type family ShowCommaSpace (a :: Symbol) :: Symbol
sShowCommaSpace :: forall (t :: Symbol). Sing t -> Sing (Apply ShowCommaSpaceSym0 t)
type family FromInteger (arg :: Natural) :: a
sFromInteger :: forall (t :: Natural). SNum a => Sing t -> Sing (Apply (FromIntegerSym0 :: TyFun Natural a -> Type) t)
type family Negate (arg :: a) :: a
sNegate :: forall (t :: a). SNum a => Sing t -> Sing (Apply (NegateSym0 :: TyFun a a -> Type) t)
class PFunctor (f :: Type -> Type) where {
type Fmap (arg :: a ~> b) (arg1 :: f a) :: f b;
type (arg :: a) <$ (arg1 :: f b) :: f a;
type arg :: a <$ arg1 :: f b = Apply Apply TFHelper_6989586621679351153Sym0 :: TyFun a f b ~> f a -> Type arg arg1;
}
infixl 4 <$
class SFunctor (f :: Type -> Type)
sFmap :: forall a b (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FmapSym0 :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
(%<$) :: forall a b (t1 :: a) (t2 :: f b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
($dm%<$) :: forall a b (t1 :: a) (t2 :: f b). (SFunctor f, Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351153Sym0 :: TyFun a (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
infixl 4 %<$
class PFoldable (t :: Type -> Type) where {
type Fold (arg :: t m) :: m;
type FoldMap (arg :: a ~> m) (arg1 :: t a) :: m;
type Foldr (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldr' (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldl (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldl' (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldr1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type Foldl1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type ToList (arg :: t a) :: [a];
type Null (arg :: t a) :: Bool;
type Length (arg :: t a) :: Natural;
type Elem (arg :: a) (arg1 :: t a) :: Bool;
type Maximum (arg :: t a) :: a;
type Minimum (arg :: t a) :: a;
type Sum (arg :: t a) :: a;
type Product (arg :: t a) :: a;
type Fold arg :: t m = Apply Fold_6989586621680404343Sym0 :: TyFun t m m -> Type arg;
type FoldMap arg :: a ~> m arg1 :: t a = Apply Apply FoldMap_6989586621680404353Sym0 :: TyFun a ~> m t a ~> m -> Type arg arg1;
type Foldr arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr_6989586621680404367Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr' arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr'_6989586621680404382Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl_6989586621680404405Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl' arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl'_6989586621680404420Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldr1_6989586621680404442Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type Foldl1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldl1_6989586621680404463Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type ToList arg :: t a = Apply ToList_6989586621680404483Sym0 :: TyFun t a [a] -> Type arg;
type Null arg :: t a = Apply Null_6989586621680404492Sym0 :: TyFun t a Bool -> Type arg;
type Length arg :: t a = Apply Length_6989586621680404509Sym0 :: TyFun t a Natural -> Type arg;
type Elem arg :: a arg1 :: t a = Apply Apply Elem_6989586621680404528Sym0 :: TyFun a t a ~> Bool -> Type arg arg1;
type Maximum arg :: t a = Apply Maximum_6989586621680404542Sym0 :: TyFun t a a -> Type arg;
type Minimum arg :: t a = Apply Minimum_6989586621680404557Sym0 :: TyFun t a a -> Type arg;
type Sum arg :: t a = Apply Sum_6989586621680404572Sym0 :: TyFun t a a -> Type arg;
type Product arg :: t a = Apply Product_6989586621680404581Sym0 :: TyFun t a a -> Type arg;
}
class SFoldable (t :: Type -> Type)
sFold :: forall m (t1 :: t m). (SFoldable t, SMonoid m) => Sing t1 -> Sing (Apply (FoldSym0 :: TyFun (t m) m -> Type) t1)
($dmsFold) :: forall m (t1 :: t m). (SFoldable t, Apply (FoldSym0 :: TyFun (t m) m -> Type) t1 ~ Apply (Fold_6989586621680404343Sym0 :: TyFun (t m) m -> Type) t1, SMonoid m) => Sing t1 -> Sing (Apply (FoldSym0 :: TyFun (t m) m -> Type) t1)
sFoldMap :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
($dmsFoldMap) :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2 ~ Apply (Apply (FoldMap_6989586621680404353Sym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
sFoldr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldr) :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldr_6989586621680404367Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldr' :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldr') :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldr'_6989586621680404382Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldr'Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldl) :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldl_6989586621680404405Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldl' :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldl') :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldl'_6989586621680404420Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Foldl'Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldr1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldr1_6989586621680404442Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sFoldl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldl1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldl1_6989586621680404463Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sToList :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1)
($dmsToList) :: forall a (t1 :: t a). (SFoldable t, Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1 ~ Apply (ToList_6989586621680404483Sym0 :: TyFun (t a) [a] -> Type) t1) => Sing t1 -> Sing (Apply (ToListSym0 :: TyFun (t a) [a] -> Type) t1)
sNull :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
($dmsNull) :: forall a (t1 :: t a). (SFoldable t, Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1 ~ Apply (Null_6989586621680404492Sym0 :: TyFun (t a) Bool -> Type) t1) => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
sLength :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
($dmsLength) :: forall a (t1 :: t a). (SFoldable t, Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1 ~ Apply (Length_6989586621680404509Sym0 :: TyFun (t a) Natural -> Type) t1) => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
sElem :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
($dmsElem) :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (Elem_6989586621680404528Sym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
sMaximum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMaximum) :: forall a (t1 :: t a). (SFoldable t, Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Maximum_6989586621680404542Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
sMinimum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMinimum) :: forall a (t1 :: t a). (SFoldable t, Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Minimum_6989586621680404557Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
sSum :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
($dmsSum) :: forall a (t1 :: t a). (SFoldable t, Apply (SumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Sum_6989586621680404572Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
sProduct :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
($dmsProduct) :: forall a (t1 :: t a). (SFoldable t, Apply (ProductSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Product_6989586621680404581Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
class PSemigroup a where {
type (arg :: a) <> (arg1 :: a) :: a;
type Sconcat (arg :: NonEmpty a) :: a;
type Sconcat arg :: NonEmpty a = Apply Sconcat_6989586621679209741Sym0 :: TyFun NonEmpty a a -> Type arg;
}
infixr 6 <>
class SSemigroup a
(%<>) :: forall (t1 :: a) (t2 :: a). SSemigroup a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<>@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
sSconcat :: forall (t :: NonEmpty a). SSemigroup a => Sing t -> Sing (Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t)
($dmsSconcat) :: forall (t :: NonEmpty a). (SSemigroup a, Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t ~ Apply (Sconcat_6989586621679209741Sym0 :: TyFun (NonEmpty a) a -> Type) t) => Sing t -> Sing (Apply (SconcatSym0 :: TyFun (NonEmpty a) a -> Type) t)
infixr 6 %<>
class PMonoid a where {
type Mempty :: a;
type Mappend (arg :: a) (arg1 :: a) :: a;
type Mconcat (arg :: [a]) :: a;
type Mappend arg :: a arg1 :: a = Apply Apply Mappend_6989586621680304347Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Mconcat arg :: [a] = Apply Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type arg;
}
class SSemigroup a => SMonoid a
sMempty :: SMonoid a => Sing (MemptySym0 :: a)
sMappend :: forall (t1 :: a) (t2 :: a). SMonoid a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMappend) :: forall (t1 :: a) (t2 :: a). (SMonoid a, Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Mappend_6989586621680304347Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMconcat :: forall (t :: [a]). SMonoid a => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
($dmsMconcat) :: forall (t :: [a]). (SMonoid a, Apply (MconcatSym0 :: TyFun [a] a -> Type) t ~ Apply (Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type) t) => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
class PTraversable (t :: Type -> Type) where {
type Traverse (arg :: a ~> f b) (arg1 :: t a) :: f t b;
type SequenceA (arg :: t f a) :: f t a;
type MapM (arg :: a ~> m b) (arg1 :: t a) :: m t b;
type Sequence (arg :: t m a) :: m t a;
type Traverse arg :: a ~> f b arg1 :: t a = Apply Apply Traverse_6989586621680749126Sym0 :: TyFun a ~> f b t a ~> f t b -> Type arg arg1;
type SequenceA arg :: t f a = Apply SequenceA_6989586621680749138Sym0 :: TyFun t f a f t a -> Type arg;
type MapM arg :: a ~> m b arg1 :: t a = Apply Apply MapM_6989586621680749148Sym0 :: TyFun a ~> m b t a ~> m t b -> Type arg arg1;
type Sequence arg :: t m a = Apply Sequence_6989586621680749162Sym0 :: TyFun t m a m t a -> Type arg;
}
class (SFunctor t, SFoldable t) => STraversable (t :: Type -> Type)
sTraverse :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
($dmsTraverse) :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2 ~ Apply (Apply (Traverse_6989586621680749126Sym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
sSequenceA :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
($dmsSequenceA) :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1 ~ Apply (SequenceA_6989586621680749138Sym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
sMapM :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
($dmsMapM) :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2 ~ Apply (Apply (MapM_6989586621680749148Sym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
sSequence :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
($dmsSequence) :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1 ~ Apply (Sequence_6989586621680749162Sym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
class PApplicative (f :: Type -> Type) where {
type Pure (arg :: a) :: f a;
type (arg :: f a ~> b) <*> (arg1 :: f a) :: f b;
type LiftA2 (arg :: a ~> b ~> c) (arg1 :: f a) (arg2 :: f b) :: f c;
type (arg :: f a) *> (arg1 :: f b) :: f b;
type (arg :: f a) <* (arg1 :: f b) :: f a;
type arg :: f a ~> b <*> arg1 :: f a = Apply Apply TFHelper_6989586621679351193Sym0 :: TyFun f a ~> b f a ~> f b -> Type arg arg1;
type LiftA2 arg :: a ~> b ~> c arg1 :: f a arg2 :: f b = Apply Apply Apply LiftA2_6989586621679351209Sym0 :: TyFun a ~> b ~> c f a ~> f b ~> f c -> Type arg arg1 arg2;
type arg :: f a *> arg1 :: f b = Apply Apply TFHelper_6989586621679351225Sym0 :: TyFun f a f b ~> f b -> Type arg arg1;
type arg :: f a <* arg1 :: f b = Apply Apply TFHelper_6989586621679351236Sym0 :: TyFun f a f b ~> f a -> Type arg arg1;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f => SApplicative (f :: Type -> Type)
sPure :: forall a (t :: a). SApplicative f => Sing t -> Sing (Apply (PureSym0 :: TyFun a (f a) -> Type) t)
(%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
($dm%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). (SApplicative f, Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351193Sym0 :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
sLiftA2 :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
($dmsLiftA2) :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). (SApplicative f, Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (LiftA2_6989586621679351209Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
(%*>) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
($dm%*>) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351225Sym0 :: TyFun (f a) (f b ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
(%<*) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
($dm%<*) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351236Sym0 :: TyFun (f a) (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
type family ( (a1 :: b ~> c) . (a2 :: a ~> b) ) (a3 :: a) :: c
infixr 9 .
(%.) :: forall b c a (t1 :: b ~> c) (t2 :: a ~> b) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ((.@#@$) :: TyFun (b ~> c) ((a ~> b) ~> (a ~> c)) -> Type) t1) t2) t3)
infixr 9 %.
-- | A promoted version of error. This implements Error as a
-- stuck type family with a Symbol argument. Depending on your
-- needs, you might also consider the following alternatives:
--
--
-- - Data.Singletons.Base.PolyError provides PolyError,
-- which generalizes the argument to be kind-polymorphic. This allows
-- passing additional information to the error besides raw
-- Symbols.
-- - Data.Singletons.Base.TypeError provides TypeError,
-- a slightly modified version of the custom type error machinery found
-- in GHC.TypeLits. This allows emitting error messages as
-- compiler errors rather than as stuck type families.
--
type family Error (str :: Symbol) :: a
-- | The singleton for error.
sError :: forall (str :: Symbol) a. HasCallStack => Sing str -> a
data ErrorSym0 (a1 :: TyFun Symbol a)
type family ErrorSym1 (a6989586621679559199 :: Symbol) :: a
-- | The promotion of undefined.
type family Undefined :: forall a. () => a
-- | The singleton for undefined.
sUndefined :: HasCallStack => a
type family UndefinedSym0 :: a
type family TrueSym0 :: Bool
type family FalseSym0 :: Bool
data (a1 :: TyFun a a ~> Bool) ==@#@$
infix 4 ==@#@$
data (a6989586621679139544 :: a) ==@#@$$ (b :: TyFun a Bool)
infix 4 ==@#@$$
type family (a6989586621679139544 :: a) ==@#@$$$ (a6989586621679139545 :: a) :: Bool
infix 4 ==@#@$$$
data (a1 :: TyFun a a ~> Bool) >@#@$
infix 4 >@#@$
data (a6989586621679239083 :: a) >@#@$$ (b :: TyFun a Bool)
infix 4 >@#@$$
type family (a6989586621679239083 :: a) >@#@$$$ (a6989586621679239084 :: a) :: Bool
infix 4 >@#@$$$
data IfSym0 (a :: TyFun Bool k ~> k ~> k)
data IfSym1 (a6989586621679134776 :: Bool) (b :: TyFun k k ~> k)
data IfSym2 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (c :: TyFun k k)
type family IfSym3 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (a6989586621679134778 :: k) :: k
data (a :: TyFun Bool Bool ~> Bool) &&@#@$
infixr 3 &&@#@$
data (a6989586621679133848 :: Bool) &&@#@$$ (b :: TyFun Bool Bool)
infixr 3 &&@#@$$
type family (a6989586621679133848 :: Bool) &&@#@$$$ (a6989586621679133849 :: Bool) :: Bool
infixr 3 &&@#@$$$
type family LTSym0 :: Ordering
type family EQSym0 :: Ordering
type family GTSym0 :: Ordering
type family Tuple0Sym0 :: ()
data Tuple2Sym0 (a1 :: TyFun a b ~> (a, b))
data Tuple2Sym1 (a6989586621679047641 :: a) (b1 :: TyFun b (a, b))
type family Tuple2Sym2 (a6989586621679047641 :: a) (a6989586621679047642 :: b) :: (a, b)
data Tuple3Sym0 (a1 :: TyFun a b ~> c ~> (a, b, c))
data Tuple3Sym1 (a6989586621679047672 :: a) (b1 :: TyFun b c ~> (a, b, c))
data Tuple3Sym2 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (c1 :: TyFun c (a, b, c))
type family Tuple3Sym3 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (a6989586621679047674 :: c) :: (a, b, c)
data Tuple4Sym0 (a1 :: TyFun a b ~> c ~> d ~> (a, b, c, d))
data Tuple4Sym1 (a6989586621679047721 :: a) (b1 :: TyFun b c ~> d ~> (a, b, c, d))
data Tuple4Sym2 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (c1 :: TyFun c d ~> (a, b, c, d))
data Tuple4Sym3 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (d1 :: TyFun d (a, b, c, d))
type family Tuple4Sym4 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (a6989586621679047724 :: d) :: (a, b, c, d)
data Tuple5Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym1 (a6989586621679047790 :: a) (b1 :: TyFun b c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym2 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (c1 :: TyFun c d ~> e ~> (a, b, c, d, e))
data Tuple5Sym3 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (d1 :: TyFun d e ~> (a, b, c, d, e))
data Tuple5Sym4 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (e1 :: TyFun e (a, b, c, d, e))
type family Tuple5Sym5 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (a6989586621679047794 :: e) :: (a, b, c, d, e)
data Tuple6Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym1 (a6989586621679047881 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym2 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (c1 :: TyFun c d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym3 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (d1 :: TyFun d e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym4 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (e1 :: TyFun e f ~> (a, b, c, d, e, f))
data Tuple6Sym5 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (f1 :: TyFun f (a, b, c, d, e, f))
type family Tuple6Sym6 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (a6989586621679047886 :: f) :: (a, b, c, d, e, f)
data Tuple7Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym1 (a6989586621679047996 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym2 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (c1 :: TyFun c d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym3 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (d1 :: TyFun d e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym4 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (e1 :: TyFun e f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym5 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (f1 :: TyFun f g ~> (a, b, c, d, e, f, g))
data Tuple7Sym6 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (g1 :: TyFun g (a, b, c, d, e, f, g))
type family Tuple7Sym7 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (a6989586621679048002 :: g) :: (a, b, c, d, e, f, g)
data CompareSym0 (a1 :: TyFun a a ~> Ordering)
data CompareSym1 (a6989586621679239068 :: a) (b :: TyFun a Ordering)
type family CompareSym2 (a6989586621679239068 :: a) (a6989586621679239069 :: a) :: Ordering
data FoldlSym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data FoldlSym1 (a6989586621680404296 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data FoldlSym2 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (c :: TyFun t a b)
type family FoldlSym3 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (a6989586621680404298 :: t a) :: b
type family MinBoundSym0 :: a
type family MaxBoundSym0 :: a
data ShowsPrecSym0 (a1 :: TyFun Natural a ~> Symbol ~> Symbol)
data ShowsPrecSym1 (a6989586621680220089 :: Natural) (b :: TyFun a Symbol ~> Symbol)
data ShowsPrecSym2 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (c :: TyFun Symbol Symbol)
type family ShowsPrecSym3 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (a6989586621680220091 :: Symbol) :: Symbol
data ShowStringSym0 (a :: TyFun Symbol Symbol ~> Symbol)
data ShowStringSym1 (a6989586621680220044 :: Symbol) (b :: TyFun Symbol Symbol)
type family ShowStringSym2 (a6989586621680220044 :: Symbol) (a6989586621680220045 :: Symbol) :: Symbol
data ShowParenSym0 (a :: TyFun Bool Symbol ~> Symbol ~> Symbol ~> Symbol)
data ShowParenSym1 (a6989586621680220028 :: Bool) (b :: TyFun Symbol ~> Symbol Symbol ~> Symbol)
data ShowParenSym2 (a6989586621680220028 :: Bool) (a6989586621680220029 :: Symbol ~> Symbol) (c :: TyFun Symbol Symbol)
data ShowSpaceSym0 (a :: TyFun Symbol Symbol)
type family ShowSpaceSym1 (a6989586621680220016 :: Symbol) :: Symbol
data ShowCharSym0 (a :: TyFun Char Symbol ~> Symbol)
data ShowCharSym1 (a6989586621680220055 :: Char) (b :: TyFun Symbol Symbol)
type family ShowCharSym2 (a6989586621680220055 :: Char) (a6989586621680220056 :: Symbol) :: Symbol
data ShowCommaSpaceSym0 (a :: TyFun Symbol Symbol)
type family ShowCommaSpaceSym1 (a6989586621680220010 :: Symbol) :: Symbol
data FromIntegerSym0 (a1 :: TyFun Natural a)
type family FromIntegerSym1 (a6989586621679596397 :: Natural) :: a
data NegateSym0 (a1 :: TyFun a a)
type family NegateSym1 (a6989586621679596388 :: a) :: a
data FromStringSym0 (a1 :: TyFun Symbol a)
type family FromStringSym1 (a6989586621681198181 :: Symbol) :: a
data FmapSym0 (a1 :: TyFun a ~> b f a ~> f b)
data FmapSym1 (a6989586621679351144 :: a ~> b) (b1 :: TyFun f a f b)
type family FmapSym2 (a6989586621679351144 :: a ~> b) (a6989586621679351145 :: f a) :: f b
data (a1 :: TyFun a f b ~> f a) <$@#@$
infixl 4 <$@#@$
data (a6989586621679351149 :: a) <$@#@$$ (b1 :: TyFun f b f a)
infixl 4 <$@#@$$
type family (a6989586621679351149 :: a) <$@#@$$$ (a6989586621679351150 :: f b) :: f a
infixl 4 <$@#@$$$
data FoldMapSym0 (a1 :: TyFun a ~> m t a ~> m)
data FoldMapSym1 (a6989586621680404276 :: a ~> m) (b :: TyFun t a m)
type family FoldMapSym2 (a6989586621680404276 :: a ~> m) (a6989586621680404277 :: t a) :: m
data (a1 :: TyFun a a ~> a) <>@#@$
infixr 6 <>@#@$
data (a6989586621679209735 :: a) <>@#@$$ (b :: TyFun a a)
infixr 6 <>@#@$$
type family (a6989586621679209735 :: a) <>@#@$$$ (a6989586621679209736 :: a) :: a
infixr 6 <>@#@$$$
type family MemptySym0 :: a
data MappendSym0 (a1 :: TyFun a a ~> a)
data MappendSym1 (a6989586621680304340 :: a) (b :: TyFun a a)
type family MappendSym2 (a6989586621680304340 :: a) (a6989586621680304341 :: a) :: a
data FoldrSym0 (a1 :: TyFun a ~> b ~> b b ~> t a ~> b)
data FoldrSym1 (a6989586621680404282 :: a ~> b ~> b) (b1 :: TyFun b t a ~> b)
data FoldrSym2 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (c :: TyFun t a b)
type family FoldrSym3 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (a6989586621680404284 :: t a) :: b
data TraverseSym0 (a1 :: TyFun a ~> f b t a ~> f t b)
data TraverseSym1 (a6989586621680749111 :: a ~> f b) (b1 :: TyFun t a f t b)
type family TraverseSym2 (a6989586621680749111 :: a ~> f b) (a6989586621680749112 :: t a) :: f t b
data PureSym0 (a1 :: TyFun a f a)
type family PureSym1 (a6989586621679351168 :: a) :: f a
data (a1 :: TyFun f a ~> b f a ~> f b) <*>@#@$
infixl 4 <*>@#@$
data (a6989586621679351172 :: f a ~> b) <*>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <*>@#@$$
type family (a6989586621679351172 :: f a ~> b) <*>@#@$$$ (a6989586621679351173 :: f a) :: f b
infixl 4 <*>@#@$$$
data LiftA2Sym0 (a1 :: TyFun a ~> b ~> c f a ~> f b ~> f c)
data LiftA2Sym1 (a6989586621679351178 :: a ~> b ~> c) (b1 :: TyFun f a f b ~> f c)
data LiftA2Sym2 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (c1 :: TyFun f b f c)
type family LiftA2Sym3 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (a6989586621679351180 :: f b) :: f c
data (a1 :: TyFun b ~> c a ~> b ~> a ~> c) .@#@$
infixr 9 .@#@$
data (a6989586621679181791 :: b ~> c) .@#@$$ (b1 :: TyFun a ~> b a ~> c)
infixr 9 .@#@$$
data ( (a6989586621679181791 :: b ~> c) .@#@$$$ (a6989586621679181792 :: a ~> b) ) (c1 :: TyFun a c)
infixr 9 .@#@$$$
type family ( (a6989586621679181791 :: b ~> c) .@#@$$$$ (a6989586621679181792 :: a ~> b) ) (a6989586621679181793 :: a) :: c
infixr 9 .@#@$$$$
type family NilSym0 :: [a]
data (a1 :: TyFun a [a] ~> [a]) :@#@$
infixr 5 :@#@$
data (a6989586621679047148 :: a) :@#@$$ (b :: TyFun [a] [a])
infixr 5 :@#@$$
type family (a6989586621679047148 :: a) :@#@$$$ (a6989586621679047149 :: [a]) :: [a]
infixr 5 :@#@$$$
class SuppressUnusedWarnings (t :: k)
suppressUnusedWarnings :: SuppressUnusedWarnings t => ()
-- | This file implements singletonStar, which generates a datatype
-- Rep and associated singleton from a list of types. The
-- promoted version of Rep is kind * and the Haskell
-- types themselves. This is still very experimental, so expect unusual
-- results!
--
-- See also Data.Singletons.TH.CustomStar from
-- singletons-th, a more minimal version of this module that
-- does not re-export anything from Prelude.Singletons.
module Data.Singletons.Base.CustomStar
singletonStar :: OptionsMonad q => [Name] -> q [Dec]
-- | Exports the promoted and singled versions of the Compose data
-- type.
module Data.Functor.Compose.Singletons
type family Sing :: k -> Type
data SCompose (a1 :: Compose f g a)
[SCompose] :: forall {k} {k1} (f :: k -> Type) (g :: k1 -> k) (a :: k1) (x :: f (g a)). Sing x -> SCompose ('Compose x)
infixr 9 `SCompose`
infixr 9 `SCompose`
type family GetCompose (a1 :: Compose f g a) :: f g a
sGetCompose :: forall {k1} {k2} (f :: k1 -> Type) (g :: k2 -> k1) (a :: k2) (t :: Compose f g a). Sing t -> Sing (Apply (GetComposeSym0 :: TyFun (Compose f g a) (f (g a)) -> Type) t)
data ComposeSym0 (z :: TyFun f g a Compose f g a)
infixr 9 `ComposeSym0`
type family ComposeSym1 (x :: f g a) :: Compose f g a
infixr 9 `ComposeSym1`
data GetComposeSym0 (a1 :: TyFun Compose f g a f g a)
type family GetComposeSym1 (a6989586621681210943 :: Compose f g a) :: f g a
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1) (z :: Data.Functor.Compose.Compose f g a). GHC.Classes.Eq (Data.Functor.Compose.Singletons.SCompose z)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1) (z :: Data.Functor.Compose.Compose f g a). GHC.Classes.Ord (Data.Functor.Compose.Singletons.SCompose z)
instance forall k1 k2 (f :: k1 -> *) (g :: k2 -> k1). Control.Monad.Singletons.Internal.PAlternative (Data.Functor.Compose.Compose f g)
instance forall k (f :: k -> *) (g :: * -> k). Control.Monad.Singletons.Internal.PApplicative (Data.Functor.Compose.Compose f g)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Eq.Singletons.PEq (Data.Functor.Compose.Compose f g a)
instance forall k (f :: k -> *) (g :: * -> k). Data.Foldable.Singletons.PFoldable (Data.Functor.Compose.Compose f g)
instance forall k (f :: k -> *) (g :: * -> k). Control.Monad.Singletons.Internal.PFunctor (Data.Functor.Compose.Compose f g)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Ord.Singletons.POrd (Data.Functor.Compose.Compose f g a)
instance forall k (f :: k -> *) (g :: * -> k). Data.Traversable.Singletons.PTraversable (Data.Functor.Compose.Compose f g)
instance (Control.Monad.Singletons.Internal.SAlternative f, Control.Monad.Singletons.Internal.SApplicative g) => Control.Monad.Singletons.Internal.SAlternative (Data.Functor.Compose.Compose f g)
instance (Control.Monad.Singletons.Internal.SApplicative f, Control.Monad.Singletons.Internal.SApplicative g) => Control.Monad.Singletons.Internal.SApplicative (Data.Functor.Compose.Compose f g)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.Decide.SDecide (f (g a)) => Data.Singletons.Decide.SDecide (Data.Functor.Compose.Compose f g a)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Eq.Singletons.SEq (f (g a)) => Data.Eq.Singletons.SEq (Data.Functor.Compose.Compose f g a)
instance (Data.Foldable.Singletons.SFoldable f, Data.Foldable.Singletons.SFoldable g) => Data.Foldable.Singletons.SFoldable (Data.Functor.Compose.Compose f g)
instance (Control.Monad.Singletons.Internal.SFunctor f, Control.Monad.Singletons.Internal.SFunctor g) => Control.Monad.Singletons.Internal.SFunctor (Data.Functor.Compose.Compose f g)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Ord.Singletons.SOrd (f (g a)) => Data.Ord.Singletons.SOrd (Data.Functor.Compose.Compose f g a)
instance (Data.Traversable.Singletons.STraversable f, Data.Traversable.Singletons.STraversable g) => Data.Traversable.Singletons.STraversable (Data.Functor.Compose.Compose f g)
instance forall k (f :: k -> *) k1 (g :: k1 -> k) (a :: k1). Data.Singletons.SingI1 'Data.Functor.Compose.Compose
instance forall k (f :: k -> *) k1 (g :: k1 -> k) (a :: k1) (x :: f (g a)). Data.Singletons.SingI x => Data.Singletons.SingI ('Data.Functor.Compose.Compose x)
instance forall k (f :: k -> *) k1 (g :: k1 -> k) (a :: k1). Data.Singletons.SingI Data.Functor.Compose.Singletons.ComposeSym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.SingI Data.Functor.Compose.Singletons.GetComposeSym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.Compare_6989586621681210958Sym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1) (a6989586621681210963 :: Data.Functor.Compose.Compose f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.Compare_6989586621681210958Sym1 a6989586621681210963)
instance forall a b k (f :: k -> *) (g :: * -> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.Fmap_6989586621681210969Sym0
instance forall a b k (f :: k -> *) (g :: * -> k) (a6989586621681210974 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.Fmap_6989586621681210969Sym1 a6989586621681210974)
instance forall a m k (f :: k -> *) (g :: * -> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.FoldMap_6989586621681210991Sym0
instance forall a m k (f :: k -> *) (g :: * -> k) (a6989586621681210996 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.FoldMap_6989586621681210991Sym1 a6989586621681210996)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.GetComposeSym0
instance forall a b c k (f :: k -> *) (g :: * -> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.LiftA2_6989586621681211233Sym0
instance forall a b c k (f :: k -> *) (g :: * -> k) (a6989586621681211239 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.LiftA2_6989586621681211233Sym1 a6989586621681211239)
instance forall a b c k (f :: k -> *) (g :: * -> k) (a6989586621681211239 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681211240 :: Data.Functor.Compose.Compose f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.LiftA2_6989586621681211233Sym2 a6989586621681211239 a6989586621681211240)
instance forall a k (f :: k -> *) (g :: * -> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.Pure_6989586621681211213Sym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.TFHelper_6989586621681210947Sym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1) (a6989586621681210952 :: Data.Functor.Compose.Compose f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.TFHelper_6989586621681210947Sym1 a6989586621681210952)
instance forall a k (f :: k -> *) (g :: * -> k) b. Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.TFHelper_6989586621681210980Sym0
instance forall a k (f :: k -> *) (g :: * -> k) b (a6989586621681210985 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.TFHelper_6989586621681210980Sym1 a6989586621681210985)
instance forall k (f :: k -> *) (g :: * -> k) a b. Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.TFHelper_6989586621681211221Sym0
instance forall k (f :: k -> *) (g :: * -> k) a b (a6989586621681211226 :: Data.Functor.Compose.Compose f g (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.TFHelper_6989586621681211221Sym1 a6989586621681211226)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.TFHelper_6989586621681211259Sym0
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1) (a6989586621681211264 :: Data.Functor.Compose.Compose f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.TFHelper_6989586621681211259Sym1 a6989586621681211264)
instance forall a (f1 :: * -> *) b k (f2 :: k -> *) (g :: * -> k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Compose.Singletons.Traverse_6989586621681211002Sym0
instance forall a (f1 :: * -> *) b k (f2 :: k -> *) (g :: * -> k) (a6989586621681211007 :: a Data.Singletons.~> f1 b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Compose.Singletons.Traverse_6989586621681211002Sym1 a6989586621681211007)
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.Decide.SDecide (f (g a)) => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Functor.Compose.Singletons.SCompose
instance forall k k1 (f :: k -> *) (g :: k1 -> k) (a :: k1). Data.Singletons.Decide.SDecide (f (g a)) => GHC.Internal.Data.Type.Equality.TestEquality Data.Functor.Compose.Singletons.SCompose
-- | Defines the promoted and singled versions of the Monad type
-- class.
module Control.Monad.Singletons
class PFunctor (f :: Type -> Type) where {
type Fmap (arg :: a ~> b) (arg1 :: f a) :: f b;
type arg :: a <$ arg1 :: f b = Apply Apply TFHelper_6989586621679351153Sym0 :: TyFun a f b ~> f a -> Type arg arg1;
}
class SFunctor (f :: Type -> Type)
sFmap :: forall a b (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FmapSym0 :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
class PMonad (m :: Type -> Type) where {
type (arg :: m a) >>= (arg1 :: a ~> m b) :: m b;
type (arg :: m a) >> (arg1 :: m b) :: m b;
type Return (arg :: a) :: m a;
type arg :: m a >> arg1 :: m b = Apply Apply TFHelper_6989586621679351264Sym0 :: TyFun m a m b ~> m b -> Type arg arg1;
type Return arg :: a = Apply Return_6989586621679351281Sym0 :: TyFun a m a -> Type arg;
}
infixl 1 >>=
infixl 1 >>
class SApplicative m => SMonad (m :: Type -> Type)
(%>>=) :: forall a b (t1 :: m a) (t2 :: a ~> m b). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>=@#@$) :: TyFun (m a) ((a ~> m b) ~> m b) -> Type) t1) t2)
(%>>) :: forall a b (t1 :: m a) (t2 :: m b). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2)
($dm%>>) :: forall a b (t1 :: m a) (t2 :: m b). (SMonad m, Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351264Sym0 :: TyFun (m a) (m b ~> m b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2)
sReturn :: forall a (t :: a). SMonad m => Sing t -> Sing (Apply (ReturnSym0 :: TyFun a (m a) -> Type) t)
($dmsReturn) :: forall a (t :: a). (SMonad m, Apply (ReturnSym0 :: TyFun a (m a) -> Type) t ~ Apply (Return_6989586621679351281Sym0 :: TyFun a (m a) -> Type) t) => Sing t -> Sing (Apply (ReturnSym0 :: TyFun a (m a) -> Type) t)
infixl 1 %>>=
infixl 1 %>>
class PMonadPlus (m :: k -> Type) where {
type Mzero :: m a;
type Mplus (arg :: m a) (arg1 :: m a) :: m a;
type Mzero = Mzero_6989586621679351301Sym0 :: m a;
type Mplus arg :: m a arg1 :: m a = Apply Apply Mplus_6989586621679351306Sym0 :: TyFun m a m a ~> m a -> Type arg arg1;
}
class (SAlternative m, SMonad m) => SMonadPlus (m :: Type -> Type)
sMzero :: SMonadPlus m => Sing (MzeroSym0 :: m a)
($dmsMzero) :: (SMonadPlus m, (MzeroSym0 :: m a) ~ (Mzero_6989586621679351301Sym0 :: m a)) => Sing (MzeroSym0 :: m a)
sMplus :: forall a (t1 :: m a) (t2 :: m a). SMonadPlus m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MplusSym0 :: TyFun (m a) (m a ~> m a) -> Type) t1) t2)
($dmsMplus) :: forall a (t1 :: m a) (t2 :: m a). (SMonadPlus m, Apply (Apply (MplusSym0 :: TyFun (m a) (m a ~> m a) -> Type) t1) t2 ~ Apply (Apply (Mplus_6989586621679351306Sym0 :: TyFun (m a) (m a ~> m a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MplusSym0 :: TyFun (m a) (m a ~> m a) -> Type) t1) t2)
class PMonadFail (m :: k -> Type) where {
type Fail (arg :: [Char]) :: m a;
}
class SMonad m => SMonadFail (m :: Type -> Type)
sFail :: forall a (t :: [Char]). SMonadFail m => Sing t -> Sing (Apply (FailSym0 :: TyFun [Char] (m a) -> Type) t)
type family MapM (arg :: a ~> m b) (arg1 :: t a) :: m t b
sMapM :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
type family MapM_ (a1 :: a ~> m b) (a2 :: t a) :: m ()
sMapM_ :: forall a (m :: Type -> Type) b (t1 :: Type -> Type) (t2 :: a ~> m b) (t3 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MapM_Sym0 :: TyFun (a ~> m b) (t1 a ~> m ()) -> Type) t2) t3)
type family ForM (a1 :: t a) (a2 :: a ~> m b) :: m t b
sForM :: forall (t1 :: Type -> Type) a (m :: Type -> Type) b (t2 :: t1 a) (t3 :: a ~> m b). (STraversable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ForMSym0 :: TyFun (t1 a) ((a ~> m b) ~> m (t1 b)) -> Type) t2) t3)
type family Sequence (arg :: t m a) :: m t a
sSequence :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
type family Sequence_ (a1 :: t m a) :: m ()
sSequence_ :: forall (t1 :: Type -> Type) (m :: Type -> Type) a (t2 :: t1 (m a)). (SFoldable t1, SMonad m) => Sing t2 -> Sing (Apply (Sequence_Sym0 :: TyFun (t1 (m a)) (m ()) -> Type) t2)
type family (a1 :: a ~> m b) =<< (a2 :: m a) :: m b
infixr 1 =<<
(%=<<) :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: m a). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((=<<@#@$) :: TyFun (a ~> m b) (m a ~> m b) -> Type) t1) t2)
infixr 1 %=<<
type family ( (a1 :: a ~> m b) >=> (a2 :: b ~> m c) ) (a3 :: a) :: m c
infixr 1 >=>
(%>=>) :: forall a (m :: Type -> Type) b c (t1 :: a ~> m b) (t2 :: b ~> m c) (t3 :: a). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ((>=>@#@$) :: TyFun (a ~> m b) ((b ~> m c) ~> (a ~> m c)) -> Type) t1) t2) t3)
infixr 1 %>=>
type family ( (a1 :: b ~> m c) <=< (a2 :: a ~> m b) ) (a3 :: a) :: m c
infixr 1 <=<
(%<=<) :: forall b (m :: Type -> Type) c a (t1 :: b ~> m c) (t2 :: a ~> m b) (t3 :: a). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ((<=<@#@$) :: TyFun (b ~> m c) ((a ~> m b) ~> (a ~> m c)) -> Type) t1) t2) t3)
infixr 1 %<=<
type family Void (a1 :: f a) :: f ()
sVoid :: forall (f :: Type -> Type) a (t :: f a). SFunctor f => Sing t -> Sing (Apply (VoidSym0 :: TyFun (f a) (f ()) -> Type) t)
type family Join (a1 :: m m a) :: m a
sJoin :: forall (m :: Type -> Type) a (t :: m (m a)). SMonad m => Sing t -> Sing (Apply (JoinSym0 :: TyFun (m (m a)) (m a) -> Type) t)
type family Msum (a1 :: t m a) :: m a
sMsum :: forall (t1 :: Type -> Type) (m :: Type -> Type) a (t2 :: t1 (m a)). (SFoldable t1, SMonadPlus m) => Sing t2 -> Sing (Apply (MsumSym0 :: TyFun (t1 (m a)) (m a) -> Type) t2)
type family Mfilter (a1 :: a ~> Bool) (a2 :: m a) :: m a
sMfilter :: forall a (m :: Type -> Type) (t1 :: a ~> Bool) (t2 :: m a). SMonadPlus m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MfilterSym0 :: TyFun (a ~> Bool) (m a ~> m a) -> Type) t1) t2)
type family FilterM (a1 :: a ~> m Bool) (a2 :: [a]) :: m [a]
sFilterM :: forall a (m :: Type -> Type) (t1 :: a ~> m Bool) (t2 :: [a]). SApplicative m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FilterMSym0 :: TyFun (a ~> m Bool) ([a] ~> m [a]) -> Type) t1) t2)
type family MapAndUnzipM (a1 :: a ~> m (b, c)) (a2 :: [a]) :: m ([b], [c])
sMapAndUnzipM :: forall a (m :: Type -> Type) b c (t1 :: a ~> m (b, c)) (t2 :: [a]). SApplicative m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapAndUnzipMSym0 :: TyFun (a ~> m (b, c)) ([a] ~> m ([b], [c])) -> Type) t1) t2)
type family ZipWithM (a1 :: a ~> b ~> m c) (a2 :: [a]) (a3 :: [b]) :: m [c]
sZipWithM :: forall a b (m :: Type -> Type) c (t1 :: a ~> (b ~> m c)) (t2 :: [a]) (t3 :: [b]). SApplicative m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ZipWithMSym0 :: TyFun (a ~> (b ~> m c)) ([a] ~> ([b] ~> m [c])) -> Type) t1) t2) t3)
type family ZipWithM_ (a1 :: a ~> b ~> m c) (a2 :: [a]) (a3 :: [b]) :: m ()
sZipWithM_ :: forall a b (m :: Type -> Type) c (t1 :: a ~> (b ~> m c)) (t2 :: [a]) (t3 :: [b]). SApplicative m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ZipWithM_Sym0 :: TyFun (a ~> (b ~> m c)) ([a] ~> ([b] ~> m ())) -> Type) t1) t2) t3)
type family FoldlM (a1 :: b ~> a ~> m b) (a2 :: b) (a3 :: t a) :: m b
sFoldlM :: forall b a (m :: Type -> Type) (t1 :: Type -> Type) (t2 :: b ~> (a ~> m b)) (t3 :: b) (t4 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (FoldlMSym0 :: TyFun (b ~> (a ~> m b)) (b ~> (t1 a ~> m b)) -> Type) t2) t3) t4)
type family ReplicateM (a1 :: Natural) (a2 :: m a) :: m [a]
sReplicateM :: forall (m :: Type -> Type) a (t1 :: Natural) (t2 :: m a). SApplicative m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ReplicateMSym0 :: TyFun Natural (m a ~> m [a]) -> Type) t1) t2)
type family ReplicateM_ (a1 :: Natural) (a2 :: m a) :: m ()
sReplicateM_ :: forall (m :: Type -> Type) a (t1 :: Natural) (t2 :: m a). SApplicative m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ReplicateM_Sym0 :: TyFun Natural (m a ~> m ()) -> Type) t1) t2)
type family Guard (a :: Bool) :: f ()
sGuard :: forall (f :: Type -> Type) (t :: Bool). SAlternative f => Sing t -> Sing (Apply (GuardSym0 :: TyFun Bool (f ()) -> Type) t)
type family When (a :: Bool) (a1 :: f ()) :: f ()
sWhen :: forall (f :: Type -> Type) (t1 :: Bool) (t2 :: f ()). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (WhenSym0 :: TyFun Bool (f () ~> f ()) -> Type) t1) t2)
type family Unless (a :: Bool) (a1 :: f ()) :: f ()
sUnless :: forall (f :: Type -> Type) (t1 :: Bool) (t2 :: f ()). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (UnlessSym0 :: TyFun Bool (f () ~> f ()) -> Type) t1) t2)
type family LiftM (a :: a1 ~> r) (a2 :: m a1) :: m r
sLiftM :: forall a1 r (m :: Type -> Type) (t1 :: a1 ~> r) (t2 :: m a1). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (LiftMSym0 :: TyFun (a1 ~> r) (m a1 ~> m r) -> Type) t1) t2)
type family LiftM2 (a :: a1 ~> a2 ~> r) (a4 :: m a1) (a5 :: m a2) :: m r
sLiftM2 :: forall a1 a2 r (m :: Type -> Type) (t1 :: a1 ~> (a2 ~> r)) (t2 :: m a1) (t3 :: m a2). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftM2Sym0 :: TyFun (a1 ~> (a2 ~> r)) (m a1 ~> (m a2 ~> m r)) -> Type) t1) t2) t3)
type family LiftM3 (a :: a1 ~> a2 ~> a3 ~> r) (a4 :: m a1) (a5 :: m a2) (a6 :: m a3) :: m r
sLiftM3 :: forall a1 a2 a3 r (m :: Type -> Type) (t1 :: a1 ~> (a2 ~> (a3 ~> r))) (t2 :: m a1) (t3 :: m a2) (t4 :: m a3). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (Apply (LiftM3Sym0 :: TyFun (a1 ~> (a2 ~> (a3 ~> r))) (m a1 ~> (m a2 ~> (m a3 ~> m r))) -> Type) t1) t2) t3) t4)
type family LiftM4 (a :: a1 ~> a2 ~> a3 ~> a4 ~> r) (a7 :: m a1) (a8 :: m a2) (a9 :: m a3) (a10 :: m a4) :: m r
sLiftM4 :: forall a1 a2 a3 a4 r (m :: Type -> Type) (t1 :: a1 ~> (a2 ~> (a3 ~> (a4 ~> r)))) (t2 :: m a1) (t3 :: m a2) (t4 :: m a3) (t5 :: m a4). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing (Apply (Apply (Apply (Apply (Apply (LiftM4Sym0 :: TyFun (a1 ~> (a2 ~> (a3 ~> (a4 ~> r)))) (m a1 ~> (m a2 ~> (m a3 ~> (m a4 ~> m r)))) -> Type) t1) t2) t3) t4) t5)
type family LiftM5 (a :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a7 :: m a1) (a8 :: m a2) (a9 :: m a3) (a10 :: m a4) (a11 :: m a5) :: m r
sLiftM5 :: forall a1 a2 a3 a4 a5 r (m :: Type -> Type) (t1 :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> r))))) (t2 :: m a1) (t3 :: m a2) (t4 :: m a3) (t5 :: m a4) (t6 :: m a5). SMonad m => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing (Apply (Apply (Apply (Apply (Apply (Apply (LiftM5Sym0 :: TyFun (a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> r))))) (m a1 ~> (m a2 ~> (m a3 ~> (m a4 ~> (m a5 ~> m r))))) -> Type) t1) t2) t3) t4) t5) t6)
type family Ap (a1 :: m a ~> b) (a2 :: m a) :: m b
sAp :: forall (m :: Type -> Type) a b (t1 :: m (a ~> b)) (t2 :: m a). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ApSym0 :: TyFun (m (a ~> b)) (m a ~> m b) -> Type) t1) t2)
type family (a1 :: a ~> b) <$!> (a2 :: m a) :: m b
infixl 4 <$!>
(%<$!>) :: forall a b (m :: Type -> Type) (t1 :: a ~> b) (t2 :: m a). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$!>@#@$) :: TyFun (a ~> b) (m a ~> m b) -> Type) t1) t2)
infixl 4 %<$!>
data FmapSym0 (a1 :: TyFun a ~> b f a ~> f b)
data FmapSym1 (a6989586621679351144 :: a ~> b) (b1 :: TyFun f a f b)
type family FmapSym2 (a6989586621679351144 :: a ~> b) (a6989586621679351145 :: f a) :: f b
data (a1 :: TyFun m a a ~> m b ~> m b) >>=@#@$
infixl 1 >>=@#@$
data (a6989586621679351252 :: m a) >>=@#@$$ (b1 :: TyFun a ~> m b m b)
infixl 1 >>=@#@$$
type family (a6989586621679351252 :: m a) >>=@#@$$$ (a6989586621679351253 :: a ~> m b) :: m b
infixl 1 >>=@#@$$$
data (a1 :: TyFun m a m b ~> m b) >>@#@$
infixl 1 >>@#@$
data (a6989586621679351257 :: m a) >>@#@$$ (b1 :: TyFun m b m b)
infixl 1 >>@#@$$
type family (a6989586621679351257 :: m a) >>@#@$$$ (a6989586621679351258 :: m b) :: m b
infixl 1 >>@#@$$$
data ReturnSym0 (a1 :: TyFun a m a)
type family ReturnSym1 (a6989586621679351261 :: a) :: m a
data FailSym0 (a1 :: TyFun [Char] m a)
type family FailSym1 (a6989586621679552824 :: [Char]) :: m a
type family MzeroSym0 :: m a
data MplusSym0 (a1 :: TyFun m a m a ~> m a)
data MplusSym1 (a6989586621679351299 :: m a) (b :: TyFun m a m a)
type family MplusSym2 (a6989586621679351299 :: m a) (a6989586621679351300 :: m a) :: m a
data MapMSym0 (a1 :: TyFun a ~> m b t a ~> m t b)
data MapMSym1 (a6989586621680749119 :: a ~> m b) (b1 :: TyFun t a m t b)
type family MapMSym2 (a6989586621680749119 :: a ~> m b) (a6989586621680749120 :: t a) :: m t b
data MapM_Sym0 (a1 :: TyFun a ~> m b t a ~> m ())
data MapM_Sym1 (a6989586621680404210 :: a ~> m b) (b1 :: TyFun t a m ())
type family MapM_Sym2 (a6989586621680404210 :: a ~> m b) (a6989586621680404211 :: t a) :: m ()
data ForMSym0 (a1 :: TyFun t a a ~> m b ~> m t b)
data ForMSym1 (a6989586621680756748 :: t a) (b1 :: TyFun a ~> m b m t b)
type family ForMSym2 (a6989586621680756748 :: t a) (a6989586621680756749 :: a ~> m b) :: m t b
data SequenceSym0 (a1 :: TyFun t m a m t a)
type family SequenceSym1 (a6989586621680749123 :: t m a) :: m t a
data Sequence_Sym0 (a1 :: TyFun t m a m ())
type family Sequence_Sym1 (a6989586621680404186 :: t m a) :: m ()
data (a1 :: TyFun a ~> m b m a ~> m b) =<<@#@$
infixr 1 =<<@#@$
data (a6989586621679351097 :: a ~> m b) =<<@#@$$ (b1 :: TyFun m a m b)
infixr 1 =<<@#@$$
type family (a6989586621679351097 :: a ~> m b) =<<@#@$$$ (a6989586621679351098 :: m a) :: m b
infixr 1 =<<@#@$$$
data (a1 :: TyFun a ~> m b b ~> m c ~> a ~> m c) >=>@#@$
infixr 1 >=>@#@$
data (a6989586621681224109 :: a ~> m b) >=>@#@$$ (b1 :: TyFun b ~> m c a ~> m c)
infixr 1 >=>@#@$$
data ( (a6989586621681224109 :: a ~> m b) >=>@#@$$$ (a6989586621681224110 :: b ~> m c) ) (c1 :: TyFun a m c)
infixr 1 >=>@#@$$$
data (a1 :: TyFun b ~> m c a ~> m b ~> a ~> m c) <=<@#@$
infixr 1 <=<@#@$
data (a6989586621681224097 :: b ~> m c) <=<@#@$$ (b1 :: TyFun a ~> m b a ~> m c)
infixr 1 <=<@#@$$
data ( (a6989586621681224097 :: b ~> m c) <=<@#@$$$ (a6989586621681224098 :: a ~> m b) ) (c1 :: TyFun a m c)
infixr 1 <=<@#@$$$
data VoidSym0 (a1 :: TyFun f a f ())
type family VoidSym1 (a6989586621679536168 :: f a) :: f ()
data JoinSym0 (a1 :: TyFun m m a m a)
type family JoinSym1 (a6989586621679351103 :: m m a) :: m a
data MsumSym0 (a1 :: TyFun t m a m a)
type family MsumSym1 (a6989586621680404174 :: t m a) :: m a
data MfilterSym0 (a1 :: TyFun a ~> Bool m a ~> m a)
data MfilterSym1 (a6989586621681223962 :: a ~> Bool) (b :: TyFun m a m a)
type family MfilterSym2 (a6989586621681223962 :: a ~> Bool) (a6989586621681223963 :: m a) :: m a
data FilterMSym0 (a1 :: TyFun a ~> m Bool [a] ~> m [a])
data FilterMSym1 (a6989586621681224124 :: a ~> m Bool) (b :: TyFun [a] m [a])
type family FilterMSym2 (a6989586621681224124 :: a ~> m Bool) (a6989586621681224125 :: [a]) :: m [a]
data MapAndUnzipMSym0 (a1 :: TyFun a ~> m (b, c) [a] ~> m ([b], [c]))
data MapAndUnzipMSym1 (a6989586621681224083 :: a ~> m (b, c)) (b1 :: TyFun [a] m ([b], [c]))
type family MapAndUnzipMSym2 (a6989586621681224083 :: a ~> m (b, c)) (a6989586621681224084 :: [a]) :: m ([b], [c])
data ZipWithMSym0 (a1 :: TyFun a ~> b ~> m c [a] ~> [b] ~> m [c])
data ZipWithMSym1 (a6989586621681224074 :: a ~> b ~> m c) (b1 :: TyFun [a] [b] ~> m [c])
data ZipWithMSym2 (a6989586621681224074 :: a ~> b ~> m c) (a6989586621681224075 :: [a]) (c1 :: TyFun [b] m [c])
type family ZipWithMSym3 (a6989586621681224074 :: a ~> b ~> m c) (a6989586621681224075 :: [a]) (a6989586621681224076 :: [b]) :: m [c]
data ZipWithM_Sym0 (a1 :: TyFun a ~> b ~> m c [a] ~> [b] ~> m ())
data ZipWithM_Sym1 (a6989586621681224064 :: a ~> b ~> m c) (b1 :: TyFun [a] [b] ~> m ())
data ZipWithM_Sym2 (a6989586621681224064 :: a ~> b ~> m c) (a6989586621681224065 :: [a]) (c1 :: TyFun [b] m ())
type family ZipWithM_Sym3 (a6989586621681224064 :: a ~> b ~> m c) (a6989586621681224065 :: [a]) (a6989586621681224066 :: [b]) :: m ()
data FoldlMSym0 (a1 :: TyFun b ~> a ~> m b b ~> t a ~> m b)
data FoldlMSym1 (a6989586621680404238 :: b ~> a ~> m b) (b1 :: TyFun b t a ~> m b)
data FoldlMSym2 (a6989586621680404238 :: b ~> a ~> m b) (a6989586621680404239 :: b) (c :: TyFun t a m b)
type family FoldlMSym3 (a6989586621680404238 :: b ~> a ~> m b) (a6989586621680404239 :: b) (a6989586621680404240 :: t a) :: m b
data ReplicateMSym0 (a1 :: TyFun Natural m a ~> m [a])
data ReplicateMSym1 (a6989586621681224019 :: Natural) (b :: TyFun m a m [a])
type family ReplicateMSym2 (a6989586621681224019 :: Natural) (a6989586621681224020 :: m a) :: m [a]
data ReplicateM_Sym0 (a1 :: TyFun Natural m a ~> m ())
data ReplicateM_Sym1 (a6989586621681224001 :: Natural) (b :: TyFun m a m ())
type family ReplicateM_Sym2 (a6989586621681224001 :: Natural) (a6989586621681224002 :: m a) :: m ()
data GuardSym0 (a :: TyFun Bool f ())
type family GuardSym1 (a6989586621679350943 :: Bool) :: f ()
data WhenSym0 (a :: TyFun Bool f () ~> f ())
data WhenSym1 (a6989586621679351087 :: Bool) (b :: TyFun f () f ())
type family WhenSym2 (a6989586621679351087 :: Bool) (a6989586621679351088 :: f ()) :: f ()
data UnlessSym0 (a :: TyFun Bool f () ~> f ())
data UnlessSym1 (a6989586621681223991 :: Bool) (b :: TyFun f () f ())
type family UnlessSym2 (a6989586621681223991 :: Bool) (a6989586621681223992 :: f ()) :: f ()
data LiftMSym0 (a :: TyFun a1 ~> r m a1 ~> m r)
data LiftMSym1 (a6989586621679351076 :: a1 ~> r) (b :: TyFun m a1 m r)
type family LiftMSym2 (a6989586621679351076 :: a1 ~> r) (a6989586621679351077 :: m a1) :: m r
data LiftM2Sym0 (a :: TyFun a1 ~> a2 ~> r m a1 ~> m a2 ~> m r)
data LiftM2Sym1 (a6989586621679351059 :: a1 ~> a2 ~> r) (b :: TyFun m a1 m a2 ~> m r)
data LiftM2Sym2 (a6989586621679351059 :: a1 ~> a2 ~> r) (a6989586621679351060 :: m a1) (c :: TyFun m a2 m r)
type family LiftM2Sym3 (a6989586621679351059 :: a1 ~> a2 ~> r) (a6989586621679351060 :: m a1) (a6989586621679351061 :: m a2) :: m r
data LiftM3Sym0 (a :: TyFun a1 ~> a2 ~> a3 ~> r m a1 ~> m a2 ~> m a3 ~> m r)
data LiftM3Sym1 (a6989586621679351035 :: a1 ~> a2 ~> a3 ~> r) (b :: TyFun m a1 m a2 ~> m a3 ~> m r)
data LiftM3Sym2 (a6989586621679351035 :: a1 ~> a2 ~> a3 ~> r) (a6989586621679351036 :: m a1) (c :: TyFun m a2 m a3 ~> m r)
data LiftM3Sym3 (a6989586621679351035 :: a1 ~> a2 ~> a3 ~> r) (a6989586621679351036 :: m a1) (a6989586621679351037 :: m a2) (d :: TyFun m a3 m r)
type family LiftM3Sym4 (a6989586621679351035 :: a1 ~> a2 ~> a3 ~> r) (a6989586621679351036 :: m a1) (a6989586621679351037 :: m a2) (a6989586621679351038 :: m a3) :: m r
data LiftM4Sym0 (a :: TyFun a1 ~> a2 ~> a3 ~> a4 ~> r m a1 ~> m a2 ~> m a3 ~> m a4 ~> m r)
data LiftM4Sym1 (a6989586621679351004 :: a1 ~> a2 ~> a3 ~> a4 ~> r) (b :: TyFun m a1 m a2 ~> m a3 ~> m a4 ~> m r)
data LiftM4Sym2 (a6989586621679351004 :: a1 ~> a2 ~> a3 ~> a4 ~> r) (a6989586621679351005 :: m a1) (c :: TyFun m a2 m a3 ~> m a4 ~> m r)
data LiftM4Sym3 (a6989586621679351004 :: a1 ~> a2 ~> a3 ~> a4 ~> r) (a6989586621679351005 :: m a1) (a6989586621679351006 :: m a2) (d :: TyFun m a3 m a4 ~> m r)
data LiftM4Sym4 (a6989586621679351004 :: a1 ~> a2 ~> a3 ~> a4 ~> r) (a6989586621679351005 :: m a1) (a6989586621679351006 :: m a2) (a6989586621679351007 :: m a3) (e :: TyFun m a4 m r)
type family LiftM4Sym5 (a6989586621679351004 :: a1 ~> a2 ~> a3 ~> a4 ~> r) (a6989586621679351005 :: m a1) (a6989586621679351006 :: m a2) (a6989586621679351007 :: m a3) (a6989586621679351008 :: m a4) :: m r
data LiftM5Sym0 (a :: TyFun a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r m a1 ~> m a2 ~> m a3 ~> m a4 ~> m a5 ~> m r)
data LiftM5Sym1 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (b :: TyFun m a1 m a2 ~> m a3 ~> m a4 ~> m a5 ~> m r)
data LiftM5Sym2 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a6989586621679350967 :: m a1) (c :: TyFun m a2 m a3 ~> m a4 ~> m a5 ~> m r)
data LiftM5Sym3 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a6989586621679350967 :: m a1) (a6989586621679350968 :: m a2) (d :: TyFun m a3 m a4 ~> m a5 ~> m r)
data LiftM5Sym4 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a6989586621679350967 :: m a1) (a6989586621679350968 :: m a2) (a6989586621679350969 :: m a3) (e :: TyFun m a4 m a5 ~> m r)
data LiftM5Sym5 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a6989586621679350967 :: m a1) (a6989586621679350968 :: m a2) (a6989586621679350969 :: m a3) (a6989586621679350970 :: m a4) (f :: TyFun m a5 m r)
type family LiftM5Sym6 (a6989586621679350966 :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> r) (a6989586621679350967 :: m a1) (a6989586621679350968 :: m a2) (a6989586621679350969 :: m a3) (a6989586621679350970 :: m a4) (a6989586621679350971 :: m a5) :: m r
data ApSym0 (a1 :: TyFun m a ~> b m a ~> m b)
data ApSym1 (a6989586621679350947 :: m a ~> b) (b1 :: TyFun m a m b)
type family ApSym2 (a6989586621679350947 :: m a ~> b) (a6989586621679350948 :: m a) :: m b
data (a1 :: TyFun a ~> b m a ~> m b) <$!>@#@$
infixl 4 <$!>@#@$
data (a6989586621681223978 :: a ~> b) <$!>@#@$$ (b1 :: TyFun m a m b)
infixl 4 <$!>@#@$$
type family (a6989586621681223978 :: a ~> b) <$!>@#@$$$ (a6989586621681223979 :: m a) :: m b
infixl 4 <$!>@#@$$$
instance Control.Monad.Singletons.Internal.PMonad GHC.Internal.Data.Ord.Down
instance Control.Monad.Singletons.Internal.PMonad ((,) a)
instance Control.Monad.Singletons.Internal.SMonad GHC.Internal.Data.Ord.Down
instance Data.Monoid.Singletons.SMonoid a => Control.Monad.Singletons.Internal.SMonad ((,) a)
instance Control.Monad.Singletons.Internal.SApplicative f => Data.Singletons.SingI1 Control.Monad.Singletons.UnlessSym1
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI1 (Control.Monad.Singletons.<$!>@#@$$)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI1 (Control.Monad.Singletons.<=<@#@$$)
instance forall (m :: * -> *) b c (d :: b Data.Singletons.~> m c) a. (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 ((Control.Monad.Singletons.<=<@#@$$$) d)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI1 (Control.Monad.Singletons.>=>@#@$$)
instance forall (m :: * -> *) a b (d :: a Data.Singletons.~> m b) c. (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 ((Control.Monad.Singletons.>=>@#@$$$) d)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.FilterMSym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Control.Monad.Singletons.FoldMSym1
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI1 Control.Monad.Singletons.FoldM_Sym1
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.MapAndUnzipMSym1
instance Control.Monad.Singletons.Internal.SMonadPlus m => Data.Singletons.SingI1 Control.Monad.Singletons.MfilterSym1
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.ZipWithMSym1
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.ZipWithM_Sym1
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> m c)). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Control.Monad.Singletons.ZipWithMSym2 d)
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> m c)). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Control.Monad.Singletons.ZipWithM_Sym2 d)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.ReplicateMSym1
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI1 Control.Monad.Singletons.ReplicateM_Sym1
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Control.Monad.Singletons.FoldMSym2 d)
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI1 (Control.Monad.Singletons.FoldM_Sym2 d)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI2 (Control.Monad.Singletons.<=<@#@$$$)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI2 (Control.Monad.Singletons.>=>@#@$$$)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI2 Control.Monad.Singletons.ZipWithMSym2
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI2 Control.Monad.Singletons.ZipWithM_Sym2
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI2 Control.Monad.Singletons.FoldMSym2
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI2 Control.Monad.Singletons.FoldM_Sym2
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI (Control.Monad.Singletons.<$!>@#@$)
instance forall (m :: * -> *) a b (d :: a Data.Singletons.~> b). (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI ((Control.Monad.Singletons.<$!>@#@$$) d)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI (Control.Monad.Singletons.<=<@#@$)
instance forall (m :: * -> *) b c (d :: b Data.Singletons.~> m c) a. (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI ((Control.Monad.Singletons.<=<@#@$$) d)
instance forall (m :: * -> *) b c (d1 :: b Data.Singletons.~> m c) a (d2 :: a Data.Singletons.~> m b). (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (d1 Control.Monad.Singletons.<=<@#@$$$ d2)
instance Control.Monad.Singletons.Internal.SMonad m => Data.Singletons.SingI (Control.Monad.Singletons.>=>@#@$)
instance forall (m :: * -> *) a b (d :: a Data.Singletons.~> m b) c. (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI ((Control.Monad.Singletons.>=>@#@$$) d)
instance forall (m :: * -> *) a b (d1 :: a Data.Singletons.~> m b) c (d2 :: b Data.Singletons.~> m c). (Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (d1 Control.Monad.Singletons.>=>@#@$$$ d2)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.FilterMSym0
instance forall (m :: * -> *) a (d :: a Data.Singletons.~> m GHC.Types.Bool). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.FilterMSym1 d)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Control.Monad.Singletons.FoldMSym0
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.FoldMSym1 d)
instance forall (t :: * -> *) (m :: * -> *) b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Control.Monad.Singletons.FoldMSym2 d1 d2)
instance (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m) => Data.Singletons.SingI Control.Monad.Singletons.FoldM_Sym0
instance forall (t :: * -> *) (m :: * -> *) b a (d :: b Data.Singletons.~> (a Data.Singletons.~> m b)). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.FoldM_Sym1 d)
instance forall (t :: * -> *) (m :: * -> *) b a (d1 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (d2 :: b). (Data.Foldable.Singletons.SFoldable t, Control.Monad.Singletons.Internal.SMonad m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Control.Monad.Singletons.FoldM_Sym2 d1 d2)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.MapAndUnzipMSym0
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> m (b, c)). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.MapAndUnzipMSym1 d)
instance Control.Monad.Singletons.Internal.SMonadPlus m => Data.Singletons.SingI Control.Monad.Singletons.MfilterSym0
instance forall (m :: * -> *) a (d :: a Data.Singletons.~> GHC.Types.Bool). (Control.Monad.Singletons.Internal.SMonadPlus m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.MfilterSym1 d)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.ReplicateMSym0
instance (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.ReplicateMSym1 d)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.ReplicateM_Sym0
instance (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.ReplicateM_Sym1 d)
instance Control.Monad.Singletons.Internal.SApplicative f => Data.Singletons.SingI Control.Monad.Singletons.UnlessSym0
instance (Control.Monad.Singletons.Internal.SApplicative f, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.UnlessSym1 d)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.ZipWithMSym0
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> m c)). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.ZipWithMSym1 d)
instance forall (m :: * -> *) a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> m c)) (d2 :: [a]). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Control.Monad.Singletons.ZipWithMSym2 d1 d2)
instance Control.Monad.Singletons.Internal.SApplicative m => Data.Singletons.SingI Control.Monad.Singletons.ZipWithM_Sym0
instance forall (m :: * -> *) a b c (d :: a Data.Singletons.~> (b Data.Singletons.~> m c)). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d) => Data.Singletons.SingI (Control.Monad.Singletons.ZipWithM_Sym1 d)
instance forall (m :: * -> *) a b c (d1 :: a Data.Singletons.~> (b Data.Singletons.~> m c)) (d2 :: [a]). (Control.Monad.Singletons.Internal.SApplicative m, Data.Singletons.SingI d1, Data.Singletons.SingI d2) => Data.Singletons.SingI (Control.Monad.Singletons.ZipWithM_Sym2 d1 d2)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.<$!>@#@$)
instance forall a b (m :: * -> *) (a6989586621681223978 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Control.Monad.Singletons.<$!>@#@$$) a6989586621681223978)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.<=<@#@$)
instance forall b (m :: * -> *) c a (a6989586621681224097 :: b Data.Singletons.~> m c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Control.Monad.Singletons.<=<@#@$$) a6989586621681224097)
instance forall b (m :: * -> *) c a (a6989586621681224097 :: b Data.Singletons.~> m c) (a6989586621681224098 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681224097 Control.Monad.Singletons.<=<@#@$$$ a6989586621681224098)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.>=>@#@$)
instance forall a (m :: * -> *) b c (a6989586621681224109 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings ((Control.Monad.Singletons.>=>@#@$$) a6989586621681224109)
instance forall a (m :: * -> *) b c (a6989586621681224109 :: a Data.Singletons.~> m b) (a6989586621681224110 :: b Data.Singletons.~> m c). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681224109 Control.Monad.Singletons.>=>@#@$$$ a6989586621681224110)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.FilterMSym0
instance forall a (m :: * -> *) (a6989586621681224124 :: a Data.Singletons.~> m GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.FilterMSym1 a6989586621681224124)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.FoldMSym0
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621681224054 :: b Data.Singletons.~> (a Data.Singletons.~> m b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.FoldMSym1 a6989586621681224054)
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621681224054 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (a6989586621681224055 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.FoldMSym2 a6989586621681224054 a6989586621681224055)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.FoldM_Sym0
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621681224038 :: b Data.Singletons.~> (a Data.Singletons.~> m b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.FoldM_Sym1 a6989586621681224038)
instance forall b a (m :: * -> *) (t :: * -> *) (a6989586621681224038 :: b Data.Singletons.~> (a Data.Singletons.~> m b)) (a6989586621681224039 :: b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.FoldM_Sym2 a6989586621681224038 a6989586621681224039)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Lambda_6989586621681223966Sym0
instance forall k1 k (m :: * -> *) (p6989586621681223964 :: k1 Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681223966Sym1 p6989586621681223964)
instance forall k1 k (m :: * -> *) (p6989586621681223964 :: k1 Data.Singletons.~> GHC.Types.Bool) (ma6989586621681223965 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681223966Sym2 p6989586621681223964 ma6989586621681223965)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Lambda_6989586621681223982Sym0
instance forall k2 k3 k (m :: * -> *) (f6989586621681223980 :: k2 Data.Singletons.~> k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681223982Sym1 f6989586621681223980)
instance forall k2 k3 k (m :: * -> *) (f6989586621681223980 :: k2 Data.Singletons.~> k3) (m6989586621681223981 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681223982Sym2 f6989586621681223980 m6989586621681223981)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Lambda_6989586621681224115Sym0
instance forall k1 (m :: * -> *) a b k (f6989586621681224112 :: k1 Data.Singletons.~> m a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224115Sym1 f6989586621681224112)
instance forall k1 (m :: * -> *) a b k (f6989586621681224112 :: k1 Data.Singletons.~> m a) (g6989586621681224113 :: a Data.Singletons.~> m b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224115Sym2 f6989586621681224112 g6989586621681224113)
instance forall k1 (m :: * -> *) a b k (f6989586621681224112 :: k1 Data.Singletons.~> m a) (g6989586621681224113 :: a Data.Singletons.~> m b) (a_69895866216812241036989586621681224114 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224115Sym3 f6989586621681224112 g6989586621681224113 a_69895866216812241036989586621681224114)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Lambda_6989586621681224128Sym0
instance forall k2 (f :: * -> *) k3 (p6989586621681224126 :: k2 Data.Singletons.~> f GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224128Sym1 p6989586621681224126)
instance forall k2 (f :: * -> *) k3 (p6989586621681224126 :: k2 Data.Singletons.~> f GHC.Types.Bool) (a_69895866216812241196989586621681224127 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224128Sym2 p6989586621681224126 a_69895866216812241196989586621681224127)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Lambda_6989586621681224131Sym0
instance forall k1 k2 k3 (x6989586621681224130 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224131Sym1 x6989586621681224130)
instance forall k1 k2 k3 (x6989586621681224130 :: k1) (p6989586621681224126 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224131Sym2 x6989586621681224130 p6989586621681224126)
instance forall k1 k2 k3 (x6989586621681224130 :: k1) (p6989586621681224126 :: k2) (a_69895866216812241196989586621681224127 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Lambda_6989586621681224131Sym3 x6989586621681224130 p6989586621681224126 a_69895866216812241196989586621681224127)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Let6989586621681223969Scrutinee_6989586621681223737Sym0
instance forall k1 k2 k3 (a6989586621681223968 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681223969Scrutinee_6989586621681223737Sym1 a6989586621681223968)
instance forall k1 k2 k3 (a6989586621681223968 :: k1) (p6989586621681223964 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681223969Scrutinee_6989586621681223737Sym2 a6989586621681223968 p6989586621681223964)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Let6989586621681223985ZSym0
instance forall k1 k2 k3 (x6989586621681223984 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681223985ZSym1 x6989586621681223984)
instance forall k1 k2 k3 (x6989586621681223984 :: k1) (f6989586621681223980 :: k1 Data.Singletons.~> k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681223985ZSym2 x6989586621681223984 f6989586621681223980)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Let6989586621681224005LoopSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224005LoopSym1 m2)
instance forall k1 k2 (m1 :: * -> *) a (m2 :: * -> *) (a6989586621681223645 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224005LoopSym2 m2 a6989586621681223645)
instance forall k1 k2 (m1 :: * -> *) a (m2 :: * -> *) (a6989586621681223645 :: k1) (cnt06989586621681224003 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224005LoopSym3 m2 a6989586621681223645 cnt06989586621681224003)
instance forall k1 k2 a (m6989586621681223644 :: * -> *) (a6989586621681223645 :: k1) (cnt06989586621681224003 :: k2) (f6989586621681224004 :: m6989586621681223644 a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224005LoopSym4 m6989586621681223644 a6989586621681223645 cnt06989586621681224003 f6989586621681224004)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Let6989586621681224023LoopSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224023LoopSym1 m2)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224023LoopSym2 m2 a2)
instance forall k (m1 :: * -> *) a1 (m2 :: * -> *) a2 (cnt06989586621681224021 :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224023LoopSym3 m2 a2 cnt06989586621681224021)
instance forall k (m6989586621681223646 :: * -> *) a6989586621681223647 (cnt06989586621681224021 :: k) (f6989586621681224022 :: m6989586621681223646 a6989586621681223647). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224023LoopSym4 m6989586621681223646 a6989586621681223647 cnt06989586621681224021 f6989586621681224022)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.Let6989586621681224151Scrutinee_6989586621681223739Sym0
instance forall k1 k2 k3 (u6989586621681224148 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224151Scrutinee_6989586621681223739Sym1 u6989586621681224148)
instance forall k1 k2 k3 (u6989586621681224148 :: k1) (a6989586621681224149 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.Let6989586621681224151Scrutinee_6989586621681223739Sym2 u6989586621681224148 a6989586621681224149)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.MapAndUnzipMSym0
instance forall a (m :: * -> *) b c (a6989586621681224083 :: a Data.Singletons.~> m (b, c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.MapAndUnzipMSym1 a6989586621681224083)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.MfilterSym0
instance forall a (m :: * -> *) (a6989586621681223962 :: a Data.Singletons.~> GHC.Types.Bool). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.MfilterSym1 a6989586621681223962)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.ReplicateMSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ReplicateMSym1 a6989586621681224019)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.ReplicateM_Sym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ReplicateM_Sym1 a6989586621681224001)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.TFHelper_6989586621681224141Sym0
instance forall a1 a2 b (a6989586621681224146 :: (a1, a2)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.TFHelper_6989586621681224141Sym1 a6989586621681224146)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.TFHelper_6989586621681224160Sym0
instance forall a b (a6989586621681224165 :: GHC.Internal.Data.Ord.Down a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.TFHelper_6989586621681224160Sym1 a6989586621681224165)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.UnlessSym0
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.UnlessSym1 a6989586621681223991)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.ZipWithMSym0
instance forall a b (m :: * -> *) c (a6989586621681224074 :: a Data.Singletons.~> (b Data.Singletons.~> m c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ZipWithMSym1 a6989586621681224074)
instance forall a b (m :: * -> *) c (a6989586621681224074 :: a Data.Singletons.~> (b Data.Singletons.~> m c)) (a6989586621681224075 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ZipWithMSym2 a6989586621681224074 a6989586621681224075)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Control.Monad.Singletons.ZipWithM_Sym0
instance forall a b (m :: * -> *) c (a6989586621681224064 :: a Data.Singletons.~> (b Data.Singletons.~> m c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ZipWithM_Sym1 a6989586621681224064)
instance forall a b (m :: * -> *) c (a6989586621681224064 :: a Data.Singletons.~> (b Data.Singletons.~> m c)) (a6989586621681224065 :: [a]). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Control.Monad.Singletons.ZipWithM_Sym2 a6989586621681224064 a6989586621681224065)
-- | Mimics the Haskell Prelude, but with singleton types. Includes the
-- basic singleton definitions. Note: This is currently very incomplete!
--
-- Because many of these definitions are produced by Template Haskell, it
-- is not possible to create proper Haddock documentation. Also, please
-- excuse the apparent repeated variable names. This is due to an
-- interaction between Template Haskell and Haddock.
module Prelude.Singletons
data family TyCon :: forall k1 k2 unmatchable_fun. () => k1 -> k2 -> unmatchable_fun
-- | Proxy is a type that holds no data, but has a phantom parameter
-- of arbitrary type (or even kind). Its use is to provide type
-- information, even though there is no value available of that type (or
-- it may be too costly to create one).
--
-- Historically, Proxy :: Proxy a is a safer
-- alternative to the undefined :: a idiom.
--
--
-- >>> Proxy :: Proxy (Void, Int -> Int)
-- Proxy
--
--
-- Proxy can even hold types of higher kinds,
--
--
-- >>> Proxy :: Proxy Either
-- Proxy
--
--
--
-- >>> Proxy :: Proxy Functor
-- Proxy
--
--
--
-- >>> Proxy :: Proxy complicatedStructure
-- Proxy
--
data Proxy (t :: k)
Proxy :: Proxy (t :: k)
class SingKind k where {
type Demote k = (r :: Type) | r -> k;
}
fromSing :: forall (a :: k). SingKind k => Sing a -> Demote k
toSing :: SingKind k => Demote k -> SomeSing k
class SingI (a :: k)
sing :: SingI a => Sing a
type family Sing :: k -> Type
pattern Sing :: forall k (a :: k). () => SingI a => Sing a
data SomeSing k
[SomeSing] :: forall k (a :: k). Sing a -> SomeSing k
type (a :: k1 ~> k2) @@ (b :: k1) = Apply a b
(@@) :: forall k1 k2 (f :: k1 ~> k2) (t :: k1). Sing f -> Sing t -> Sing (f @@ t)
pattern FromSing :: forall k (a :: k). SingKind k => Sing a -> Demote k
pattern SLambda2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). SingFunction2 f -> Sing f
pattern SLambda3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). SingFunction3 f -> Sing f
pattern SLambda4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). SingFunction4 f -> Sing f
pattern SLambda5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). SingFunction5 f -> Sing f
pattern SLambda6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). SingFunction6 f -> Sing f
pattern SLambda7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). SingFunction7 f -> Sing f
pattern SLambda8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). SingFunction8 f -> Sing f
applySing2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). Sing f -> SingFunction2 f
applySing3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). Sing f -> SingFunction3 f
applySing4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). Sing f -> SingFunction4 f
applySing5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). Sing f -> SingFunction5 f
applySing6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). Sing f -> SingFunction6 f
applySing7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). Sing f -> SingFunction7 f
applySing8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). Sing f -> SingFunction8 f
demote :: forall {k} (a :: k). (SingKind k, SingI a) => Demote k
demote1 :: forall {k1} {k2} (f :: k1 -> k2) (x :: k1). (SingKind k2, SingI1 f, SingI x) => Demote k2
demote2 :: forall {k1} {k2} {k3} (f :: k1 -> k2 -> k3) (x :: k1) (y :: k2). (SingKind k3, SingI2 f, SingI x, SingI y) => Demote k3
sing1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1). (SingI1 f, SingI x) => Sing (f x)
sing2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2). (SingI2 f, SingI x, SingI y) => Sing (f x y)
singByProxy :: forall {k} (a :: k) proxy. SingI a => proxy a -> Sing a
singByProxy# :: forall {k} (a :: k). SingI a => Proxy# a -> Sing a
singByProxy1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) proxy. (SingI1 f, SingI x) => proxy (f x) -> Sing (f x)
singByProxy1# :: forall {k1} {k} (f :: k1 -> k) (x :: k1). (SingI1 f, SingI x) => Proxy# (f x) -> Sing (f x)
singByProxy2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) proxy. (SingI2 f, SingI x, SingI y) => proxy (f x y) -> Sing (f x y)
singByProxy2# :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2). (SingI2 f, SingI x, SingI y) => Proxy# (f x y) -> Sing (f x y)
singFun1 :: forall {a1} {b} (f :: a1 ~> b). SingFunction1 f -> Sing f
singFun2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). SingFunction2 f -> Sing f
singFun3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). SingFunction3 f -> Sing f
singFun4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). SingFunction4 f -> Sing f
singFun5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). SingFunction5 f -> Sing f
singFun6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). SingFunction6 f -> Sing f
singFun7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). SingFunction7 f -> Sing f
singFun8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). SingFunction8 f -> Sing f
singInstance :: forall k (a :: k). Sing a -> SingInstance a
singThat :: forall k (a :: k). (SingKind k, SingI a) => (Demote k -> Bool) -> Maybe (Sing a)
singThat1 :: forall k1 k2 (f :: k1 -> k2) (x :: k1). (SingKind k2, SingI1 f, SingI x) => (Demote k2 -> Bool) -> Maybe (Sing (f x))
singThat2 :: forall k1 k2 k3 (f :: k1 -> k2 -> k3) (x :: k1) (y :: k2). (SingKind k3, SingI2 f, SingI x, SingI y) => (Demote k3 -> Bool) -> Maybe (Sing (f x y))
unSingFun1 :: forall {a1} {b} (f :: a1 ~> b). Sing f -> SingFunction1 f
unSingFun2 :: forall {a1} {a2} {b} (f :: a1 ~> (a2 ~> b)). Sing f -> SingFunction2 f
unSingFun3 :: forall {a1} {a2} {a3} {b} (f :: a1 ~> (a2 ~> (a3 ~> b))). Sing f -> SingFunction3 f
unSingFun4 :: forall {a1} {a2} {a3} {a4} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> b)))). Sing f -> SingFunction4 f
unSingFun5 :: forall {a1} {a2} {a3} {a4} {a5} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> b))))). Sing f -> SingFunction5 f
unSingFun6 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> b)))))). Sing f -> SingFunction6 f
unSingFun7 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> b))))))). Sing f -> SingFunction7 f
unSingFun8 :: forall {a1} {a2} {a3} {a4} {a5} {a6} {a7} {a8} {b} (f :: a1 ~> (a2 ~> (a3 ~> (a4 ~> (a5 ~> (a6 ~> (a7 ~> (a8 ~> b)))))))). Sing f -> SingFunction8 f
usingSingI1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) r. (SingI1 f, SingI x) => (SingI (f x) => r) -> r
usingSingI2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) r. (SingI2 f, SingI x, SingI y) => (SingI (f x y) => r) -> r
withSing :: forall {k} (a :: k) b. SingI a => (Sing a -> b) -> b
withSing1 :: forall {k1} {k} (f :: k1 -> k) (x :: k1) b. (SingI1 f, SingI x) => (Sing (f x) -> b) -> b
withSing2 :: forall {k1} {k2} {k} (f :: k1 -> k2 -> k) (x :: k1) (y :: k2) b. (SingI2 f, SingI x, SingI y) => (Sing (f x y) -> b) -> b
withSingI :: forall {k} (n :: k) r. Sing n -> (SingI n => r) -> r
withSomeSing :: SingKind k => Demote k -> (forall (a :: k). () => Sing a -> r) -> r
data (a1 :: TyFun a ~> b a ~> b) @@@#@$
data (a1 :: a ~> b) @@@#@$$ (b1 :: TyFun a b)
type (f :: a ~> b) @@@#@$$$ (x :: a) = f @@ x
type family Apply (f :: k1 ~> k2) (x :: k1) :: k2
data ApplySym0 (a1 :: TyFun a ~> b a ~> b)
data ApplySym1 (a1 :: a ~> b) (b1 :: TyFun a b)
type ApplySym2 (f :: a ~> b) (x :: a) = Apply f x
type family ApplyTyCon :: k1 -> k2 -> TyFun k1 unmatchable_fun -> Type
data ApplyTyConAux1 (a :: k1 -> k2) (b :: TyFun k1 k2)
data ApplyTyConAux2 (a :: k1 -> k2 -> k3) (b :: TyFun k1 unmatchable_fun)
type family Demote k = (r :: Type) | r -> k
data DemoteSym0 (a :: TyFun Type Type)
type DemoteSym1 x = Demote x
type KindOf (a :: k) = k
data KindOfSym0 (a :: TyFun k Type)
type KindOfSym1 (x :: k) = KindOf x
newtype SLambda (f :: k1 ~> k2)
SLambda :: (forall (t :: k1). () => Sing t -> Sing (f @@ t)) -> SLambda (f :: k1 ~> k2)
[applySing] :: SLambda (f :: k1 ~> k2) -> forall (t :: k1). () => Sing t -> Sing (f @@ t)
newtype SWrappedSing (a1 :: WrappedSing a)
[SWrapSing] :: forall k (a :: k) (a1 :: WrappedSing a). Sing a -> SWrappedSing a1
type SameKind (a :: k) (b :: k) = ()
data SameKindSym0 (a :: TyFun k k ~> Constraint)
data SameKindSym1 (a :: k) (b :: TyFun k Constraint)
type SameKindSym2 (x :: k) (y :: k) = SameKind x y
type SingFunction1 (f :: a1 ~> b) = forall (t :: a1). () => Sing t -> Sing f @@ t
type SingFunction2 (f :: a1 ~> a2 ~> b) = forall (t1 :: a1) (t2 :: a2). () => Sing t1 -> Sing t2 -> Sing f @@ t1 @@ t2
type SingFunction3 (f :: a1 ~> a2 ~> a3 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing f @@ t1 @@ t2 @@ t3
type SingFunction4 (f :: a1 ~> a2 ~> a3 ~> a4 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4
type SingFunction5 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5
type SingFunction6 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6
type SingFunction7 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> a7 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6) (t7 :: a7). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing t7 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6 @@ t7
type SingFunction8 (f :: a1 ~> a2 ~> a3 ~> a4 ~> a5 ~> a6 ~> a7 ~> a8 ~> b) = forall (t1 :: a1) (t2 :: a2) (t3 :: a3) (t4 :: a4) (t5 :: a5) (t6 :: a6) (t7 :: a7) (t8 :: a8). () => Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing t5 -> Sing t6 -> Sing t7 -> Sing t8 -> Sing f @@ t1 @@ t2 @@ t3 @@ t4 @@ t5 @@ t6 @@ t7 @@ t8
class forall (x :: k1). SingI x => SingI f x => SingI1 (f :: k1 -> k2)
liftSing :: forall (x :: k1). SingI1 f => Sing x -> Sing (f x)
class forall (x :: k1) (y :: k2). (SingI x, SingI y) => SingI f x y => SingI2 (f :: k1 -> k2 -> k3)
liftSing2 :: forall (x :: k1) (y :: k2). SingI2 f => Sing x -> Sing y -> Sing (f x y)
data SingInstance (a :: k)
[SingInstance] :: forall {k} (a :: k). SingI a => SingInstance a
type TyCon1 = TyCon
type TyCon2 = TyCon
type TyCon3 = TyCon
type TyCon4 = TyCon
type TyCon5 = TyCon
type TyCon6 = TyCon
type TyCon7 = TyCon
type TyCon8 = TyCon
data TyFun a b
type family UnwrapSing (ws :: WrappedSing a) :: Sing a
newtype WrappedSing (a :: k)
[WrapSing] :: forall k (a :: k). Sing a -> WrappedSing a
type a ~> b = TyFun a b -> Type
data (a :: TyFun Type Type ~> Type) ~>@#@$
data a ~>@#@$$ (b :: TyFun Type Type)
type x ~>@#@$$$ y = x ~> y
data SBool (a :: Bool)
[SFalse] :: SBool 'False
[STrue] :: SBool 'True
-- | Type-level If. If True a b ==> a; If
-- False a b ==> b
type family If (cond :: Bool) (tru :: k) (fls :: k) :: k
-- | Conditional over singletons
sIf :: forall {k} (a :: Bool) (b :: k) (c :: k). Sing a -> Sing b -> Sing c -> Sing (If a b c)
-- | Type-level "and"
type family (a :: Bool) && (b :: Bool) :: Bool
infixr 3 &&
-- | Conjunction of singletons
(%&&) :: forall (a :: Bool) (b :: Bool). Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
-- | Type-level "or"
type family (a :: Bool) || (b :: Bool) :: Bool
infixr 2 ||
-- | Disjunction of singletons
(%||) :: forall (a :: Bool) (b :: Bool). Sing a -> Sing b -> Sing (a || b)
infixr 2 %||
-- | Type-level "not". An injective type family since 4.10.0.0.
--
-- @since base-4.7.0.0
type family Not (a :: Bool) = (res :: Bool) | res -> a
-- | Negation of a singleton
sNot :: forall (a :: Bool). Sing a -> Sing (Not a)
type family Otherwise :: Bool
sOtherwise :: Sing OtherwiseSym0
data SMaybe (a1 :: Maybe a)
[SNothing] :: forall a. SMaybe ('Nothing :: Maybe a)
[SJust] :: forall a (n :: a). Sing n -> SMaybe ('Just n)
maybe_ :: b -> (a -> b) -> Maybe a -> b
type family Maybe_ (a1 :: b) (a2 :: a ~> b) (a3 :: Maybe a) :: b
sMaybe_ :: forall b a (t1 :: b) (t2 :: a ~> b) (t3 :: Maybe a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Maybe_Sym0 :: TyFun b ((a ~> b) ~> (Maybe a ~> b)) -> Type) t1) t2) t3)
data SEither (a1 :: Either a b)
[SLeft] :: forall a b (n :: a). Sing n -> SEither ('Left n :: Either a b)
[SRight] :: forall a b (n :: b). Sing n -> SEither ('Right n :: Either a b)
either_ :: (a -> c) -> (b -> c) -> Either a b -> c
type family Either_ (a1 :: a ~> c) (a2 :: b ~> c) (a3 :: Either a b) :: c
sEither_ :: forall a c b (t1 :: a ~> c) (t2 :: b ~> c) (t3 :: Either a b). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Either_Sym0 :: TyFun (a ~> c) ((b ~> c) ~> (Either a b ~> c)) -> Type) t1) t2) t3)
data SOrdering (a :: Ordering)
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
-- | A value-level witness for a type-level character. This is commonly
-- referred to as a singleton type, as for each c, there
-- is a single value that inhabits the type SChar c
-- (aside from bottom).
--
-- The definition of SChar is intentionally left abstract. To
-- obtain an SChar value, use one of the following:
--
--
-- - The charSing method of KnownChar.
-- - The SChar pattern synonym.
-- - The withSomeSChar function, which creates an SChar
-- from a Char.
--
--
-- @since base-4.18.0.0
data SChar (s :: Char)
-- | (Kind) This is the kind of type-level symbols.
data Symbol
data SList (a1 :: [a])
[SNil] :: forall a. SList ('[] :: [a])
[SCons] :: forall a (n1 :: a) (n2 :: [a]). Sing n1 -> Sing n2 -> SList (n1 ': n2)
infixr 5 `SCons`
data STuple0 (a :: ())
[STuple0] :: STuple0 '()
data STuple2 (a1 :: (a, b))
[STuple2] :: forall a b (n1 :: a) (n2 :: b). Sing n1 -> Sing n2 -> STuple2 '(n1, n2)
data STuple3 (a1 :: (a, b, c))
[STuple3] :: forall a b c (n1 :: a) (n2 :: b) (n3 :: c). Sing n1 -> Sing n2 -> Sing n3 -> STuple3 '(n1, n2, n3)
data STuple4 (a1 :: (a, b, c, d))
[STuple4] :: forall a b c d (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> STuple4 '(n1, n2, n3, n4)
data STuple5 (a1 :: (a, b, c, d, e))
[STuple5] :: forall a b c d e (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> STuple5 '(n1, n2, n3, n4, n5)
data STuple6 (a1 :: (a, b, c, d, e, f))
[STuple6] :: forall a b c d e f (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> STuple6 '(n1, n2, n3, n4, n5, n6)
data STuple7 (a1 :: (a, b, c, d, e, f, g))
[STuple7] :: forall a b c d e f g (n1 :: a) (n2 :: b) (n3 :: c) (n4 :: d) (n5 :: e) (n6 :: f) (n7 :: g). Sing n1 -> Sing n2 -> Sing n3 -> Sing n4 -> Sing n5 -> Sing n6 -> Sing n7 -> STuple7 '(n1, n2, n3, n4, n5, n6, n7)
type family Fst (a1 :: (a, b)) :: a
sFst :: forall a b (t :: (a, b)). Sing t -> Sing (Apply (FstSym0 :: TyFun (a, b) a -> Type) t)
type family Snd (a1 :: (a, b)) :: b
sSnd :: forall a b (t :: (a, b)). Sing t -> Sing (Apply (SndSym0 :: TyFun (a, b) b -> Type) t)
type family Curry (a1 :: (a, b) ~> c) (a2 :: a) (a3 :: b) :: c
sCurry :: forall a b c (t1 :: (a, b) ~> c) (t2 :: a) (t3 :: b). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type) t1) t2) t3)
type family Uncurry (a1 :: a ~> b ~> c) (a2 :: (a, b)) :: c
sUncurry :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: (a, b)). Sing t1 -> Sing t2 -> Sing (Apply (Apply (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type) t1) t2)
class PEq a where {
type (arg :: a) == (arg1 :: a) :: Bool;
type (arg :: a) /= (arg1 :: a) :: Bool;
type arg :: a == arg1 :: a = Apply Apply TFHelper_6989586621679139564Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a /= arg1 :: a = Apply Apply TFHelper_6989586621679139553Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
}
infix 4 ==
infix 4 /=
class SEq a
(%==) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%==) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139564Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((==@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%/=) :: forall (t1 :: a) (t2 :: a). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%/=) :: forall (t1 :: a) (t2 :: a). (SEq a, Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679139553Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((/=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
infix 4 %==
infix 4 %/=
class POrd a where {
type Compare (arg :: a) (arg1 :: a) :: Ordering;
type (arg :: a) < (arg1 :: a) :: Bool;
type (arg :: a) <= (arg1 :: a) :: Bool;
type (arg :: a) > (arg1 :: a) :: Bool;
type (arg :: a) >= (arg1 :: a) :: Bool;
type Max (arg :: a) (arg1 :: a) :: a;
type Min (arg :: a) (arg1 :: a) :: a;
type Compare arg :: a arg1 :: a = Apply Apply Compare_6989586621679239102Sym0 :: TyFun a a ~> Ordering -> Type arg arg1;
type arg :: a < arg1 :: a = Apply Apply TFHelper_6989586621679239123Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a <= arg1 :: a = Apply Apply TFHelper_6989586621679239139Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a > arg1 :: a = Apply Apply TFHelper_6989586621679239155Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type arg :: a >= arg1 :: a = Apply Apply TFHelper_6989586621679239171Sym0 :: TyFun a a ~> Bool -> Type arg arg1;
type Max arg :: a arg1 :: a = Apply Apply Max_6989586621679239187Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Min arg :: a arg1 :: a = Apply Apply Min_6989586621679239203Sym0 :: TyFun a a ~> a -> Type arg arg1;
}
infix 4 <
infix 4 <=
infix 4 >
infix 4 >=
class SEq a => SOrd a
sCompare :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
($dmsCompare) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2 ~ Apply (Apply (Compare_6989586621679239102Sym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (CompareSym0 :: TyFun a (a ~> Ordering) -> Type) t1) t2)
(%<) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239123Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%<=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%<=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239139Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239155Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
(%>=) :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
($dm%>=) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679239171Sym0 :: TyFun a (a ~> Bool) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>=@#@$) :: TyFun a (a ~> Bool) -> Type) t1) t2)
sMax :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMax) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Max_6989586621679239187Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MaxSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMin :: forall (t1 :: a) (t2 :: a). SOrd a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMin) :: forall (t1 :: a) (t2 :: a). (SOrd a, Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Min_6989586621679239203Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MinSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
infix 4 %<
infix 4 %<=
infix 4 %>
infix 4 %>=
class PEnum a where {
type ToEnum (arg :: Natural) :: a;
type FromEnum (arg :: a) :: Natural;
type EnumFromTo (arg :: a) (arg1 :: a) :: [a];
type EnumFromThenTo (arg :: a) (arg1 :: a) (arg2 :: a) :: [a];
type Succ arg :: a = Apply Succ_6989586621679618581Sym0 :: TyFun a a -> Type arg;
type Pred arg :: a = Apply Pred_6989586621679618594Sym0 :: TyFun a a -> Type arg;
type EnumFromTo arg :: a arg1 :: a = Apply Apply EnumFromTo_6989586621679618604Sym0 :: TyFun a a ~> [a] -> Type arg arg1;
type EnumFromThenTo arg :: a arg1 :: a arg2 :: a = Apply Apply Apply EnumFromThenTo_6989586621679618616Sym0 :: TyFun a a ~> a ~> [a] -> Type arg arg1 arg2;
}
class SEnum a
sToEnum :: forall (t :: Natural). SEnum a => Sing t -> Sing (Apply (ToEnumSym0 :: TyFun Natural a -> Type) t)
sFromEnum :: forall (t :: a). SEnum a => Sing t -> Sing (Apply (FromEnumSym0 :: TyFun a Natural -> Type) t)
sEnumFromTo :: forall (t1 :: a) (t2 :: a). SEnum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2)
($dmsEnumFromTo) :: forall (t1 :: a) (t2 :: a). (SEnum a, Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2 ~ Apply (Apply (EnumFromTo_6989586621679618604Sym0 :: TyFun a (a ~> [a]) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (EnumFromToSym0 :: TyFun a (a ~> [a]) -> Type) t1) t2)
sEnumFromThenTo :: forall (t1 :: a) (t2 :: a) (t3 :: a). SEnum a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3)
($dmsEnumFromThenTo) :: forall (t1 :: a) (t2 :: a) (t3 :: a). (SEnum a, Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (EnumFromThenTo_6989586621679618616Sym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (EnumFromThenToSym0 :: TyFun a (a ~> (a ~> [a])) -> Type) t1) t2) t3)
class PBounded a where {
type MinBound :: a;
type MaxBound :: a;
}
class SBounded a
sMinBound :: SBounded a => Sing (MinBoundSym0 :: a)
sMaxBound :: SBounded a => Sing (MaxBoundSym0 :: a)
class PNum a where {
type (arg :: a) + (arg1 :: a) :: a;
type (arg :: a) - (arg1 :: a) :: a;
type (arg :: a) * (arg1 :: a) :: a;
type Negate (arg :: a) :: a;
type Abs (arg :: a) :: a;
type Signum (arg :: a) :: a;
type FromInteger (arg :: Natural) :: a;
type arg :: a - arg1 :: a = Apply Apply TFHelper_6989586621679596400Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Negate arg :: a = Apply Negate_6989586621679596410Sym0 :: TyFun a a -> Type arg;
}
infixl 6 +
infixl 6 -
infixl 7 *
class SNum a
(%+) :: forall (t1 :: a) (t2 :: a). SNum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((+@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
(%-) :: forall (t1 :: a) (t2 :: a). SNum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((-@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
($dm%-) :: forall (t1 :: a) (t2 :: a). (SNum a, Apply (Apply ((-@#@$) :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679596400Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((-@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
(%*) :: forall (t1 :: a) (t2 :: a). SNum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
sNegate :: forall (t :: a). SNum a => Sing t -> Sing (Apply (NegateSym0 :: TyFun a a -> Type) t)
($dmsNegate) :: forall (t :: a). (SNum a, Apply (NegateSym0 :: TyFun a a -> Type) t ~ Apply (Negate_6989586621679596410Sym0 :: TyFun a a -> Type) t) => Sing t -> Sing (Apply (NegateSym0 :: TyFun a a -> Type) t)
sAbs :: forall (t :: a). SNum a => Sing t -> Sing (Apply (AbsSym0 :: TyFun a a -> Type) t)
sSignum :: forall (t :: a). SNum a => Sing t -> Sing (Apply (SignumSym0 :: TyFun a a -> Type) t)
sFromInteger :: forall (t :: Natural). SNum a => Sing t -> Sing (Apply (FromIntegerSym0 :: TyFun Natural a -> Type) t)
infixl 6 %+
infixl 6 %-
infixl 7 %*
type family Subtract (a1 :: a) (a2 :: a) :: a
sSubtract :: forall a (t1 :: a) (t2 :: a). SNum a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (SubtractSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
class PSemigroup a where {
type (arg :: a) <> (arg1 :: a) :: a;
type Sconcat arg :: NonEmpty a = Apply Sconcat_6989586621679209741Sym0 :: TyFun NonEmpty a a -> Type arg;
}
infixr 6 <>
class SSemigroup a
(%<>) :: forall (t1 :: a) (t2 :: a). SSemigroup a => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<>@#@$) :: TyFun a (a ~> a) -> Type) t1) t2)
infixr 6 %<>
class PMonoid a where {
type Mempty :: a;
type Mappend (arg :: a) (arg1 :: a) :: a;
type Mconcat (arg :: [a]) :: a;
type Mappend arg :: a arg1 :: a = Apply Apply Mappend_6989586621680304347Sym0 :: TyFun a a ~> a -> Type arg arg1;
type Mconcat arg :: [a] = Apply Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type arg;
}
class SSemigroup a => SMonoid a
sMempty :: SMonoid a => Sing (MemptySym0 :: a)
sMappend :: forall (t1 :: a) (t2 :: a). SMonoid a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
($dmsMappend) :: forall (t1 :: a) (t2 :: a). (SMonoid a, Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2 ~ Apply (Apply (Mappend_6989586621680304347Sym0 :: TyFun a (a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MappendSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
sMconcat :: forall (t :: [a]). SMonoid a => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
($dmsMconcat) :: forall (t :: [a]). (SMonoid a, Apply (MconcatSym0 :: TyFun [a] a -> Type) t ~ Apply (Mconcat_6989586621680304361Sym0 :: TyFun [a] a -> Type) t) => Sing t -> Sing (Apply (MconcatSym0 :: TyFun [a] a -> Type) t)
class PFunctor (f :: Type -> Type) where {
type Fmap (arg :: a ~> b) (arg1 :: f a) :: f b;
type (arg :: a) <$ (arg1 :: f b) :: f a;
type arg :: a <$ arg1 :: f b = Apply Apply TFHelper_6989586621679351153Sym0 :: TyFun a f b ~> f a -> Type arg arg1;
}
infixl 4 <$
class SFunctor (f :: Type -> Type)
sFmap :: forall a b (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FmapSym0 :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
(%<$) :: forall a b (t1 :: a) (t2 :: f b). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
($dm%<$) :: forall a b (t1 :: a) (t2 :: f b). (SFunctor f, Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351153Sym0 :: TyFun a (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$@#@$) :: TyFun a (f b ~> f a) -> Type) t1) t2)
infixl 4 %<$
type family (a1 :: a ~> b) <$> (a2 :: f a) :: f b
infixl 4 <$>
(%<$>) :: forall a b (f :: Type -> Type) (t1 :: a ~> b) (t2 :: f a). SFunctor f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<$>@#@$) :: TyFun (a ~> b) (f a ~> f b) -> Type) t1) t2)
infixl 4 %<$>
class PApplicative (f :: Type -> Type) where {
type Pure (arg :: a) :: f a;
type (arg :: f a ~> b) <*> (arg1 :: f a) :: f b;
type LiftA2 (arg :: a ~> b ~> c) (arg1 :: f a) (arg2 :: f b) :: f c;
type (arg :: f a) *> (arg1 :: f b) :: f b;
type (arg :: f a) <* (arg1 :: f b) :: f a;
type arg :: f a ~> b <*> arg1 :: f a = Apply Apply TFHelper_6989586621679351193Sym0 :: TyFun f a ~> b f a ~> f b -> Type arg arg1;
type LiftA2 arg :: a ~> b ~> c arg1 :: f a arg2 :: f b = Apply Apply Apply LiftA2_6989586621679351209Sym0 :: TyFun a ~> b ~> c f a ~> f b ~> f c -> Type arg arg1 arg2;
type arg :: f a *> arg1 :: f b = Apply Apply TFHelper_6989586621679351225Sym0 :: TyFun f a f b ~> f b -> Type arg arg1;
type arg :: f a <* arg1 :: f b = Apply Apply TFHelper_6989586621679351236Sym0 :: TyFun f a f b ~> f a -> Type arg arg1;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f => SApplicative (f :: Type -> Type)
sPure :: forall a (t :: a). SApplicative f => Sing t -> Sing (Apply (PureSym0 :: TyFun a (f a) -> Type) t)
(%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
($dm%<*>) :: forall a b (t1 :: f (a ~> b)) (t2 :: f a). (SApplicative f, Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351193Sym0 :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*>@#@$) :: TyFun (f (a ~> b)) (f a ~> f b) -> Type) t1) t2)
sLiftA2 :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
($dmsLiftA2) :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: f a) (t3 :: f b). (SApplicative f, Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (LiftA2_6989586621679351209Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (LiftA2Sym0 :: TyFun (a ~> (b ~> c)) (f a ~> (f b ~> f c)) -> Type) t1) t2) t3)
(%*>) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
($dm%*>) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351225Sym0 :: TyFun (f a) (f b ~> f b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((*>@#@$) :: TyFun (f a) (f b ~> f b) -> Type) t1) t2)
(%<*) :: forall a b (t1 :: f a) (t2 :: f b). SApplicative f => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
($dm%<*) :: forall a b (t1 :: f a) (t2 :: f b). (SApplicative f, Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351236Sym0 :: TyFun (f a) (f b ~> f a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((<*@#@$) :: TyFun (f a) (f b ~> f a) -> Type) t1) t2)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
class PMonad (m :: Type -> Type) where {
type (arg :: m a) >>= (arg1 :: a ~> m b) :: m b;
type (arg :: m a) >> (arg1 :: m b) :: m b;
type Return (arg :: a) :: m a;
type arg :: m a >> arg1 :: m b = Apply Apply TFHelper_6989586621679351264Sym0 :: TyFun m a m b ~> m b -> Type arg arg1;
type Return arg :: a = Apply Return_6989586621679351281Sym0 :: TyFun a m a -> Type arg;
}
infixl 1 >>=
infixl 1 >>
class SApplicative m => SMonad (m :: Type -> Type)
(%>>=) :: forall a b (t1 :: m a) (t2 :: a ~> m b). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>=@#@$) :: TyFun (m a) ((a ~> m b) ~> m b) -> Type) t1) t2)
(%>>) :: forall a b (t1 :: m a) (t2 :: m b). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2)
($dm%>>) :: forall a b (t1 :: m a) (t2 :: m b). (SMonad m, Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2 ~ Apply (Apply (TFHelper_6989586621679351264Sym0 :: TyFun (m a) (m b ~> m b) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((>>@#@$) :: TyFun (m a) (m b ~> m b) -> Type) t1) t2)
sReturn :: forall a (t :: a). SMonad m => Sing t -> Sing (Apply (ReturnSym0 :: TyFun a (m a) -> Type) t)
($dmsReturn) :: forall a (t :: a). (SMonad m, Apply (ReturnSym0 :: TyFun a (m a) -> Type) t ~ Apply (Return_6989586621679351281Sym0 :: TyFun a (m a) -> Type) t) => Sing t -> Sing (Apply (ReturnSym0 :: TyFun a (m a) -> Type) t)
infixl 1 %>>=
infixl 1 %>>
class PMonadFail (m :: k -> Type) where {
type Fail (arg :: [Char]) :: m a;
}
class SMonad m => SMonadFail (m :: Type -> Type)
sFail :: forall a (t :: [Char]). SMonadFail m => Sing t -> Sing (Apply (FailSym0 :: TyFun [Char] (m a) -> Type) t)
type family MapM_ (a1 :: a ~> m b) (a2 :: t a) :: m ()
sMapM_ :: forall a (m :: Type -> Type) b (t1 :: Type -> Type) (t2 :: a ~> m b) (t3 :: t1 a). (SFoldable t1, SMonad m) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (MapM_Sym0 :: TyFun (a ~> m b) (t1 a ~> m ()) -> Type) t2) t3)
type family Sequence_ (a1 :: t m a) :: m ()
sSequence_ :: forall (t1 :: Type -> Type) (m :: Type -> Type) a (t2 :: t1 (m a)). (SFoldable t1, SMonad m) => Sing t2 -> Sing (Apply (Sequence_Sym0 :: TyFun (t1 (m a)) (m ()) -> Type) t2)
type family (a1 :: a ~> m b) =<< (a2 :: m a) :: m b
infixr 1 =<<
(%=<<) :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: m a). SMonad m => Sing t1 -> Sing t2 -> Sing (Apply (Apply ((=<<@#@$) :: TyFun (a ~> m b) (m a ~> m b) -> Type) t1) t2)
infixr 1 %=<<
class PFoldable (t :: Type -> Type) where {
type FoldMap (arg :: a ~> m) (arg1 :: t a) :: m;
type Foldr (arg :: a ~> b ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldl (arg :: b ~> a ~> b) (arg1 :: b) (arg2 :: t a) :: b;
type Foldr1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type Foldl1 (arg :: a ~> a ~> a) (arg1 :: t a) :: a;
type Elem (arg :: a) (arg1 :: t a) :: Bool;
type Maximum (arg :: t a) :: a;
type Minimum (arg :: t a) :: a;
type Sum (arg :: t a) :: a;
type Product (arg :: t a) :: a;
type Fold arg :: t m = Apply Fold_6989586621680404343Sym0 :: TyFun t m m -> Type arg;
type FoldMap arg :: a ~> m arg1 :: t a = Apply Apply FoldMap_6989586621680404353Sym0 :: TyFun a ~> m t a ~> m -> Type arg arg1;
type Foldr arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr_6989586621680404367Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr' arg :: a ~> b ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldr'_6989586621680404382Sym0 :: TyFun a ~> b ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl_6989586621680404405Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldl' arg :: b ~> a ~> b arg1 :: b arg2 :: t a = Apply Apply Apply Foldl'_6989586621680404420Sym0 :: TyFun b ~> a ~> b b ~> t a ~> b -> Type arg arg1 arg2;
type Foldr1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldr1_6989586621680404442Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type Foldl1 arg :: a ~> a ~> a arg1 :: t a = Apply Apply Foldl1_6989586621680404463Sym0 :: TyFun a ~> a ~> a t a ~> a -> Type arg arg1;
type ToList arg :: t a = Apply ToList_6989586621680404483Sym0 :: TyFun t a [a] -> Type arg;
type Null arg :: t a = Apply Null_6989586621680404492Sym0 :: TyFun t a Bool -> Type arg;
type Length arg :: t a = Apply Length_6989586621680404509Sym0 :: TyFun t a Natural -> Type arg;
type Elem arg :: a arg1 :: t a = Apply Apply Elem_6989586621680404528Sym0 :: TyFun a t a ~> Bool -> Type arg arg1;
type Maximum arg :: t a = Apply Maximum_6989586621680404542Sym0 :: TyFun t a a -> Type arg;
type Minimum arg :: t a = Apply Minimum_6989586621680404557Sym0 :: TyFun t a a -> Type arg;
type Sum arg :: t a = Apply Sum_6989586621680404572Sym0 :: TyFun t a a -> Type arg;
type Product arg :: t a = Apply Product_6989586621680404581Sym0 :: TyFun t a a -> Type arg;
}
class SFoldable (t :: Type -> Type)
sFoldMap :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
($dmsFoldMap) :: forall a m (t1 :: a ~> m) (t2 :: t a). (SFoldable t, Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2 ~ Apply (Apply (FoldMap_6989586621680404353Sym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2, SMonoid m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (FoldMapSym0 :: TyFun (a ~> m) (t a ~> m) -> Type) t1) t2)
sFoldr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldr) :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldr_6989586621680404367Sym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
($dmsFoldl) :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: t a). (SFoldable t, Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (Foldl_6989586621680404405Sym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FoldlSym0 :: TyFun (b ~> (a ~> b)) (b ~> (t a ~> b)) -> Type) t1) t2) t3)
sFoldr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldr1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldr1_6989586621680404442Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldr1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sFoldl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). SFoldable t => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
($dmsFoldl1) :: forall a (t1 :: a ~> (a ~> a)) (t2 :: t a). (SFoldable t, Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2 ~ Apply (Apply (Foldl1_6989586621680404463Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (Foldl1Sym0 :: TyFun (a ~> (a ~> a)) (t a ~> a) -> Type) t1) t2)
sElem :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
($dmsElem) :: forall a (t1 :: a) (t2 :: t a). (SFoldable t, Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2 ~ Apply (Apply (Elem_6989586621680404528Sym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2, SEq a) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ElemSym0 :: TyFun a (t a ~> Bool) -> Type) t1) t2)
sMaximum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMaximum) :: forall a (t1 :: t a). (SFoldable t, Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Maximum_6989586621680404542Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MaximumSym0 :: TyFun (t a) a -> Type) t1)
sMinimum :: forall a (t1 :: t a). (SFoldable t, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
($dmsMinimum) :: forall a (t1 :: t a). (SFoldable t, Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Minimum_6989586621680404557Sym0 :: TyFun (t a) a -> Type) t1, SOrd a) => Sing t1 -> Sing (Apply (MinimumSym0 :: TyFun (t a) a -> Type) t1)
sSum :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
($dmsSum) :: forall a (t1 :: t a). (SFoldable t, Apply (SumSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Sum_6989586621680404572Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (SumSym0 :: TyFun (t a) a -> Type) t1)
sProduct :: forall a (t1 :: t a). (SFoldable t, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
($dmsProduct) :: forall a (t1 :: t a). (SFoldable t, Apply (ProductSym0 :: TyFun (t a) a -> Type) t1 ~ Apply (Product_6989586621680404581Sym0 :: TyFun (t a) a -> Type) t1, SNum a) => Sing t1 -> Sing (Apply (ProductSym0 :: TyFun (t a) a -> Type) t1)
class PTraversable (t :: Type -> Type) where {
type Traverse (arg :: a ~> f b) (arg1 :: t a) :: f t b;
type SequenceA (arg :: t f a) :: f t a;
type MapM (arg :: a ~> m b) (arg1 :: t a) :: m t b;
type Sequence (arg :: t m a) :: m t a;
type Traverse arg :: a ~> f b arg1 :: t a = Apply Apply Traverse_6989586621680749126Sym0 :: TyFun a ~> f b t a ~> f t b -> Type arg arg1;
type SequenceA arg :: t f a = Apply SequenceA_6989586621680749138Sym0 :: TyFun t f a f t a -> Type arg;
type MapM arg :: a ~> m b arg1 :: t a = Apply Apply MapM_6989586621680749148Sym0 :: TyFun a ~> m b t a ~> m t b -> Type arg arg1;
type Sequence arg :: t m a = Apply Sequence_6989586621680749162Sym0 :: TyFun t m a m t a -> Type arg;
}
class (SFunctor t, SFoldable t) => STraversable (t :: Type -> Type)
sTraverse :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
($dmsTraverse) :: forall a (f :: Type -> Type) b (t1 :: a ~> f b) (t2 :: t a). (STraversable t, Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2 ~ Apply (Apply (Traverse_6989586621680749126Sym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2, SApplicative f) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (TraverseSym0 :: TyFun (a ~> f b) (t a ~> f (t b)) -> Type) t1) t2)
sSequenceA :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
($dmsSequenceA) :: forall (f :: Type -> Type) a (t1 :: t (f a)). (STraversable t, Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1 ~ Apply (SequenceA_6989586621680749138Sym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1, SApplicative f) => Sing t1 -> Sing (Apply (SequenceASym0 :: TyFun (t (f a)) (f (t a)) -> Type) t1)
sMapM :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
($dmsMapM) :: forall a (m :: Type -> Type) b (t1 :: a ~> m b) (t2 :: t a). (STraversable t, Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2 ~ Apply (Apply (MapM_6989586621680749148Sym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2, SMonad m) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapMSym0 :: TyFun (a ~> m b) (t a ~> m (t b)) -> Type) t1) t2)
sSequence :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
($dmsSequence) :: forall (m :: Type -> Type) a (t1 :: t (m a)). (STraversable t, Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1 ~ Apply (Sequence_6989586621680749162Sym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1, SMonad m) => Sing t1 -> Sing (Apply (SequenceSym0 :: TyFun (t (m a)) (m (t a)) -> Type) t1)
type family Id (a1 :: a) :: a
sId :: forall a (t :: a). Sing t -> Sing (Apply (IdSym0 :: TyFun a a -> Type) t)
type family Const (a1 :: a) (a2 :: b) :: a
sConst :: forall a b (t1 :: a) (t2 :: b). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ConstSym0 :: TyFun a (b ~> a) -> Type) t1) t2)
type family ( (a1 :: b ~> c) . (a2 :: a ~> b) ) (a3 :: a) :: c
infixr 9 .
(%.) :: forall b c a (t1 :: b ~> c) (t2 :: a ~> b) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ((.@#@$) :: TyFun (b ~> c) ((a ~> b) ~> (a ~> c)) -> Type) t1) t2) t3)
infixr 9 %.
type family Flip (a1 :: a ~> b ~> c) (a2 :: b) (a3 :: a) :: c
sFlip :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: b) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (FlipSym0 :: TyFun (a ~> (b ~> c)) (b ~> (a ~> c)) -> Type) t1) t2) t3)
type family (a1 :: a ~> b) $ (a2 :: a) :: b
infixr 0 $
(%$) :: forall a b (t1 :: a ~> b) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (($@#@$) :: TyFun (a ~> b) (a ~> b) -> Type) t1) t2)
infixr 0 %$
type family Until (a1 :: a ~> Bool) (a2 :: a ~> a) (a3 :: a) :: a
sUntil :: forall a (t1 :: a ~> Bool) (t2 :: a ~> a) (t3 :: a). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (UntilSym0 :: TyFun (a ~> Bool) ((a ~> a) ~> (a ~> a)) -> Type) t1) t2) t3)
type family AsTypeOf (a1 :: a) (a2 :: a) :: a
sAsTypeOf :: forall a (t1 :: a) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (AsTypeOfSym0 :: TyFun a (a ~> a) -> Type) t1) t2)
-- | A promoted version of error. This implements Error as a
-- stuck type family with a Symbol argument. Depending on your
-- needs, you might also consider the following alternatives:
--
--
-- - Data.Singletons.Base.PolyError provides PolyError,
-- which generalizes the argument to be kind-polymorphic. This allows
-- passing additional information to the error besides raw
-- Symbols.
-- - Data.Singletons.Base.TypeError provides TypeError,
-- a slightly modified version of the custom type error machinery found
-- in GHC.TypeLits. This allows emitting error messages as
-- compiler errors rather than as stuck type families.
--
type family Error (str :: Symbol) :: a
-- | The singleton for error.
sError :: forall (str :: Symbol) a. HasCallStack => Sing str -> a
-- | The promotion of errorWithoutStackTrace.
type family ErrorWithoutStackTrace (str :: Symbol) :: a
-- | The singleton for errorWithoutStackTrace.
sErrorWithoutStackTrace :: forall (str :: Symbol) a. Sing str -> a
-- | The promotion of undefined.
type family Undefined :: forall a. () => a
-- | The singleton for undefined.
sUndefined :: HasCallStack => a
type family Seq (a1 :: a) (a2 :: b) :: b
infixr 0 `Seq`
sSeq :: forall a b (t1 :: a) (t2 :: b). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SeqSym0 :: TyFun a (b ~> b) -> Type) t1) t2)
infixr 0 `sSeq`
type family (a1 :: a ~> b) $! (a2 :: a) :: b
infixr 0 $!
(%$!) :: forall a b (t1 :: a ~> b) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (($!@#@$) :: TyFun (a ~> b) (a ~> b) -> Type) t1) t2)
infixr 0 %$!
type family Map (a1 :: a ~> b) (a2 :: [a]) :: [b]
sMap :: forall a b (t1 :: a ~> b) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (MapSym0 :: TyFun (a ~> b) ([a] ~> [b]) -> Type) t1) t2)
type family (a1 :: [a]) ++ (a2 :: [a]) :: [a]
infixr 5 ++
(%++) :: forall a (t1 :: [a]) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((++@#@$) :: TyFun [a] ([a] ~> [a]) -> Type) t1) t2)
infixr 5 %++
type family Filter (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sFilter :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (FilterSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family Head (a1 :: [a]) :: a
sHead :: forall a (t :: [a]). Sing t -> Sing (Apply (HeadSym0 :: TyFun [a] a -> Type) t)
type family Last (a1 :: [a]) :: a
sLast :: forall a (t :: [a]). Sing t -> Sing (Apply (LastSym0 :: TyFun [a] a -> Type) t)
type family Tail (a1 :: [a]) :: [a]
sTail :: forall a (t :: [a]). Sing t -> Sing (Apply (TailSym0 :: TyFun [a] [a] -> Type) t)
type family Init (a1 :: [a]) :: [a]
sInit :: forall a (t :: [a]). Sing t -> Sing (Apply (InitSym0 :: TyFun [a] [a] -> Type) t)
type family (a1 :: [a]) !! (a2 :: Natural) :: a
infixl 9 !!
(%!!) :: forall a (t1 :: [a]) (t2 :: Natural). Sing t1 -> Sing t2 -> Sing (Apply (Apply ((!!@#@$) :: TyFun [a] (Natural ~> a) -> Type) t1) t2)
infixl 9 %!!
type family Null (arg :: t a) :: Bool
sNull :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (NullSym0 :: TyFun (t a) Bool -> Type) t1)
type family Length (arg :: t a) :: Natural
sLength :: forall a (t1 :: t a). SFoldable t => Sing t1 -> Sing (Apply (LengthSym0 :: TyFun (t a) Natural -> Type) t1)
type family Reverse (a1 :: [a]) :: [a]
sReverse :: forall a (t :: [a]). Sing t -> Sing (Apply (ReverseSym0 :: TyFun [a] [a] -> Type) t)
type family And (a :: t Bool) :: Bool
sAnd :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (AndSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Or (a :: t Bool) :: Bool
sOr :: forall (t1 :: Type -> Type) (t2 :: t1 Bool). SFoldable t1 => Sing t2 -> Sing (Apply (OrSym0 :: TyFun (t1 Bool) Bool -> Type) t2)
type family Any (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAny :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AnySym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family All (a1 :: a ~> Bool) (a2 :: t a) :: Bool
sAll :: forall a (t1 :: Type -> Type) (t2 :: a ~> Bool) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (AllSym0 :: TyFun (a ~> Bool) (t1 a ~> Bool) -> Type) t2) t3)
type family Concat (a1 :: t [a]) :: [a]
sConcat :: forall (t1 :: Type -> Type) a (t2 :: t1 [a]). SFoldable t1 => Sing t2 -> Sing (Apply (ConcatSym0 :: TyFun (t1 [a]) [a] -> Type) t2)
type family ConcatMap (a1 :: a ~> [b]) (a2 :: t a) :: [b]
sConcatMap :: forall a b (t1 :: Type -> Type) (t2 :: a ~> [b]) (t3 :: t1 a). SFoldable t1 => Sing t2 -> Sing t3 -> Sing (Apply (Apply (ConcatMapSym0 :: TyFun (a ~> [b]) (t1 a ~> [b]) -> Type) t2) t3)
type family Scanl (a1 :: b ~> a ~> b) (a2 :: b) (a3 :: [a]) :: [b]
sScanl :: forall b a (t1 :: b ~> (a ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanlSym0 :: TyFun (b ~> (a ~> b)) (b ~> ([a] ~> [b])) -> Type) t1) t2) t3)
type family Scanl1 (a1 :: a ~> a ~> a) (a2 :: [a]) :: [a]
sScanl1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanl1Sym0 :: TyFun (a ~> (a ~> a)) ([a] ~> [a]) -> Type) t1) t2)
type family Scanr (a1 :: a ~> b ~> b) (a2 :: b) (a3 :: [a]) :: [b]
sScanr :: forall a b (t1 :: a ~> (b ~> b)) (t2 :: b) (t3 :: [a]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ScanrSym0 :: TyFun (a ~> (b ~> b)) (b ~> ([a] ~> [b])) -> Type) t1) t2) t3)
type family Scanr1 (a1 :: a ~> a ~> a) (a2 :: [a]) :: [a]
sScanr1 :: forall a (t1 :: a ~> (a ~> a)) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (Scanr1Sym0 :: TyFun (a ~> (a ~> a)) ([a] ~> [a]) -> Type) t1) t2)
type family Replicate (a1 :: Natural) (a2 :: a) :: [a]
sReplicate :: forall a (t1 :: Natural) (t2 :: a). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ReplicateSym0 :: TyFun Natural (a ~> [a]) -> Type) t1) t2)
type family Take (a1 :: Natural) (a2 :: [a]) :: [a]
sTake :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeSym0 :: TyFun Natural ([a] ~> [a]) -> Type) t1) t2)
type family Drop (a1 :: Natural) (a2 :: [a]) :: [a]
sDrop :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropSym0 :: TyFun Natural ([a] ~> [a]) -> Type) t1) t2)
type family TakeWhile (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sTakeWhile :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (TakeWhileSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family DropWhile (a1 :: a ~> Bool) (a2 :: [a]) :: [a]
sDropWhile :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (DropWhileSym0 :: TyFun (a ~> Bool) ([a] ~> [a]) -> Type) t1) t2)
type family Span (a1 :: a ~> Bool) (a2 :: [a]) :: ([a], [a])
sSpan :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SpanSym0 :: TyFun (a ~> Bool) ([a] ~> ([a], [a])) -> Type) t1) t2)
type family Break (a1 :: a ~> Bool) (a2 :: [a]) :: ([a], [a])
sBreak :: forall a (t1 :: a ~> Bool) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (BreakSym0 :: TyFun (a ~> Bool) ([a] ~> ([a], [a])) -> Type) t1) t2)
type family SplitAt (a1 :: Natural) (a2 :: [a]) :: ([a], [a])
sSplitAt :: forall a (t1 :: Natural) (t2 :: [a]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (SplitAtSym0 :: TyFun Natural ([a] ~> ([a], [a])) -> Type) t1) t2)
type family NotElem (a1 :: a) (a2 :: t a) :: Bool
sNotElem :: forall a (t1 :: Type -> Type) (t2 :: a) (t3 :: t1 a). (SFoldable t1, SEq a) => Sing t2 -> Sing t3 -> Sing (Apply (Apply (NotElemSym0 :: TyFun a (t1 a ~> Bool) -> Type) t2) t3)
type family Lookup (a1 :: a) (a2 :: [(a, b)]) :: Maybe b
sLookup :: forall a b (t1 :: a) (t2 :: [(a, b)]). SEq a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (LookupSym0 :: TyFun a ([(a, b)] ~> Maybe b) -> Type) t1) t2)
type family Zip (a1 :: [a]) (a2 :: [b]) :: [(a, b)]
sZip :: forall a b (t1 :: [a]) (t2 :: [b]). Sing t1 -> Sing t2 -> Sing (Apply (Apply (ZipSym0 :: TyFun [a] ([b] ~> [(a, b)]) -> Type) t1) t2)
type family Zip3 (a1 :: [a]) (a2 :: [b]) (a3 :: [c]) :: [(a, b, c)]
sZip3 :: forall a b c (t1 :: [a]) (t2 :: [b]) (t3 :: [c]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (Zip3Sym0 :: TyFun [a] ([b] ~> ([c] ~> [(a, b, c)])) -> Type) t1) t2) t3)
type family ZipWith (a1 :: a ~> b ~> c) (a2 :: [a]) (a3 :: [b]) :: [c]
sZipWith :: forall a b c (t1 :: a ~> (b ~> c)) (t2 :: [a]) (t3 :: [b]). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ZipWithSym0 :: TyFun (a ~> (b ~> c)) ([a] ~> ([b] ~> [c])) -> Type) t1) t2) t3)
type family ZipWith3 (a1 :: a ~> b ~> c ~> d) (a2 :: [a]) (a3 :: [b]) (a4 :: [c]) :: [d]
sZipWith3 :: forall a b c d (t1 :: a ~> (b ~> (c ~> d))) (t2 :: [a]) (t3 :: [b]) (t4 :: [c]). Sing t1 -> Sing t2 -> Sing t3 -> Sing t4 -> Sing (Apply (Apply (Apply (Apply (ZipWith3Sym0 :: TyFun (a ~> (b ~> (c ~> d))) ([a] ~> ([b] ~> ([c] ~> [d]))) -> Type) t1) t2) t3) t4)
type family Unzip (a1 :: [(a, b)]) :: ([a], [b])
sUnzip :: forall a b (t :: [(a, b)]). Sing t -> Sing (Apply (UnzipSym0 :: TyFun [(a, b)] ([a], [b]) -> Type) t)
type family Unzip3 (a1 :: [(a, b, c)]) :: ([a], [b], [c])
sUnzip3 :: forall a b c (t :: [(a, b, c)]). Sing t -> Sing (Apply (Unzip3Sym0 :: TyFun [(a, b, c)] ([a], [b], [c]) -> Type) t)
type family Unlines (a :: [Symbol]) :: Symbol
sUnlines :: forall (t :: [Symbol]). Sing t -> Sing (Apply UnlinesSym0 t)
type family Unwords (a :: [Symbol]) :: Symbol
sUnwords :: forall (t :: [Symbol]). Sing t -> Sing (Apply UnwordsSym0 t)
-- | The shows functions return a function that prepends the
-- output Symbol to an existing Symbol. This allows
-- constant-time concatenation of results using function composition.
type SymbolS = Symbol -> Symbol
-- | show, but with an extra underscore so that its promoted
-- counterpart (Show_) will not clash with the Show
-- class.
show_ :: Show a => a -> String
class PShow a where {
type ShowsPrec (arg :: Natural) (arg1 :: a) (arg2 :: Symbol) :: Symbol;
type Show_ (arg :: a) :: Symbol;
type ShowList (arg :: [a]) (arg1 :: Symbol) :: Symbol;
type ShowsPrec arg :: Natural arg1 :: a arg2 :: Symbol = Apply Apply Apply ShowsPrec_6989586621680220103Sym0 :: TyFun Natural a ~> Symbol ~> Symbol -> Type arg arg1 arg2;
type Show_ arg :: a = Apply Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type arg;
type ShowList arg :: [a] arg1 :: Symbol = Apply Apply ShowList_6989586621680220123Sym0 :: TyFun [a] Symbol ~> Symbol -> Type arg arg1;
}
class SShow a
sShowsPrec :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
($dmsShowsPrec) :: forall (t1 :: Natural) (t2 :: a) (t3 :: Symbol). (SShow a, Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3 ~ Apply (Apply (Apply (ShowsPrec_6989586621680220103Sym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3) => Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply (ShowsPrecSym0 :: TyFun Natural (a ~> (Symbol ~> Symbol)) -> Type) t1) t2) t3)
sShow_ :: forall (t :: a). SShow a => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
($dmsShow_) :: forall (t :: a). (SShow a, Apply (Show_Sym0 :: TyFun a Symbol -> Type) t ~ Apply (Show__6989586621680220115Sym0 :: TyFun a Symbol -> Type) t) => Sing t -> Sing (Apply (Show_Sym0 :: TyFun a Symbol -> Type) t)
sShowList :: forall (t1 :: [a]) (t2 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
($dmsShowList) :: forall (t1 :: [a]) (t2 :: Symbol). (SShow a, Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2 ~ Apply (Apply (ShowList_6989586621680220123Sym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2) => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowListSym0 :: TyFun [a] (Symbol ~> Symbol) -> Type) t1) t2)
type family Shows (a1 :: a) (a2 :: Symbol) :: Symbol
sShows :: forall a (t1 :: a) (t2 :: Symbol). SShow a => Sing t1 -> Sing t2 -> Sing (Apply (Apply (ShowsSym0 :: TyFun a (Symbol ~> Symbol) -> Type) t1) t2)
type family ShowChar (a :: Char) (a1 :: Symbol) :: Symbol
sShowChar :: forall (t1 :: Char) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowCharSym0 t1) t2)
type family ShowString (a :: Symbol) (a1 :: Symbol) :: Symbol
sShowString :: forall (t1 :: Symbol) (t2 :: Symbol). Sing t1 -> Sing t2 -> Sing (Apply (Apply ShowStringSym0 t1) t2)
type family ShowParen (a :: Bool) (a1 :: Symbol ~> Symbol) (a2 :: Symbol) :: Symbol
sShowParen :: forall (t1 :: Bool) (t2 :: Symbol ~> Symbol) (t3 :: Symbol). Sing t1 -> Sing t2 -> Sing t3 -> Sing (Apply (Apply (Apply ShowParenSym0 t1) t2) t3)
type family FalseSym0 :: Bool
type family TrueSym0 :: Bool
data IfSym0 (a :: TyFun Bool k ~> k ~> k)
data IfSym1 (a6989586621679134776 :: Bool) (b :: TyFun k k ~> k)
data IfSym2 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (c :: TyFun k k)
type family IfSym3 (a6989586621679134776 :: Bool) (a6989586621679134777 :: k) (a6989586621679134778 :: k) :: k
data (a :: TyFun Bool Bool ~> Bool) &&@#@$
infixr 3 &&@#@$
data (a6989586621679133848 :: Bool) &&@#@$$ (b :: TyFun Bool Bool)
infixr 3 &&@#@$$
type family (a6989586621679133848 :: Bool) &&@#@$$$ (a6989586621679133849 :: Bool) :: Bool
infixr 3 &&@#@$$$
data (a :: TyFun Bool Bool ~> Bool) ||@#@$
infixr 2 ||@#@$
data (a6989586621679134209 :: Bool) ||@#@$$ (b :: TyFun Bool Bool)
infixr 2 ||@#@$$
type family (a6989586621679134209 :: Bool) ||@#@$$$ (a6989586621679134210 :: Bool) :: Bool
infixr 2 ||@#@$$$
data NotSym0 (a :: TyFun Bool Bool)
type family NotSym1 (a6989586621679134554 :: Bool) :: Bool
type family OtherwiseSym0 :: Bool
type family NothingSym0 :: Maybe a
data JustSym0 (a1 :: TyFun a Maybe a)
type family JustSym1 (a6989586621679047124 :: a) :: Maybe a
data Maybe_Sym0 (a1 :: TyFun b a ~> b ~> Maybe a ~> b)
data Maybe_Sym1 (a6989586621679582849 :: b) (b1 :: TyFun a ~> b Maybe a ~> b)
data Maybe_Sym2 (a6989586621679582849 :: b) (a6989586621679582850 :: a ~> b) (c :: TyFun Maybe a b)
type family Maybe_Sym3 (a6989586621679582849 :: b) (a6989586621679582850 :: a ~> b) (a6989586621679582851 :: Maybe a) :: b
data LeftSym0 (a1 :: TyFun a Either a b)
type family LeftSym1 (a6989586621679047196 :: a) :: Either a b
data RightSym0 (a1 :: TyFun b Either a b)
type family RightSym1 (a6989586621679047198 :: b) :: Either a b
data Either_Sym0 (a1 :: TyFun a ~> c b ~> c ~> Either a b ~> c)
data Either_Sym1 (a6989586621679337268 :: a ~> c) (b1 :: TyFun b ~> c Either a b ~> c)
data Either_Sym2 (a6989586621679337268 :: a ~> c) (a6989586621679337269 :: b ~> c) (c1 :: TyFun Either a b c)
type family Either_Sym3 (a6989586621679337268 :: a ~> c) (a6989586621679337269 :: b ~> c) (a6989586621679337270 :: Either a b) :: c
type family LTSym0 :: Ordering
type family EQSym0 :: Ordering
type family GTSym0 :: Ordering
data (a1 :: TyFun a [a] ~> [a]) :@#@$
infixr 5 :@#@$
data (a6989586621679047148 :: a) :@#@$$ (b :: TyFun [a] [a])
infixr 5 :@#@$$
type family (a6989586621679047148 :: a) :@#@$$$ (a6989586621679047149 :: [a]) :: [a]
infixr 5 :@#@$$$
type family NilSym0 :: [a]
type family Tuple0Sym0 :: ()
data Tuple2Sym0 (a1 :: TyFun a b ~> (a, b))
data Tuple2Sym1 (a6989586621679047641 :: a) (b1 :: TyFun b (a, b))
type family Tuple2Sym2 (a6989586621679047641 :: a) (a6989586621679047642 :: b) :: (a, b)
data Tuple3Sym0 (a1 :: TyFun a b ~> c ~> (a, b, c))
data Tuple3Sym1 (a6989586621679047672 :: a) (b1 :: TyFun b c ~> (a, b, c))
data Tuple3Sym2 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (c1 :: TyFun c (a, b, c))
type family Tuple3Sym3 (a6989586621679047672 :: a) (a6989586621679047673 :: b) (a6989586621679047674 :: c) :: (a, b, c)
data Tuple4Sym0 (a1 :: TyFun a b ~> c ~> d ~> (a, b, c, d))
data Tuple4Sym1 (a6989586621679047721 :: a) (b1 :: TyFun b c ~> d ~> (a, b, c, d))
data Tuple4Sym2 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (c1 :: TyFun c d ~> (a, b, c, d))
data Tuple4Sym3 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (d1 :: TyFun d (a, b, c, d))
type family Tuple4Sym4 (a6989586621679047721 :: a) (a6989586621679047722 :: b) (a6989586621679047723 :: c) (a6989586621679047724 :: d) :: (a, b, c, d)
data Tuple5Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym1 (a6989586621679047790 :: a) (b1 :: TyFun b c ~> d ~> e ~> (a, b, c, d, e))
data Tuple5Sym2 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (c1 :: TyFun c d ~> e ~> (a, b, c, d, e))
data Tuple5Sym3 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (d1 :: TyFun d e ~> (a, b, c, d, e))
data Tuple5Sym4 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (e1 :: TyFun e (a, b, c, d, e))
type family Tuple5Sym5 (a6989586621679047790 :: a) (a6989586621679047791 :: b) (a6989586621679047792 :: c) (a6989586621679047793 :: d) (a6989586621679047794 :: e) :: (a, b, c, d, e)
data Tuple6Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym1 (a6989586621679047881 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym2 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (c1 :: TyFun c d ~> e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym3 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (d1 :: TyFun d e ~> f ~> (a, b, c, d, e, f))
data Tuple6Sym4 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (e1 :: TyFun e f ~> (a, b, c, d, e, f))
data Tuple6Sym5 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (f1 :: TyFun f (a, b, c, d, e, f))
type family Tuple6Sym6 (a6989586621679047881 :: a) (a6989586621679047882 :: b) (a6989586621679047883 :: c) (a6989586621679047884 :: d) (a6989586621679047885 :: e) (a6989586621679047886 :: f) :: (a, b, c, d, e, f)
data Tuple7Sym0 (a1 :: TyFun a b ~> c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym1 (a6989586621679047996 :: a) (b1 :: TyFun b c ~> d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym2 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (c1 :: TyFun c d ~> e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym3 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (d1 :: TyFun d e ~> f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym4 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (e1 :: TyFun e f ~> g ~> (a, b, c, d, e, f, g))
data Tuple7Sym5 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (f1 :: TyFun f g ~> (a, b, c, d, e, f, g))
data Tuple7Sym6 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (g1 :: TyFun g (a, b, c, d, e, f, g))
type family Tuple7Sym7 (a6989586621679047996 :: a) (a6989586621679047997 :: b) (a6989586621679047998 :: c) (a6989586621679047999 :: d) (a6989586621679048000 :: e) (a6989586621679048001 :: f) (a6989586621679048002 :: g) :: (a, b, c, d, e, f, g)
data FstSym0 (a1 :: TyFun (a, b) a)
type family FstSym1 (a6989586621679174384 :: (a, b)) :: a
data SndSym0 (a1 :: TyFun (a, b) b)
type family SndSym1 (a6989586621679174380 :: (a, b)) :: b
data CurrySym0 (a1 :: TyFun (a, b) ~> c a ~> b ~> c)
data CurrySym1 (a6989586621679174372 :: (a, b) ~> c) (b1 :: TyFun a b ~> c)
data CurrySym2 (a6989586621679174372 :: (a, b) ~> c) (a6989586621679174373 :: a) (c1 :: TyFun b c)
type family CurrySym3 (a6989586621679174372 :: (a, b) ~> c) (a6989586621679174373 :: a) (a6989586621679174374 :: b) :: c
data UncurrySym0 (a1 :: TyFun a ~> b ~> c (a, b) ~> c)
data UncurrySym1 (a6989586621679174364 :: a ~> b ~> c) (b1 :: TyFun (a, b) c)
type family UncurrySym2 (a6989586621679174364 :: a ~> b ~> c) (a6989586621679174365 :: (a, b)) :: c
data (a1 :: TyFun a a ~> Bool) ==@#@$
infix 4 ==@#@$
data (a6989586621679139544 :: a) ==@#@$$ (b :: TyFun a Bool)
infix 4 ==@#@$$
type family (a6989586621679139544 :: a) ==@#@$$$ (a6989586621679139545 :: a) :: Bool
infix 4 ==@#@$$$
data (a1 :: TyFun a a ~> Bool) /=@#@$
infix 4 /=@#@$
data (a6989586621679139549 :: a) /=@#@$$ (b :: TyFun a Bool)
infix 4 /=@#@$$
type family (a6989586621679139549 :: a) /=@#@$$$ (a6989586621679139550 :: a) :: Bool
infix 4 /=@#@$$$
data CompareSym0 (a1 :: TyFun a a ~> Ordering)
data CompareSym1 (a6989586621679239068 :: a) (b :: TyFun a Ordering)
type family CompareSym2 (a6989586621679239068 :: a) (a6989586621679239069 :: a) :: Ordering
data (a1 :: TyFun a a ~> Bool) <@#@$
infix 4 <@#@$
data (a6989586621679239073 :: a) <@#@$$ (b :: TyFun a Bool)
infix 4 <@#@$$
type family (a6989586621679239073 :: a) <@#@$$$ (a6989586621679239074 :: a) :: Bool
infix 4 <@#@$$$
data (a1 :: TyFun a a ~> Bool) <=@#@$
infix 4 <=@#@$
data (a6989586621679239078 :: a) <=@#@$$ (b :: TyFun a Bool)
infix 4 <=@#@$$
type family (a6989586621679239078 :: a) <=@#@$$$ (a6989586621679239079 :: a) :: Bool
infix 4 <=@#@$$$
data (a1 :: TyFun a a ~> Bool) >@#@$
infix 4 >@#@$
data (a6989586621679239083 :: a) >@#@$$ (b :: TyFun a Bool)
infix 4 >@#@$$
type family (a6989586621679239083 :: a) >@#@$$$ (a6989586621679239084 :: a) :: Bool
infix 4 >@#@$$$
data (a1 :: TyFun a a ~> Bool) >=@#@$
infix 4 >=@#@$
data (a6989586621679239088 :: a) >=@#@$$ (b :: TyFun a Bool)
infix 4 >=@#@$$
type family (a6989586621679239088 :: a) >=@#@$$$ (a6989586621679239089 :: a) :: Bool
infix 4 >=@#@$$$
data MaxSym0 (a1 :: TyFun a a ~> a)
data MaxSym1 (a6989586621679239093 :: a) (b :: TyFun a a)
type family MaxSym2 (a6989586621679239093 :: a) (a6989586621679239094 :: a) :: a
data MinSym0 (a1 :: TyFun a a ~> a)
data MinSym1 (a6989586621679239098 :: a) (b :: TyFun a a)
type family MinSym2 (a6989586621679239098 :: a) (a6989586621679239099 :: a) :: a
data ToEnumSym0 (a1 :: TyFun Natural a)
type family ToEnumSym1 (a6989586621679618564 :: Natural) :: a
data FromEnumSym0 (a1 :: TyFun a Natural)
type family FromEnumSym1 (a6989586621679618567 :: a) :: Natural
data EnumFromToSym0 (a1 :: TyFun a a ~> [a])
data EnumFromToSym1 (a6989586621679618571 :: a) (b :: TyFun a [a])
type family EnumFromToSym2 (a6989586621679618571 :: a) (a6989586621679618572 :: a) :: [a]
data EnumFromThenToSym0 (a1 :: TyFun a a ~> a ~> [a])
data EnumFromThenToSym1 (a6989586621679618577 :: a) (b :: TyFun a a ~> [a])
data EnumFromThenToSym2 (a6989586621679618577 :: a) (a6989586621679618578 :: a) (c :: TyFun a [a])
type family EnumFromThenToSym3 (a6989586621679618577 :: a) (a6989586621679618578 :: a) (a6989586621679618579 :: a) :: [a]
type family MinBoundSym0 :: a
type family MaxBoundSym0 :: a
data (a1 :: TyFun a a ~> a) +@#@$
infixl 6 +@#@$
data (a6989586621679596374 :: a) +@#@$$ (b :: TyFun a a)
infixl 6 +@#@$$
type family (a6989586621679596374 :: a) +@#@$$$ (a6989586621679596375 :: a) :: a
infixl 6 +@#@$$$
data (a1 :: TyFun a a ~> a) -@#@$
infixl 6 -@#@$
data (a6989586621679596379 :: a) -@#@$$ (b :: TyFun a a)
infixl 6 -@#@$$
type family (a6989586621679596379 :: a) -@#@$$$ (a6989586621679596380 :: a) :: a
infixl 6 -@#@$$$
data (a1 :: TyFun a a ~> a) *@#@$
infixl 7 *@#@$
data (a6989586621679596384 :: a) *@#@$$ (b :: TyFun a a)
infixl 7 *@#@$$
type family (a6989586621679596384 :: a) *@#@$$$ (a6989586621679596385 :: a) :: a
infixl 7 *@#@$$$
data NegateSym0 (a1 :: TyFun a a)
type family NegateSym1 (a6989586621679596388 :: a) :: a
data AbsSym0 (a1 :: TyFun a a)
type family AbsSym1 (a6989586621679596391 :: a) :: a
data SignumSym0 (a1 :: TyFun a a)
type family SignumSym1 (a6989586621679596394 :: a) :: a
data FromIntegerSym0 (a1 :: TyFun Natural a)
type family FromIntegerSym1 (a6989586621679596397 :: Natural) :: a
data SubtractSym0 (a1 :: TyFun a a ~> a)
data SubtractSym1 (a6989586621679596367 :: a) (b :: TyFun a a)
type family SubtractSym2 (a6989586621679596367 :: a) (a6989586621679596368 :: a) :: a
data (a1 :: TyFun a a ~> a) <>@#@$
infixr 6 <>@#@$
data (a6989586621679209735 :: a) <>@#@$$ (b :: TyFun a a)
infixr 6 <>@#@$$
type family (a6989586621679209735 :: a) <>@#@$$$ (a6989586621679209736 :: a) :: a
infixr 6 <>@#@$$$
type family MemptySym0 :: a
data MappendSym0 (a1 :: TyFun a a ~> a)
data MappendSym1 (a6989586621680304340 :: a) (b :: TyFun a a)
type family MappendSym2 (a6989586621680304340 :: a) (a6989586621680304341 :: a) :: a
data MconcatSym0 (a1 :: TyFun [a] a)
type family MconcatSym1 (a6989586621680304344 :: [a]) :: a
data FmapSym0 (a1 :: TyFun a ~> b f a ~> f b)
data FmapSym1 (a6989586621679351144 :: a ~> b) (b1 :: TyFun f a f b)
type family FmapSym2 (a6989586621679351144 :: a ~> b) (a6989586621679351145 :: f a) :: f b
data (a1 :: TyFun a f b ~> f a) <$@#@$
infixl 4 <$@#@$
data (a6989586621679351149 :: a) <$@#@$$ (b1 :: TyFun f b f a)
infixl 4 <$@#@$$
type family (a6989586621679351149 :: a) <$@#@$$$ (a6989586621679351150 :: f b) :: f a
infixl 4 <$@#@$$$
data (a1 :: TyFun a ~> b f a ~> f b) <$>@#@$
infixl 4 <$>@#@$
data (a6989586621679536195 :: a ~> b) <$>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <$>@#@$$
type family (a6989586621679536195 :: a ~> b) <$>@#@$$$ (a6989586621679536196 :: f a) :: f b
infixl 4 <$>@#@$$$
data PureSym0 (a1 :: TyFun a f a)
type family PureSym1 (a6989586621679351168 :: a) :: f a
data (a1 :: TyFun f a ~> b f a ~> f b) <*>@#@$
infixl 4 <*>@#@$
data (a6989586621679351172 :: f a ~> b) <*>@#@$$ (b1 :: TyFun f a f b)
infixl 4 <*>@#@$$
type family (a6989586621679351172 :: f a ~> b) <*>@#@$$$ (a6989586621679351173 :: f a) :: f b
infixl 4 <*>@#@$$$
data (a1 :: TyFun f a f b ~> f b) *>@#@$
infixl 4 *>@#@$
data (a6989586621679351184 :: f a) *>@#@$$ (b1 :: TyFun f b f b)
infixl 4 *>@#@$$
type family (a6989586621679351184 :: f a) *>@#@$$$ (a6989586621679351185 :: f b) :: f b
infixl 4 *>@#@$$$
data (a1 :: TyFun f a f b ~> f a) <*@#@$
infixl 4 <*@#@$
data (a6989586621679351189 :: f a) <*@#@$$ (b1 :: TyFun f b f a)
infixl 4 <*@#@$$
type family (a6989586621679351189 :: f a) <*@#@$$$ (a6989586621679351190 :: f b) :: f a
infixl 4 <*@#@$$$
data LiftA2Sym0 (a1 :: TyFun a ~> b ~> c f a ~> f b ~> f c)
data LiftA2Sym1 (a6989586621679351178 :: a ~> b ~> c) (b1 :: TyFun f a f b ~> f c)
data LiftA2Sym2 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (c1 :: TyFun f b f c)
type family LiftA2Sym3 (a6989586621679351178 :: a ~> b ~> c) (a6989586621679351179 :: f a) (a6989586621679351180 :: f b) :: f c
data (a1 :: TyFun m a a ~> m b ~> m b) >>=@#@$
infixl 1 >>=@#@$
data (a6989586621679351252 :: m a) >>=@#@$$ (b1 :: TyFun a ~> m b m b)
infixl 1 >>=@#@$$
type family (a6989586621679351252 :: m a) >>=@#@$$$ (a6989586621679351253 :: a ~> m b) :: m b
infixl 1 >>=@#@$$$
data (a1 :: TyFun m a m b ~> m b) >>@#@$
infixl 1 >>@#@$
data (a6989586621679351257 :: m a) >>@#@$$ (b1 :: TyFun m b m b)
infixl 1 >>@#@$$
type family (a6989586621679351257 :: m a) >>@#@$$$ (a6989586621679351258 :: m b) :: m b
infixl 1 >>@#@$$$
data ReturnSym0 (a1 :: TyFun a m a)
type family ReturnSym1 (a6989586621679351261 :: a) :: m a
data FailSym0 (a1 :: TyFun [Char] m a)
type family FailSym1 (a6989586621679552824 :: [Char]) :: m a
data MapM_Sym0 (a1 :: TyFun a ~> m b t a ~> m ())
data MapM_Sym1 (a6989586621680404210 :: a ~> m b) (b1 :: TyFun t a m ())
type family MapM_Sym2 (a6989586621680404210 :: a ~> m b) (a6989586621680404211 :: t a) :: m ()
data Sequence_Sym0 (a1 :: TyFun t m a m ())
type family Sequence_Sym1 (a6989586621680404186 :: t m a) :: m ()
data (a1 :: TyFun a ~> m b m a ~> m b) =<<@#@$
infixr 1 =<<@#@$
data (a6989586621679351097 :: a ~> m b) =<<@#@$$ (b1 :: TyFun m a m b)
infixr 1 =<<@#@$$
type family (a6989586621679351097 :: a ~> m b) =<<@#@$$$ (a6989586621679351098 :: m a) :: m b
infixr 1 =<<@#@$$$
data ElemSym0 (a1 :: TyFun a t a ~> Bool)
data ElemSym1 (a6989586621680404328 :: a) (b :: TyFun t a Bool)
type family ElemSym2 (a6989586621680404328 :: a) (a6989586621680404329 :: t a) :: Bool
data FoldMapSym0 (a1 :: TyFun a ~> m t a ~> m)
data FoldMapSym1 (a6989586621680404276 :: a ~> m) (b :: TyFun t a m)
type family FoldMapSym2 (a6989586621680404276 :: a ~> m) (a6989586621680404277 :: t a) :: m
data FoldrSym0 (a1 :: TyFun a ~> b ~> b b ~> t a ~> b)
data FoldrSym1 (a6989586621680404282 :: a ~> b ~> b) (b1 :: TyFun b t a ~> b)
data FoldrSym2 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (c :: TyFun t a b)
type family FoldrSym3 (a6989586621680404282 :: a ~> b ~> b) (a6989586621680404283 :: b) (a6989586621680404284 :: t a) :: b
data FoldlSym0 (a1 :: TyFun b ~> a ~> b b ~> t a ~> b)
data FoldlSym1 (a6989586621680404296 :: b ~> a ~> b) (b1 :: TyFun b t a ~> b)
data FoldlSym2 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (c :: TyFun t a b)
type family FoldlSym3 (a6989586621680404296 :: b ~> a ~> b) (a6989586621680404297 :: b) (a6989586621680404298 :: t a) :: b
data Foldr1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldr1Sym1 (a6989586621680404309 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldr1Sym2 (a6989586621680404309 :: a ~> a ~> a) (a6989586621680404310 :: t a) :: a
data Foldl1Sym0 (a1 :: TyFun a ~> a ~> a t a ~> a)
data Foldl1Sym1 (a6989586621680404314 :: a ~> a ~> a) (b :: TyFun t a a)
type family Foldl1Sym2 (a6989586621680404314 :: a ~> a ~> a) (a6989586621680404315 :: t a) :: a
data MaximumSym0 (a1 :: TyFun t a a)
type family MaximumSym1 (a6989586621680404332 :: t a) :: a
data MinimumSym0 (a1 :: TyFun t a a)
type family MinimumSym1 (a6989586621680404335 :: t a) :: a
data ProductSym0 (a1 :: TyFun t a a)
type family ProductSym1 (a6989586621680404341 :: t a) :: a
data SumSym0 (a1 :: TyFun t a a)
type family SumSym1 (a6989586621680404338 :: t a) :: a
data TraverseSym0 (a1 :: TyFun a ~> f b t a ~> f t b)
data TraverseSym1 (a6989586621680749111 :: a ~> f b) (b1 :: TyFun t a f t b)
type family TraverseSym2 (a6989586621680749111 :: a ~> f b) (a6989586621680749112 :: t a) :: f t b
data SequenceASym0 (a1 :: TyFun t f a f t a)
type family SequenceASym1 (a6989586621680749115 :: t f a) :: f t a
data MapMSym0 (a1 :: TyFun a ~> m b t a ~> m t b)
data MapMSym1 (a6989586621680749119 :: a ~> m b) (b1 :: TyFun t a m t b)
type family MapMSym2 (a6989586621680749119 :: a ~> m b) (a6989586621680749120 :: t a) :: m t b
data SequenceSym0 (a1 :: TyFun t m a m t a)
type family SequenceSym1 (a6989586621680749123 :: t m a) :: m t a
data IdSym0 (a1 :: TyFun a a)
type family IdSym1 (a6989586621679181809 :: a) :: a
data ConstSym0 (a1 :: TyFun a b ~> a)
data ConstSym1 (a6989586621679181804 :: a) (b1 :: TyFun b a)
type family ConstSym2 (a6989586621679181804 :: a) (a6989586621679181805 :: b) :: a
data (a1 :: TyFun b ~> c a ~> b ~> a ~> c) .@#@$
infixr 9 .@#@$
data (a6989586621679181791 :: b ~> c) .@#@$$ (b1 :: TyFun a ~> b a ~> c)
infixr 9 .@#@$$
data ( (a6989586621679181791 :: b ~> c) .@#@$$$ (a6989586621679181792 :: a ~> b) ) (c1 :: TyFun a c)
infixr 9 .@#@$$$
type family ( (a6989586621679181791 :: b ~> c) .@#@$$$$ (a6989586621679181792 :: a ~> b) ) (a6989586621679181793 :: a) :: c
infixr 9 .@#@$$$$
data FlipSym0 (a1 :: TyFun a ~> b ~> c b ~> a ~> c)
data FlipSym1 (a6989586621679181779 :: a ~> b ~> c) (b1 :: TyFun b a ~> c)
data FlipSym2 (a6989586621679181779 :: a ~> b ~> c) (a6989586621679181780 :: b) (c1 :: TyFun a c)
type family FlipSym3 (a6989586621679181779 :: a ~> b ~> c) (a6989586621679181780 :: b) (a6989586621679181781 :: a) :: c
data (a1 :: TyFun a ~> b a ~> b) $@#@$
infixr 0 $@#@$
data (a6989586621679181760 :: a ~> b) $@#@$$ (b1 :: TyFun a b)
infixr 0 $@#@$$
type family (a6989586621679181760 :: a ~> b) $@#@$$$ (a6989586621679181761 :: a) :: b
infixr 0 $@#@$$$
data UntilSym0 (a1 :: TyFun a ~> Bool a ~> a ~> a ~> a)
data UntilSym1 (a6989586621679181733 :: a ~> Bool) (b :: TyFun a ~> a a ~> a)
data UntilSym2 (a6989586621679181733 :: a ~> Bool) (a6989586621679181734 :: a ~> a) (c :: TyFun a a)
type family UntilSym3 (a6989586621679181733 :: a ~> Bool) (a6989586621679181734 :: a ~> a) (a6989586621679181735 :: a) :: a
data AsTypeOfSym0 (a1 :: TyFun a a ~> a)
data AsTypeOfSym1 (a6989586621679181771 :: a) (b :: TyFun a a)
type family AsTypeOfSym2 (a6989586621679181771 :: a) (a6989586621679181772 :: a) :: a
data ErrorSym0 (a1 :: TyFun Symbol a)
type family ErrorSym1 (a6989586621679559199 :: Symbol) :: a
data ErrorWithoutStackTraceSym0 (a1 :: TyFun Symbol a)
type family ErrorWithoutStackTraceSym1 (a6989586621679559465 :: Symbol) :: a
type family UndefinedSym0 :: a
data SeqSym0 (a1 :: TyFun a b ~> b)
infixr 0 `SeqSym0`
data SeqSym1 (a6989586621679181724 :: a) (b1 :: TyFun b b)
infixr 0 `SeqSym1`
type family SeqSym2 (a6989586621679181724 :: a) (a6989586621679181725 :: b) :: b
infixr 0 `SeqSym2`
data (a1 :: TyFun a ~> b a ~> b) $!@#@$
infixr 0 $!@#@$
data (a6989586621679181751 :: a ~> b) $!@#@$$ (b1 :: TyFun a b)
infixr 0 $!@#@$$
type family (a6989586621679181751 :: a ~> b) $!@#@$$$ (a6989586621679181752 :: a) :: b
infixr 0 $!@#@$$$
data MapSym0 (a1 :: TyFun a ~> b [a] ~> [b])
data MapSym1 (a6989586621679181823 :: a ~> b) (b1 :: TyFun [a] [b])
type family MapSym2 (a6989586621679181823 :: a ~> b) (a6989586621679181824 :: [a]) :: [b]
data (a1 :: TyFun [a] [a] ~> [a]) ++@#@$
infixr 5 ++@#@$
data (a6989586621679181814 :: [a]) ++@#@$$ (b :: TyFun [a] [a])
infixr 5 ++@#@$$
type family (a6989586621679181814 :: [a]) ++@#@$$$ (a6989586621679181815 :: [a]) :: [a]
infixr 5 ++@#@$$$
data FilterSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data FilterSym1 (a6989586621679824314 :: a ~> Bool) (b :: TyFun [a] [a])
type family FilterSym2 (a6989586621679824314 :: a ~> Bool) (a6989586621679824315 :: [a]) :: [a]
data HeadSym0 (a1 :: TyFun [a] a)
type family HeadSym1 (a6989586621679825084 :: [a]) :: a
data LastSym0 (a1 :: TyFun [a] a)
type family LastSym1 (a6989586621679825078 :: [a]) :: a
data TailSym0 (a1 :: TyFun [a] [a])
type family TailSym1 (a6989586621679825074 :: [a]) :: [a]
data InitSym0 (a1 :: TyFun [a] [a])
type family InitSym1 (a6989586621679825062 :: [a]) :: [a]
data (a1 :: TyFun [a] Natural ~> a) !!@#@$
infixl 9 !!@#@$
data (a6989586621679823922 :: [a]) !!@#@$$ (b :: TyFun Natural a)
infixl 9 !!@#@$$
type family (a6989586621679823922 :: [a]) !!@#@$$$ (a6989586621679823923 :: Natural) :: a
infixl 9 !!@#@$$$
data NullSym0 (a1 :: TyFun t a Bool)
type family NullSym1 (a6989586621680404321 :: t a) :: Bool
data LengthSym0 (a1 :: TyFun t a Natural)
type family LengthSym1 (a6989586621680404324 :: t a) :: Natural
data ReverseSym0 (a1 :: TyFun [a] [a])
type family ReverseSym1 (a6989586621679825047 :: [a]) :: [a]
data AndSym0 (a :: TyFun t Bool Bool)
type family AndSym1 (a6989586621680404147 :: t Bool) :: Bool
data OrSym0 (a :: TyFun t Bool Bool)
type family OrSym1 (a6989586621680404141 :: t Bool) :: Bool
data AnySym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AnySym1 (a6989586621680404133 :: a ~> Bool) (b :: TyFun t a Bool)
type family AnySym2 (a6989586621680404133 :: a ~> Bool) (a6989586621680404134 :: t a) :: Bool
data AllSym0 (a1 :: TyFun a ~> Bool t a ~> Bool)
data AllSym1 (a6989586621680404124 :: a ~> Bool) (b :: TyFun t a Bool)
type family AllSym2 (a6989586621680404124 :: a ~> Bool) (a6989586621680404125 :: t a) :: Bool
data ConcatSym0 (a1 :: TyFun t [a] [a])
type family ConcatSym1 (a6989586621680404163 :: t [a]) :: [a]
data ConcatMapSym0 (a1 :: TyFun a ~> [b] t a ~> [b])
data ConcatMapSym1 (a6989586621680404152 :: a ~> [b]) (b1 :: TyFun t a [b])
type family ConcatMapSym2 (a6989586621680404152 :: a ~> [b]) (a6989586621680404153 :: t a) :: [b]
data ScanlSym0 (a1 :: TyFun b ~> a ~> b b ~> [a] ~> [b])
data ScanlSym1 (a6989586621679824852 :: b ~> a ~> b) (b1 :: TyFun b [a] ~> [b])
data ScanlSym2 (a6989586621679824852 :: b ~> a ~> b) (a6989586621679824853 :: b) (c :: TyFun [a] [b])
type family ScanlSym3 (a6989586621679824852 :: b ~> a ~> b) (a6989586621679824853 :: b) (a6989586621679824854 :: [a]) :: [b]
data Scanl1Sym0 (a1 :: TyFun a ~> a ~> a [a] ~> [a])
data Scanl1Sym1 (a6989586621679824843 :: a ~> a ~> a) (b :: TyFun [a] [a])
type family Scanl1Sym2 (a6989586621679824843 :: a ~> a ~> a) (a6989586621679824844 :: [a]) :: [a]
data ScanrSym0 (a1 :: TyFun a ~> b ~> b b ~> [a] ~> [b])
data ScanrSym1 (a6989586621679824825 :: a ~> b ~> b) (b1 :: TyFun b [a] ~> [b])
data ScanrSym2 (a6989586621679824825 :: a ~> b ~> b) (a6989586621679824826 :: b) (c :: TyFun [a] [b])
type family ScanrSym3 (a6989586621679824825 :: a ~> b ~> b) (a6989586621679824826 :: b) (a6989586621679824827 :: [a]) :: [b]
data Scanr1Sym0 (a1 :: TyFun a ~> a ~> a [a] ~> [a])
data Scanr1Sym1 (a6989586621679824805 :: a ~> a ~> a) (b :: TyFun [a] [a])
type family Scanr1Sym2 (a6989586621679824805 :: a ~> a ~> a) (a6989586621679824806 :: [a]) :: [a]
data ReplicateSym0 (a1 :: TyFun Natural a ~> [a])
data ReplicateSym1 (a6989586621679823942 :: Natural) (b :: TyFun a [a])
type family ReplicateSym2 (a6989586621679823942 :: Natural) (a6989586621679823943 :: a) :: [a]
data TakeSym0 (a1 :: TyFun Natural [a] ~> [a])
data TakeSym1 (a6989586621679824097 :: Natural) (b :: TyFun [a] [a])
type family TakeSym2 (a6989586621679824097 :: Natural) (a6989586621679824098 :: [a]) :: [a]
data DropSym0 (a1 :: TyFun Natural [a] ~> [a])
data DropSym1 (a6989586621679824084 :: Natural) (b :: TyFun [a] [a])
type family DropSym2 (a6989586621679824084 :: Natural) (a6989586621679824085 :: [a]) :: [a]
data TakeWhileSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data TakeWhileSym1 (a6989586621679824214 :: a ~> Bool) (b :: TyFun [a] [a])
type family TakeWhileSym2 (a6989586621679824214 :: a ~> Bool) (a6989586621679824215 :: [a]) :: [a]
data DropWhileSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data DropWhileSym1 (a6989586621679824199 :: a ~> Bool) (b :: TyFun [a] [a])
type family DropWhileSym2 (a6989586621679824199 :: a ~> Bool) (a6989586621679824200 :: [a]) :: [a]
data DropWhileEndSym0 (a1 :: TyFun a ~> Bool [a] ~> [a])
data DropWhileEndSym1 (a6989586621679824182 :: a ~> Bool) (b :: TyFun [a] [a])
type family DropWhileEndSym2 (a6989586621679824182 :: a ~> Bool) (a6989586621679824183 :: [a]) :: [a]
data SpanSym0 (a1 :: TyFun a ~> Bool [a] ~> ([a], [a]))
data SpanSym1 (a6989586621679824145 :: a ~> Bool) (b :: TyFun [a] ([a], [a]))
type family SpanSym2 (a6989586621679824145 :: a ~> Bool) (a6989586621679824146 :: [a]) :: ([a], [a])
data BreakSym0 (a1 :: TyFun a ~> Bool [a] ~> ([a], [a]))
data BreakSym1 (a6989586621679824110 :: a ~> Bool) (b :: TyFun [a] ([a], [a]))
type family BreakSym2 (a6989586621679824110 :: a ~> Bool) (a6989586621679824111 :: [a]) :: ([a], [a])
data SplitAtSym0 (a1 :: TyFun Natural [a] ~> ([a], [a]))
data SplitAtSym1 (a6989586621679824077 :: Natural) (b :: TyFun [a] ([a], [a]))
type family SplitAtSym2 (a6989586621679824077 :: Natural) (a6989586621679824078 :: [a]) :: ([a], [a])
data NotElemSym0 (a1 :: TyFun a t a ~> Bool)
data NotElemSym1 (a6989586621680404075 :: a) (b :: TyFun t a Bool)
type family NotElemSym2 (a6989586621680404075 :: a) (a6989586621680404076 :: t a) :: Bool
data LookupSym0 (a1 :: TyFun a [(a, b)] ~> Maybe b)
data LookupSym1 (a6989586621679824005 :: a) (b1 :: TyFun [(a, b)] Maybe b)
type family LookupSym2 (a6989586621679824005 :: a) (a6989586621679824006 :: [(a, b)]) :: Maybe b
data ZipSym0 (a1 :: TyFun [a] [b] ~> [(a, b)])
data ZipSym1 (a6989586621679824632 :: [a]) (b1 :: TyFun [b] [(a, b)])
type family ZipSym2 (a6989586621679824632 :: [a]) (a6989586621679824633 :: [b]) :: [(a, b)]
data Zip3Sym0 (a1 :: TyFun [a] [b] ~> [c] ~> [(a, b, c)])
data Zip3Sym1 (a6989586621679824620 :: [a]) (b1 :: TyFun [b] [c] ~> [(a, b, c)])
data Zip3Sym2 (a6989586621679824620 :: [a]) (a6989586621679824621 :: [b]) (c1 :: TyFun [c] [(a, b, c)])
type family Zip3Sym3 (a6989586621679824620 :: [a]) (a6989586621679824621 :: [b]) (a6989586621679824622 :: [c]) :: [(a, b, c)]
data ZipWithSym0 (a1 :: TyFun a ~> b ~> c [a] ~> [b] ~> [c])
data ZipWithSym1 (a6989586621679824608 :: a ~> b ~> c) (b1 :: TyFun [a] [b] ~> [c])
data ZipWithSym2 (a6989586621679824608 :: a ~> b ~> c) (a6989586621679824609 :: [a]) (c1 :: TyFun [b] [c])
type family ZipWithSym3 (a6989586621679824608 :: a ~> b ~> c) (a6989586621679824609 :: [a]) (a6989586621679824610 :: [b]) :: [c]
data ZipWith3Sym0 (a1 :: TyFun a ~> b ~> c ~> d [a] ~> [b] ~> [c] ~> [d])
data ZipWith3Sym1 (a6989586621679824593 :: a ~> b ~> c ~> d) (b1 :: TyFun [a] [b] ~> [c] ~> [d])
data ZipWith3Sym2 (a6989586621679824593 :: a ~> b ~> c ~> d) (a6989586621679824594 :: [a]) (c1 :: TyFun [b] [c] ~> [d])
data ZipWith3Sym3 (a6989586621679824593 :: a ~> b ~> c ~> d) (a6989586621679824594 :: [a]) (a6989586621679824595 :: [b]) (d1 :: TyFun [c] [d])
data UnzipSym0 (a1 :: TyFun [(a, b)] ([a], [b]))
type family UnzipSym1 (a6989586621679824574 :: [(a, b)]) :: ([a], [b])
data Unzip3Sym0 (a1 :: TyFun [(a, b, c)] ([a], [b], [c]))
type family Unzip3Sym1 (a6989586621679824556 :: [(a, b, c)]) :: ([a], [b], [c])
data UnlinesSym0 (a :: TyFun [Symbol] Symbol)
type family UnlinesSym1 (a6989586621679824459 :: [Symbol]) :: Symbol
data UnwordsSym0 (a :: TyFun [Symbol] Symbol)
type family UnwordsSym1 (a6989586621679824449 :: [Symbol]) :: Symbol
data ShowsPrecSym0 (a1 :: TyFun Natural a ~> Symbol ~> Symbol)
data ShowsPrecSym1 (a6989586621680220089 :: Natural) (b :: TyFun a Symbol ~> Symbol)
data ShowsPrecSym2 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (c :: TyFun Symbol Symbol)
type family ShowsPrecSym3 (a6989586621680220089 :: Natural) (a6989586621680220090 :: a) (a6989586621680220091 :: Symbol) :: Symbol
data ShowListSym0 (a1 :: TyFun [a] Symbol ~> Symbol)
data ShowListSym1 (a6989586621680220098 :: [a]) (b :: TyFun Symbol Symbol)
type family ShowListSym2 (a6989586621680220098 :: [a]) (a6989586621680220099 :: Symbol) :: Symbol
data Show_Sym0 (a1 :: TyFun a Symbol)
type family Show_Sym1 (a6989586621680220094 :: a) :: Symbol
data ShowsSym0 (a1 :: TyFun a Symbol ~> Symbol)
data ShowsSym1 (a6989586621680220081 :: a) (b :: TyFun Symbol Symbol)
type family ShowsSym2 (a6989586621680220081 :: a) (a6989586621680220082 :: Symbol) :: Symbol
data ShowCharSym0 (a :: TyFun Char Symbol ~> Symbol)
data ShowCharSym1 (a6989586621680220055 :: Char) (b :: TyFun Symbol Symbol)
type family ShowCharSym2 (a6989586621680220055 :: Char) (a6989586621680220056 :: Symbol) :: Symbol
data ShowStringSym0 (a :: TyFun Symbol Symbol ~> Symbol)
data ShowStringSym1 (a6989586621680220044 :: Symbol) (b :: TyFun Symbol Symbol)
type family ShowStringSym2 (a6989586621680220044 :: Symbol) (a6989586621680220045 :: Symbol) :: Symbol
data ShowParenSym0 (a :: TyFun Bool Symbol ~> Symbol ~> Symbol ~> Symbol)
data ShowParenSym1 (a6989586621680220028 :: Bool) (b :: TyFun Symbol ~> Symbol Symbol ~> Symbol)
data ShowParenSym2 (a6989586621680220028 :: Bool) (a6989586621680220029 :: Symbol ~> Symbol) (c :: TyFun Symbol Symbol)
-- | Exports the promoted and singled versions of the Product data
-- type.
module Data.Functor.Product.Singletons
type family Sing :: k -> Type
data SProduct (a1 :: Product f g a)
[SPair] :: forall {k} (f :: k -> Type) (g :: k -> Type) (a :: k) (x :: f a) (y :: g a). Sing x -> Sing y -> SProduct ('Pair x y)
data PairSym0 (z :: TyFun f a g a ~> Product f g a)
data PairSym1 (fa :: f a) (z :: TyFun g a Product f g a)
type family PairSym2 (x :: f a) (y :: g a) :: Product f g a
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (z :: Data.Functor.Product.Product f g a). GHC.Classes.Eq (Data.Functor.Product.Singletons.SProduct z)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (z :: Data.Functor.Product.Product f g a). GHC.Classes.Ord (Data.Functor.Product.Singletons.SProduct z)
instance forall k (f :: k -> *) (g :: k -> *). Control.Monad.Singletons.Internal.PAlternative (Data.Functor.Product.Product f g)
instance Control.Monad.Singletons.Internal.PApplicative (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Eq.Singletons.PEq (Data.Functor.Product.Product f g a)
instance Data.Foldable.Singletons.PFoldable (Data.Functor.Product.Product f g)
instance Control.Monad.Singletons.Internal.PFunctor (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (g :: k -> *). Control.Monad.Singletons.Internal.PMonadPlus (Data.Functor.Product.Product f g)
instance Control.Monad.Singletons.Internal.PMonad (Data.Functor.Product.Product f g)
instance Control.Monad.Zip.Singletons.PMonadZip (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Ord.Singletons.POrd (Data.Functor.Product.Product f g a)
instance Data.Traversable.Singletons.PTraversable (Data.Functor.Product.Product f g)
instance (Control.Monad.Singletons.Internal.SAlternative f, Control.Monad.Singletons.Internal.SAlternative g) => Control.Monad.Singletons.Internal.SAlternative (Data.Functor.Product.Product f g)
instance (Control.Monad.Singletons.Internal.SApplicative f, Control.Monad.Singletons.Internal.SApplicative g) => Control.Monad.Singletons.Internal.SApplicative (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => Data.Singletons.Decide.SDecide (Data.Functor.Product.Product f g a)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Eq.Singletons.SEq (f a), Data.Eq.Singletons.SEq (g a)) => Data.Eq.Singletons.SEq (Data.Functor.Product.Product f g a)
instance (Data.Foldable.Singletons.SFoldable f, Data.Foldable.Singletons.SFoldable g) => Data.Foldable.Singletons.SFoldable (Data.Functor.Product.Product f g)
instance (Control.Monad.Singletons.Internal.SFunctor f, Control.Monad.Singletons.Internal.SFunctor g) => Control.Monad.Singletons.Internal.SFunctor (Data.Functor.Product.Product f g)
instance (Control.Monad.Singletons.Internal.SMonadPlus f, Control.Monad.Singletons.Internal.SMonadPlus g) => Control.Monad.Singletons.Internal.SMonadPlus (Data.Functor.Product.Product f g)
instance (Control.Monad.Singletons.Internal.SMonad f, Control.Monad.Singletons.Internal.SMonad g) => Control.Monad.Singletons.Internal.SMonad (Data.Functor.Product.Product f g)
instance (Control.Monad.Zip.Singletons.SMonadZip f, Control.Monad.Zip.Singletons.SMonadZip g) => Control.Monad.Zip.Singletons.SMonadZip (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Ord.Singletons.SOrd (f a), Data.Ord.Singletons.SOrd (g a)) => Data.Ord.Singletons.SOrd (Data.Functor.Product.Product f g a)
instance (Data.Traversable.Singletons.STraversable f, Data.Traversable.Singletons.STraversable g) => Data.Traversable.Singletons.STraversable (Data.Functor.Product.Product f g)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). Data.Singletons.SingI1 Data.Functor.Product.Singletons.PairSym1
instance forall k (f :: k -> *) (a :: k) (g :: k -> *) (x :: f a). Data.Singletons.SingI x => Data.Singletons.SingI1 ('Data.Functor.Product.Pair x)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). Data.Singletons.SingI2 'Data.Functor.Product.Pair
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). Data.Singletons.SingI Data.Functor.Product.Singletons.PairSym0
instance forall k (f :: k -> *) (a :: k) (g :: k -> *) (x :: f a). Data.Singletons.SingI x => Data.Singletons.SingI (Data.Functor.Product.Singletons.PairSym1 x)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *) (x :: f a) (y :: g a). (Data.Singletons.SingI x, Data.Singletons.SingI y) => Data.Singletons.SingI ('Data.Functor.Product.Pair x y)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Compare_6989586621681279133Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681279138 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Compare_6989586621681279133Sym1 a6989586621681279138)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Fmap_6989586621681279146Sym0
instance forall a b (f :: * -> *) (g :: * -> *) (a6989586621681279151 :: a Data.Singletons.~> b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Fmap_6989586621681279146Sym1 a6989586621681279151)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.FoldMap_6989586621681279170Sym0
instance forall a m (f :: * -> *) (g :: * -> *) (a6989586621681279175 :: a Data.Singletons.~> m). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.FoldMap_6989586621681279170Sym1 a6989586621681279175)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Let6989586621681279346FstPSym0
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346FstPSym1 m6989586621681279343)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1) (n6989586621681279344 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346FstPSym2 m6989586621681279343 n6989586621681279344)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1) (n6989586621681279344 :: k2) (f6989586621681279345 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346FstPSym3 m6989586621681279343 n6989586621681279344 f6989586621681279345)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Let6989586621681279346SndPSym0
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346SndPSym1 m6989586621681279343)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1) (n6989586621681279344 :: k2). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346SndPSym2 m6989586621681279343 n6989586621681279344)
instance forall k1 k2 k3 k4 (f :: k4 -> *) (g :: k4 -> *) (a :: k4) (m6989586621681279343 :: k1) (n6989586621681279344 :: k2) (f6989586621681279345 :: k3). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Let6989586621681279346SndPSym3 m6989586621681279343 n6989586621681279344 f6989586621681279345)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.LiftA2_6989586621681279215Sym0
instance forall a b c (f :: * -> *) (g :: * -> *) (a6989586621681279221 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.LiftA2_6989586621681279215Sym1 a6989586621681279221)
instance forall a b c (f :: * -> *) (g :: * -> *) (a6989586621681279221 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681279222 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.LiftA2_6989586621681279215Sym2 a6989586621681279221 a6989586621681279222)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Mplus_6989586621681279365Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681279370 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Mplus_6989586621681279365Sym1 a6989586621681279370)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.MzipWith_6989586621681279379Sym0
instance forall a b c (f :: * -> *) (g :: * -> *) (a6989586621681279385 :: a Data.Singletons.~> (b Data.Singletons.~> c)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.MzipWith_6989586621681279379Sym1 a6989586621681279385)
instance forall a b c (f :: * -> *) (g :: * -> *) (a6989586621681279385 :: a Data.Singletons.~> (b Data.Singletons.~> c)) (a6989586621681279386 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.MzipWith_6989586621681279379Sym2 a6989586621681279385 a6989586621681279386)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Pure_6989586621681279193Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.TFHelper_6989586621681279120Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681279125 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.TFHelper_6989586621681279120Sym1 a6989586621681279125)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.TFHelper_6989586621681279158Sym0
instance forall a (f :: * -> *) (g :: * -> *) b (a6989586621681279163 :: a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.TFHelper_6989586621681279158Sym1 a6989586621681279163)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.TFHelper_6989586621681279201Sym0
instance forall (f :: * -> *) (g :: * -> *) a b (a6989586621681279206 :: Data.Functor.Product.Product f g (a Data.Singletons.~> b)). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.TFHelper_6989586621681279201Sym1 a6989586621681279206)
instance forall k (f :: k -> *) (g :: k -> *) (a :: k). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.TFHelper_6989586621681279234Sym0
instance forall k (f :: k -> *) (g :: k -> *) (a :: k) (a6989586621681279239 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.TFHelper_6989586621681279234Sym1 a6989586621681279239)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.TFHelper_6989586621681279336Sym0
instance forall (f :: * -> *) (g :: * -> *) a b (a6989586621681279341 :: Data.Functor.Product.Product f g a). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.TFHelper_6989586621681279336Sym1 a6989586621681279341)
instance Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Functor.Product.Singletons.Traverse_6989586621681279182Sym0
instance forall a (f1 :: * -> *) b (f2 :: * -> *) (g :: * -> *) (a6989586621681279187 :: a Data.Singletons.~> f1 b). Data.Singletons.TH.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Functor.Product.Singletons.Traverse_6989586621681279182Sym1 a6989586621681279187)
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => GHC.Internal.Data.Type.Coercion.TestCoercion Data.Functor.Product.Singletons.SProduct
instance forall k (f :: k -> *) (a :: k) (g :: k -> *). (Data.Singletons.Decide.SDecide (f a), Data.Singletons.Decide.SDecide (g a)) => GHC.Internal.Data.Type.Equality.TestEquality Data.Functor.Product.Singletons.SProduct