-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/
-- | A framework for generating singleton types
--
-- This library generates singleton types, promoted functions, and
-- singleton functions using Template Haskell. It is useful for
-- programmers who wish to use dependently typed programming techniques.
-- The library was originally presented in Dependently Typed
-- Programming with Singletons, published at the Haskell Symposium,
-- 2012.
-- (https://cs.brynmawr.edu/~rae/papers/2012/singletons/paper.pdf)
-- Version 1.0 and onwards works a lot harder to promote functions. See
-- the paper published at Haskell Symposium, 2014:
-- https://cs.brynmawr.edu/~rae/papers/2014/promotion/promotion.pdf.
@package singletons
@version 2.6
-- | Defines the class SDecide, allowing for decidable equality over
-- singletons.
module Data.Singletons.Decide
-- | Members of the SDecide "kind" class support decidable equality.
-- Instances of this class are generated alongside singleton definitions
-- for datatypes that derive an Eq instance.
class SDecide k
-- | Compute a proof or disproof of equality, given two singletons.
(%~) :: forall (a :: k) (b :: k). SDecide k => Sing a -> Sing b -> Decision (a :~: b)
infix 4 %~
-- | 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.
data (a :: k) :~: (b :: k)
[Refl] :: forall k (a :: k). a :~: a
infix 4 :~:
-- | Uninhabited data type
data Void
-- | Because we can never create a value of type Void, a function
-- that type-checks at a -> Void shows that objects of type
-- a can never exist. Thus, we say that a is
-- Refuted
type Refuted a = (a -> Void)
-- | A Decision about a type a is either a proof of
-- existence or a proof that a cannot exist.
data Decision a
-- | Witness for a
Proved :: a -> Decision a
-- | Proof that no a exists
Disproved :: Refuted a -> Decision a
-- | A suitable default implementation for testEquality that
-- leverages SDecide.
decideEquality :: forall k (a :: k) (b :: k). SDecide k => Sing a -> Sing b -> Maybe (a :~: b)
-- | A suitable default implementation for testCoercion that
-- leverages SDecide.
decideCoercion :: forall k (a :: k) (b :: k). SDecide k => Sing a -> Sing b -> Maybe (Coercion a b)
instance Data.Singletons.Decide.SDecide k => Data.Type.Equality.TestEquality Data.Singletons.Internal.WrappedSing
instance Data.Singletons.Decide.SDecide k => Data.Type.Coercion.TestCoercion Data.Singletons.Internal.WrappedSing
module Data.Singletons.SuppressUnusedWarnings
-- | This class (which users should never see) is to be instantiated in
-- order to use an otherwise-unused data constructor, such as the
-- "kind-inference" data constructor for defunctionalization symbols.
class SuppressUnusedWarnings (t :: k)
suppressUnusedWarnings :: SuppressUnusedWarnings t => ()
-- | Defines functions and datatypes relating to the singleton for
-- Void, including a singleton version 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.Singletons.Prelude.Void
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SVoid :: Void -> Type
type family Absurd (a_a1vyT :: Void) :: a_a1vyQ
sAbsurd :: forall a_a1vyQ (t_a1vyZ :: Void). Sing t_a1vyZ -> Sing (Apply AbsurdSym0 t_a1vyZ :: a_a1vyQ)
data AbsurdSym0 :: forall a6989586621679369444. (~>) Void a6989586621679369444
type AbsurdSym1 (a6989586621679369447 :: Void) = Absurd a6989586621679369447
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Void.AbsurdSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Void.AbsurdSym0
-- | Defines functions and datatypes relating to the singleton for tuples,
-- including a singletons version 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.Singletons.Prelude.Tuple
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data STuple0 :: () -> Type
[STuple0] :: STuple0 '()
data STuple2 :: forall a_11 b_12. (a_11, b_12) -> Type
[STuple2] :: forall a_11 b_12 (n_a1hsO :: a_11) (n_a1hsP :: b_12). () => Sing (n_a1hsO :: a_11) -> Sing (n_a1hsP :: b_12) -> STuple2 '(n_a1hsO, n_a1hsP)
data STuple3 :: forall a_11 b_12 c_13. (a_11, b_12, c_13) -> Type
[STuple3] :: forall a_11 b_12 c_13 (n_a1htl :: a_11) (n_a1htm :: b_12) (n_a1htn :: c_13). () => Sing (n_a1htl :: a_11) -> Sing (n_a1htm :: b_12) -> Sing (n_a1htn :: c_13) -> STuple3 '(n_a1htl, n_a1htm, n_a1htn)
data STuple4 :: forall a_11 b_12 c_13 d_14. (a_11, b_12, c_13, d_14) -> Type
[STuple4] :: forall a_11 b_12 c_13 d_14 (n_a1hu8 :: a_11) (n_a1hu9 :: b_12) (n_a1hua :: c_13) (n_a1hub :: d_14). () => Sing (n_a1hu8 :: a_11) -> Sing (n_a1hu9 :: b_12) -> Sing (n_a1hua :: c_13) -> Sing (n_a1hub :: d_14) -> STuple4 '(n_a1hu8, n_a1hu9, n_a1hua, n_a1hub)
data STuple5 :: forall a_11 b_12 c_13 d_14 e_15. (a_11, b_12, c_13, d_14, e_15) -> Type
[STuple5] :: forall a_11 b_12 c_13 d_14 e_15 (n_a1hvd :: a_11) (n_a1hve :: b_12) (n_a1hvf :: c_13) (n_a1hvg :: d_14) (n_a1hvh :: e_15). () => Sing (n_a1hvd :: a_11) -> Sing (n_a1hve :: b_12) -> Sing (n_a1hvf :: c_13) -> Sing (n_a1hvg :: d_14) -> Sing (n_a1hvh :: e_15) -> STuple5 '(n_a1hvd, n_a1hve, n_a1hvf, n_a1hvg, n_a1hvh)
data STuple6 :: forall a_11 b_12 c_13 d_14 e_15 f_16. (a_11, b_12, c_13, d_14, e_15, f_16) -> Type
[STuple6] :: forall a_11 b_12 c_13 d_14 e_15 f_16 (n_a1hwC :: a_11) (n_a1hwD :: b_12) (n_a1hwE :: c_13) (n_a1hwF :: d_14) (n_a1hwG :: e_15) (n_a1hwH :: f_16). () => Sing (n_a1hwC :: a_11) -> Sing (n_a1hwD :: b_12) -> Sing (n_a1hwE :: c_13) -> Sing (n_a1hwF :: d_14) -> Sing (n_a1hwG :: e_15) -> Sing (n_a1hwH :: f_16) -> STuple6 '(n_a1hwC, n_a1hwD, n_a1hwE, n_a1hwF, n_a1hwG, n_a1hwH)
data STuple7 :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17. (a_11, b_12, c_13, d_14, e_15, f_16, g_17) -> Type
[STuple7] :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17 (n_a1hyn :: a_11) (n_a1hyo :: b_12) (n_a1hyp :: c_13) (n_a1hyq :: d_14) (n_a1hyr :: e_15) (n_a1hys :: f_16) (n_a1hyt :: g_17). () => Sing (n_a1hyn :: a_11) -> Sing (n_a1hyo :: b_12) -> Sing (n_a1hyp :: c_13) -> Sing (n_a1hyq :: d_14) -> Sing (n_a1hyr :: e_15) -> Sing (n_a1hys :: f_16) -> Sing (n_a1hyt :: g_17) -> STuple7 '(n_a1hyn, n_a1hyo, n_a1hyp, n_a1hyq, n_a1hyr, n_a1hys, n_a1hyt)
type family Fst (a_a1vOx :: (a_a1vMT, b_a1vMU)) :: a_a1vMT
sFst :: forall a_a1vMT b_a1vMU (t_a1vOO :: (a_a1vMT, b_a1vMU)). Sing t_a1vOO -> Sing (Apply FstSym0 t_a1vOO :: a_a1vMT)
type family Snd (a_a1vOu :: (a_a1vMR, b_a1vMS)) :: b_a1vMS
sSnd :: forall a_a1vMR b_a1vMS (t_a1vOM :: (a_a1vMR, b_a1vMS)). Sing t_a1vOM -> Sing (Apply SndSym0 t_a1vOM :: b_a1vMS)
type family Curry (a_a1vOl :: (~>) (a_a1vMO, b_a1vMP) c_a1vMQ) (a_a1vOm :: a_a1vMO) (a_a1vOn :: b_a1vMP) :: c_a1vMQ
sCurry :: forall a_a1vMO b_a1vMP c_a1vMQ (t_a1vOG :: (~>) (a_a1vMO, b_a1vMP) c_a1vMQ) (t_a1vOH :: a_a1vMO) (t_a1vOI :: b_a1vMP). Sing t_a1vOG -> Sing t_a1vOH -> Sing t_a1vOI -> Sing (Apply (Apply (Apply CurrySym0 t_a1vOG) t_a1vOH) t_a1vOI :: c_a1vMQ)
type family Uncurry (a_a1vOf :: (~>) a_a1vML ((~>) b_a1vMM c_a1vMN)) (a_a1vOg :: (a_a1vML, b_a1vMM)) :: c_a1vMN
sUncurry :: forall a_a1vML b_a1vMM c_a1vMN (t_a1vOC :: (~>) a_a1vML ((~>) b_a1vMM c_a1vMN)) (t_a1vOD :: (a_a1vML, b_a1vMM)). Sing t_a1vOC -> Sing t_a1vOD -> Sing (Apply (Apply UncurrySym0 t_a1vOC) t_a1vOD :: c_a1vMN)
type family Swap (a_a1vOb :: (a_a1vMJ, b_a1vMK)) :: (b_a1vMK, a_a1vMJ)
sSwap :: forall a_a1vMJ b_a1vMK (t_a1vOA :: (a_a1vMJ, b_a1vMK)). Sing t_a1vOA -> Sing (Apply SwapSym0 t_a1vOA :: (b_a1vMK, a_a1vMJ))
type Tuple0Sym0 = '()
data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type))
data Tuple2Sym1 (t6989586621679315250 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type)
type Tuple2Sym2 (t6989586621679315250 :: a3530822107858468865) (t6989586621679315251 :: b3530822107858468866) = '(t6989586621679315250, t6989586621679315251)
data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)))
data Tuple3Sym1 (t6989586621679315281 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type))
data Tuple3Sym2 (t6989586621679315281 :: a3530822107858468865 :: Type) (t6989586621679315282 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)
type Tuple3Sym3 (t6989586621679315281 :: a3530822107858468865) (t6989586621679315282 :: b3530822107858468866) (t6989586621679315283 :: c3530822107858468867) = '(t6989586621679315281, t6989586621679315282, t6989586621679315283)
data Tuple4Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))))
data Tuple4Sym1 (t6989586621679315328 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)))
data Tuple4Sym2 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))
data Tuple4Sym3 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) (t6989586621679315330 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)
type Tuple4Sym4 (t6989586621679315328 :: a3530822107858468865) (t6989586621679315329 :: b3530822107858468866) (t6989586621679315330 :: c3530822107858468867) (t6989586621679315331 :: d3530822107858468868) = '(t6989586621679315328, t6989586621679315329, t6989586621679315330, t6989586621679315331)
data Tuple5Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))))
data Tuple5Sym1 (t6989586621679315393 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))))
data Tuple5Sym2 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))
data Tuple5Sym3 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))
data Tuple5Sym4 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) (t6989586621679315396 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)
type Tuple5Sym5 (t6989586621679315393 :: a3530822107858468865) (t6989586621679315394 :: b3530822107858468866) (t6989586621679315395 :: c3530822107858468867) (t6989586621679315396 :: d3530822107858468868) (t6989586621679315397 :: e3530822107858468869) = '(t6989586621679315393, t6989586621679315394, t6989586621679315395, t6989586621679315396, t6989586621679315397)
data Tuple6Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))))
data Tuple6Sym1 (t6989586621679315478 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))))
data Tuple6Sym2 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))
data Tuple6Sym3 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))
data Tuple6Sym4 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))
data Tuple6Sym5 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) (t6989586621679315482 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)
type Tuple6Sym6 (t6989586621679315478 :: a3530822107858468865) (t6989586621679315479 :: b3530822107858468866) (t6989586621679315480 :: c3530822107858468867) (t6989586621679315481 :: d3530822107858468868) (t6989586621679315482 :: e3530822107858468869) (t6989586621679315483 :: f3530822107858468870) = '(t6989586621679315478, t6989586621679315479, t6989586621679315480, t6989586621679315481, t6989586621679315482, t6989586621679315483)
data Tuple7Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))))
data Tuple7Sym1 (t6989586621679315585 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))))
data Tuple7Sym2 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))
data Tuple7Sym3 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))
data Tuple7Sym4 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))
data Tuple7Sym5 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))
data Tuple7Sym6 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) (t6989586621679315590 :: f3530822107858468870 :: Type) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)
type Tuple7Sym7 (t6989586621679315585 :: a3530822107858468865) (t6989586621679315586 :: b3530822107858468866) (t6989586621679315587 :: c3530822107858468867) (t6989586621679315588 :: d3530822107858468868) (t6989586621679315589 :: e3530822107858468869) (t6989586621679315590 :: f3530822107858468870) (t6989586621679315591 :: g3530822107858468871) = '(t6989586621679315585, t6989586621679315586, t6989586621679315587, t6989586621679315588, t6989586621679315589, t6989586621679315590, t6989586621679315591)
data FstSym0 :: forall a6989586621679370315 b6989586621679370316. (~>) (a6989586621679370315, b6989586621679370316) a6989586621679370315
type FstSym1 (a6989586621679370417 :: (a6989586621679370315, b6989586621679370316)) = Fst a6989586621679370417
data SndSym0 :: forall a6989586621679370313 b6989586621679370314. (~>) (a6989586621679370313, b6989586621679370314) b6989586621679370314
type SndSym1 (a6989586621679370414 :: (a6989586621679370313, b6989586621679370314)) = Snd a6989586621679370414
data CurrySym0 :: forall a6989586621679370310 b6989586621679370311 c6989586621679370312. (~>) ((~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) ((~>) a6989586621679370310 ((~>) b6989586621679370311 c6989586621679370312))
data CurrySym1 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) :: (~>) a6989586621679370310 ((~>) b6989586621679370311 c6989586621679370312)
data CurrySym2 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) (a6989586621679370406 :: a6989586621679370310) :: (~>) b6989586621679370311 c6989586621679370312
type CurrySym3 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) (a6989586621679370406 :: a6989586621679370310) (a6989586621679370407 :: b6989586621679370311) = Curry a6989586621679370405 a6989586621679370406 a6989586621679370407
data UncurrySym0 :: forall a6989586621679370307 b6989586621679370308 c6989586621679370309. (~>) ((~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) ((~>) (a6989586621679370307, b6989586621679370308) c6989586621679370309)
data UncurrySym1 (a6989586621679370399 :: (~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) :: (~>) (a6989586621679370307, b6989586621679370308) c6989586621679370309
type UncurrySym2 (a6989586621679370399 :: (~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) (a6989586621679370400 :: (a6989586621679370307, b6989586621679370308)) = Uncurry a6989586621679370399 a6989586621679370400
data SwapSym0 :: forall a6989586621679370305 b6989586621679370306. (~>) (a6989586621679370305, b6989586621679370306) (b6989586621679370306, a6989586621679370305)
type SwapSym1 (a6989586621679370395 :: (a6989586621679370305, b6989586621679370306)) = Swap a6989586621679370395
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.UncurrySym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.UncurrySym0
instance forall a6989586621679370307 b6989586621679370308 c6989586621679370309 (a6989586621679370399 :: a6989586621679370307 Data.Singletons.Internal.~> (b6989586621679370308 Data.Singletons.Internal.~> c6989586621679370309)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.UncurrySym1 a6989586621679370399)
instance forall a b c (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Tuple.UncurrySym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.FstSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.FstSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.SndSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.SndSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.CurrySym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.CurrySym0
instance forall a6989586621679370310 b6989586621679370311 c6989586621679370312 (a6989586621679370405 :: (a6989586621679370310, b6989586621679370311) Data.Singletons.Internal.~> c6989586621679370312). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym1 a6989586621679370405)
instance forall a b c (d :: (a, b) Data.Singletons.Internal.~> c). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Tuple.CurrySym1 d)
instance forall a6989586621679370310 b6989586621679370311 c6989586621679370312 (a6989586621679370406 :: (a6989586621679370310, b6989586621679370311) Data.Singletons.Internal.~> c6989586621679370312) (a6989586621679370405 :: a6989586621679370310). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym2 a6989586621679370406 a6989586621679370405)
instance forall a b c (d1 :: (a, b) Data.Singletons.Internal.~> c) (d2 :: a). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Tuple.CurrySym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.SwapSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.SwapSym0
-- | Defines functions and datatypes relating to the singleton for
-- Bool, including a singletons version 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.Singletons.Prelude.Bool
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SBool :: Bool -> Type
[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 :: Sing a -> Sing b -> Sing c -> Sing (If a b c)
-- | Type-level "not". An injective type family since 4.10.0.0.
type family Not (a :: Bool) = (res :: Bool) | res -> a
-- | Negation of a singleton
sNot :: 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
(%&&) :: Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
-- | Disjunction of singletons
(%||) :: Sing a -> Sing b -> Sing (a || b)
infixr 2 %||
bool_ :: a_a1xeH -> a_a1xeH -> Bool -> a_a1xeH
type family Bool_ (a_a1xeN :: a_a1xeH) (a_a1xeO :: a_a1xeH) (a_a1xeP :: Bool) :: a_a1xeH
sBool_ :: forall a_a1xeH (t_a1xeX :: a_a1xeH) (t_a1xeY :: a_a1xeH) (t_a1xeZ :: Bool). Sing t_a1xeX -> Sing t_a1xeY -> Sing t_a1xeZ -> Sing (Apply (Apply (Apply Bool_Sym0 t_a1xeX) t_a1xeY) t_a1xeZ :: a_a1xeH)
type family Otherwise :: Bool
sOtherwise :: Sing (OtherwiseSym0 :: Bool)
type TrueSym0 = 'True
type FalseSym0 = 'False
data NotSym0 :: (~>) Bool Bool
type NotSym1 (a6989586621679377177 :: Bool) = Not a6989586621679377177
data (&&@#@$) :: (~>) Bool ((~>) Bool Bool)
infixr 3 &&@#@$
data (&&@#@$$) (a6989586621679376645 :: Bool) :: (~>) Bool Bool
infixr 3 &&@#@$$
type (&&@#@$$$) (a6989586621679376645 :: Bool) (b6989586621679376646 :: Bool) = (&&) a6989586621679376645 b6989586621679376646
data (||@#@$) :: (~>) Bool ((~>) Bool Bool)
infixr 2 ||@#@$
data (||@#@$$) (a6989586621679376883 :: Bool) :: (~>) Bool Bool
infixr 2 ||@#@$$
type (||@#@$$$) (a6989586621679376883 :: Bool) (b6989586621679376884 :: Bool) = (||) a6989586621679376883 b6989586621679376884
data Bool_Sym0 :: forall a6989586621679375883. (~>) a6989586621679375883 ((~>) a6989586621679375883 ((~>) Bool a6989586621679375883))
data Bool_Sym1 (a6989586621679375889 :: a6989586621679375883) :: (~>) a6989586621679375883 ((~>) Bool a6989586621679375883)
data Bool_Sym2 (a6989586621679375889 :: a6989586621679375883) (a6989586621679375890 :: a6989586621679375883) :: (~>) Bool a6989586621679375883
type Bool_Sym3 (a6989586621679375889 :: a6989586621679375883) (a6989586621679375890 :: a6989586621679375883) (a6989586621679375891 :: Bool) = Bool_ a6989586621679375889 a6989586621679375890 a6989586621679375891
type OtherwiseSym0 = Otherwise
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Bool.NotSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Bool.NotSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.||@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.||@#@$)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Bool.||@#@$$) a6989586621679376883)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Bool.||@#@$$) x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.&&@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.&&@#@$)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Bool.&&@#@$$) a6989586621679376645)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Bool.&&@#@$$) x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Bool.Bool_Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Bool.Bool_Sym0
instance forall a6989586621679375883 (a6989586621679375889 :: a6989586621679375883). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym1 a6989586621679375889)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.Bool_Sym1 d)
instance forall a6989586621679375883 (a6989586621679375890 :: a6989586621679375883) (a6989586621679375889 :: a6989586621679375883). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym2 a6989586621679375890 a6989586621679375889)
instance forall a (d1 :: a) (d2 :: a). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.Bool_Sym2 d1 d2)
-- | Defines the SEq singleton version of the Eq type class.
module Data.Singletons.Prelude.Eq
-- | The promoted analogue of Eq. If you supply no definition for
-- (==), then it defaults to a use of DefaultEq.
class PEq a where {
type family (==) (x :: a) (y :: a) :: Bool;
type family (/=) (x :: a) (y :: a) :: Bool;
type (x :: a) == (y :: a) = x `DefaultEq` y;
type (x :: a) /= (y :: a) = Not (x == y);
}
infix 4 ==
infix 4 /=
-- | The singleton analogue of Eq. Unlike the definition for
-- Eq, it is required that instances define a body for
-- (%==). You may also supply a body for (%/=).
class SEq k
-- | Boolean equality on singletons
(%==) :: forall (a :: k) (b :: k). SEq k => Sing a -> Sing b -> Sing (a == b)
-- | Boolean disequality on singletons
(%/=) :: forall (a :: k) (b :: k). SEq k => Sing a -> Sing b -> Sing (a /= b)
-- | Boolean disequality on singletons
(%/=) :: forall (a :: k) (b :: k). (SEq k, (a /= b) ~ Not (a == b)) => Sing a -> Sing b -> Sing (a /= b)
infix 4 %==
infix 4 %/=
-- | A sensible way to compute Boolean equality for types of any kind. 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 (==@#@$) :: forall a6989586621679379997. (~>) a6989586621679379997 ((~>) a6989586621679379997 Bool)
infix 4 ==@#@$
data (==@#@$$) (x6989586621679379998 :: a6989586621679379997) :: (~>) a6989586621679379997 Bool
infix 4 ==@#@$$
type (==@#@$$$) (x6989586621679379998 :: a6989586621679379997) (y6989586621679379999 :: a6989586621679379997) = (==) x6989586621679379998 y6989586621679379999
data (/=@#@$) :: forall a6989586621679379997. (~>) a6989586621679379997 ((~>) a6989586621679379997 Bool)
infix 4 /=@#@$
data (/=@#@$$) (x6989586621679380000 :: a6989586621679379997) :: (~>) a6989586621679379997 Bool
infix 4 /=@#@$$
type (/=@#@$$$) (x6989586621679380000 :: a6989586621679379997) (y6989586621679380001 :: a6989586621679379997) = (/=) x6989586621679380000 y6989586621679380001
data DefaultEqSym0 :: forall k6989586621679379991. (~>) k6989586621679379991 ((~>) k6989586621679379991 Bool)
data DefaultEqSym1 (a6989586621679379992 :: k6989586621679379991) :: (~>) k6989586621679379991 Bool
type DefaultEqSym2 (a6989586621679379992 :: k6989586621679379991) (b6989586621679379993 :: k6989586621679379991) = DefaultEq a6989586621679379992 b6989586621679379993
instance Data.Singletons.Prelude.Eq.PEq ()
instance Data.Singletons.Prelude.Eq.PEq GHC.Types.Ordering
instance Data.Singletons.Prelude.Eq.PEq GHC.Types.Bool
instance Data.Singletons.Prelude.Eq.PEq (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Eq.PEq (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Eq.PEq (a, b, c, d, e, f)
instance Data.Singletons.Prelude.Eq.PEq (a, b, c, d, e)
instance Data.Singletons.Prelude.Eq.PEq (a, b, c, d)
instance Data.Singletons.Prelude.Eq.PEq (a, b, c)
instance Data.Singletons.Prelude.Eq.PEq (a, b)
instance Data.Singletons.Prelude.Eq.PEq Data.Void.Void
instance Data.Singletons.Prelude.Eq.PEq (GHC.Base.NonEmpty a)
instance Data.Singletons.Prelude.Eq.PEq (Data.Either.Either a b)
instance Data.Singletons.Prelude.Eq.PEq [a]
instance Data.Singletons.Prelude.Eq.PEq (GHC.Maybe.Maybe a)
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Prelude.Eq.SEq (GHC.Maybe.Maybe a)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq [a]) => Data.Singletons.Prelude.Eq.SEq [a]
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b) => Data.Singletons.Prelude.Eq.SEq (Data.Either.Either a b)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq [a]) => Data.Singletons.Prelude.Eq.SEq (GHC.Base.NonEmpty a)
instance Data.Singletons.Prelude.Eq.SEq Data.Void.Void
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b) => Data.Singletons.Prelude.Eq.SEq (a, b)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Prelude.Eq.SEq c) => Data.Singletons.Prelude.Eq.SEq (a, b, c)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Prelude.Eq.SEq c, Data.Singletons.Prelude.Eq.SEq d) => Data.Singletons.Prelude.Eq.SEq (a, b, c, d)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Prelude.Eq.SEq c, Data.Singletons.Prelude.Eq.SEq d, Data.Singletons.Prelude.Eq.SEq e) => Data.Singletons.Prelude.Eq.SEq (a, b, c, d, e)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Prelude.Eq.SEq c, Data.Singletons.Prelude.Eq.SEq d, Data.Singletons.Prelude.Eq.SEq e, Data.Singletons.Prelude.Eq.SEq f) => Data.Singletons.Prelude.Eq.SEq (a, b, c, d, e, f)
instance (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Prelude.Eq.SEq c, Data.Singletons.Prelude.Eq.SEq d, Data.Singletons.Prelude.Eq.SEq e, Data.Singletons.Prelude.Eq.SEq f, Data.Singletons.Prelude.Eq.SEq g) => Data.Singletons.Prelude.Eq.SEq (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Prelude.Eq.SEq (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Eq.SEq GHC.Types.Bool
instance Data.Singletons.Prelude.Eq.SEq GHC.Types.Ordering
instance Data.Singletons.Prelude.Eq.SEq ()
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Eq.==@#@$)
instance forall a (x :: a). (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Internal.SingI x) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Eq.==@#@$$) x)
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Eq./=@#@$)
instance forall a (x :: a). (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Internal.SingI x) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Eq./=@#@$$) x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Eq.DefaultEqSym0
instance forall k6989586621679379991 (a6989586621679379992 :: k6989586621679379991). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.DefaultEqSym1 a6989586621679379992)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq./=@#@$)
instance forall a6989586621679379997 (x6989586621679380000 :: a6989586621679379997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq./=@#@$$) x6989586621679380000)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.==@#@$)
instance forall a6989586621679379997 (x6989586621679379998 :: a6989586621679379997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq.==@#@$$) x6989586621679379998)
-- | 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.TypeRepTYPE
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
-- | A variant of SomeTypeRep whose underlying TypeRep is
-- restricted to kind TYPE rep (for some
-- RuntimeRep rep).
data SomeTypeRepTYPE :: RuntimeRep -> Type
[SomeTypeRepTYPE] :: forall (rep :: RuntimeRep) (a :: TYPE rep). !TypeRep a -> SomeTypeRepTYPE rep
instance GHC.Classes.Eq (Data.Singletons.TypeRepTYPE.SomeTypeRepTYPE 'GHC.Types.LiftedRep)
instance GHC.Classes.Ord (Data.Singletons.TypeRepTYPE.SomeTypeRepTYPE 'GHC.Types.LiftedRep)
instance GHC.Show.Show (Data.Singletons.TypeRepTYPE.SomeTypeRepTYPE 'GHC.Types.LiftedRep)
instance Data.Singletons.Internal.SingKind *
instance Data.Typeable.Internal.Typeable a => Data.Singletons.Internal.SingI a
instance Data.Singletons.Prelude.Eq.PEq *
instance Data.Singletons.Prelude.Eq.SEq *
instance Data.Singletons.Decide.SDecide *
-- | Defines the promoted version of Ord, POrd, and the singleton
-- version, SOrd.
module Data.Singletons.Prelude.Ord
class POrd (a_a1BVU :: Type) where {
type family Compare (arg_a1BXl :: a_a1BVU) (arg_a1BXm :: a_a1BVU) :: Ordering;
type family (<) (arg_a1BXp :: a_a1BVU) (arg_a1BXq :: a_a1BVU) :: Bool;
type family (<=) (arg_a1BXt :: a_a1BVU) (arg_a1BXu :: a_a1BVU) :: Bool;
type family (>) (arg_a1BXx :: a_a1BVU) (arg_a1BXy :: a_a1BVU) :: Bool;
type family (>=) (arg_a1BXB :: a_a1BVU) (arg_a1BXC :: a_a1BVU) :: Bool;
type family Max (arg_a1BXF :: a_a1BVU) (arg_a1BXG :: a_a1BVU) :: a_a1BVU;
type family Min (arg_a1BXJ :: a_a1BVU) (arg_a1BXK :: a_a1BVU) :: a_a1BVU;
type Compare a_a1BXN a_a1BXO = Apply (Apply Compare_6989586621679394057Sym0 a_a1BXN) a_a1BXO;
type (<) a_a1BYb a_a1BYc = Apply (Apply TFHelper_6989586621679394081Sym0 a_a1BYb) a_a1BYc;
type (<=) a_a1BYt a_a1BYu = Apply (Apply TFHelper_6989586621679394099Sym0 a_a1BYt) a_a1BYu;
type (>) a_a1BYL a_a1BYM = Apply (Apply TFHelper_6989586621679394117Sym0 a_a1BYL) a_a1BYM;
type (>=) a_a1BZ3 a_a1BZ4 = Apply (Apply TFHelper_6989586621679394135Sym0 a_a1BZ3) a_a1BZ4;
type Max a_a1BZl a_a1BZm = Apply (Apply Max_6989586621679394153Sym0 a_a1BZl) a_a1BZm;
type Min a_a1BZD a_a1BZE = Apply (Apply Min_6989586621679394171Sym0 a_a1BZD) a_a1BZE;
}
infix 4 >=
infix 4 >
infix 4 <=
infix 4 <
class SEq a_a1BVU => SOrd a_a1BVU
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering) ~ Apply (Apply Compare_6989586621679394057Sym0 t_a1C04) t_a1C05) => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool) ~ Apply (Apply TFHelper_6989586621679394081Sym0 t_a1C08) t_a1C09) => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool) ~ Apply (Apply TFHelper_6989586621679394099Sym0 t_a1C0c) t_a1C0d) => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool) ~ Apply (Apply TFHelper_6989586621679394117Sym0 t_a1C0g) t_a1C0h) => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool) ~ Apply (Apply TFHelper_6989586621679394135Sym0 t_a1C0k) t_a1C0l) => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU) ~ Apply (Apply Max_6989586621679394153Sym0 t_a1C0o) t_a1C0p) => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU) ~ Apply (Apply Min_6989586621679394171Sym0 t_a1C0s) t_a1C0t) => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
infix 4 %<=
infix 4 %>=
infix 4 %>
infix 4 %<
type family Comparing (a_a1BXc :: (~>) b_a1BVK a_a1BVJ) (a_a1BXd :: b_a1BVK) (a_a1BXe :: b_a1BVK) :: Ordering
sComparing :: forall b_a1BVK a_a1BVJ (t_a1BZV :: (~>) b_a1BVK a_a1BVJ) (t_a1BZW :: b_a1BVK) (t_a1BZX :: b_a1BVK). SOrd a_a1BVJ => Sing t_a1BZV -> Sing t_a1BZW -> Sing t_a1BZX -> Sing (Apply (Apply (Apply ComparingSym0 t_a1BZV) t_a1BZW) t_a1BZX :: Ordering)
thenCmp :: Ordering -> Ordering -> Ordering
type family ThenCmp (a_a1EEb :: Ordering) (a_a1EEc :: Ordering) :: Ordering
sThenCmp :: forall (t_a1EEg :: Ordering) (t_a1EEh :: Ordering). Sing t_a1EEg -> Sing t_a1EEh -> Sing (Apply (Apply ThenCmpSym0 t_a1EEg) t_a1EEh :: Ordering)
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SOrdering :: Ordering -> Type
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
data SDown :: forall a_amMj. Down a_amMj -> Type
[SDown] :: forall a_amMj (n_a1EiE :: a_amMj). () => Sing (n_a1EiE :: a_amMj) -> SDown ('Down n_a1EiE)
data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering)
data ThenCmpSym1 (a6989586621679404371 :: Ordering) :: (~>) Ordering Ordering
type ThenCmpSym2 (a6989586621679404371 :: Ordering) (a6989586621679404372 :: Ordering) = ThenCmp a6989586621679404371 a6989586621679404372
type LTSym0 = 'LT
type EQSym0 = 'EQ
type GTSym0 = 'GT
data CompareSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Ordering)
data CompareSym1 (arg6989586621679394027 :: a6989586621679393938) :: (~>) a6989586621679393938 Ordering
type CompareSym2 (arg6989586621679394027 :: a6989586621679393938) (arg6989586621679394028 :: a6989586621679393938) = Compare arg6989586621679394027 arg6989586621679394028
data (<@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 <@#@$
data (<@#@$$) (arg6989586621679394031 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 <@#@$$
type (<@#@$$$) (arg6989586621679394031 :: a6989586621679393938) (arg6989586621679394032 :: a6989586621679393938) = (<) arg6989586621679394031 arg6989586621679394032
data (<=@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 <=@#@$
data (<=@#@$$) (arg6989586621679394035 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 <=@#@$$
type (<=@#@$$$) (arg6989586621679394035 :: a6989586621679393938) (arg6989586621679394036 :: a6989586621679393938) = (<=) arg6989586621679394035 arg6989586621679394036
data (>@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 >@#@$
data (>@#@$$) (arg6989586621679394039 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 >@#@$$
type (>@#@$$$) (arg6989586621679394039 :: a6989586621679393938) (arg6989586621679394040 :: a6989586621679393938) = (>) arg6989586621679394039 arg6989586621679394040
data (>=@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 >=@#@$
data (>=@#@$$) (arg6989586621679394043 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 >=@#@$$
type (>=@#@$$$) (arg6989586621679394043 :: a6989586621679393938) (arg6989586621679394044 :: a6989586621679393938) = (>=) arg6989586621679394043 arg6989586621679394044
data MaxSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 a6989586621679393938)
data MaxSym1 (arg6989586621679394047 :: a6989586621679393938) :: (~>) a6989586621679393938 a6989586621679393938
type MaxSym2 (arg6989586621679394047 :: a6989586621679393938) (arg6989586621679394048 :: a6989586621679393938) = Max arg6989586621679394047 arg6989586621679394048
data MinSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 a6989586621679393938)
data MinSym1 (arg6989586621679394051 :: a6989586621679393938) :: (~>) a6989586621679393938 a6989586621679393938
type MinSym2 (arg6989586621679394051 :: a6989586621679393938) (arg6989586621679394052 :: a6989586621679393938) = Min arg6989586621679394051 arg6989586621679394052
data ComparingSym0 :: forall b6989586621679393928 a6989586621679393927. (~>) ((~>) b6989586621679393928 a6989586621679393927) ((~>) b6989586621679393928 ((~>) b6989586621679393928 Ordering))
data ComparingSym1 (a6989586621679394018 :: (~>) b6989586621679393928 a6989586621679393927) :: (~>) b6989586621679393928 ((~>) b6989586621679393928 Ordering)
data ComparingSym2 (a6989586621679394018 :: (~>) b6989586621679393928 a6989586621679393927) (a6989586621679394019 :: b6989586621679393928) :: (~>) b6989586621679393928 Ordering
type ComparingSym3 (a6989586621679394018 :: (~>) b6989586621679393928 a6989586621679393927) (a6989586621679394019 :: b6989586621679393928) (a6989586621679394020 :: b6989586621679393928) = Comparing a6989586621679394018 a6989586621679394019 a6989586621679394020
data DownSym0 :: forall (a6989586621679097355 :: Type). (~>) a6989586621679097355 (Down (a6989586621679097355 :: Type))
type DownSym1 (t6989586621679403034 :: a6989586621679097355) = 'Down t6989586621679403034
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405284Sym0
instance Data.Singletons.Prelude.Ord.POrd ()
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405284Sym1 a6989586621679405282)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405274Sym0
instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Ordering
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405274Sym1 a6989586621679405272)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405264Sym0
instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Bool
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405264Sym1 a6989586621679405262)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405250Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Functor.Identity.Identity a)
instance forall a6989586621679091740 (a6989586621679405248 :: Data.Functor.Identity.Identity a6989586621679091740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405250Sym1 a6989586621679405248)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405205Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f, g)
instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 g3530822107858468871 (a6989586621679405203 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870, g3530822107858468871)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405205Sym1 a6989586621679405203)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405122Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f)
instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 (a6989586621679405120 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405122Sym1 a6989586621679405120)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679405050Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e)
instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 (a6989586621679405048 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679405050Sym1 a6989586621679405048)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404989Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d)
instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 (a6989586621679404987 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404989Sym1 a6989586621679404987)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404939Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b, c)
instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 (a6989586621679404937 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404939Sym1 a6989586621679404937)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404900Sym0
instance Data.Singletons.Prelude.Ord.POrd (a, b)
instance forall a3530822107858468865 b3530822107858468866 (a6989586621679404898 :: (a3530822107858468865, b3530822107858468866)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404900Sym1 a6989586621679404898)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404876Sym0
instance Data.Singletons.Prelude.Ord.POrd Data.Void.Void
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404876Sym1 a6989586621679404874)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404858Sym0
instance Data.Singletons.Prelude.Ord.POrd (GHC.Base.NonEmpty a)
instance forall a6989586621679069776 (a6989586621679404856 :: GHC.Base.NonEmpty a6989586621679069776). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404858Sym1 a6989586621679404856)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404829Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Either.Either a b)
instance forall a6989586621679093843 b6989586621679093844 (a6989586621679404827 :: Data.Either.Either a6989586621679093843 b6989586621679093844). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404829Sym1 a6989586621679404827)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404783Sym0
instance Data.Singletons.Prelude.Ord.POrd [a]
instance forall a3530822107858468865 (a6989586621679404781 :: [a3530822107858468865]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404783Sym1 a6989586621679404781)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679404751Sym0
instance Data.Singletons.Prelude.Ord.POrd (GHC.Maybe.Maybe a)
instance forall a3530822107858468865 (a6989586621679404749 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679404751Sym1 a6989586621679404749)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Ord.SOrd (GHC.Maybe.Maybe a)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd [a]) => Data.Singletons.Prelude.Ord.SOrd [a]
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b) => Data.Singletons.Prelude.Ord.SOrd (Data.Either.Either a b)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd [a]) => Data.Singletons.Prelude.Ord.SOrd (GHC.Base.NonEmpty a)
instance Data.Singletons.Prelude.Ord.SOrd Data.Void.Void
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b) => Data.Singletons.Prelude.Ord.SOrd (a, b)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Prelude.Ord.SOrd c) => Data.Singletons.Prelude.Ord.SOrd (a, b, c)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Prelude.Ord.SOrd c, Data.Singletons.Prelude.Ord.SOrd d) => Data.Singletons.Prelude.Ord.SOrd (a, b, c, d)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Prelude.Ord.SOrd c, Data.Singletons.Prelude.Ord.SOrd d, Data.Singletons.Prelude.Ord.SOrd e) => Data.Singletons.Prelude.Ord.SOrd (a, b, c, d, e)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Prelude.Ord.SOrd c, Data.Singletons.Prelude.Ord.SOrd d, Data.Singletons.Prelude.Ord.SOrd e, Data.Singletons.Prelude.Ord.SOrd f) => Data.Singletons.Prelude.Ord.SOrd (a, b, c, d, e, f)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Prelude.Ord.SOrd c, Data.Singletons.Prelude.Ord.SOrd d, Data.Singletons.Prelude.Ord.SOrd e, Data.Singletons.Prelude.Ord.SOrd f, Data.Singletons.Prelude.Ord.SOrd g) => Data.Singletons.Prelude.Ord.SOrd (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Ord.SOrd (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Ord.SOrd GHC.Types.Bool
instance Data.Singletons.Prelude.Ord.SOrd GHC.Types.Ordering
instance Data.Singletons.Prelude.Ord.SOrd ()
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.ThenCmpSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.ThenCmpSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ThenCmpSym1 a6989586621679404371)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.ThenCmpSym1 d)
instance Data.Singletons.Prelude.Eq.PEq (Data.Ord.Down a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679403478Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Ord.Down a)
instance forall a6989586621679403458 (a6989586621679403476 :: Data.Ord.Down a6989586621679403458). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679403478Sym1 a6989586621679403476)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Ord.SOrd (Data.Ord.Down a)
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Prelude.Eq.SEq (Data.Ord.Down a)
instance Data.Singletons.Decide.SDecide a => Data.Singletons.Decide.SDecide (Data.Ord.Down a)
instance Data.Singletons.Decide.SDecide a => Data.Type.Equality.TestEquality Data.Singletons.Prelude.Ord.SDown
instance Data.Singletons.Decide.SDecide a => Data.Type.Coercion.TestCoercion Data.Singletons.Prelude.Ord.SDown
instance Data.Singletons.Internal.SingKind a => Data.Singletons.Internal.SingKind (Data.Ord.Down a)
instance forall a (n :: a). Data.Singletons.Internal.SingI n => Data.Singletons.Internal.SingI ('Data.Ord.Down n)
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.DownSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.DownSym0
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.ComparingSym0
instance forall b a (d :: b Data.Singletons.Internal.~> a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.ComparingSym1 d)
instance forall b a (d1 :: b Data.Singletons.Internal.~> a) (d2 :: b). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.ComparingSym2 d1 d2)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.CompareSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.CompareSym1 d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.<@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Ord.<@#@$$) d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.<=@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Ord.<=@#@$$) d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.>@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Ord.>@#@$$) d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.>=@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Ord.>=@#@$$) d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.MaxSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.MaxSym1 d)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.MinSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Ord.MinSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.ComparingSym0
instance forall b6989586621679393928 a6989586621679393927 (a6989586621679394018 :: b6989586621679393928 Data.Singletons.Internal.~> a6989586621679393927). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym1 a6989586621679394018)
instance forall b6989586621679393928 a6989586621679393927 (a6989586621679394019 :: b6989586621679393928 Data.Singletons.Internal.~> a6989586621679393927) (a6989586621679394018 :: b6989586621679393928). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym2 a6989586621679394019 a6989586621679394018)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394089Scrutinee_6989586621679393960Sym0
instance forall k1 (x6989586621679394087 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394089Scrutinee_6989586621679393960Sym1 x6989586621679394087)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394107Scrutinee_6989586621679393962Sym0
instance forall k1 (x6989586621679394105 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394107Scrutinee_6989586621679393962Sym1 x6989586621679394105)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394125Scrutinee_6989586621679393964Sym0
instance forall k1 (x6989586621679394123 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394125Scrutinee_6989586621679393964Sym1 x6989586621679394123)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394143Scrutinee_6989586621679393966Sym0
instance forall k1 (x6989586621679394141 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394143Scrutinee_6989586621679393966Sym1 x6989586621679394141)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<@#@$)
instance forall a6989586621679393938 (arg6989586621679394031 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<@#@$$) arg6989586621679394031)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394070Scrutinee_6989586621679393958Sym0
instance forall k1 (x6989586621679394063 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394070Scrutinee_6989586621679393958Sym1 x6989586621679394063)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394161Scrutinee_6989586621679393968Sym0
instance forall k1 (x6989586621679394159 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394161Scrutinee_6989586621679393968Sym1 x6989586621679394159)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394179Scrutinee_6989586621679393970Sym0
instance forall k1 (x6989586621679394177 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394179Scrutinee_6989586621679393970Sym1 x6989586621679394177)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>@#@$)
instance forall a6989586621679393938 (arg6989586621679394039 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>@#@$$) arg6989586621679394039)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>=@#@$)
instance forall a6989586621679393938 (arg6989586621679394043 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>=@#@$$) arg6989586621679394043)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MaxSym0
instance forall a6989586621679393938 (arg6989586621679394047 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MaxSym1 arg6989586621679394047)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MinSym0
instance forall a6989586621679393938 (arg6989586621679394051 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MinSym1 arg6989586621679394051)
instance forall a6989586621679393938 (arg6989586621679394027 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.CompareSym1 arg6989586621679394027)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.CompareSym0
instance forall a6989586621679393938 (arg6989586621679394035 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<=@#@$$) arg6989586621679394035)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<=@#@$)
instance forall a6989586621679393938 (a6989586621679394055 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679394057Sym1 a6989586621679394055)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679394057Sym0
instance forall a6989586621679393938 (a6989586621679394079 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679394081Sym1 a6989586621679394079)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679394081Sym0
instance forall a6989586621679393938 (a6989586621679394097 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679394099Sym1 a6989586621679394097)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679394099Sym0
instance forall a6989586621679393938 (a6989586621679394115 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679394117Sym1 a6989586621679394115)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679394117Sym0
instance forall a6989586621679393938 (a6989586621679394133 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679394135Sym1 a6989586621679394133)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679394135Sym0
instance forall a6989586621679393938 (a6989586621679394151 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Max_6989586621679394153Sym1 a6989586621679394151)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Max_6989586621679394153Sym0
instance forall a6989586621679393938 (a6989586621679394169 :: a6989586621679393938). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Min_6989586621679394171Sym1 a6989586621679394169)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Min_6989586621679394171Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679394065Scrutinee_6989586621679393956Sym0
instance forall k1 (x6989586621679394063 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679394065Scrutinee_6989586621679393956Sym1 x6989586621679394063)
-- | Defines the class ShowSing type synonym, which is useful for
-- defining Show instances for singleton types.
module Data.Singletons.ShowSing
-- | In addition to the promoted and singled versions of the Show
-- class that singletons provides, it is also useful to be able
-- to directly define Show instances for singleton types
-- themselves. Doing so is almost entirely straightforward, as a derived
-- Show instance does 90 percent of the work. The last 10
-- percent—getting the right instance context—is a bit tricky, and that's
-- where ShowSing comes into play.
--
-- As an example, let's consider the singleton type for lists. We want to
-- write an instance with the following shape:
--
--
-- instance ??? => Show (SList (z :: [k])) where
-- showsPrec p SNil = showString "SNil"
-- showsPrec p (SCons sx sxs) =
-- showParen (p > 10) $ showString "SCons " . showsPrec 11 sx
-- . showSpace . showsPrec 11 sxs
--
--
-- To figure out what should go in place of ???, observe that we
-- require the type of each field to also be Show instances. In
-- other words, we need something like (Show (Sing (a
-- :: k))). But this isn't quite right, as the type variable
-- a doesn't appear in the instance head. In fact, this
-- a type is really referring to an existentially quantified
-- type variable in the SCons constructor, so it doesn't make
-- sense to try and use it like this.
--
-- Luckily, the QuantifiedConstraints language extension
-- provides a solution to this problem. This lets you write a context of
-- the form (forall a. Show (Sing (a :: k))),
-- which demands that there be an instance for Show
-- (Sing (a :: k)) that is parametric in the use of
-- a. This lets us write something closer to this:
--
--
-- instance (forall a. Show (Sing (a :: k))) => SList (Sing (z :: [k])) where ...
--
--
-- The ShowSing class is a thin wrapper around (forall a.
-- Show (Sing (a :: k))). With ShowSing, our
-- final instance declaration becomes this:
--
--
-- instance ShowSing k => Show (SList (z :: [k])) where
-- showsPrec p SNil = showString "SNil"
-- showsPrec p (SCons (sx :: Sing x) (sxs :: Sing xs)) =
-- (showParen (p > 10) $ showString "SCons " . showsPrec 11 sx
-- . showSpace . showsPrec 11 sxs)
-- :: (ShowSing' x, ShowSing' xs) => ShowS
--
--
-- (Note that the actual definition of ShowSing is slightly more
-- complicated than what this documentation might suggest. For the full
-- story, as well as an explanation of why we need an explicit
-- (ShowSing' x, ShowSing' xs) => ShowS signature at the end,
-- refer to the documentation for ShowSing`.)
--
-- When singling a derived Show instance, singletons will
-- also generate a Show instance for the corresponding singleton
-- type using ShowSing. In other words, if you give
-- singletons a derived Show instance, then you'll
-- receive the following in return:
--
--
-- - A promoted (PShow) instance
-- - A singled (SShow) instance
-- - A Show instance for the singleton type
--
--
-- What a bargain!
class (forall (z :: k). ShowSing' z) => ShowSing k
-- | The workhorse that powers ShowSing. The only reason that
-- ShowSing` exists is to work around GHC's inability to put type
-- families in the head of a quantified constraint (see this GHC
-- issue for more details on this point). In other words, GHC will
-- not let you define ShowSing like so:
--
--
-- class (forall (z :: k). Show (Sing z)) => ShowSing k
--
--
-- By replacing Show (Sing z) with ShowSing'
-- z, we are able to avoid this restriction for the most part. There
-- is one major downside to using ShowSing', however: deriving
-- Show instances for singleton types does not work out of the
-- box. In other words, if you try to do this:
--
--
-- deriving instance ShowSing k => Show (SList (z :: [k]))
--
--
-- Then GHC will complain to the effect that it could not deduce a
-- Show (Sing x) constraint. This is due to
-- another unfortunate GHC bug that prevents GHC from realizing
-- that ShowSing k implies Show (Sing
-- (x :: k)). The workaround is to force GHC to come to its senses
-- by using an explicit type signature:
--
--
-- instance ShowSing k => Show (SList (z :: [k])) where
-- showsPrec p SNil = showString "SNil"
-- showsPrec p (SCons (sx :: Sing x) (sxs :: Sing xs)) =
-- (showParen (p > 10) $ showString "SCons " . showsPrec 11 sx
-- . showSpace . showsPrec 11 sxs)
-- :: (ShowSing' x, ShowSing' xs) => ShowS
--
--
-- The use of ShowSing' x in the signature is sufficient to make
-- the constraint solver connect the dots between ShowSing
-- k and Show (Sing (x :: k)). (The
-- ShowSing' xs constraint is not strictly necessary, but it is
-- shown here since that is in fact the code that singletons
-- will generate for this instance.)
--
-- Because deriving Show will not insert these explicit
-- signatures for us, it is not possible to derive Show instances
-- for singleton types. Thankfully, singletons' Template Haskell
-- machinery can do this manual gruntwork for us 99% of the time, but if
-- you ever find yourself in a situation where you must define a
-- Show instance for a singleton type by hand, this is important
-- to keep in mind.
--
-- Note that there is one potential future direction that might alleviate
-- this pain. We could define ShowSing` like this instead:
--
--
-- class (forall sing. sing ~ Sing => Show (sing z)) => ShowSing' z
-- instance Show (Sing z) => ShowSing' z
--
--
-- For many examples, this lets you just derive Show instances for
-- singleton types like you would expect. Alas, this topples over on
-- Bar in the following example:
--
--
-- newtype Foo a = MkFoo a
-- data SFoo :: forall a. Foo a -> Type where
-- SMkFoo :: Sing x -> SFoo (MkFoo x)
-- type instance Sing = SFoo
-- deriving instance ShowSing a => Show (SFoo (z :: Foo a))
--
-- newtype Bar a = MkBar (Foo a)
-- data SBar :: forall a. Bar a -> Type where
-- SMkBar :: Sing x -> SBar (MkBar x)
-- type instance Sing = SBar
-- deriving instance ShowSing (Foo a) => Show (SBar (z :: Bar a))
--
--
-- This fails because of—you guessed it—another GHC bug. Bummer.
-- Unless that bug were to be fixed, the current definition of
-- ShowSing` is the best that we can do.
class Show (Sing z) => ShowSing' z
instance forall a (z :: GHC.Maybe.Maybe a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Instances.SMaybe z)
instance forall a (z :: [a]). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing [a]) => GHC.Show.Show (Data.Singletons.Prelude.Instances.SList z)
instance forall a b (z :: Data.Either.Either a b). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Show.Show (Data.Singletons.Prelude.Instances.SEither z)
instance forall a (z :: GHC.Base.NonEmpty a). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing [a]) => GHC.Show.Show (Data.Singletons.Prelude.Instances.SNonEmpty z)
instance GHC.Show.Show (Data.Singletons.Prelude.Instances.SVoid z)
instance forall a b (z :: (a, b)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple2 z)
instance forall a b c (z :: (a, b, c)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b, Data.Singletons.ShowSing.ShowSing c) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple3 z)
instance forall a b c d (z :: (a, b, c, d)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b, Data.Singletons.ShowSing.ShowSing c, Data.Singletons.ShowSing.ShowSing d) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple4 z)
instance forall a b c d e (z :: (a, b, c, d, e)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b, Data.Singletons.ShowSing.ShowSing c, Data.Singletons.ShowSing.ShowSing d, Data.Singletons.ShowSing.ShowSing e) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple5 z)
instance forall a b c d e f (z :: (a, b, c, d, e, f)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b, Data.Singletons.ShowSing.ShowSing c, Data.Singletons.ShowSing.ShowSing d, Data.Singletons.ShowSing.ShowSing e, Data.Singletons.ShowSing.ShowSing f) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple6 z)
instance forall a b c d e f g (z :: (a, b, c, d, e, f, g)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b, Data.Singletons.ShowSing.ShowSing c, Data.Singletons.ShowSing.ShowSing d, Data.Singletons.ShowSing.ShowSing e, Data.Singletons.ShowSing.ShowSing f, Data.Singletons.ShowSing.ShowSing g) => GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple7 z)
instance forall a (z :: Data.Functor.Identity.Identity a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Instances.SIdentity z)
instance GHC.Show.Show (Data.Singletons.Prelude.Instances.SBool z)
instance GHC.Show.Show (Data.Singletons.Prelude.Instances.SOrdering z)
instance GHC.Show.Show (Data.Singletons.Prelude.Instances.STuple0 z)
instance (forall (z :: k). Data.Singletons.ShowSing.ShowSing' z) => Data.Singletons.ShowSing.ShowSing k
instance forall k (a :: k). Data.Singletons.ShowSing.ShowSing k => GHC.Show.Show (Data.Singletons.Internal.WrappedSing a)
instance forall k (a :: k) (ws :: Data.Singletons.Internal.WrappedSing a). Data.Singletons.ShowSing.ShowSing k => GHC.Show.Show (Data.Singletons.Internal.SWrappedSing ws)
instance forall k (z :: k). GHC.Show.Show (Data.Singletons.Internal.Sing z) => Data.Singletons.ShowSing.ShowSing' z
instance GHC.Show.Show (Data.Singletons.TypeLits.Internal.SNat n)
instance GHC.Show.Show (Data.Singletons.TypeLits.Internal.SSymbol s)
-- | Defines and exports singletons useful for the Nat and Symbol kinds.
module Data.Singletons.TypeLits
-- | (Kind) This is the kind of type-level natural numbers.
data Nat
-- | (Kind) This is the kind of type-level symbols. Declared here because
-- class IP needs it
data Symbol
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SNat (n :: Nat)
SNat :: SNat (n :: Nat)
data SSymbol (n :: Symbol)
SSym :: SSymbol (n :: Symbol)
-- | Given a singleton for Nat, call something requiring a
-- KnownNat instance.
withKnownNat :: Sing n -> (KnownNat n => r) -> r
-- | Given a singleton for Symbol, call something requiring a
-- KnownSymbol instance.
withKnownSymbol :: Sing n -> (KnownSymbol n => r) -> r
-- | The promotion of error. This version is more poly-kinded for
-- easier use.
type family Error (str :: k0) :: k
-- | The singleton for error
sError :: HasCallStack => Sing (str :: Symbol) -> a
-- | The promotion of errorWithoutStackTrace. This version is more
-- poly-kinded for easier use.
type family ErrorWithoutStackTrace (str :: k0) :: k
-- | The singleton for errorWithoutStackTrace.
sErrorWithoutStackTrace :: Sing (str :: Symbol) -> a
-- | The promotion of undefined.
type family Undefined :: k
-- | 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.
class KnownNat (n :: Nat)
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.
class KnownSymbol (n :: Symbol)
symbolVal :: forall (n :: Symbol) proxy. KnownSymbol n => proxy n -> String
-- | Exponentiation of type-level naturals.
type family (a :: Nat) ^ (b :: Nat) :: Nat
infixr 8 ^
-- | The singleton analogue of (^) for Nats.
(%^) :: Sing a -> Sing b -> Sing (a ^ b)
infixr 8 %^
-- | Comparison of type-level naturals, as a function. NOTE: The
-- functionality for this function should be subsumed by CmpNat,
-- so this might go away in the future. Please let us know, if you
-- encounter discrepancies between the two.
type family (a :: Nat) <=? (b :: Nat) :: Bool
infix 4 <=?
-- | The singleton analogue of <=?
--
-- Note that, because of historical reasons in GHC's Nat API,
-- <=? is incompatible (unification-wise) with <= and
-- the PEq, SEq, POrd, and SOrd instances for
-- Nat. (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.Singletons.Prelude.Ord, 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 Nat.
(%<=?) :: 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).
type family Log2 (a :: Nat) :: Nat
sLog2 :: Sing x -> Sing (Log2 x)
-- | Division (round down) of natural numbers. Div x 0 is
-- undefined (i.e., it cannot be reduced).
type family Div (a :: Nat) (b :: Nat) :: Nat
infixl 7 `Div`
sDiv :: 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).
type family Mod (a :: Nat) (b :: Nat) :: Nat
infixl 7 `Mod`
sMod :: Sing x -> Sing y -> Sing (Mod x y)
infixl 7 `sMod`
type family DivMod (a_a25D4 :: Nat) (a_a25D5 :: Nat) :: (Nat, Nat)
sDivMod :: Sing x -> Sing y -> Sing (DivMod x y)
type family Quot (a_a25CO :: Nat) (a_a25CP :: Nat) :: Nat
infixl 7 `Quot`
sQuot :: Sing x -> Sing y -> Sing (Quot x y)
infixl 7 `sQuot`
type family Rem (a_a25CE :: Nat) (a_a25CF :: Nat) :: Nat
infixl 7 `Rem`
sRem :: Sing x -> Sing y -> Sing (Rem x y)
infixl 7 `sRem`
type family QuotRem (a_a25CY :: Nat) (a_a25CZ :: Nat) :: (Nat, Nat)
sQuotRem :: Sing x -> Sing y -> Sing (QuotRem x y)
data ErrorSym0 :: forall k06989586621679485796 k6989586621679485797. (~>) k06989586621679485796 k6989586621679485797
type ErrorSym1 (str6989586621679485798 :: k06989586621679485796) = Error str6989586621679485798
data ErrorWithoutStackTraceSym0 :: forall k06989586621679486886 k6989586621679486887. (~>) k06989586621679486886 k6989586621679486887
type ErrorWithoutStackTraceSym1 (str6989586621679486888 :: k06989586621679486886) = ErrorWithoutStackTrace str6989586621679486888
type UndefinedSym0 = Undefined
data KnownNatSym0 :: (~>) Nat Constraint
type KnownNatSym1 (n6989586621679485953 :: Nat) = KnownNat n6989586621679485953
data KnownSymbolSym0 :: (~>) Symbol Constraint
type KnownSymbolSym1 (n6989586621679486019 :: Symbol) = KnownSymbol n6989586621679486019
data (^@#@$) :: (~>) Nat ((~>) Nat Nat)
infixr 8 ^@#@$
data (^@#@$$) (a3530822107858468865 :: Nat) :: (~>) Nat Nat
infixr 8 ^@#@$$
type (^@#@$$$) (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = (^) a3530822107858468865 b3530822107858468866
data (<=?@#@$) :: (~>) Nat ((~>) Nat Bool)
infix 4 <=?@#@$
data (<=?@#@$$) (a3530822107858468865 :: Nat) :: (~>) Nat Bool
infix 4 <=?@#@$$
type (<=?@#@$$$) (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = (<=?) a3530822107858468865 b3530822107858468866
data Log2Sym0 :: (~>) Nat Nat
type Log2Sym1 (a3530822107858468865 :: Nat) = Log2 a3530822107858468865
data DivSym0 :: (~>) Nat ((~>) Nat Nat)
infixl 7 `DivSym0`
data DivSym1 (a3530822107858468865 :: Nat) :: (~>) Nat Nat
infixl 7 `DivSym1`
type DivSym2 (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = Div a3530822107858468865 b3530822107858468866
data ModSym0 :: (~>) Nat ((~>) Nat Nat)
infixl 7 `ModSym0`
data ModSym1 (a3530822107858468865 :: Nat) :: (~>) Nat Nat
infixl 7 `ModSym1`
type ModSym2 (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = Mod a3530822107858468865 b3530822107858468866
data DivModSym0 :: (~>) Nat ((~>) Nat (Nat, Nat))
data DivModSym1 (a6989586621679508090 :: Nat) :: (~>) Nat (Nat, Nat)
type DivModSym2 (a6989586621679508090 :: Nat) (a6989586621679508091 :: Nat) = DivMod a6989586621679508090 a6989586621679508091
data QuotSym0 :: (~>) Nat ((~>) Nat Nat)
infixl 7 `QuotSym0`
data QuotSym1 (a6989586621679508074 :: Nat) :: (~>) Nat Nat
infixl 7 `QuotSym1`
type QuotSym2 (a6989586621679508074 :: Nat) (a6989586621679508075 :: Nat) = Quot a6989586621679508074 a6989586621679508075
data RemSym0 :: (~>) Nat ((~>) Nat Nat)
infixl 7 `RemSym0`
data RemSym1 (a6989586621679508064 :: Nat) :: (~>) Nat Nat
infixl 7 `RemSym1`
type RemSym2 (a6989586621679508064 :: Nat) (a6989586621679508065 :: Nat) = Rem a6989586621679508064 a6989586621679508065
data QuotRemSym0 :: (~>) Nat ((~>) Nat (Nat, Nat))
data QuotRemSym1 (a6989586621679508084 :: Nat) :: (~>) Nat (Nat, Nat)
type QuotRemSym2 (a6989586621679508084 :: Nat) (a6989586621679508085 :: Nat) = QuotRem a6989586621679508084 a6989586621679508085
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotRemSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotRemSym1 a6989586621679508084)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.DivModSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.DivModSym1 a6989586621679508090)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotSym1 a6989586621679508074)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.RemSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.RemSym1 a6989586621679508064)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.ModSym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeLits.ModSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.ModSym1 a3530822107858468865)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI (Data.Singletons.TypeLits.ModSym1 x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.DivSym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeLits.DivSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.DivSym1 a3530822107858468865)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI (Data.Singletons.TypeLits.DivSym1 x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.Log2Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeLits.Log2Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.KnownSymbolSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.KnownNatSym0
instance GHC.Num.Num GHC.Types.Nat
instance GHC.Classes.Eq GHC.Types.Nat
instance GHC.Classes.Ord GHC.Types.Nat
instance GHC.Enum.Enum GHC.Types.Nat
instance GHC.Show.Show GHC.Types.Nat
instance GHC.Classes.Eq GHC.Types.Symbol
instance GHC.Classes.Ord GHC.Types.Symbol
instance Data.String.IsString GHC.Types.Symbol
instance GHC.Base.Semigroup GHC.Types.Symbol
instance GHC.Base.Monoid GHC.Types.Symbol
instance GHC.Show.Show GHC.Types.Symbol
-- | Defines functions and datatypes relating to the singleton for
-- Maybe, including a singletons version 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.Singletons.Prelude.Maybe
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SMaybe :: forall a_11. Maybe a_11 -> Type
[SNothing] :: SMaybe 'Nothing
[SJust] :: forall a_11 (n_a1hqT :: a_11). () => Sing (n_a1hqT :: a_11) -> SMaybe ('Just n_a1hqT)
maybe_ :: b_a27ol -> (a_a27om -> b_a27ol) -> Maybe a_a27om -> b_a27ol
type family Maybe_ (a_a27oD :: b_a27ol) (a_a27oE :: (~>) a_a27om b_a27ol) (a_a27oF :: Maybe a_a27om) :: b_a27ol
sMaybe_ :: forall b_a27ol a_a27om (t_a27oM :: b_a27ol) (t_a27oN :: (~>) a_a27om b_a27ol) (t_a27oO :: Maybe a_a27om). Sing t_a27oM -> Sing t_a27oN -> Sing t_a27oO -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a27oM) t_a27oN) t_a27oO :: b_a27ol)
type family IsJust (a_a27OB :: Maybe a_a27Lp) :: Bool
sIsJust :: forall a_a27Lp (t_a27OV :: Maybe a_a27Lp). Sing t_a27OV -> Sing (Apply IsJustSym0 t_a27OV :: Bool)
type family IsNothing (a_a27Oz :: Maybe a_a27Lo) :: Bool
sIsNothing :: forall a_a27Lo (t_a27OT :: Maybe a_a27Lo). Sing t_a27OT -> Sing (Apply IsNothingSym0 t_a27OT :: Bool)
type family FromJust (a_a27Ow :: Maybe a_a27Ln) :: a_a27Ln
sFromJust :: forall a_a27Ln (t_a27OR :: Maybe a_a27Ln). Sing t_a27OR -> Sing (Apply FromJustSym0 t_a27OR :: a_a27Ln)
type family FromMaybe (a_a27Om :: a_a27Lm) (a_a27On :: Maybe a_a27Lm) :: a_a27Lm
sFromMaybe :: forall a_a27Lm (t_a27ON :: a_a27Lm) (t_a27OO :: Maybe a_a27Lm). Sing t_a27ON -> Sing t_a27OO -> Sing (Apply (Apply FromMaybeSym0 t_a27ON) t_a27OO :: a_a27Lm)
type family ListToMaybe (a_a27Og :: [a_a27Lk]) :: Maybe a_a27Lk
sListToMaybe :: forall a_a27Lk (t_a27OJ :: [a_a27Lk]). Sing t_a27OJ -> Sing (Apply ListToMaybeSym0 t_a27OJ :: Maybe a_a27Lk)
type family MaybeToList (a_a27Oj :: Maybe a_a27Ll) :: [a_a27Ll]
sMaybeToList :: forall a_a27Ll (t_a27OL :: Maybe a_a27Ll). Sing t_a27OL -> Sing (Apply MaybeToListSym0 t_a27OL :: [a_a27Ll])
type family CatMaybes (a_a27Ob :: [Maybe a_a27Lj]) :: [a_a27Lj]
sCatMaybes :: forall a_a27Lj (t_a27OH :: [Maybe a_a27Lj]). Sing t_a27OH -> Sing (Apply CatMaybesSym0 t_a27OH :: [a_a27Lj])
type family MapMaybe (a_a27NS :: (~>) a_a27Lh (Maybe b_a27Li)) (a_a27NT :: [a_a27Lh]) :: [b_a27Li]
sMapMaybe :: forall a_a27Lh b_a27Li (t_a27OD :: (~>) a_a27Lh (Maybe b_a27Li)) (t_a27OE :: [a_a27Lh]). Sing t_a27OD -> Sing t_a27OE -> Sing (Apply (Apply MapMaybeSym0 t_a27OD) t_a27OE :: [b_a27Li])
type NothingSym0 = 'Nothing
data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type))
type JustSym1 (t6989586621679315133 :: a3530822107858468865) = 'Just t6989586621679315133
data Maybe_Sym0 :: forall b6989586621679514865 a6989586621679514866. (~>) b6989586621679514865 ((~>) ((~>) a6989586621679514866 b6989586621679514865) ((~>) (Maybe a6989586621679514866) b6989586621679514865))
data Maybe_Sym1 (a6989586621679514883 :: b6989586621679514865) :: forall a6989586621679514866. (~>) ((~>) a6989586621679514866 b6989586621679514865) ((~>) (Maybe a6989586621679514866) b6989586621679514865)
data Maybe_Sym2 (a6989586621679514883 :: b6989586621679514865) (a6989586621679514884 :: (~>) a6989586621679514866 b6989586621679514865) :: (~>) (Maybe a6989586621679514866) b6989586621679514865
type Maybe_Sym3 (a6989586621679514883 :: b6989586621679514865) (a6989586621679514884 :: (~>) a6989586621679514866 b6989586621679514865) (a6989586621679514885 :: Maybe a6989586621679514866) = Maybe_ a6989586621679514883 a6989586621679514884 a6989586621679514885
data IsJustSym0 :: forall a6989586621679516295. (~>) (Maybe a6989586621679516295) Bool
type IsJustSym1 (a6989586621679516493 :: Maybe a6989586621679516295) = IsJust a6989586621679516493
data IsNothingSym0 :: forall a6989586621679516294. (~>) (Maybe a6989586621679516294) Bool
type IsNothingSym1 (a6989586621679516491 :: Maybe a6989586621679516294) = IsNothing a6989586621679516491
data FromJustSym0 :: forall a6989586621679516293. (~>) (Maybe a6989586621679516293) a6989586621679516293
type FromJustSym1 (a6989586621679516488 :: Maybe a6989586621679516293) = FromJust a6989586621679516488
data FromMaybeSym0 :: forall a6989586621679516292. (~>) a6989586621679516292 ((~>) (Maybe a6989586621679516292) a6989586621679516292)
data FromMaybeSym1 (a6989586621679516478 :: a6989586621679516292) :: (~>) (Maybe a6989586621679516292) a6989586621679516292
type FromMaybeSym2 (a6989586621679516478 :: a6989586621679516292) (a6989586621679516479 :: Maybe a6989586621679516292) = FromMaybe a6989586621679516478 a6989586621679516479
data ListToMaybeSym0 :: forall a6989586621679516290. (~>) [a6989586621679516290] (Maybe a6989586621679516290)
type ListToMaybeSym1 (a6989586621679516472 :: [a6989586621679516290]) = ListToMaybe a6989586621679516472
data MaybeToListSym0 :: forall a6989586621679516291. (~>) (Maybe a6989586621679516291) [a6989586621679516291]
type MaybeToListSym1 (a6989586621679516475 :: Maybe a6989586621679516291) = MaybeToList a6989586621679516475
data CatMaybesSym0 :: forall a6989586621679516289. (~>) [Maybe a6989586621679516289] [a6989586621679516289]
type CatMaybesSym1 (a6989586621679516467 :: [Maybe a6989586621679516289]) = CatMaybes a6989586621679516467
data MapMaybeSym0 :: forall a6989586621679516287 b6989586621679516288. (~>) ((~>) a6989586621679516287 (Maybe b6989586621679516288)) ((~>) [a6989586621679516287] [b6989586621679516288])
data MapMaybeSym1 (a6989586621679516448 :: (~>) a6989586621679516287 (Maybe b6989586621679516288)) :: (~>) [a6989586621679516287] [b6989586621679516288]
type MapMaybeSym2 (a6989586621679516448 :: (~>) a6989586621679516287 (Maybe b6989586621679516288)) (a6989586621679516449 :: [a6989586621679516287]) = MapMaybe a6989586621679516448 a6989586621679516449
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.IsJustSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.IsJustSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.IsNothingSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.IsNothingSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.FromJustSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.FromJustSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.FromMaybeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.FromMaybeSym0
instance forall a6989586621679516292 (a6989586621679516478 :: a6989586621679516292). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.FromMaybeSym1 a6989586621679516478)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.FromMaybeSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.MaybeToListSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.MaybeToListSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.ListToMaybeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.ListToMaybeSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.CatMaybesSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.CatMaybesSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.Let6989586621679516455RsSym0
instance forall a6989586621679516287 k1 k (f6989586621679516452 :: a6989586621679516287 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679516455RsSym1 f6989586621679516452)
instance forall a6989586621679516287 k1 k (x6989586621679516453 :: a6989586621679516287 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1) (f6989586621679516452 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679516455RsSym2 x6989586621679516453 f6989586621679516452)
instance forall a6989586621679516287 b6989586621679516288 (a6989586621679516448 :: a6989586621679516287 Data.Singletons.Internal.~> GHC.Maybe.Maybe b6989586621679516288). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.MapMaybeSym1 a6989586621679516448)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.MapMaybeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.MapMaybeSym0
instance forall a b (d :: a Data.Singletons.Internal.~> GHC.Maybe.Maybe b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.MapMaybeSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.Let6989586621679516459Scrutinee_6989586621679516322Sym0
instance forall k1 k2 k3 (f6989586621679516452 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679516459Scrutinee_6989586621679516322Sym1 f6989586621679516452)
instance forall k1 k2 k3 (x6989586621679516453 :: k1 Data.Singletons.Internal.~> k2) (f6989586621679516452 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679516459Scrutinee_6989586621679516322Sym2 x6989586621679516453 f6989586621679516452)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.Maybe_Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.Maybe_Sym0
instance forall b6989586621679514865 a6989586621679514866 (a6989586621679514883 :: b6989586621679514865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym1 a6989586621679514883)
instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.Maybe_Sym1 d)
instance forall b6989586621679514865 a6989586621679514866 (a6989586621679514884 :: b6989586621679514865) (a6989586621679514883 :: a6989586621679514866 Data.Singletons.Internal.~> b6989586621679514865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym2 a6989586621679514884 a6989586621679514883)
instance forall b a (d1 :: b) (d2 :: a Data.Singletons.Internal.~> b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.Maybe_Sym2 d1 d2)
-- | Defines Sigma, a dependent pair data type, and related
-- functions.
module Data.Singletons.Sigma
-- | A dependent pair.
data Sigma (s :: Type) :: (s ~> Type) -> Type
[:&:] :: forall s t fst. Sing (fst :: s) -> (t @@ fst) -> Sigma s t
infixr 4 :&:
-- | Unicode shorthand for Sigma.
type Σ = Sigma
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
-- | The singleton type for Sigma.
data SSigma :: forall s (t :: s ~> Type). Sigma s t -> Type
[:%&:] :: forall s t (fst :: s) (sfst :: Sing fst) (snd :: t @@ fst). Sing ('WrapSing sfst) -> Sing snd -> SSigma (sfst :&: snd :: Sigma s t)
infixr 4 :%&:
-- | Unicode shorthand for SSigma.
type SΣ = SSigma
-- | Project the first element out of a dependent pair.
fstSigma :: forall s t. SingKind s => Sigma s t -> Demote s
-- | Project the first element out of a dependent pair.
type family FstSigma (sig :: Sigma s t) :: s
-- | Project the second element out of a dependent pair.
sndSigma :: forall s t (sig :: Sigma s t). SingKind (t @@ FstSigma sig) => SSigma sig -> Demote (t @@ FstSigma sig)
-- | Project the second element out of a dependent pair.
type family SndSigma (sig :: Sigma s t) :: t @@ FstSigma sig
-- | Project the first element out of a dependent pair using
-- continuation-passing style.
projSigma1 :: (forall (fst :: s). Sing fst -> r) -> Sigma s t -> r
-- | Project the second element out of a dependent pair using
-- continuation-passing style.
projSigma2 :: forall s t r. (forall (fst :: s). (t @@ fst) -> r) -> Sigma s t -> r
-- | Map across a Sigma value in a dependent fashion.
mapSigma :: Sing (f :: a ~> b) -> (forall (x :: a). (p @@ x) -> q @@ (f @@ x)) -> Sigma a p -> Sigma b q
-- | Zip two Sigma values together in a dependent fashion.
zipSigma :: Sing (f :: a ~> (b ~> c)) -> (forall (x :: a) (y :: b). (p @@ x) -> (q @@ y) -> r @@ ((f @@ x) @@ y)) -> Sigma a p -> Sigma b q -> Sigma c r
-- | Convert an uncurried function on Sigma to a curried one.
--
-- Together, currySigma and uncurrySigma witness an
-- isomorphism such that the following identities hold:
--
--
-- id1 :: forall a (b :: a ~> Type) (c :: Sigma a b ~> Type).
-- (forall (p :: Sigma a b). SSigma p -> c @ p)
-- -> (forall (p :: Sigma a b). SSigma p -> c p)
-- id1 f = uncurrySigma a b c (currySigma a b c f)
--
-- id2 :: forall a (b :: a ~> Type) (c :: Sigma a b ~> Type).
-- (forall (x :: a) (sx :: Sing x) (y :: b x). Sing (WrapSing sx) -> Sing y -> c (sx :&: y))
-- -> (forall (x :: a) (sx :: Sing x) (y :: b x). Sing (WrapSing sx) -> Sing y -> c (sx :&: y))
-- id2 f = currySigma a b c (uncurrySigma a b @c f)
--
currySigma :: forall a (b :: a ~> Type) (c :: Sigma a b ~> Type). (forall (p :: Sigma a b). SSigma p -> c @@ p) -> forall (x :: a) (sx :: Sing x) (y :: b @@ x). Sing ('WrapSing sx) -> Sing y -> c @@ (sx :&: y)
-- | Convert a curried function on Sigma to an uncurried one.
--
-- Together, currySigma and uncurrySigma witness an
-- isomorphism. (Refer to the documentation for currySigma for
-- more details.)
uncurrySigma :: forall a (b :: a ~> Type) (c :: Sigma a b ~> Type). (forall (x :: a) (sx :: Sing x) (y :: b @@ x). Sing ('WrapSing sx) -> Sing y -> c @@ (sx :&: y)) -> forall (p :: Sigma a b). SSigma p -> c @@ p
class (forall (x :: a). ShowApply' f x) => ShowApply (f :: a ~> Type)
class (forall (x :: a) (z :: Apply f x). ShowSingApply' f x z) => ShowSingApply (f :: a ~> Type)
class Show (Apply f x) => ShowApply' (f :: a ~> Type) (x :: a)
class Show (Sing z) => ShowSingApply' (f :: a ~> Type) (x :: a) (z :: Apply f x)
instance forall s (t :: s Data.Singletons.Internal.~> *) (sig :: Data.Singletons.Sigma.Sigma s t). (Data.Singletons.ShowSing.ShowSing s, Data.Singletons.Sigma.ShowSingApply t) => GHC.Show.Show (Data.Singletons.Sigma.SSigma sig)
instance forall a (f :: a Data.Singletons.Internal.~> *). (forall (x :: a) (z :: Data.Singletons.Internal.Apply f x). Data.Singletons.Sigma.ShowSingApply' f x z) => Data.Singletons.Sigma.ShowSingApply f
instance forall a (f :: a Data.Singletons.Internal.~> *) (x :: a) (z :: Data.Singletons.Internal.Apply f x). GHC.Show.Show (Data.Singletons.Internal.Sing z) => Data.Singletons.Sigma.ShowSingApply' f x z
instance forall s (t :: s Data.Singletons.Internal.~> *). (Data.Singletons.ShowSing.ShowSing s, Data.Singletons.Sigma.ShowApply t) => GHC.Show.Show (Data.Singletons.Sigma.Sigma s t)
instance forall a (f :: a Data.Singletons.Internal.~> *). (forall (x :: a). Data.Singletons.Sigma.ShowApply' f x) => Data.Singletons.Sigma.ShowApply f
instance forall a (f :: a Data.Singletons.Internal.~> *) (x :: a). GHC.Show.Show (Data.Singletons.Internal.Apply f x) => Data.Singletons.Sigma.ShowApply' f x
instance forall s (t :: s Data.Singletons.Internal.~> *) (fst :: s) (a :: Data.Singletons.Internal.Sing fst) (b :: t Data.Singletons.Internal.@@ fst). (Data.Singletons.Internal.SingI fst, Data.Singletons.Internal.SingI b) => Data.Singletons.Internal.SingI (a 'Data.Singletons.Sigma.:&: b)
-- | Defines and exports promoted and singleton versions of definitions
-- from GHC.Num.
--
-- Be warned that some of the associated type families in the PNum
-- class ((+), (-), and (*)) clash with their
-- counterparts for Nat in the GHC.TypeLits module.
module Data.Singletons.Prelude.Num
class PNum (a_a2b9R :: Type) where {
type family (+) (arg_a2baa :: a_a2b9R) (arg_a2bab :: a_a2b9R) :: a_a2b9R;
type family (-) (arg_a2bae :: a_a2b9R) (arg_a2baf :: a_a2b9R) :: a_a2b9R;
type family (*) (arg_a2bai :: a_a2b9R) (arg_a2baj :: a_a2b9R) :: a_a2b9R;
type family Negate (arg_a2bam :: a_a2b9R) :: a_a2b9R;
type family Abs (arg_a2bao :: a_a2b9R) :: a_a2b9R;
type family Signum (arg_a2baq :: a_a2b9R) :: a_a2b9R;
type family FromInteger (arg_a2bas :: Nat) :: a_a2b9R;
type (-) a_a2bau a_a2bav = Apply (Apply TFHelper_6989586621679529384Sym0 a_a2bau) a_a2bav;
type Negate a_a2baG = Apply Negate_6989586621679529395Sym0 a_a2baG;
}
infixl 6 +
infixl 7 *
infixl 6 -
class SNum a_a2b9R
(%+) :: forall (t_a2bc8 :: a_a2b9R) (t_a2bc9 :: a_a2b9R). SNum a_a2b9R => Sing t_a2bc8 -> Sing t_a2bc9 -> Sing (Apply (Apply (+@#@$) t_a2bc8) t_a2bc9 :: a_a2b9R)
(%-) :: forall (t_a2bcc :: a_a2b9R) (t_a2bcd :: a_a2b9R). SNum a_a2b9R => Sing t_a2bcc -> Sing t_a2bcd -> Sing (Apply (Apply (-@#@$) t_a2bcc) t_a2bcd :: a_a2b9R)
(%*) :: forall (t_a2bcg :: a_a2b9R) (t_a2bch :: a_a2b9R). SNum a_a2b9R => Sing t_a2bcg -> Sing t_a2bch -> Sing (Apply (Apply (*@#@$) t_a2bcg) t_a2bch :: a_a2b9R)
sNegate :: forall (t_a2bck :: a_a2b9R). SNum a_a2b9R => Sing t_a2bck -> Sing (Apply NegateSym0 t_a2bck :: a_a2b9R)
sAbs :: forall (t_a2bcm :: a_a2b9R). SNum a_a2b9R => Sing t_a2bcm -> Sing (Apply AbsSym0 t_a2bcm :: a_a2b9R)
sSignum :: forall (t_a2bco :: a_a2b9R). SNum a_a2b9R => Sing t_a2bco -> Sing (Apply SignumSym0 t_a2bco :: a_a2b9R)
sFromInteger :: forall (t_a2bcq :: Nat). SNum a_a2b9R => Sing t_a2bcq -> Sing (Apply FromIntegerSym0 t_a2bcq :: a_a2b9R)
(%-) :: forall (t_a2bcc :: a_a2b9R) (t_a2bcd :: a_a2b9R). (SNum a_a2b9R, (Apply (Apply (-@#@$) t_a2bcc) t_a2bcd :: a_a2b9R) ~ Apply (Apply TFHelper_6989586621679529384Sym0 t_a2bcc) t_a2bcd) => Sing t_a2bcc -> Sing t_a2bcd -> Sing (Apply (Apply (-@#@$) t_a2bcc) t_a2bcd :: a_a2b9R)
sNegate :: forall (t_a2bck :: a_a2b9R). (SNum a_a2b9R, (Apply NegateSym0 t_a2bck :: a_a2b9R) ~ Apply Negate_6989586621679529395Sym0 t_a2bck) => Sing t_a2bck -> Sing (Apply NegateSym0 t_a2bck :: a_a2b9R)
infixl 6 %+
infixl 6 %-
infixl 7 %*
type family Subtract (a_a2cDV :: a_a2cDR) (a_a2cDW :: a_a2cDR) :: a_a2cDR
sSubtract :: forall a_a2cDR (t_a2cE1 :: a_a2cDR) (t_a2cE2 :: a_a2cDR). SNum a_a2cDR => Sing t_a2cE1 -> Sing t_a2cE2 -> Sing (Apply (Apply SubtractSym0 t_a2cE1) t_a2cE2 :: a_a2cDR)
data (+@#@$) :: forall a6989586621679529343. (~>) a6989586621679529343 ((~>) a6989586621679529343 a6989586621679529343)
infixl 6 +@#@$
data (+@#@$$) (arg6989586621679529362 :: a6989586621679529343) :: (~>) a6989586621679529343 a6989586621679529343
infixl 6 +@#@$$
type (+@#@$$$) (arg6989586621679529362 :: a6989586621679529343) (arg6989586621679529363 :: a6989586621679529343) = (+) arg6989586621679529362 arg6989586621679529363
data (-@#@$) :: forall a6989586621679529343. (~>) a6989586621679529343 ((~>) a6989586621679529343 a6989586621679529343)
infixl 6 -@#@$
data (-@#@$$) (arg6989586621679529366 :: a6989586621679529343) :: (~>) a6989586621679529343 a6989586621679529343
infixl 6 -@#@$$
type (-@#@$$$) (arg6989586621679529366 :: a6989586621679529343) (arg6989586621679529367 :: a6989586621679529343) = (-) arg6989586621679529366 arg6989586621679529367
data (*@#@$) :: forall a6989586621679529343. (~>) a6989586621679529343 ((~>) a6989586621679529343 a6989586621679529343)
infixl 7 *@#@$
data (*@#@$$) (arg6989586621679529370 :: a6989586621679529343) :: (~>) a6989586621679529343 a6989586621679529343
infixl 7 *@#@$$
type (*@#@$$$) (arg6989586621679529370 :: a6989586621679529343) (arg6989586621679529371 :: a6989586621679529343) = (*) arg6989586621679529370 arg6989586621679529371
data NegateSym0 :: forall a6989586621679529343. (~>) a6989586621679529343 a6989586621679529343
type NegateSym1 (arg6989586621679529374 :: a6989586621679529343) = Negate arg6989586621679529374
data AbsSym0 :: forall a6989586621679529343. (~>) a6989586621679529343 a6989586621679529343
type AbsSym1 (arg6989586621679529376 :: a6989586621679529343) = Abs arg6989586621679529376
data SignumSym0 :: forall a6989586621679529343. (~>) a6989586621679529343 a6989586621679529343
type SignumSym1 (arg6989586621679529378 :: a6989586621679529343) = Signum arg6989586621679529378
data FromIntegerSym0 :: forall a6989586621679529343. (~>) Nat a6989586621679529343
type FromIntegerSym1 (arg6989586621679529380 :: Nat) = FromInteger arg6989586621679529380
data SubtractSym0 :: forall a6989586621679535047. (~>) a6989586621679535047 ((~>) a6989586621679535047 a6989586621679535047)
data SubtractSym1 (a6989586621679535051 :: a6989586621679535047) :: (~>) a6989586621679535047 a6989586621679535047
type SubtractSym2 (a6989586621679535051 :: a6989586621679535047) (a6989586621679535052 :: a6989586621679535047) = Subtract a6989586621679535051 a6989586621679535052
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.SubtractSym0
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Num.SubtractSym0
instance forall a6989586621679535047 (a6989586621679535051 :: a6989586621679535047). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.SubtractSym1 a6989586621679535051)
instance forall a (d :: a). (Data.Singletons.Prelude.Num.SNum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Num.SubtractSym1 d)
instance Data.Singletons.Prelude.Num.PNum GHC.Types.Nat
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Num.SNum (Data.Ord.Down a)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Num.+@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Num.SNum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Num.+@#@$$) d)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Num.-@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Num.SNum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Num.-@#@$$) d)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Num.*@#@$)
instance forall a (d :: a). (Data.Singletons.Prelude.Num.SNum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Num.*@#@$$) d)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Num.NegateSym0
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Num.AbsSym0
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Num.SignumSym0
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Num.FromIntegerSym0
instance Data.Singletons.Prelude.Num.SNum GHC.Types.Nat
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.FromInteger_6989586621679529478Sym0
instance Data.Singletons.Prelude.Num.PNum (Data.Ord.Down a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Signum_6989586621679529471Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Abs_6989586621679529464Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679529457Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679529446Sym0
instance forall a6989586621679529343 (a6989586621679529444 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679529446Sym1 a6989586621679529444)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679529434Sym0
instance forall a6989586621679529343 (a6989586621679529432 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679529434Sym1 a6989586621679529432)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679529422Sym0
instance forall a6989586621679529343 (a6989586621679529420 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679529422Sym1 a6989586621679529420)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.*@#@$)
instance forall a6989586621679529343 (arg6989586621679529370 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.*@#@$$) arg6989586621679529370)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.AbsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.SignumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.FromIntegerSym0
instance forall a6989586621679529343 (arg6989586621679529362 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.+@#@$$) arg6989586621679529362)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.+@#@$)
instance forall a6989586621679529343 (arg6989586621679529366 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.-@#@$$) arg6989586621679529366)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.-@#@$)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.NegateSym0
instance forall a6989586621679529343 (a6989586621679529382 :: a6989586621679529343). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679529384Sym1 a6989586621679529382)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679529384Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679529395Sym0
-- | Implements singletonized versions of functions from GHC.Base
-- module.
--
-- 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.Singletons.Prelude.Base
type family Foldr (a_a2foN :: (~>) a_a2flq ((~>) b_a2flr b_a2flr)) (a_a2foO :: b_a2flr) (a_a2foP :: [a_a2flq]) :: b_a2flr
sFoldr :: forall a_a2flq b_a2flr (t_a2fpS :: (~>) a_a2flq ((~>) b_a2flr b_a2flr)) (t_a2fpT :: b_a2flr) (t_a2fpU :: [a_a2flq]). Sing t_a2fpS -> Sing t_a2fpT -> Sing t_a2fpU -> Sing (Apply (Apply (Apply FoldrSym0 t_a2fpS) t_a2fpT) t_a2fpU :: b_a2flr)
type family Map (a_a2foG :: (~>) a_a2flo b_a2flp) (a_a2foH :: [a_a2flo]) :: [b_a2flp]
sMap :: forall a_a2flo b_a2flp (t_a2fpO :: (~>) a_a2flo b_a2flp) (t_a2fpP :: [a_a2flo]). Sing t_a2fpO -> Sing t_a2fpP -> Sing (Apply (Apply MapSym0 t_a2fpO) t_a2fpP :: [b_a2flp])
type family (++) (a_a2foy :: [a_a2fln]) (a_a2foz :: [a_a2fln]) :: [a_a2fln]
infixr 5 ++
(%++) :: forall a_a2fln (t_a2fpK :: [a_a2fln]) (t_a2fpL :: [a_a2fln]). Sing t_a2fpK -> Sing t_a2fpL -> Sing (Apply (Apply (++@#@$) t_a2fpK) t_a2fpL :: [a_a2fln])
infixr 5 %++
type family Otherwise :: Bool
sOtherwise :: Sing (OtherwiseSym0 :: Bool)
type family Id (a_a2fov :: a_a2flm) :: a_a2flm
sId :: forall a_a2flm (t_a2fpI :: a_a2flm). Sing t_a2fpI -> Sing (Apply IdSym0 t_a2fpI :: a_a2flm)
type family Const (a_a2foq :: a_a2flk) (a_a2for :: b_a2fll) :: a_a2flk
sConst :: forall a_a2flk b_a2fll (t_a2fpE :: a_a2flk) (t_a2fpF :: b_a2fll). Sing t_a2fpE -> Sing t_a2fpF -> Sing (Apply (Apply ConstSym0 t_a2fpE) t_a2fpF :: a_a2flk)
type family (.) (a_a2fo7 :: (~>) b_a2flh c_a2fli) (a_a2fo8 :: (~>) a_a2flj b_a2flh) (a_a2fo9 :: a_a2flj) :: c_a2fli
infixr 9 .
(%.) :: forall b_a2flh c_a2fli a_a2flj (t_a2fpy :: (~>) b_a2flh c_a2fli) (t_a2fpz :: (~>) a_a2flj b_a2flh) (t_a2fpA :: a_a2flj). Sing t_a2fpy -> Sing t_a2fpz -> Sing t_a2fpA -> Sing (Apply (Apply (Apply (.@#@$) t_a2fpy) t_a2fpz) t_a2fpA :: c_a2fli)
infixr 9 %.
type family ($) (a_a2fnI :: (~>) a_a2flb b_a2flc) (a_a2fnJ :: a_a2flb) :: b_a2flc
infixr 0 $
type family ($!) (a_a2fnz :: (~>) a_a2fl9 b_a2fla) (a_a2fnA :: a_a2fl9) :: b_a2fla
infixr 0 $!
(%$) :: forall a_a2flb b_a2flc (t_a2fpk :: (~>) a_a2flb b_a2flc) (t_a2fpl :: a_a2flb). Sing t_a2fpk -> Sing t_a2fpl -> Sing (Apply (Apply ($@#@$) t_a2fpk) t_a2fpl :: b_a2flc)
infixr 0 %$
(%$!) :: forall a_a2fl9 b_a2fla (t_a2fpg :: (~>) a_a2fl9 b_a2fla) (t_a2fph :: a_a2fl9). Sing t_a2fpg -> Sing t_a2fph -> Sing (Apply (Apply ($!@#@$) t_a2fpg) t_a2fph :: b_a2fla)
infixr 0 %$!
type family Until (a_a2fn9 :: (~>) a_a2fl8 Bool) (a_a2fna :: (~>) a_a2fl8 a_a2fl8) (a_a2fnb :: a_a2fl8) :: a_a2fl8
sUntil :: forall a_a2fl8 (t_a2fpa :: (~>) a_a2fl8 Bool) (t_a2fpb :: (~>) a_a2fl8 a_a2fl8) (t_a2fpc :: a_a2fl8). Sing t_a2fpa -> Sing t_a2fpb -> Sing t_a2fpc -> Sing (Apply (Apply (Apply UntilSym0 t_a2fpa) t_a2fpb) t_a2fpc :: a_a2fl8)
type family Flip (a_a2fnY :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (a_a2fnZ :: b_a2flf) (a_a2fo0 :: a_a2fle) :: c_a2flg
sFlip :: forall a_a2fle b_a2flf c_a2flg (t_a2fps :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (t_a2fpt :: b_a2flf) (t_a2fpu :: a_a2fle). Sing t_a2fps -> Sing t_a2fpt -> Sing t_a2fpu -> Sing (Apply (Apply (Apply FlipSym0 t_a2fps) t_a2fpt) t_a2fpu :: c_a2flg)
type family AsTypeOf (a_a2fnS :: a_a2fld) (a_a2fnT :: a_a2fld) :: a_a2fld
sAsTypeOf :: forall a_a2fld (t_a2fpo :: a_a2fld) (t_a2fpp :: a_a2fld). Sing t_a2fpo -> Sing t_a2fpp -> Sing (Apply (Apply AsTypeOfSym0 t_a2fpo) t_a2fpp :: a_a2fld)
type family Seq (a_a2fn4 :: a_a2fl6) (a_a2fn5 :: b_a2fl7) :: b_a2fl7
infixr 0 `Seq`
sSeq :: forall a_a2fl6 b_a2fl7 (t_a2fp6 :: a_a2fl6) (t_a2fp7 :: b_a2fl7). Sing t_a2fp6 -> Sing t_a2fp7 -> Sing (Apply (Apply SeqSym0 t_a2fp6) t_a2fp7 :: b_a2fl7)
infixr 0 `sSeq`
data FoldrSym0 :: forall a6989586621679545436 b6989586621679545437. (~>) ((~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) ((~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437))
data FoldrSym1 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) :: (~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437)
data FoldrSym2 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) :: (~>) [a6989586621679545436] b6989586621679545437
type FoldrSym3 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) (a6989586621679545647 :: [a6989586621679545436]) = Foldr a6989586621679545645 a6989586621679545646 a6989586621679545647
data MapSym0 :: forall a6989586621679545434 b6989586621679545435. (~>) ((~>) a6989586621679545434 b6989586621679545435) ((~>) [a6989586621679545434] [b6989586621679545435])
data MapSym1 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) :: (~>) [a6989586621679545434] [b6989586621679545435]
type MapSym2 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) (a6989586621679545639 :: [a6989586621679545434]) = Map a6989586621679545638 a6989586621679545639
data (++@#@$) :: forall a6989586621679545433. (~>) [a6989586621679545433] ((~>) [a6989586621679545433] [a6989586621679545433])
infixr 5 ++@#@$
data (++@#@$$) (a6989586621679545630 :: [a6989586621679545433]) :: (~>) [a6989586621679545433] [a6989586621679545433]
infixr 5 ++@#@$$
type (++@#@$$$) (a6989586621679545630 :: [a6989586621679545433]) (a6989586621679545631 :: [a6989586621679545433]) = (++) a6989586621679545630 a6989586621679545631
type OtherwiseSym0 = Otherwise
data IdSym0 :: forall a6989586621679545432. (~>) a6989586621679545432 a6989586621679545432
type IdSym1 (a6989586621679545627 :: a6989586621679545432) = Id a6989586621679545627
data ConstSym0 :: forall a6989586621679545430 b6989586621679545431. (~>) a6989586621679545430 ((~>) b6989586621679545431 a6989586621679545430)
data ConstSym1 (a6989586621679545622 :: a6989586621679545430) :: forall b6989586621679545431. (~>) b6989586621679545431 a6989586621679545430
type ConstSym2 (a6989586621679545622 :: a6989586621679545430) (a6989586621679545623 :: b6989586621679545431) = Const a6989586621679545622 a6989586621679545623
data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428))
infixr 9 .@#@$
data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)
infixr 9 .@#@$$
data (.@#@$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428
infixr 9 .@#@$$$
type (.@#@$$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) (a6989586621679545605 :: a6989586621679545429) = (.) a6989586621679545603 a6989586621679545604 a6989586621679545605
data ($@#@$) :: forall a6989586621679545421 b6989586621679545422. (~>) ((~>) a6989586621679545421 b6989586621679545422) ((~>) a6989586621679545421 b6989586621679545422)
infixr 0 $@#@$
data ($@#@$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) :: (~>) a6989586621679545421 b6989586621679545422
infixr 0 $@#@$$
type ($@#@$$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) (a6989586621679545579 :: a6989586621679545421) = ($) a6989586621679545578 a6989586621679545579
data ($!@#@$) :: forall a6989586621679545419 b6989586621679545420. (~>) ((~>) a6989586621679545419 b6989586621679545420) ((~>) a6989586621679545419 b6989586621679545420)
infixr 0 $!@#@$
data ($!@#@$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) :: (~>) a6989586621679545419 b6989586621679545420
infixr 0 $!@#@$$
type ($!@#@$$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) (a6989586621679545570 :: a6989586621679545419) = ($!) a6989586621679545569 a6989586621679545570
data UntilSym0 :: forall a6989586621679545418. (~>) ((~>) a6989586621679545418 Bool) ((~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418))
data UntilSym1 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) :: (~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418)
data UntilSym2 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) :: (~>) a6989586621679545418 a6989586621679545418
type UntilSym3 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) (a6989586621679545545 :: a6989586621679545418) = Until a6989586621679545543 a6989586621679545544 a6989586621679545545
data FlipSym0 :: forall a6989586621679545424 b6989586621679545425 c6989586621679545426. (~>) ((~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) ((~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426))
data FlipSym1 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) :: (~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426)
data FlipSym2 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) :: (~>) a6989586621679545424 c6989586621679545426
type FlipSym3 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) (a6989586621679545596 :: a6989586621679545424) = Flip a6989586621679545594 a6989586621679545595 a6989586621679545596
data AsTypeOfSym0 :: forall a6989586621679545423. (~>) a6989586621679545423 ((~>) a6989586621679545423 a6989586621679545423)
data AsTypeOfSym1 (a6989586621679545588 :: a6989586621679545423) :: (~>) a6989586621679545423 a6989586621679545423
type AsTypeOfSym2 (a6989586621679545588 :: a6989586621679545423) (a6989586621679545589 :: a6989586621679545423) = AsTypeOf a6989586621679545588 a6989586621679545589
data SeqSym0 :: forall a6989586621679545416 b6989586621679545417. (~>) a6989586621679545416 ((~>) b6989586621679545417 b6989586621679545417)
infixr 0 `SeqSym0`
data SeqSym1 (a6989586621679545538 :: a6989586621679545416) :: forall b6989586621679545417. (~>) b6989586621679545417 b6989586621679545417
infixr 0 `SeqSym1`
type SeqSym2 (a6989586621679545538 :: a6989586621679545416) (a6989586621679545539 :: b6989586621679545417) = Seq a6989586621679545538 a6989586621679545539
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.FoldrSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.FoldrSym0
instance forall a6989586621679545436 b6989586621679545437 (a6989586621679545645 :: a6989586621679545436 Data.Singletons.Internal.~> (b6989586621679545437 Data.Singletons.Internal.~> b6989586621679545437)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym1 a6989586621679545645)
instance forall a b (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.FoldrSym1 d)
instance forall a6989586621679545436 b6989586621679545437 (a6989586621679545646 :: a6989586621679545436 Data.Singletons.Internal.~> (b6989586621679545437 Data.Singletons.Internal.~> b6989586621679545437)) (a6989586621679545645 :: b6989586621679545437). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym2 a6989586621679545646 a6989586621679545645)
instance forall a b (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.FoldrSym2 d1 d2)
instance forall a6989586621679545434 b6989586621679545435 (a6989586621679545638 :: a6989586621679545434 Data.Singletons.Internal.~> b6989586621679545435). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.MapSym1 a6989586621679545638)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.MapSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.MapSym0
instance forall a b (d :: a Data.Singletons.Internal.~> b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.MapSym1 d)
instance forall a6989586621679545433 (a6989586621679545630 :: [a6989586621679545433]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.++@#@$$) a6989586621679545630)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.++@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.++@#@$)
instance forall a (d :: [a]). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Base.++@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.IdSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.IdSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.AsTypeOfSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.AsTypeOfSym0
instance forall a6989586621679545423 (a6989586621679545588 :: a6989586621679545423). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.AsTypeOfSym1 a6989586621679545588)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.AsTypeOfSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.ConstSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.ConstSym0
instance forall a6989586621679545430 b6989586621679545431 (a6989586621679545622 :: a6989586621679545430). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.ConstSym1 a6989586621679545622)
instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.ConstSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base..@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base..@#@$)
instance forall b6989586621679545427 c6989586621679545428 a6989586621679545429 (a6989586621679545603 :: b6989586621679545427 Data.Singletons.Internal.~> c6989586621679545428). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base..@#@$$) a6989586621679545603)
instance forall b c a (d :: b Data.Singletons.Internal.~> c). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Base..@#@$$) d)
instance forall b6989586621679545427 c6989586621679545428 a6989586621679545429 (a6989586621679545604 :: b6989586621679545427 Data.Singletons.Internal.~> c6989586621679545428) (a6989586621679545603 :: a6989586621679545429 Data.Singletons.Internal.~> b6989586621679545427). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621679545604 Data.Singletons.Prelude.Base..@#@$$$ a6989586621679545603)
instance forall b c a (d1 :: b Data.Singletons.Internal.~> c) (d2 :: a Data.Singletons.Internal.~> b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (d1 Data.Singletons.Prelude.Base..@#@$$$ d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.FlipSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.FlipSym0
instance forall a6989586621679545424 b6989586621679545425 c6989586621679545426 (a6989586621679545594 :: a6989586621679545424 Data.Singletons.Internal.~> (b6989586621679545425 Data.Singletons.Internal.~> c6989586621679545426)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym1 a6989586621679545594)
instance forall a b c (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.FlipSym1 d)
instance forall a6989586621679545424 b6989586621679545425 c6989586621679545426 (a6989586621679545595 :: a6989586621679545424 Data.Singletons.Internal.~> (b6989586621679545425 Data.Singletons.Internal.~> c6989586621679545426)) (a6989586621679545594 :: b6989586621679545425). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym2 a6989586621679545595 a6989586621679545594)
instance forall a b c (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)) (d2 :: b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.FlipSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.$@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.$@#@$)
instance forall a6989586621679545421 b6989586621679545422 (a6989586621679545578 :: a6989586621679545421 Data.Singletons.Internal.~> b6989586621679545422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$@#@$$) a6989586621679545578)
instance forall a b (d :: a Data.Singletons.Internal.~> b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Base.$@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.$!@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.$!@#@$)
instance forall a6989586621679545419 b6989586621679545420 (a6989586621679545569 :: a6989586621679545419 Data.Singletons.Internal.~> b6989586621679545420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$!@#@$$) a6989586621679545569)
instance forall a b (d :: a Data.Singletons.Internal.~> b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Base.$!@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.UntilSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.UntilSym0
instance forall a6989586621679545418 (a6989586621679545543 :: a6989586621679545418 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym1 a6989586621679545543)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.UntilSym1 d)
instance forall a6989586621679545418 (a6989586621679545544 :: a6989586621679545418 Data.Singletons.Internal.~> GHC.Types.Bool) (a6989586621679545543 :: a6989586621679545418 Data.Singletons.Internal.~> a6989586621679545418). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym2 a6989586621679545544 a6989586621679545543)
instance forall a (d1 :: a Data.Singletons.Internal.~> GHC.Types.Bool) (d2 :: a Data.Singletons.Internal.~> a). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.UntilSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.SeqSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.SeqSym0
instance forall a6989586621679545416 b6989586621679545417 (a6989586621679545538 :: a6989586621679545416). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.SeqSym1 a6989586621679545538)
instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Base.SeqSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679545656GoSym0
instance forall k1 k2 k3 (k6989586621679545653 :: k1 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545656GoSym1 k6989586621679545653)
instance forall k1 k2 k3 (z6989586621679545654 :: k1 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k2)) (k6989586621679545653 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545656GoSym2 z6989586621679545654 k6989586621679545653)
instance forall k1 k2 k3 (a_69895866216795456516989586621679545655 :: k1 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k2)) (z6989586621679545654 :: k2) (k6989586621679545653 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545656GoSym3 a_69895866216795456516989586621679545655 z6989586621679545654 k6989586621679545653)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Lambda_6989586621679545614Sym0
instance forall k2 k3 k4 k5 (f6989586621679545611 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679545614Sym1 f6989586621679545611)
instance forall k2 k3 k4 k5 (g6989586621679545612 :: k2 Data.Singletons.Internal.~> k3) (f6989586621679545611 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679545614Sym2 g6989586621679545612 f6989586621679545611)
instance forall k2 k3 k4 k5 (a_69895866216795456096989586621679545613 :: k2 Data.Singletons.Internal.~> k3) (g6989586621679545612 :: k4 Data.Singletons.Internal.~> k2) (f6989586621679545611 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679545614Sym3 a_69895866216795456096989586621679545613 g6989586621679545612 f6989586621679545611)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679545575VxSym0
instance forall k1 k2 (f6989586621679545573 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545575VxSym1 f6989586621679545573)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679545554GoSym0
instance forall k1 k2 (p6989586621679545551 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545554GoSym1 p6989586621679545551)
instance forall k1 k2 (f6989586621679545552 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621679545551 :: k1 Data.Singletons.Internal.~> k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545554GoSym2 f6989586621679545552 p6989586621679545551)
instance forall k1 k2 (a_69895866216795455496989586621679545553 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool) (f6989586621679545552 :: k1 Data.Singletons.Internal.~> k1) (p6989586621679545551 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545554GoSym3 a_69895866216795455496989586621679545553 f6989586621679545552 p6989586621679545551)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679545561Scrutinee_6989586621679545480Sym0
instance forall k1 k2 k3 k4 (x6989586621679545560 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545561Scrutinee_6989586621679545480Sym1 x6989586621679545560)
instance forall k1 k2 k3 k4 (p6989586621679545551 :: k1) (x6989586621679545560 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545561Scrutinee_6989586621679545480Sym2 p6989586621679545551 x6989586621679545560)
instance forall k1 k2 k3 k4 (f6989586621679545552 :: k1) (p6989586621679545551 :: k1 Data.Singletons.Internal.~> k2) (x6989586621679545560 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679545561Scrutinee_6989586621679545480Sym3 f6989586621679545552 p6989586621679545551 x6989586621679545560)
-- | Defines the promoted and singled versions of the MonadFail type
-- class.
module Data.Singletons.Prelude.Monad.Fail
class PMonadFail (m_a33FZ :: Type -> Type) where {
type family Fail (arg_a33Gj :: [Char]) :: m_a33FZ a_a33G0;
}
class SMonad m_a33FZ => SMonadFail (m_a33FZ :: Type -> Type)
sFail :: forall a_a33G0 (t_a33Gx :: [Char]). SMonadFail m_a33FZ => Sing t_a33Gx -> Sing (Apply FailSym0 t_a33Gx :: m_a33FZ a_a33G0)
data FailSym0 :: forall m6989586621679738911 a6989586621679738912. (~>) [Char] (m6989586621679738911 a6989586621679738912)
type FailSym1 (arg6989586621679738931 :: [Char]) = Fail arg6989586621679738931
instance Data.Singletons.Prelude.Monad.Fail.SMonadFail GHC.Maybe.Maybe
instance Data.Singletons.Prelude.Monad.Fail.SMonadFail []
instance Data.Singletons.Prelude.Monad.Fail.SMonadFail m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.Fail.FailSym0
instance forall k (m6989586621679738911 :: k -> *) (a6989586621679738912 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Fail.Fail_6989586621679738940Sym0
instance Data.Singletons.Prelude.Monad.Fail.PMonadFail []
instance forall k (m6989586621679738911 :: k -> *) (a6989586621679738912 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Fail.Fail_6989586621679738934Sym0
instance Data.Singletons.Prelude.Monad.Fail.PMonadFail GHC.Maybe.Maybe
instance forall k (m6989586621679738911 :: k -> *) (a6989586621679738912 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Fail.FailSym0
-- | Defines the promoted and singled versions of the Functor type
-- class.
module Data.Singletons.Prelude.Functor
class PFunctor (f_a2lWP :: Type -> Type) where {
type family Fmap (arg_a2m39 :: (~>) a_a2lWQ b_a2lWR) (arg_a2m3a :: f_a2lWP a_a2lWQ) :: f_a2lWP b_a2lWR;
type family (<$) (arg_a2m3d :: a_a2lWS) (arg_a2m3e :: f_a2lWP b_a2lWT) :: f_a2lWP a_a2lWS;
type (<$) a_a2m3h a_a2m3i = Apply (Apply TFHelper_6989586621679571221Sym0 a_a2m3h) a_a2m3i;
}
infixl 4 <$
class SFunctor (f_a2lWP :: Type -> Type)
sFmap :: forall a_a2lWQ b_a2lWR (t_a2m7r :: (~>) a_a2lWQ b_a2lWR) (t_a2m7s :: f_a2lWP a_a2lWQ). SFunctor f_a2lWP => Sing t_a2m7r -> Sing t_a2m7s -> Sing (Apply (Apply FmapSym0 t_a2m7r) t_a2m7s :: f_a2lWP b_a2lWR)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). SFunctor f_a2lWP => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). (SFunctor f_a2lWP, (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS) ~ Apply (Apply TFHelper_6989586621679571221Sym0 t_a2m7v) t_a2m7w) => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
infixl 4 %<$
type family ($>) (a_a34eF :: f_a34dv a_a34dw) (a_a34eG :: b_a34dx) :: f_a34dv b_a34dx
infixl 4 $>
(%$>) :: forall f_a34dv a_a34dw b_a34dx (t_a34gm :: f_a34dv a_a34dw) (t_a34gn :: b_a34dx). SFunctor f_a34dv => Sing t_a34gm -> Sing t_a34gn -> Sing (Apply (Apply ($>@#@$) t_a34gm) t_a34gn :: f_a34dv b_a34dx)
infixl 4 %$>
type family (<$>) (a_a34eV :: (~>) a_a34dC b_a34dD) (a_a34eW :: f_a34dB a_a34dC) :: f_a34dB b_a34dD
infixl 4 <$>
(%<$>) :: forall a_a34dC b_a34dD f_a34dB (t_a34gu :: (~>) a_a34dC b_a34dD) (t_a34gv :: f_a34dB a_a34dC). SFunctor f_a34dB => Sing t_a34gu -> Sing t_a34gv -> Sing (Apply (Apply (<$>@#@$) t_a34gu) t_a34gv :: f_a34dB b_a34dD)
infixl 4 %<$>
type family (<&>) (a_a34eL :: f_a34dy a_a34dz) (a_a34eM :: (~>) a_a34dz b_a34dA) :: f_a34dy b_a34dA
infixl 1 <&>
(%<&>) :: forall f_a34dy a_a34dz b_a34dA (t_a34gq :: f_a34dy a_a34dz) (t_a34gr :: (~>) a_a34dz b_a34dA). SFunctor f_a34dy => Sing t_a34gq -> Sing t_a34gr -> Sing (Apply (Apply (<&>@#@$) t_a34gq) t_a34gr :: f_a34dy b_a34dA)
infixl 1 %<&>
type family Void (a_a34ey :: f_a34dt a_a34du) :: f_a34dt ()
sVoid :: forall f_a34dt a_a34du (t_a34gk :: f_a34dt a_a34du). SFunctor f_a34dt => Sing t_a34gk -> Sing (Apply VoidSym0 t_a34gk :: f_a34dt ())
data FmapSym0 :: forall a6989586621679570820 b6989586621679570821 f6989586621679570819. (~>) ((~>) a6989586621679570820 b6989586621679570821) ((~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821))
data FmapSym1 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) :: forall f6989586621679570819. (~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821)
type FmapSym2 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) (arg6989586621679571212 :: f6989586621679570819 a6989586621679570820) = Fmap arg6989586621679571211 arg6989586621679571212
data (<$@#@$) :: forall a6989586621679570822 f6989586621679570819 b6989586621679570823. (~>) a6989586621679570822 ((~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822))
infixl 4 <$@#@$
data (<$@#@$$) (arg6989586621679571215 :: a6989586621679570822) :: forall f6989586621679570819 b6989586621679570823. (~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822)
infixl 4 <$@#@$$
type (<$@#@$$$) (arg6989586621679571215 :: a6989586621679570822) (arg6989586621679571216 :: f6989586621679570819 b6989586621679570823) = (<$) arg6989586621679571215 arg6989586621679571216
data ($>@#@$) :: forall f6989586621679740989 a6989586621679740990 b6989586621679740991. (~>) (f6989586621679740989 a6989586621679740990) ((~>) b6989586621679740991 (f6989586621679740989 b6989586621679740991))
infixl 4 $>@#@$
data ($>@#@$$) (a6989586621679741061 :: f6989586621679740989 a6989586621679740990) :: forall b6989586621679740991. (~>) b6989586621679740991 (f6989586621679740989 b6989586621679740991)
infixl 4 $>@#@$$
type ($>@#@$$$) (a6989586621679741061 :: f6989586621679740989 a6989586621679740990) (a6989586621679741062 :: b6989586621679740991) = ($>) a6989586621679741061 a6989586621679741062
data (<$>@#@$) :: forall a6989586621679740996 b6989586621679740997 f6989586621679740995. (~>) ((~>) a6989586621679740996 b6989586621679740997) ((~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997))
infixl 4 <$>@#@$
data (<$>@#@$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) :: forall f6989586621679740995. (~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997)
infixl 4 <$>@#@$$
type (<$>@#@$$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) (a6989586621679741078 :: f6989586621679740995 a6989586621679740996) = (<$>) a6989586621679741077 a6989586621679741078
data (<&>@#@$) :: forall f6989586621679740992 a6989586621679740993 b6989586621679740994. (~>) (f6989586621679740992 a6989586621679740993) ((~>) ((~>) a6989586621679740993 b6989586621679740994) (f6989586621679740992 b6989586621679740994))
infixl 1 <&>@#@$
data (<&>@#@$$) (a6989586621679741067 :: f6989586621679740992 a6989586621679740993) :: forall b6989586621679740994. (~>) ((~>) a6989586621679740993 b6989586621679740994) (f6989586621679740992 b6989586621679740994)
infixl 1 <&>@#@$$
type (<&>@#@$$$) (a6989586621679741067 :: f6989586621679740992 a6989586621679740993) (a6989586621679741068 :: (~>) a6989586621679740993 b6989586621679740994) = (<&>) a6989586621679741067 a6989586621679741068
data VoidSym0 :: forall f6989586621679740987 a6989586621679740988. (~>) (f6989586621679740987 a6989586621679740988) (f6989586621679740987 ())
type VoidSym1 (a6989586621679741054 :: f6989586621679740987 a6989586621679740988) = Void a6989586621679741054
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679741147Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Ord.Down
instance forall a6989586621679570822 b6989586621679570823 (a6989586621679741145 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679741147Sym1 a6989586621679741145)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679741155Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Ord.Down
instance forall k1 k2 k3 (_z_69895866216797410466989586621679741153 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741155Sym1 _z_69895866216797410466989586621679741153)
instance forall k1 k2 k3 (a_69895866216797410526989586621679741154 :: k1) (_z_69895866216797410466989586621679741153 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741155Sym2 a_69895866216797410526989586621679741154 _z_69895866216797410466989586621679741153)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679741135Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621679741133 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679741135Sym1 a6989586621679741133)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679741106Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor ((,) a)
instance forall a6989586621679570822 a6989586621679741005 b6989586621679570823 (a6989586621679741104 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679741106Sym1 a6989586621679741104)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679741123Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor ((,) a)
instance forall k1 k2 k3 k4 (_z_69895866216797410256989586621679741112 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741123Sym1 _z_69895866216797410256989586621679741112)
instance forall k1 k2 k3 k4 (a_69895866216797410376989586621679741113 :: k1) (_z_69895866216797410256989586621679741112 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741123Sym2 a_69895866216797410376989586621679741113 _z_69895866216797410256989586621679741112)
instance forall k1 k2 k3 k4 (a_69895866216797410396989586621679741114 :: k1) (a_69895866216797410376989586621679741113 :: k2) (_z_69895866216797410256989586621679741112 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741123Sym3 a_69895866216797410396989586621679741114 a_69895866216797410376989586621679741113 _z_69895866216797410256989586621679741112)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679741115Sym0
instance forall k1 k2 k3 k4 (_z_69895866216797410256989586621679741112 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741115Sym1 _z_69895866216797410256989586621679741112)
instance forall k1 k2 k3 k4 (a_69895866216797410376989586621679741113 :: k1) (_z_69895866216797410256989586621679741112 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741115Sym2 a_69895866216797410376989586621679741113 _z_69895866216797410256989586621679741112)
instance forall k1 k2 k3 k4 (a_69895866216797410396989586621679741114 :: k1) (a_69895866216797410376989586621679741113 :: k2) (_z_69895866216797410256989586621679741112 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741115Sym3 a_69895866216797410396989586621679741114 a_69895866216797410376989586621679741113 _z_69895866216797410256989586621679741112)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679741085Sym0
instance forall a6989586621679570820 b6989586621679570821 a6989586621679741005 (a6989586621679741083 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679741085Sym1 a6989586621679741083)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679741094Sym0
instance forall k1 k2 k3 k4 (_f_69895866216797410236989586621679741091 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741094Sym1 _f_69895866216797410236989586621679741091)
instance forall k1 k2 k3 k4 (a_69895866216797410296989586621679741092 :: k1) (_f_69895866216797410236989586621679741091 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741094Sym2 a_69895866216797410296989586621679741092 _f_69895866216797410236989586621679741091)
instance forall k1 k2 k3 k4 (a_69895866216797410316989586621679741093 :: k1) (a_69895866216797410296989586621679741092 :: k2) (_f_69895866216797410236989586621679741091 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679741094Sym3 a_69895866216797410316989586621679741093 a_69895866216797410296989586621679741092 _f_69895866216797410236989586621679741091)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.<&>@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SFunctor f => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Functor.<&>@#@$)
instance forall (f6989586621679740992 :: * -> *) a6989586621679740993 b6989586621679740994 (a6989586621679741067 :: f6989586621679740992 a6989586621679740993). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<&>@#@$$) a6989586621679741067)
instance forall (f :: * -> *) a b (d :: f a). (Data.Singletons.Prelude.Monad.Internal.SFunctor f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Functor.<&>@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.<$>@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SFunctor f => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Functor.<$>@#@$)
instance forall a6989586621679740996 b6989586621679740997 (f6989586621679740995 :: * -> *) (a6989586621679741077 :: a6989586621679740996 Data.Singletons.Internal.~> b6989586621679740997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<$>@#@$$) a6989586621679741077)
instance forall a b (f :: * -> *) (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Monad.Internal.SFunctor f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Functor.<$>@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.$>@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SFunctor f => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Functor.$>@#@$)
instance forall (f6989586621679740989 :: * -> *) a6989586621679740990 b6989586621679740991 (a6989586621679741061 :: f6989586621679740989 a6989586621679740990). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.$>@#@$$) a6989586621679741061)
instance forall (f :: * -> *) a b (d :: f a). (Data.Singletons.Prelude.Monad.Internal.SFunctor f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Functor.$>@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.VoidSym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor f => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Functor.VoidSym0
-- | 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.Singletons.Prelude.Function
type family Id (a_a2fov :: a_a2flm) :: a_a2flm
sId :: forall a_a2flm (t_a2fpI :: a_a2flm). Sing t_a2fpI -> Sing (Apply IdSym0 t_a2fpI :: a_a2flm)
type family Const (a_a2foq :: a_a2flk) (a_a2for :: b_a2fll) :: a_a2flk
sConst :: forall a_a2flk b_a2fll (t_a2fpE :: a_a2flk) (t_a2fpF :: b_a2fll). Sing t_a2fpE -> Sing t_a2fpF -> Sing (Apply (Apply ConstSym0 t_a2fpE) t_a2fpF :: a_a2flk)
type family (.) (a_a2fo7 :: (~>) b_a2flh c_a2fli) (a_a2fo8 :: (~>) a_a2flj b_a2flh) (a_a2fo9 :: a_a2flj) :: c_a2fli
infixr 9 .
(%.) :: forall b_a2flh c_a2fli a_a2flj (t_a2fpy :: (~>) b_a2flh c_a2fli) (t_a2fpz :: (~>) a_a2flj b_a2flh) (t_a2fpA :: a_a2flj). Sing t_a2fpy -> Sing t_a2fpz -> Sing t_a2fpA -> Sing (Apply (Apply (Apply (.@#@$) t_a2fpy) t_a2fpz) t_a2fpA :: c_a2fli)
infixr 9 %.
type family Flip (a_a2fnY :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (a_a2fnZ :: b_a2flf) (a_a2fo0 :: a_a2fle) :: c_a2flg
sFlip :: forall a_a2fle b_a2flf c_a2flg (t_a2fps :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (t_a2fpt :: b_a2flf) (t_a2fpu :: a_a2fle). Sing t_a2fps -> Sing t_a2fpt -> Sing t_a2fpu -> Sing (Apply (Apply (Apply FlipSym0 t_a2fps) t_a2fpt) t_a2fpu :: c_a2flg)
type family ($) (a_a2fnI :: (~>) a_a2flb b_a2flc) (a_a2fnJ :: a_a2flb) :: b_a2flc
infixr 0 $
(%$) :: forall a_a2flb b_a2flc (t_a2fpk :: (~>) a_a2flb b_a2flc) (t_a2fpl :: a_a2flb). Sing t_a2fpk -> Sing t_a2fpl -> Sing (Apply (Apply ($@#@$) t_a2fpk) t_a2fpl :: b_a2flc)
infixr 0 %$
type family (&) (a_a38gM :: a_a38gz) (a_a38gN :: (~>) a_a38gz b_a38gA) :: b_a38gA
infixl 1 &
(%&) :: forall a_a38gz b_a38gA (t_a38hk :: a_a38gz) (t_a38hl :: (~>) a_a38gz b_a38gA). Sing t_a38hk -> Sing t_a38hl -> Sing (Apply (Apply (&@#@$) t_a38hk) t_a38hl :: b_a38gA)
infixl 1 %&
type family On (a_a38gS :: (~>) b_a38gB ((~>) b_a38gB c_a38gC)) (a_a38gT :: (~>) a_a38gD b_a38gB) (a_a38gU :: a_a38gD) (a_a38gV :: a_a38gD) :: c_a38gC
infixl 0 `On`
sOn :: forall b_a38gB c_a38gC a_a38gD (t_a38ho :: (~>) b_a38gB ((~>) b_a38gB c_a38gC)) (t_a38hp :: (~>) a_a38gD b_a38gB) (t_a38hq :: a_a38gD) (t_a38hr :: a_a38gD). Sing t_a38ho -> Sing t_a38hp -> Sing t_a38hq -> Sing t_a38hr -> Sing (Apply (Apply (Apply (Apply OnSym0 t_a38ho) t_a38hp) t_a38hq) t_a38hr :: c_a38gC)
infixl 0 `sOn`
data IdSym0 :: forall a6989586621679545432. (~>) a6989586621679545432 a6989586621679545432
type IdSym1 (a6989586621679545627 :: a6989586621679545432) = Id a6989586621679545627
data ConstSym0 :: forall a6989586621679545430 b6989586621679545431. (~>) a6989586621679545430 ((~>) b6989586621679545431 a6989586621679545430)
data ConstSym1 (a6989586621679545622 :: a6989586621679545430) :: forall b6989586621679545431. (~>) b6989586621679545431 a6989586621679545430
type ConstSym2 (a6989586621679545622 :: a6989586621679545430) (a6989586621679545623 :: b6989586621679545431) = Const a6989586621679545622 a6989586621679545623
data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428))
infixr 9 .@#@$
data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)
infixr 9 .@#@$$
data (.@#@$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428
infixr 9 .@#@$$$
type (.@#@$$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) (a6989586621679545605 :: a6989586621679545429) = (.) a6989586621679545603 a6989586621679545604 a6989586621679545605
data FlipSym0 :: forall a6989586621679545424 b6989586621679545425 c6989586621679545426. (~>) ((~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) ((~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426))
data FlipSym1 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) :: (~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426)
data FlipSym2 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) :: (~>) a6989586621679545424 c6989586621679545426
type FlipSym3 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) (a6989586621679545596 :: a6989586621679545424) = Flip a6989586621679545594 a6989586621679545595 a6989586621679545596
data ($@#@$) :: forall a6989586621679545421 b6989586621679545422. (~>) ((~>) a6989586621679545421 b6989586621679545422) ((~>) a6989586621679545421 b6989586621679545422)
infixr 0 $@#@$
data ($@#@$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) :: (~>) a6989586621679545421 b6989586621679545422
infixr 0 $@#@$$
type ($@#@$$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) (a6989586621679545579 :: a6989586621679545421) = ($) a6989586621679545578 a6989586621679545579
data (&@#@$) :: forall a6989586621679756555 b6989586621679756556. (~>) a6989586621679756555 ((~>) ((~>) a6989586621679756555 b6989586621679756556) b6989586621679756556)
infixl 1 &@#@$
data (&@#@$$) (a6989586621679756568 :: a6989586621679756555) :: forall b6989586621679756556. (~>) ((~>) a6989586621679756555 b6989586621679756556) b6989586621679756556
infixl 1 &@#@$$
type (&@#@$$$) (a6989586621679756568 :: a6989586621679756555) (a6989586621679756569 :: (~>) a6989586621679756555 b6989586621679756556) = (&) a6989586621679756568 a6989586621679756569
data OnSym0 :: forall b6989586621679756557 c6989586621679756558 a6989586621679756559. (~>) ((~>) b6989586621679756557 ((~>) b6989586621679756557 c6989586621679756558)) ((~>) ((~>) a6989586621679756559 b6989586621679756557) ((~>) a6989586621679756559 ((~>) a6989586621679756559 c6989586621679756558)))
infixl 0 `OnSym0`
data OnSym1 (a6989586621679756574 :: (~>) b6989586621679756557 ((~>) b6989586621679756557 c6989586621679756558)) :: forall a6989586621679756559. (~>) ((~>) a6989586621679756559 b6989586621679756557) ((~>) a6989586621679756559 ((~>) a6989586621679756559 c6989586621679756558))
infixl 0 `OnSym1`
data OnSym2 (a6989586621679756574 :: (~>) b6989586621679756557 ((~>) b6989586621679756557 c6989586621679756558)) (a6989586621679756575 :: (~>) a6989586621679756559 b6989586621679756557) :: (~>) a6989586621679756559 ((~>) a6989586621679756559 c6989586621679756558)
infixl 0 `OnSym2`
data OnSym3 (a6989586621679756574 :: (~>) b6989586621679756557 ((~>) b6989586621679756557 c6989586621679756558)) (a6989586621679756575 :: (~>) a6989586621679756559 b6989586621679756557) (a6989586621679756576 :: a6989586621679756559) :: (~>) a6989586621679756559 c6989586621679756558
infixl 0 `OnSym3`
type OnSym4 (a6989586621679756574 :: (~>) b6989586621679756557 ((~>) b6989586621679756557 c6989586621679756558)) (a6989586621679756575 :: (~>) a6989586621679756559 b6989586621679756557) (a6989586621679756576 :: a6989586621679756559) (a6989586621679756577 :: a6989586621679756559) = On a6989586621679756574 a6989586621679756575 a6989586621679756576 a6989586621679756577
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Function.OnSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Function.OnSym0
instance forall b6989586621679756557 c6989586621679756558 a6989586621679756559 (a6989586621679756574 :: b6989586621679756557 Data.Singletons.Internal.~> (b6989586621679756557 Data.Singletons.Internal.~> c6989586621679756558)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym1 a6989586621679756574)
instance forall b c a (d :: b Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Function.OnSym1 d)
instance forall b6989586621679756557 c6989586621679756558 a6989586621679756559 (a6989586621679756575 :: b6989586621679756557 Data.Singletons.Internal.~> (b6989586621679756557 Data.Singletons.Internal.~> c6989586621679756558)) (a6989586621679756574 :: a6989586621679756559 Data.Singletons.Internal.~> b6989586621679756557). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym2 a6989586621679756575 a6989586621679756574)
instance forall b c a (d1 :: b Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)) (d2 :: a Data.Singletons.Internal.~> b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Function.OnSym2 d1 d2)
instance forall b6989586621679756557 c6989586621679756558 a6989586621679756559 (a6989586621679756576 :: b6989586621679756557 Data.Singletons.Internal.~> (b6989586621679756557 Data.Singletons.Internal.~> c6989586621679756558)) (a6989586621679756575 :: a6989586621679756559 Data.Singletons.Internal.~> b6989586621679756557) (a6989586621679756574 :: a6989586621679756559). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym3 a6989586621679756576 a6989586621679756575 a6989586621679756574)
instance forall b c a (d1 :: b Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)) (d2 :: a Data.Singletons.Internal.~> b) (d3 :: a). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2, Data.Singletons.Internal.SingI d3) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Function.OnSym3 d1 d2 d3)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.&@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Function.&@#@$)
instance forall a6989586621679756555 b6989586621679756556 (a6989586621679756568 :: a6989586621679756555). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Function.&@#@$$) a6989586621679756568)
instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Function.&@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym0
instance forall k2 k3 k4 k5 k6 (ty6989586621679756586 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym1 ty6989586621679756586)
instance forall k2 k3 k4 k5 k6 (f6989586621679756587 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (ty6989586621679756586 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym2 f6989586621679756587 ty6989586621679756586)
instance forall k2 k3 k4 k5 k6 (a_69895866216797565826989586621679756588 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (f6989586621679756587 :: k4 Data.Singletons.Internal.~> k2) (ty6989586621679756586 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym3 a_69895866216797565826989586621679756588 f6989586621679756587 ty6989586621679756586)
instance forall k2 k3 k4 k5 k6 (a_69895866216797565846989586621679756589 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (a_69895866216797565826989586621679756588 :: k4 Data.Singletons.Internal.~> k2) (f6989586621679756587 :: k5) (ty6989586621679756586 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym4 a_69895866216797565846989586621679756589 a_69895866216797565826989586621679756588 f6989586621679756587 ty6989586621679756586)
instance forall k2 k3 k4 k5 k6 (t6989586621679756594 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (a_69895866216797565846989586621679756589 :: k4 Data.Singletons.Internal.~> k2) (a_69895866216797565826989586621679756588 :: k5) (f6989586621679756587 :: k6) (ty6989586621679756586 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679756590Sym5 t6989586621679756594 a_69895866216797565846989586621679756589 a_69895866216797565826989586621679756588 f6989586621679756587 ty6989586621679756586)
-- | Defines the promoted and singleton version of Bounded, PBounded
-- and SBounded
module Data.Singletons.Prelude.Enum
class PBounded (a_a39XM :: Type) where {
type family MinBound :: a_a39XM;
type family MaxBound :: a_a39XM;
}
class SBounded a_a39XM
sMinBound :: SBounded a_a39XM => Sing (MinBoundSym0 :: a_a39XM)
sMaxBound :: SBounded a_a39XM => Sing (MaxBoundSym0 :: a_a39XM)
class PEnum (a_a3aZB :: Type) where {
type family Succ (arg_a3b4b :: a_a3aZB) :: a_a3aZB;
type family Pred (arg_a3b4d :: a_a3aZB) :: a_a3aZB;
type family ToEnum (arg_a3b4f :: Nat) :: a_a3aZB;
type family FromEnum (arg_a3b4h :: a_a3aZB) :: Nat;
type family EnumFromTo (arg_a3b4j :: a_a3aZB) (arg_a3b4k :: a_a3aZB) :: [a_a3aZB];
type family EnumFromThenTo (arg_a3b4n :: a_a3aZB) (arg_a3b4o :: a_a3aZB) (arg_a3b4p :: a_a3aZB) :: [a_a3aZB];
type Succ a_a3b4t = Apply Succ_6989586621679767338Sym0 a_a3b4t;
type Pred a_a3b4I = Apply Pred_6989586621679767353Sym0 a_a3b4I;
type EnumFromTo a_a3b4R a_a3b4S = Apply (Apply EnumFromTo_6989586621679767363Sym0 a_a3b4R) a_a3b4S;
type EnumFromThenTo a_a3b53 a_a3b54 a_a3b55 = Apply (Apply (Apply EnumFromThenTo_6989586621679767376Sym0 a_a3b53) a_a3b54) a_a3b55;
}
class SEnum a_a3aZB
sSucc :: forall (t_a3b79 :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b79 -> Sing (Apply SuccSym0 t_a3b79 :: a_a3aZB)
sPred :: forall (t_a3b7b :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7b -> Sing (Apply PredSym0 t_a3b7b :: a_a3aZB)
sToEnum :: forall (t_a3b7d :: Nat). SEnum a_a3aZB => Sing t_a3b7d -> Sing (Apply ToEnumSym0 t_a3b7d :: a_a3aZB)
sFromEnum :: forall (t_a3b7f :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7f -> Sing (Apply FromEnumSym0 t_a3b7f :: Nat)
sEnumFromTo :: forall (t_a3b7h :: a_a3aZB) (t_a3b7i :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7h -> Sing t_a3b7i -> Sing (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB])
sEnumFromThenTo :: forall (t_a3b7l :: a_a3aZB) (t_a3b7m :: a_a3aZB) (t_a3b7n :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7l -> Sing t_a3b7m -> Sing t_a3b7n -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB])
sSucc :: forall (t_a3b79 :: a_a3aZB). (SEnum a_a3aZB, (Apply SuccSym0 t_a3b79 :: a_a3aZB) ~ Apply Succ_6989586621679767338Sym0 t_a3b79) => Sing t_a3b79 -> Sing (Apply SuccSym0 t_a3b79 :: a_a3aZB)
sPred :: forall (t_a3b7b :: a_a3aZB). (SEnum a_a3aZB, (Apply PredSym0 t_a3b7b :: a_a3aZB) ~ Apply Pred_6989586621679767353Sym0 t_a3b7b) => Sing t_a3b7b -> Sing (Apply PredSym0 t_a3b7b :: a_a3aZB)
sEnumFromTo :: forall (t_a3b7h :: a_a3aZB) (t_a3b7i :: a_a3aZB). (SEnum a_a3aZB, (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB]) ~ Apply (Apply EnumFromTo_6989586621679767363Sym0 t_a3b7h) t_a3b7i) => Sing t_a3b7h -> Sing t_a3b7i -> Sing (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB])
sEnumFromThenTo :: forall (t_a3b7l :: a_a3aZB) (t_a3b7m :: a_a3aZB) (t_a3b7n :: a_a3aZB). (SEnum a_a3aZB, (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679767376Sym0 t_a3b7l) t_a3b7m) t_a3b7n) => Sing t_a3b7l -> Sing t_a3b7m -> Sing t_a3b7n -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB])
type MinBoundSym0 = MinBound
type MaxBoundSym0 = MaxBound
data SuccSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 a6989586621679767035
type SuccSym1 (arg6989586621679767319 :: a6989586621679767035) = Succ arg6989586621679767319
data PredSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 a6989586621679767035
type PredSym1 (arg6989586621679767321 :: a6989586621679767035) = Pred arg6989586621679767321
data ToEnumSym0 :: forall a6989586621679767035. (~>) Nat a6989586621679767035
type ToEnumSym1 (arg6989586621679767323 :: Nat) = ToEnum arg6989586621679767323
data FromEnumSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 Nat
type FromEnumSym1 (arg6989586621679767325 :: a6989586621679767035) = FromEnum arg6989586621679767325
data EnumFromToSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035])
data EnumFromToSym1 (arg6989586621679767327 :: a6989586621679767035) :: (~>) a6989586621679767035 [a6989586621679767035]
type EnumFromToSym2 (arg6989586621679767327 :: a6989586621679767035) (arg6989586621679767328 :: a6989586621679767035) = EnumFromTo arg6989586621679767327 arg6989586621679767328
data EnumFromThenToSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 ((~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035]))
data EnumFromThenToSym1 (arg6989586621679767331 :: a6989586621679767035) :: (~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035])
data EnumFromThenToSym2 (arg6989586621679767331 :: a6989586621679767035) (arg6989586621679767332 :: a6989586621679767035) :: (~>) a6989586621679767035 [a6989586621679767035]
type EnumFromThenToSym3 (arg6989586621679767331 :: a6989586621679767035) (arg6989586621679767332 :: a6989586621679767035) (arg6989586621679767333 :: a6989586621679767035) = EnumFromThenTo arg6989586621679767331 arg6989586621679767332 arg6989586621679767333
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679790730Sym0
instance Data.Singletons.Prelude.Enum.PEnum ()
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679790720Sym0
instance Data.Singletons.Prelude.Enum.SEnum ()
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679790713Sym0
instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Ordering
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679790697Sym0
instance Data.Singletons.Prelude.Enum.SEnum GHC.Types.Ordering
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679790689Sym0
instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Bool
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679790676Sym0
instance Data.Singletons.Prelude.Enum.SEnum GHC.Types.Bool
instance Data.Singletons.Prelude.Enum.SEnum GHC.Types.Nat
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.SuccSym0
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.PredSym0
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.ToEnumSym0
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.FromEnumSym0
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EnumFromToSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Enum.SEnum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EnumFromToSym1 d)
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EnumFromThenToSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Enum.SEnum a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EnumFromThenToSym1 d)
instance forall a (d1 :: a) (d2 :: a). (Data.Singletons.Prelude.Enum.SEnum a, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EnumFromThenToSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767437Sym0
instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Nat
instance forall a6989586621679767035 (a6989586621679767434 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767437Sym1 a6989586621679767434)
instance forall a6989586621679767035 (a6989586621679767435 :: a6989586621679767035) (a6989586621679767434 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767437Sym2 a6989586621679767435 a6989586621679767434)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679767420Sym0
instance forall a6989586621679767035 (a6989586621679767418 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679767420Sym1 a6989586621679767418)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679767412Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679767405Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679767398Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679767391Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.SuccSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.PredSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnumSym0
instance forall a6989586621679767035 (arg6989586621679767327 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromToSym1 arg6989586621679767327)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromToSym0
instance forall a6989586621679767035 (arg6989586621679767332 :: a6989586621679767035) (arg6989586621679767331 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym2 arg6989586621679767332 arg6989586621679767331)
instance forall a6989586621679767035 (arg6989586621679767331 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym1 arg6989586621679767331)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenToSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679767338Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679767353Sym0
instance forall a6989586621679767035 (a6989586621679767361 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679767363Sym1 a6989586621679767361)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679767363Sym0
instance forall a6989586621679767035 (a6989586621679767374 :: a6989586621679767035) (a6989586621679767373 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767376Sym2 a6989586621679767374 a6989586621679767373)
instance forall a6989586621679767035 (a6989586621679767373 :: a6989586621679767035). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767376Sym1 a6989586621679767373)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679767376Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Lambda_6989586621679767345Sym0
instance forall k1 k2 (a_69895866216797673406989586621679767344 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Lambda_6989586621679767345Sym1 a_69895866216797673406989586621679767344)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EftNatSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EftNatSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EftNatSym1 a6989586621679767288)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EftNatSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EfdtNatSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EfdtNatSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatSym1 a6989586621679767270)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatSym2 a6989586621679767271 a6989586621679767270)
instance (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EfdtNatUpSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EfdtNatUpSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatUpSym1 a6989586621679767213)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatUpSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatUpSym2 a6989586621679767214 a6989586621679767213)
instance (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatUpSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EfdtNatDnSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Enum.EfdtNatDnSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatDnSym1 a6989586621679767156)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatDnSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EfdtNatDnSym2 a6989586621679767157 a6989586621679767156)
instance (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Enum.EfdtNatDnSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767298GoSym0
instance forall k1 k2 k3 k4 (x06989586621679767296 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767298GoSym1 x06989586621679767296)
instance forall k1 k2 k3 k4 (y6989586621679767297 :: k1) (x06989586621679767296 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767298GoSym2 y6989586621679767297 x06989586621679767296)
instance forall k1 k2 k3 k4 (arg_69895866216797670686989586621679767292 :: k1) (y6989586621679767297 :: k2) (x06989586621679767296 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767298GoSym3 arg_69895866216797670686989586621679767292 y6989586621679767297 x06989586621679767296)
instance forall k1 k2 k3 k4 (arg_69895866216797670706989586621679767293 :: k1) (arg_69895866216797670686989586621679767292 :: k2) (y6989586621679767297 :: k3) (x06989586621679767296 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767298GoSym4 arg_69895866216797670706989586621679767293 arg_69895866216797670686989586621679767292 y6989586621679767297 x06989586621679767296)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767306Scrutinee_6989586621679767072Sym0
instance forall k1 k2 k3 k4 (x6989586621679767305 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767306Scrutinee_6989586621679767072Sym1 x6989586621679767305)
instance forall k1 k2 k3 k4 (x06989586621679767296 :: k1) (x6989586621679767305 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767306Scrutinee_6989586621679767072Sym2 x06989586621679767296 x6989586621679767305)
instance forall k1 k2 k3 k4 (y6989586621679767297 :: k1) (x06989586621679767296 :: k2) (x6989586621679767305 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767306Scrutinee_6989586621679767072Sym3 y6989586621679767297 x06989586621679767296 x6989586621679767305)
instance forall k1 k2 k3 k4 (arg_69895866216797670686989586621679767292 :: k1) (y6989586621679767297 :: k2) (x06989586621679767296 :: k1) (x6989586621679767305 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767306Scrutinee_6989586621679767072Sym4 arg_69895866216797670686989586621679767292 y6989586621679767297 x06989586621679767296 x6989586621679767305)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym0
instance forall k1 k2 k3 k4 (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym1 x16989586621679767224)
instance forall k1 k2 k3 k4 (x26989586621679767225 :: k1) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym2 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (y6989586621679767226 :: k1) (x26989586621679767225 :: k1) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym3 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k1) (x26989586621679767225 :: k1) (x16989586621679767224 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym4 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (arg_69895866216797670826989586621679767220 :: k1) (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k1) (x26989586621679767225 :: k2) (x16989586621679767224 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym5 arg_69895866216797670826989586621679767220 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (arg_69895866216797670846989586621679767221 :: k1) (arg_69895866216797670826989586621679767220 :: k1) (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k2) (x26989586621679767225 :: k3) (x16989586621679767224 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Go_upSym6 arg_69895866216797670846989586621679767221 arg_69895866216797670826989586621679767220 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym0
instance forall k1 k2 k3 k4 k5 (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym1 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (x26989586621679767225 :: k1) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym2 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (y6989586621679767226 :: k1) (x26989586621679767225 :: k1) (x16989586621679767224 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym3 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k1) (x26989586621679767225 :: k2) (x16989586621679767224 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym4 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670826989586621679767220 :: k1) (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k2) (x26989586621679767225 :: k3) (x16989586621679767224 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239DeltaSym5 arg_69895866216797670826989586621679767220 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym0
instance forall k1 k2 k3 k4 (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym1 x16989586621679767224)
instance forall k1 k2 k3 k4 (x26989586621679767225 :: k1) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym2 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (y6989586621679767226 :: k1) (x26989586621679767225 :: k1) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym3 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k1) (x26989586621679767225 :: k1) (x16989586621679767224 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym4 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 (arg_69895866216797670826989586621679767220 :: k1) (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k1) (x26989586621679767225 :: k2) (x16989586621679767224 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767239Y'Sym5 arg_69895866216797670826989586621679767220 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym0
instance forall k1 k2 k3 k4 k5 (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym1 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (x26989586621679767225 :: k1) (x16989586621679767224 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym2 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (y6989586621679767226 :: k1) (x26989586621679767225 :: k2) (x16989586621679767224 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym3 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670806989586621679767219 :: k1) (y6989586621679767226 :: k2) (x26989586621679767225 :: k1) (x16989586621679767224 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym4 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670826989586621679767220 :: k1) (arg_69895866216797670806989586621679767219 :: k2) (y6989586621679767226 :: k1) (x26989586621679767225 :: k3) (x16989586621679767224 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767229Scrutinee_6989586621679767086Sym5 arg_69895866216797670826989586621679767220 arg_69895866216797670806989586621679767219 y6989586621679767226 x26989586621679767225 x16989586621679767224)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym0
instance forall k1 k2 k3 k4 (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym1 x16989586621679767167)
instance forall k1 k2 k3 k4 (x26989586621679767168 :: k1) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym2 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (y6989586621679767169 :: k1) (x26989586621679767168 :: k1) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym3 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k1) (x26989586621679767168 :: k1) (x16989586621679767167 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym4 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (arg_69895866216797670926989586621679767163 :: k1) (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k1) (x26989586621679767168 :: k2) (x16989586621679767167 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym5 arg_69895866216797670926989586621679767163 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (arg_69895866216797670946989586621679767164 :: k1) (arg_69895866216797670926989586621679767163 :: k1) (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k2) (x26989586621679767168 :: k3) (x16989586621679767167 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Go_dnSym6 arg_69895866216797670946989586621679767164 arg_69895866216797670926989586621679767163 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym0
instance forall k1 k2 k3 k4 k5 (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym1 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (x26989586621679767168 :: k1) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym2 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (y6989586621679767169 :: k1) (x26989586621679767168 :: k1) (x16989586621679767167 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym3 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k1) (x26989586621679767168 :: k2) (x16989586621679767167 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym4 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670926989586621679767163 :: k1) (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k2) (x26989586621679767168 :: k3) (x16989586621679767167 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182DeltaSym5 arg_69895866216797670926989586621679767163 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym0
instance forall k1 k2 k3 k4 (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym1 x16989586621679767167)
instance forall k1 k2 k3 k4 (x26989586621679767168 :: k1) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym2 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (y6989586621679767169 :: k1) (x26989586621679767168 :: k1) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym3 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k1) (x26989586621679767168 :: k1) (x16989586621679767167 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym4 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 (arg_69895866216797670926989586621679767163 :: k1) (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k1) (x26989586621679767168 :: k2) (x16989586621679767167 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767182Y'Sym5 arg_69895866216797670926989586621679767163 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym0
instance forall k1 k2 k3 k4 k5 (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym1 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (x26989586621679767168 :: k1) (x16989586621679767167 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym2 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (y6989586621679767169 :: k1) (x26989586621679767168 :: k2) (x16989586621679767167 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym3 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670906989586621679767162 :: k1) (y6989586621679767169 :: k2) (x26989586621679767168 :: k1) (x16989586621679767167 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym4 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance forall k1 k2 k3 k4 k5 (arg_69895866216797670926989586621679767163 :: k1) (arg_69895866216797670906989586621679767162 :: k2) (y6989586621679767169 :: k1) (x26989586621679767168 :: k3) (x16989586621679767167 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679767172Scrutinee_6989586621679767096Sym5 arg_69895866216797670926989586621679767163 arg_69895866216797670906989586621679767162 y6989586621679767169 x26989586621679767168 x16989586621679767167)
instance Data.Singletons.Prelude.Enum.PBounded ()
instance Data.Singletons.Prelude.Enum.PBounded GHC.Types.Ordering
instance Data.Singletons.Prelude.Enum.PBounded GHC.Types.Bool
instance Data.Singletons.Prelude.Enum.PBounded (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Enum.PBounded (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Enum.PBounded (a, b, c, d, e, f)
instance Data.Singletons.Prelude.Enum.PBounded (a, b, c, d, e)
instance Data.Singletons.Prelude.Enum.PBounded (a, b, c, d)
instance Data.Singletons.Prelude.Enum.PBounded (a, b, c)
instance Data.Singletons.Prelude.Enum.PBounded (a, b)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b) => Data.Singletons.Prelude.Enum.SBounded (a, b)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b, Data.Singletons.Prelude.Enum.SBounded c) => Data.Singletons.Prelude.Enum.SBounded (a, b, c)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b, Data.Singletons.Prelude.Enum.SBounded c, Data.Singletons.Prelude.Enum.SBounded d) => Data.Singletons.Prelude.Enum.SBounded (a, b, c, d)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b, Data.Singletons.Prelude.Enum.SBounded c, Data.Singletons.Prelude.Enum.SBounded d, Data.Singletons.Prelude.Enum.SBounded e) => Data.Singletons.Prelude.Enum.SBounded (a, b, c, d, e)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b, Data.Singletons.Prelude.Enum.SBounded c, Data.Singletons.Prelude.Enum.SBounded d, Data.Singletons.Prelude.Enum.SBounded e, Data.Singletons.Prelude.Enum.SBounded f) => Data.Singletons.Prelude.Enum.SBounded (a, b, c, d, e, f)
instance (Data.Singletons.Prelude.Enum.SBounded a, Data.Singletons.Prelude.Enum.SBounded b, Data.Singletons.Prelude.Enum.SBounded c, Data.Singletons.Prelude.Enum.SBounded d, Data.Singletons.Prelude.Enum.SBounded e, Data.Singletons.Prelude.Enum.SBounded f, Data.Singletons.Prelude.Enum.SBounded g) => Data.Singletons.Prelude.Enum.SBounded (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Enum.SBounded a => Data.Singletons.Prelude.Enum.SBounded (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Enum.SBounded GHC.Types.Bool
instance Data.Singletons.Prelude.Enum.SBounded GHC.Types.Ordering
instance Data.Singletons.Prelude.Enum.SBounded ()
-- | Defines the SShow singleton version of the Show type class.
module Data.Singletons.Prelude.Show
class PShow (a_a5of3 :: Type) where {
type family ShowsPrec (arg_a5om7 :: Nat) (arg_a5om8 :: a_a5of3) (arg_a5om9 :: Symbol) :: Symbol;
type family Show_ (arg_a5omd :: a_a5of3) :: Symbol;
type family ShowList (arg_a5omf :: [a_a5of3]) (arg_a5omg :: Symbol) :: Symbol;
type ShowsPrec a_a5omj a_a5omk a_a5oml = Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 a_a5omj) a_a5omk) a_a5oml;
type Show_ a_a5omz = Apply Show__6989586621680295088Sym0 a_a5omz;
type ShowList a_a5omG a_a5omH = Apply (Apply ShowList_6989586621680295096Sym0 a_a5omG) a_a5omH;
}
class SShow a_a5of3
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). SShow a_a5of3 => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). SShow a_a5of3 => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). SShow a_a5of3 => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). (SShow a_a5of3, (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 t_a5oqg) t_a5oqh) t_a5oqi) => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). (SShow a_a5of3, (Apply Show_Sym0 t_a5oqm :: Symbol) ~ Apply Show__6989586621680295088Sym0 t_a5oqm) => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). (SShow a_a5of3, (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol) ~ Apply (Apply ShowList_6989586621680295096Sym0 t_a5oqo) t_a5oqp) => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
-- | 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
-- | GHC currently has no notion of type-level Chars, so we fake
-- them with single-character Symbols.
type SChar = 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 (a_a5olZ :: a_a5oeO) (a_a5om0 :: Symbol) :: Symbol
sShows :: forall a_a5oeO (t_a5opR :: a_a5oeO) (t_a5opS :: Symbol). SShow a_a5oeO => Sing t_a5opR -> Sing t_a5opS -> Sing (Apply (Apply ShowsSym0 t_a5opR) t_a5opS :: Symbol)
type family ShowListWith (a_a5olF :: (~>) a_a5oeN ((~>) Symbol Symbol)) (a_a5olG :: [a_a5oeN]) (a_a5olH :: Symbol) :: Symbol
sShowListWith :: forall a_a5oeN (t_a5opL :: (~>) a_a5oeN ((~>) Symbol Symbol)) (t_a5opM :: [a_a5oeN]) (t_a5opN :: Symbol). Sing t_a5opL -> Sing t_a5opM -> Sing t_a5opN -> Sing (Apply (Apply (Apply ShowListWithSym0 t_a5opL) t_a5opM) t_a5opN :: Symbol)
type family ShowChar (a_a5olz :: Symbol) (a_a5olA :: Symbol) :: Symbol
sShowChar :: forall (t_a5opH :: Symbol) (t_a5opI :: Symbol). Sing t_a5opH -> Sing t_a5opI -> Sing (Apply (Apply ShowCharSym0 t_a5opH) t_a5opI :: Symbol)
type family ShowString (a_a5olp :: Symbol) (a_a5olq :: Symbol) :: Symbol
sShowString :: forall (t_a5opD :: Symbol) (t_a5opE :: Symbol). Sing t_a5opD -> Sing t_a5opE -> Sing (Apply (Apply ShowStringSym0 t_a5opD) t_a5opE :: Symbol)
type family ShowParen (a_a5ol7 :: Bool) (a_a5ol8 :: (~>) Symbol Symbol) (a_a5ol9 :: Symbol) :: Symbol
sShowParen :: forall (t_a5opx :: Bool) (t_a5opy :: (~>) Symbol Symbol) (t_a5opz :: Symbol). Sing t_a5opx -> Sing t_a5opy -> Sing t_a5opz -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5opx) t_a5opy) t_a5opz :: Symbol)
type family ShowSpace (a_a5okY :: Symbol) :: Symbol
sShowSpace :: forall (t_a5opv :: Symbol). Sing t_a5opv -> Sing (Apply ShowSpaceSym0 t_a5opv :: Symbol)
type family ShowCommaSpace (a_a5okT :: Symbol) :: Symbol
sShowCommaSpace :: forall (t_a5opt :: Symbol). Sing t_a5opt -> Sing (Apply ShowCommaSpaceSym0 t_a5opt :: Symbol)
type family AppPrec :: Nat
sAppPrec :: Sing (AppPrecSym0 :: Nat)
type family AppPrec1 :: Nat
sAppPrec1 :: Sing (AppPrec1Sym0 :: Nat)
data ShowsPrecSym0 :: forall a6989586621680294621. (~>) Nat ((~>) a6989586621680294621 ((~>) Symbol Symbol))
data ShowsPrecSym1 (arg6989586621680295059 :: Nat) :: forall a6989586621680294621. (~>) a6989586621680294621 ((~>) Symbol Symbol)
data ShowsPrecSym2 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) :: (~>) Symbol Symbol
type ShowsPrecSym3 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) (arg6989586621680295061 :: Symbol) = ShowsPrec arg6989586621680295059 arg6989586621680295060 arg6989586621680295061
data Show_Sym0 :: forall a6989586621680294621. (~>) a6989586621680294621 Symbol
type Show_Sym1 (arg6989586621680295065 :: a6989586621680294621) = Show_ arg6989586621680295065
data ShowListSym0 :: forall a6989586621680294621. (~>) [a6989586621680294621] ((~>) Symbol Symbol)
data ShowListSym1 (arg6989586621680295067 :: [a6989586621680294621]) :: (~>) Symbol Symbol
type ShowListSym2 (arg6989586621680295067 :: [a6989586621680294621]) (arg6989586621680295068 :: Symbol) = ShowList arg6989586621680295067 arg6989586621680295068
data ShowsSym0 :: forall a6989586621680294606. (~>) a6989586621680294606 ((~>) Symbol Symbol)
data ShowsSym1 (a6989586621680295051 :: a6989586621680294606) :: (~>) Symbol Symbol
type ShowsSym2 (a6989586621680295051 :: a6989586621680294606) (a6989586621680295052 :: Symbol) = Shows a6989586621680295051 a6989586621680295052
data ShowListWithSym0 :: forall a6989586621680294605. (~>) ((~>) a6989586621680294605 ((~>) Symbol Symbol)) ((~>) [a6989586621680294605] ((~>) Symbol Symbol))
data ShowListWithSym1 (a6989586621680295031 :: (~>) a6989586621680294605 ((~>) Symbol Symbol)) :: (~>) [a6989586621680294605] ((~>) Symbol Symbol)
data ShowListWithSym2 (a6989586621680295031 :: (~>) a6989586621680294605 ((~>) Symbol Symbol)) (a6989586621680295032 :: [a6989586621680294605]) :: (~>) Symbol Symbol
type ShowListWithSym3 (a6989586621680295031 :: (~>) a6989586621680294605 ((~>) Symbol Symbol)) (a6989586621680295032 :: [a6989586621680294605]) (a6989586621680295033 :: Symbol) = ShowListWith a6989586621680295031 a6989586621680295032 a6989586621680295033
data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowCharSym1 (a6989586621680295025 :: Symbol) :: (~>) Symbol Symbol
type ShowCharSym2 (a6989586621680295025 :: Symbol) (a6989586621680295026 :: Symbol) = ShowChar a6989586621680295025 a6989586621680295026
data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowStringSym1 (a6989586621680295015 :: Symbol) :: (~>) Symbol Symbol
type ShowStringSym2 (a6989586621680295015 :: Symbol) (a6989586621680295016 :: Symbol) = ShowString a6989586621680295015 a6989586621680295016
data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol))
data ShowParenSym1 (a6989586621680294997 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)
data ShowParenSym2 (a6989586621680294997 :: Bool) (a6989586621680294998 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol
data ShowSpaceSym0 :: (~>) Symbol Symbol
type ShowSpaceSym1 (a6989586621680294988 :: Symbol) = ShowSpace a6989586621680294988
data ShowCommaSpaceSym0 :: (~>) Symbol Symbol
type ShowCommaSpaceSym1 (a6989586621680294983 :: Symbol) = ShowCommaSpace a6989586621680294983
type AppPrecSym0 = AppPrec
type AppPrec1Sym0 = AppPrec1
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313141Sym0
instance Data.Singletons.Prelude.Show.PShow Data.Void.Void
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313141Sym1 a6989586621680313138)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313141Sym2 a6989586621680313139 a6989586621680313138)
instance Data.Singletons.Prelude.Show.SShow Data.Void.Void
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313111Sym0
instance Data.Singletons.Prelude.Show.PShow GHC.Types.Ordering
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313111Sym1 a6989586621680313108)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313111Sym2 a6989586621680313109 a6989586621680313108)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313087Sym0
instance Data.Singletons.Prelude.Show.PShow GHC.Types.Bool
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313087Sym1 a6989586621680313084)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313087Sym2 a6989586621680313085 a6989586621680313084)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313061Sym0
instance Data.Singletons.Prelude.Show.PShow (GHC.Base.NonEmpty a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313061Sym1 a6989586621680313058)
instance forall a6989586621679069776 (a6989586621680313059 :: GHC.Types.Nat) (a6989586621680313058 :: GHC.Base.NonEmpty a6989586621679069776). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313061Sym2 a6989586621680313059 a6989586621680313058)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313019Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Either.Either a b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313019Sym1 a6989586621680313016)
instance forall a6989586621679093843 b6989586621679093844 (a6989586621680313017 :: GHC.Types.Nat) (a6989586621680313016 :: Data.Either.Either a6989586621679093843 b6989586621679093844). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680313019Sym2 a6989586621680313017 a6989586621680313016)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312963Sym0
instance Data.Singletons.Prelude.Show.PShow (GHC.Maybe.Maybe a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312963Sym1 a6989586621680312960)
instance forall a3530822107858468865 (a6989586621680312961 :: GHC.Types.Nat) (a6989586621680312960 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312963Sym2 a6989586621680312961 a6989586621680312960)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312929Sym0
instance Data.Singletons.Prelude.Show.PShow ()
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312929Sym1 a6989586621680312926)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680312929Sym2 a6989586621680312927 a6989586621680312926)
instance Data.Singletons.Prelude.Show.SShow ()
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (GHC.Maybe.Maybe a)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b) => Data.Singletons.Prelude.Show.SShow (Data.Either.Either a b)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow [a]) => Data.Singletons.Prelude.Show.SShow (GHC.Base.NonEmpty a)
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Bool
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Ordering
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsNatSym1 a6989586621680312434)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsNatSym0
instance Data.Singletons.Prelude.Show.PShow GHC.Types.Nat
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Nat
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowsSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowsSym1 d)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow [a]
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Symbol
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b) => Data.Singletons.Prelude.Show.SShow (a, b)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b, Data.Singletons.Prelude.Show.SShow c) => Data.Singletons.Prelude.Show.SShow (a, b, c)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b, Data.Singletons.Prelude.Show.SShow c, Data.Singletons.Prelude.Show.SShow d) => Data.Singletons.Prelude.Show.SShow (a, b, c, d)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b, Data.Singletons.Prelude.Show.SShow c, Data.Singletons.Prelude.Show.SShow d, Data.Singletons.Prelude.Show.SShow e) => Data.Singletons.Prelude.Show.SShow (a, b, c, d, e)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b, Data.Singletons.Prelude.Show.SShow c, Data.Singletons.Prelude.Show.SShow d, Data.Singletons.Prelude.Show.SShow e, Data.Singletons.Prelude.Show.SShow f) => Data.Singletons.Prelude.Show.SShow (a, b, c, d, e, f)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b, Data.Singletons.Prelude.Show.SShow c, Data.Singletons.Prelude.Show.SShow d, Data.Singletons.Prelude.Show.SShow e, Data.Singletons.Prelude.Show.SShow f, Data.Singletons.Prelude.Show.SShow g) => Data.Singletons.Prelude.Show.SShow (a, b, c, d, e, f, g)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowsPrecSym0
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowsPrecSym1 d)
instance forall a (d1 :: GHC.Types.Nat) (d2 :: a). (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowsPrecSym2 d1 d2)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.Show_Sym0
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowListSym0
instance forall a (d :: [a]). (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowListSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295244Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f, g)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295244Sym1 a6989586621680295241)
instance forall a6989586621680294688 b6989586621680294689 c6989586621680294690 d6989586621680294691 e6989586621680294692 f6989586621680294693 g6989586621680294694 (a6989586621680295242 :: GHC.Types.Nat) (a6989586621680295241 :: (a6989586621680294688, b6989586621680294689, c6989586621680294690, d6989586621680294691, e6989586621680294692, f6989586621680294693, g6989586621680294694)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295244Sym2 a6989586621680295242 a6989586621680295241)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295223Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295223Sym1 a6989586621680295220)
instance forall a6989586621680294675 b6989586621680294676 c6989586621680294677 d6989586621680294678 e6989586621680294679 f6989586621680294680 (a6989586621680295221 :: GHC.Types.Nat) (a6989586621680295220 :: (a6989586621680294675, b6989586621680294676, c6989586621680294677, d6989586621680294678, e6989586621680294679, f6989586621680294680)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295223Sym2 a6989586621680295221 a6989586621680295220)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295203Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295203Sym1 a6989586621680295200)
instance forall a6989586621680294664 b6989586621680294665 c6989586621680294666 d6989586621680294667 e6989586621680294668 (a6989586621680295201 :: GHC.Types.Nat) (a6989586621680295200 :: (a6989586621680294664, b6989586621680294665, c6989586621680294666, d6989586621680294667, e6989586621680294668)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295203Sym2 a6989586621680295201 a6989586621680295200)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295184Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b, c, d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295184Sym1 a6989586621680295181)
instance forall a6989586621680294655 b6989586621680294656 c6989586621680294657 d6989586621680294658 (a6989586621680295182 :: GHC.Types.Nat) (a6989586621680295181 :: (a6989586621680294655, b6989586621680294656, c6989586621680294657, d6989586621680294658)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295184Sym2 a6989586621680295182 a6989586621680295181)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295166Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b, c)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295166Sym1 a6989586621680295163)
instance forall a6989586621680294648 b6989586621680294649 c6989586621680294650 (a6989586621680295164 :: GHC.Types.Nat) (a6989586621680295163 :: (a6989586621680294648, b6989586621680294649, c6989586621680294650)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295166Sym2 a6989586621680295164 a6989586621680295163)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295149Sym0
instance Data.Singletons.Prelude.Show.PShow (a, b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295149Sym1 a6989586621680295146)
instance forall a6989586621680294643 b6989586621680294644 (a6989586621680295147 :: GHC.Types.Nat) (a6989586621680295146 :: (a6989586621680294643, b6989586621680294644)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295149Sym2 a6989586621680295147 a6989586621680295146)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295129Sym0
instance Data.Singletons.Prelude.Show.PShow GHC.Types.Symbol
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295129Sym1 a6989586621680295126)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295129Sym2 a6989586621680295127 a6989586621680295126)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295109Sym0
instance Data.Singletons.Prelude.Show.PShow [a]
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295109Sym1 a6989586621680295106)
instance forall a6989586621680294639 (a6989586621680295107 :: GHC.Types.Nat) (a6989586621680295106 :: [a6989586621680294639]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295109Sym2 a6989586621680295107 a6989586621680295106)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListSym0
instance forall a6989586621680294621 (arg6989586621680295067 :: [a6989586621680294621]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListSym1 arg6989586621680295067)
instance forall a6989586621680294606 (a6989586621680295051 :: a6989586621680294606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsSym1 a6989586621680295051)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsSym0
instance forall a6989586621680294621 (arg6989586621680295060 :: GHC.Types.Nat) (arg6989586621680295059 :: a6989586621680294621). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym2 arg6989586621680295060 arg6989586621680295059)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym1 arg6989586621680295059)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrecSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show_Sym0
instance forall a6989586621680294621 (a6989586621680295072 :: GHC.Types.Nat) (a6989586621680295071 :: a6989586621680294621). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295074Sym2 a6989586621680295072 a6989586621680295071)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295074Sym1 a6989586621680295071)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680295074Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show__6989586621680295088Sym0
instance forall a6989586621680294621 (a6989586621680295094 :: [a6989586621680294621]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowList_6989586621680295096Sym1 a6989586621680295094)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowList_6989586621680295096Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListWithSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowListWithSym0
instance forall a6989586621680294605 (a6989586621680295031 :: a6989586621680294605 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym1 a6989586621680295031)
instance forall a (d :: a Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowListWithSym1 d)
instance forall a6989586621680294605 (a6989586621680295032 :: a6989586621680294605 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (a6989586621680295031 :: [a6989586621680294605]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym2 a6989586621680295032 a6989586621680295031)
instance forall a (d1 :: a Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (d2 :: [a]). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowListWithSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show_tupleSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.Show_tupleSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Show_tupleSym1 a6989586621680294963)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.Show_tupleSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Lambda_6989586621680294971Sym0
instance forall k1 k2 c6989586621679545428 a6989586621679545429 (ss6989586621680294969 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680294971Sym1 ss6989586621680294969)
instance forall k1 k2 c6989586621679545428 a6989586621679545429 (a_69895866216802949676989586621680294970 :: k1) (ss6989586621680294969 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680294971Sym2 a_69895866216802949676989586621680294970 ss6989586621680294969)
instance forall k1 k2 c6989586621679545428 a6989586621679545429 (t6989586621680294975 :: k1) (a_69895866216802949676989586621680294970 :: k2) (ss6989586621680294969 :: GHC.Types.Symbol Data.Singletons.Internal.~> c6989586621679545428). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680294971Sym3 t6989586621680294975 a_69895866216802949676989586621680294970 ss6989586621680294969)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowParenSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowParenSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowParenSym1 a6989586621680294997)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowParenSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowParenSym2 a6989586621680294998 a6989586621680294997)
instance (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowParenSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowCharSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowCharSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowCharSym1 a6989586621680295025)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowCharSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowCommaSpaceSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowCommaSpaceSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowStringSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowStringSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowStringSym1 a6989586621680295015)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Show.ShowStringSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowSpaceSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowSpaceSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Let6989586621680295042ShowlSym0
instance forall k1 k2 k3 (showx6989586621680295038 :: k1 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680295042ShowlSym1 showx6989586621680295038)
instance forall k1 k2 k3 (x6989586621680295039 :: k1 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (showx6989586621680295038 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680295042ShowlSym2 x6989586621680295039 showx6989586621680295038)
instance forall k1 k2 k3 (xs6989586621680295040 :: k1 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (x6989586621680295039 :: k2) (showx6989586621680295038 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680295042ShowlSym3 xs6989586621680295040 x6989586621680295039 showx6989586621680295038)
instance forall k1 k2 k3 (s6989586621680295041 :: k1 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (xs6989586621680295040 :: k2) (x6989586621680295039 :: k3) (showx6989586621680295038 :: GHC.Types.Symbol). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680295042ShowlSym4 s6989586621680295041 xs6989586621680295040 x6989586621680295039 showx6989586621680295038)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Lambda_6989586621680294991Sym0
instance forall k (a_69895866216802949866989586621680294990 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680294991Sym1 a_69895866216802949866989586621680294990)
-- | Defines the promoted version of Monoid, PMonoid, and the
-- singleton version, SMonoid.
module Data.Singletons.Prelude.Monoid
class PMonoid (a_a5GtH :: Type) where {
type family Mempty :: a_a5GtH;
type family Mappend (arg_a5GvW :: a_a5GtH) (arg_a5GvX :: a_a5GtH) :: a_a5GtH;
type family Mconcat (arg_a5Gw0 :: [a_a5GtH]) :: a_a5GtH;
type Mappend a_a5Gw2 a_a5Gw3 = Apply (Apply Mappend_6989586621680364868Sym0 a_a5Gw2) a_a5Gw3;
type Mconcat a_a5Gwi = Apply Mconcat_6989586621680364883Sym0 a_a5Gwi;
}
class SSemigroup a_a5GtH => SMonoid a_a5GtH
sMempty :: SMonoid a_a5GtH => Sing (MemptySym0 :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). SMonoid a_a5GtH => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). SMonoid a_a5GtH => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). (SMonoid a_a5GtH, (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH) ~ Apply (Apply Mappend_6989586621680364868Sym0 t_a5Gxg) t_a5Gxh) => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). (SMonoid a_a5GtH, (Apply MconcatSym0 t_a5Gxk :: a_a5GtH) ~ Apply Mconcat_6989586621680364883Sym0 t_a5Gxk) => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SDual :: forall a_alj6. Dual a_alj6 -> Type
[SDual] :: forall a_alj6 (n_a3wC9 :: a_alj6). () => {sGetDual :: Sing (n_a3wC9 :: a_alj6)} -> SDual ('Dual n_a3wC9)
data SAll :: All -> Type
[SAll] :: forall (n_a3wCn :: Bool). () => {sGetAll :: Sing (n_a3wCn :: Bool)} -> SAll ('All n_a3wCn)
data SAny :: Any -> Type
[SAny] :: forall (n_a3wCB :: Bool). () => {sGetAny :: Sing (n_a3wCB :: Bool)} -> SAny ('Any n_a3wCB)
data SSum :: forall a_aliR. Sum a_aliR -> Type
[SSum] :: forall a_aliR (n_a3wCU :: a_aliR). () => {sGetSum :: Sing (n_a3wCU :: a_aliR)} -> SSum ('Sum n_a3wCU)
data SProduct :: forall a_aliW. Product a_aliW -> Type
[SProduct] :: forall a_aliW (n_a3wDd :: a_aliW). () => {sGetProduct :: Sing (n_a3wDd :: a_aliW)} -> SProduct ('Product n_a3wDd)
data SFirst :: forall a_aljU. First a_aljU -> Type
[SFirst] :: forall a_aljU (n_a5Hpj :: Maybe a_aljU). () => {sGetFirst :: Sing (n_a5Hpj :: Maybe a_aljU)} -> SFirst ('First n_a5Hpj)
data SLast :: forall a_aljP. Last a_aljP -> Type
[SLast] :: forall a_aljP (n_a5HpG :: Maybe a_aljP). () => {sGetLast :: Sing (n_a5HpG :: Maybe a_aljP)} -> SLast ('Last n_a5HpG)
type family GetDual (a_a3wC4 :: Dual (a_alj6 :: Type)) :: a_alj6
type family GetAll (a_a3wCi :: All) :: Bool
type family GetAny (a_a3wCw :: Any) :: Bool
type family GetSum (a_a3wCP :: Sum (a_aliR :: Type)) :: a_aliR
type family GetProduct (a_a3wD8 :: Product (a_aliW :: Type)) :: a_aliW
type family GetFirst (a_a5Hpe :: First (a_aljU :: Type)) :: Maybe a_aljU
type family GetLast (a_a5HpB :: Last (a_aljP :: Type)) :: Maybe a_aljP
type MemptySym0 = Mempty
data MappendSym0 :: forall a6989586621680364721. (~>) a6989586621680364721 ((~>) a6989586621680364721 a6989586621680364721)
data MappendSym1 (arg6989586621680364860 :: a6989586621680364721) :: (~>) a6989586621680364721 a6989586621680364721
type MappendSym2 (arg6989586621680364860 :: a6989586621680364721) (arg6989586621680364861 :: a6989586621680364721) = Mappend arg6989586621680364860 arg6989586621680364861
data MconcatSym0 :: forall a6989586621680364721. (~>) [a6989586621680364721] a6989586621680364721
type MconcatSym1 (arg6989586621680364864 :: [a6989586621680364721]) = Mconcat arg6989586621680364864
data DualSym0 :: forall (a6989586621679091700 :: Type). (~>) a6989586621679091700 (Dual (a6989586621679091700 :: Type))
type DualSym1 (t6989586621679850147 :: a6989586621679091700) = 'Dual t6989586621679850147
data GetDualSym0 :: forall (a6989586621679091700 :: Type). (~>) (Dual (a6989586621679091700 :: Type)) a6989586621679091700
type GetDualSym1 (a6989586621679850144 :: Dual (a6989586621679091700 :: Type)) = GetDual a6989586621679850144
data AllSym0 :: (~>) Bool All
type AllSym1 (t6989586621679850161 :: Bool) = 'All t6989586621679850161
data GetAllSym0 :: (~>) All Bool
type GetAllSym1 (a6989586621679850158 :: All) = GetAll a6989586621679850158
data AnySym0 :: (~>) Bool Any
type AnySym1 (t6989586621679850175 :: Bool) = 'Any t6989586621679850175
data GetAnySym0 :: (~>) Any Bool
type GetAnySym1 (a6989586621679850172 :: Any) = GetAny a6989586621679850172
data SumSym0 :: forall (a6989586621679091685 :: Type). (~>) a6989586621679091685 (Sum (a6989586621679091685 :: Type))
type SumSym1 (t6989586621679850194 :: a6989586621679091685) = 'Sum t6989586621679850194
data GetSumSym0 :: forall (a6989586621679091685 :: Type). (~>) (Sum (a6989586621679091685 :: Type)) a6989586621679091685
type GetSumSym1 (a6989586621679850191 :: Sum (a6989586621679091685 :: Type)) = GetSum a6989586621679850191
data ProductSym0 :: forall (a6989586621679091690 :: Type). (~>) a6989586621679091690 (Product (a6989586621679091690 :: Type))
type ProductSym1 (t6989586621679850213 :: a6989586621679091690) = 'Product t6989586621679850213
data GetProductSym0 :: forall (a6989586621679091690 :: Type). (~>) (Product (a6989586621679091690 :: Type)) a6989586621679091690
type GetProductSym1 (a6989586621679850210 :: Product (a6989586621679091690 :: Type)) = GetProduct a6989586621679850210
data FirstSym0 :: forall (a6989586621679091750 :: Type). (~>) (Maybe a6989586621679091750) (First (a6989586621679091750 :: Type))
type FirstSym1 (t6989586621680368291 :: Maybe a6989586621679091750) = 'First t6989586621680368291
data GetFirstSym0 :: forall (a6989586621679091750 :: Type). (~>) (First (a6989586621679091750 :: Type)) (Maybe a6989586621679091750)
type GetFirstSym1 (a6989586621680368288 :: First (a6989586621679091750 :: Type)) = GetFirst a6989586621680368288
data LastSym0 :: forall (a6989586621679091745 :: Type). (~>) (Maybe a6989586621679091745) (Last (a6989586621679091745 :: Type))
type LastSym1 (t6989586621680368314 :: Maybe a6989586621679091745) = 'Last t6989586621680368314
data GetLastSym0 :: forall (a6989586621679091745 :: Type). (~>) (Last (a6989586621679091745 :: Type)) (Maybe a6989586621679091745)
type GetLastSym1 (a6989586621680368311 :: Last (a6989586621679091745 :: Type)) = GetLast a6989586621680368311
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374568Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.Last a)
instance forall a6989586621680374264 (a6989586621680374566 :: Data.Monoid.Last a6989586621680374264). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374568Sym1 a6989586621680374566)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680374576BSym0
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374541Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.Last
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680374539 :: Data.Monoid.Last a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374541Sym1 a6989586621680374539)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680374549Sym0
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.Last
instance forall k k1 a (a6989586621680374547 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680374549Sym1 a6989586621680374547)
instance forall k k1 a (k6989586621680374548 :: k) (a6989586621680374547 :: k1 Data.Singletons.Internal.~> Data.Monoid.Last a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680374549Sym2 k6989586621680374548 a6989586621680374547)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680374552Scrutinee_6989586621680374275Sym0
instance forall k1 k2 k3 (x6989586621680374551 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680374552Scrutinee_6989586621680374275Sym1 x6989586621680374551)
instance forall k1 k2 k3 (a6989586621680374547 :: k1) (x6989586621680374551 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680374552Scrutinee_6989586621680374275Sym2 a6989586621680374547 x6989586621680374551)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374529Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.Last
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680374527 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374529Sym1 a6989586621680374527)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680374517Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680374515 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680374517Sym1 a6989586621680374515)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374505Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.Last
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680374503 :: Data.Monoid.Last (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374505Sym1 a6989586621680374503)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680374495Sym0
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.First a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374480Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.First a)
instance forall a6989586621680374254 (a6989586621680374478 :: Data.Monoid.First a6989586621680374254). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374480Sym1 a6989586621680374478)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680374488ASym0
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.First a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374453Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.First
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680374451 :: Data.Monoid.First a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374453Sym1 a6989586621680374451)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680374461Sym0
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.First
instance forall k k1 a (a6989586621680374459 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680374461Sym1 a6989586621680374459)
instance forall k k1 a (k6989586621680374460 :: k) (a6989586621680374459 :: k1 Data.Singletons.Internal.~> Data.Monoid.First a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680374461Sym2 k6989586621680374460 a6989586621680374459)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680374464Scrutinee_6989586621680374268Sym0
instance forall k1 k2 k3 (x6989586621680374463 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680374464Scrutinee_6989586621680374268Sym1 x6989586621680374463)
instance forall k1 k2 k3 (a6989586621680374459 :: k1) (x6989586621680374463 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680374464Scrutinee_6989586621680374268Sym2 a6989586621680374459 x6989586621680374463)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374441Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.First
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680374439 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374441Sym1 a6989586621680374439)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680374429Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680374427 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680374429Sym1 a6989586621680374427)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374417Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.First
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680374415 :: Data.Monoid.First (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680374417Sym1 a6989586621680374415)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680374407Sym0
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Ord.Down a)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Internal.Product a)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Internal.Sum a)
instance Data.Singletons.Prelude.Monoid.PMonoid Data.Semigroup.Internal.Any
instance Data.Singletons.Prelude.Monoid.PMonoid Data.Semigroup.Internal.All
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Internal.Dual a)
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Internal.Dual a)
instance Data.Singletons.Prelude.Monoid.SMonoid Data.Semigroup.Internal.All
instance Data.Singletons.Prelude.Monoid.SMonoid Data.Semigroup.Internal.Any
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Internal.Sum a)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Internal.Product a)
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Ord.Down a)
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Monoid.First
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Monoid.First
instance Data.Singletons.Prelude.Monoid.SMonoid (Data.Monoid.First a)
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Monoid.Last
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Monoid.Last
instance Data.Singletons.Prelude.Monoid.SMonoid (Data.Monoid.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371355Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371355Sym1 a6989586621680371352)
instance forall a6989586621679091745 (a6989586621680371353 :: GHC.Types.Nat) (a6989586621680371352 :: Data.Monoid.Last a6989586621679091745). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371355Sym2 a6989586621680371353 a6989586621680371352)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371324Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.First a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371324Sym1 a6989586621680371321)
instance forall a6989586621679091750 (a6989586621680371322 :: GHC.Types.Nat) (a6989586621680371321 :: Data.Monoid.First a6989586621679091750). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680371324Sym2 a6989586621680371322 a6989586621680371321)
instance Data.Singletons.Prelude.Show.SShow (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Show.SShow (Data.Monoid.First a)
instance Data.Singletons.Prelude.Show.SShow (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Show.SShow (Data.Monoid.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Compare_6989586621680370049Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.Last a)
instance forall a6989586621679091745 (a6989586621680370047 :: Data.Monoid.Last a6989586621679091745). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680370049Sym1 a6989586621680370047)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Compare_6989586621680370028Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.First a)
instance forall a6989586621679091750 (a6989586621680370026 :: Data.Monoid.First a6989586621679091750). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680370028Sym1 a6989586621680370026)
instance Data.Singletons.Prelude.Ord.SOrd (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Ord.SOrd (Data.Monoid.First a)
instance Data.Singletons.Prelude.Ord.SOrd (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Ord.SOrd (Data.Monoid.Last a)
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Singletons.Decide.SDecide (Data.Monoid.First a)
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Type.Equality.TestEquality Data.Singletons.Prelude.Monoid.SFirst
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Type.Coercion.TestCoercion Data.Singletons.Prelude.Monoid.SFirst
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Singletons.Decide.SDecide (Data.Monoid.Last a)
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Type.Equality.TestEquality Data.Singletons.Prelude.Monoid.SLast
instance Data.Singletons.Decide.SDecide (GHC.Maybe.Maybe a) => Data.Type.Coercion.TestCoercion Data.Singletons.Prelude.Monoid.SLast
instance Data.Singletons.Prelude.Eq.PEq (Data.Monoid.Last a)
instance Data.Singletons.Prelude.Eq.PEq (Data.Monoid.First a)
instance Data.Singletons.Prelude.Eq.SEq (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Eq.SEq (Data.Monoid.First a)
instance Data.Singletons.Prelude.Eq.SEq (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Eq.SEq (Data.Monoid.Last a)
instance forall a (z :: Data.Monoid.First a). Data.Singletons.ShowSing.ShowSing (GHC.Maybe.Maybe a) => GHC.Show.Show (Data.Singletons.Prelude.Monoid.SFirst z)
instance forall a (z :: Data.Monoid.Last a). Data.Singletons.ShowSing.ShowSing (GHC.Maybe.Maybe a) => GHC.Show.Show (Data.Singletons.Prelude.Monoid.SLast z)
instance Data.Singletons.Internal.SingKind a => Data.Singletons.Internal.SingKind (Data.Monoid.Last a)
instance forall a (n :: GHC.Maybe.Maybe a). Data.Singletons.Internal.SingI n => Data.Singletons.Internal.SingI ('Data.Monoid.Last n)
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.LastSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.LastSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.GetLastSym0
instance Data.Singletons.Internal.SingKind a => Data.Singletons.Internal.SingKind (Data.Monoid.First a)
instance forall a (n :: GHC.Maybe.Maybe a). Data.Singletons.Internal.SingI n => Data.Singletons.Internal.SingI ('Data.Monoid.First n)
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.FirstSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.FirstSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.GetFirstSym0
instance Data.Singletons.Prelude.Monoid.SMonoid [a]
instance Data.Singletons.Prelude.Monoid.SMonoid b => Data.Singletons.Prelude.Monoid.SMonoid (a Data.Singletons.Internal.~> b)
instance Data.Singletons.Prelude.Monoid.SMonoid ()
instance (Data.Singletons.Prelude.Monoid.SMonoid a, Data.Singletons.Prelude.Monoid.SMonoid b) => Data.Singletons.Prelude.Monoid.SMonoid (a, b)
instance (Data.Singletons.Prelude.Monoid.SMonoid a, Data.Singletons.Prelude.Monoid.SMonoid b, Data.Singletons.Prelude.Monoid.SMonoid c) => Data.Singletons.Prelude.Monoid.SMonoid (a, b, c)
instance (Data.Singletons.Prelude.Monoid.SMonoid a, Data.Singletons.Prelude.Monoid.SMonoid b, Data.Singletons.Prelude.Monoid.SMonoid c, Data.Singletons.Prelude.Monoid.SMonoid d) => Data.Singletons.Prelude.Monoid.SMonoid (a, b, c, d)
instance (Data.Singletons.Prelude.Monoid.SMonoid a, Data.Singletons.Prelude.Monoid.SMonoid b, Data.Singletons.Prelude.Monoid.SMonoid c, Data.Singletons.Prelude.Monoid.SMonoid d, Data.Singletons.Prelude.Monoid.SMonoid e) => Data.Singletons.Prelude.Monoid.SMonoid (a, b, c, d, e)
instance Data.Singletons.Prelude.Monoid.SMonoid GHC.Types.Ordering
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup a => Data.Singletons.Prelude.Monoid.SMonoid (GHC.Maybe.Maybe a)
instance Data.Singletons.Prelude.Monoid.SMonoid GHC.Types.Symbol
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.MappendSym0
instance forall a (d :: a). (Data.Singletons.Prelude.Monoid.SMonoid a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monoid.MappendSym1 d)
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.MconcatSym0
instance Data.Singletons.Prelude.Monoid.PMonoid GHC.Types.Symbol
instance Data.Singletons.Prelude.Monoid.PMonoid (GHC.Maybe.Maybe a)
instance Data.Singletons.Prelude.Monoid.PMonoid GHC.Types.Ordering
instance Data.Singletons.Prelude.Monoid.PMonoid (a, b, c, d, e)
instance Data.Singletons.Prelude.Monoid.PMonoid (a, b, c, d)
instance Data.Singletons.Prelude.Monoid.PMonoid (a, b, c)
instance Data.Singletons.Prelude.Monoid.PMonoid (a, b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mconcat_6989586621680364923Sym0
instance Data.Singletons.Prelude.Monoid.PMonoid ()
instance Data.Singletons.Prelude.Monoid.PMonoid (a Data.Singletons.Internal.~> b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680364912Sym0
instance Data.Singletons.Prelude.Monoid.PMonoid [a]
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MconcatSym0
instance forall a6989586621680364721 (arg6989586621680364860 :: a6989586621680364721). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.MappendSym1 arg6989586621680364860)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MappendSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mconcat_6989586621680364883Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mappend_6989586621680364868Sym0
instance forall a6989586621680364721 (a6989586621680364866 :: a6989586621680364721). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Mappend_6989586621680364868Sym1 a6989586621680364866)
-- | Defines functions and datatypes relating to the singleton for
-- Either, including a singletons version 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.Singletons.Prelude.Either
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SEither :: forall a_alRF b_alRG. Either a_alRF b_alRG -> Type
[SLeft] :: forall a_alRF (n_a1hs0 :: a_alRF). () => Sing (n_a1hs0 :: a_alRF) -> SEither ('Left n_a1hs0)
[SRight] :: forall b_alRG (n_a1hs2 :: b_alRG). () => Sing (n_a1hs2 :: b_alRG) -> SEither ('Right n_a1hs2)
either_ :: (a_a67Sj -> c_a67Sk) -> (b_a67Sl -> c_a67Sk) -> Either a_a67Sj b_a67Sl -> c_a67Sk
type family Either_ (a_a67ST :: (~>) a_a67Sj c_a67Sk) (a_a67SU :: (~>) b_a67Sl c_a67Sk) (a_a67SV :: Either a_a67Sj b_a67Sl) :: c_a67Sk
sEither_ :: forall a_a67Sj c_a67Sk b_a67Sl (t_a67T3 :: (~>) a_a67Sj c_a67Sk) (t_a67T4 :: (~>) b_a67Sl c_a67Sk) (t_a67T5 :: Either a_a67Sj b_a67Sl). Sing t_a67T3 -> Sing t_a67T4 -> Sing t_a67T5 -> Sing (Apply (Apply (Apply Either_Sym0 t_a67T3) t_a67T4) t_a67T5 :: c_a67Sk)
type family Lefts (a_a68kB :: [Either a_a68gd b_a68ge]) :: [a_a68gd]
sLefts :: forall a_a68gd b_a68ge (t_a68kO :: [Either a_a68gd b_a68ge]). Sing t_a68kO -> Sing (Apply LeftsSym0 t_a68kO :: [a_a68gd])
type family Rights (a_a68kw :: [Either a_a68gb b_a68gc]) :: [b_a68gc]
sRights :: forall a_a68gb b_a68gc (t_a68kM :: [Either a_a68gb b_a68gc]). Sing t_a68kM -> Sing (Apply RightsSym0 t_a68kM :: [b_a68gc])
type family PartitionEithers (a_a68kc :: [Either a_a68g9 b_a68ga]) :: ([a_a68g9], [b_a68ga])
sPartitionEithers :: forall a_a68g9 b_a68ga (t_a68kK :: [Either a_a68g9 b_a68ga]). Sing t_a68kK -> Sing (Apply PartitionEithersSym0 t_a68kK :: ([a_a68g9], [b_a68ga]))
type family IsLeft (a_a68k8 :: Either a_a68g7 b_a68g8) :: Bool
sIsLeft :: forall a_a68g7 b_a68g8 (t_a68kI :: Either a_a68g7 b_a68g8). Sing t_a68kI -> Sing (Apply IsLeftSym0 t_a68kI :: Bool)
type family IsRight (a_a68k6 :: Either a_a68g5 b_a68g6) :: Bool
sIsRight :: forall a_a68g5 b_a68g6 (t_a68kG :: Either a_a68g5 b_a68g6). Sing t_a68kG -> Sing (Apply IsRightSym0 t_a68kG :: Bool)
data LeftSym0 :: forall (a6989586621679093843 :: Type) (b6989586621679093844 :: Type). (~>) a6989586621679093843 (Either (a6989586621679093843 :: Type) (b6989586621679093844 :: Type))
type LeftSym1 (t6989586621679315200 :: a6989586621679093843) = 'Left t6989586621679315200
data RightSym0 :: forall (b6989586621679093844 :: Type) (a6989586621679093843 :: Type). (~>) b6989586621679093844 (Either (a6989586621679093843 :: Type) (b6989586621679093844 :: Type))
type RightSym1 (t6989586621679315202 :: b6989586621679093844) = 'Right t6989586621679315202
data Either_Sym0 :: forall a6989586621680470035 c6989586621680470036 b6989586621680470037. (~>) ((~>) a6989586621680470035 c6989586621680470036) ((~>) ((~>) b6989586621680470037 c6989586621680470036) ((~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036))
data Either_Sym1 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) :: forall b6989586621680470037. (~>) ((~>) b6989586621680470037 c6989586621680470036) ((~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036)
data Either_Sym2 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) (a6989586621680470072 :: (~>) b6989586621680470037 c6989586621680470036) :: (~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036
type Either_Sym3 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) (a6989586621680470072 :: (~>) b6989586621680470037 c6989586621680470036) (a6989586621680470073 :: Either a6989586621680470035 b6989586621680470037) = Either_ a6989586621680470071 a6989586621680470072 a6989586621680470073
data LeftsSym0 :: forall a6989586621680471517 b6989586621680471518. (~>) [Either a6989586621680471517 b6989586621680471518] [a6989586621680471517]
type LeftsSym1 (a6989586621680471789 :: [Either a6989586621680471517 b6989586621680471518]) = Lefts a6989586621680471789
data RightsSym0 :: forall a6989586621680471515 b6989586621680471516. (~>) [Either a6989586621680471515 b6989586621680471516] [b6989586621680471516]
type RightsSym1 (a6989586621680471784 :: [Either a6989586621680471515 b6989586621680471516]) = Rights a6989586621680471784
data IsLeftSym0 :: forall a6989586621680471511 b6989586621680471512. (~>) (Either a6989586621680471511 b6989586621680471512) Bool
type IsLeftSym1 (a6989586621680471760 :: Either a6989586621680471511 b6989586621680471512) = IsLeft a6989586621680471760
data IsRightSym0 :: forall a6989586621680471509 b6989586621680471510. (~>) (Either a6989586621680471509 b6989586621680471510) Bool
type IsRightSym1 (a6989586621680471758 :: Either a6989586621680471509 b6989586621680471510) = IsRight a6989586621680471758
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.LeftsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.LeftsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.RightsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.RightsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.PartitionEithersSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.PartitionEithersSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.IsLeftSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.IsLeftSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.IsRightSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.IsRightSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Let6989586621680471767LeftSym0
instance forall k k2 k3 (a_69895866216804717626989586621680471766 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680471767LeftSym1 a_69895866216804717626989586621680471766)
instance forall k k2 k3 (a6989586621680471776 :: k) (a_69895866216804717626989586621680471766 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680471767LeftSym2 a6989586621680471776 a_69895866216804717626989586621680471766)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Let6989586621680471767RightSym0
instance forall k k2 k3 (a_69895866216804717626989586621680471766 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680471767RightSym1 a_69895866216804717626989586621680471766)
instance forall k k2 k3 (a6989586621680471768 :: k) (a_69895866216804717626989586621680471766 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680471767RightSym2 a6989586621680471768 a_69895866216804717626989586621680471766)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Either_Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.Either_Sym0
instance forall a6989586621680470035 c6989586621680470036 b6989586621680470037 (a6989586621680470071 :: a6989586621680470035 Data.Singletons.Internal.~> c6989586621680470036). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym1 a6989586621680470071)
instance forall a c b (d :: a Data.Singletons.Internal.~> c). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Either.Either_Sym1 d)
instance forall a6989586621680470035 c6989586621680470036 b6989586621680470037 (a6989586621680470072 :: a6989586621680470035 Data.Singletons.Internal.~> c6989586621680470036) (a6989586621680470071 :: b6989586621680470037 Data.Singletons.Internal.~> c6989586621680470036). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym2 a6989586621680470072 a6989586621680470071)
instance forall a c b (d1 :: a Data.Singletons.Internal.~> c) (d2 :: b Data.Singletons.Internal.~> c). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Either.Either_Sym2 d1 d2)
-- | Defines the promoted and singled versions of the Foldable type
-- class.
module Data.Singletons.Prelude.Foldable
class PFoldable (t_a6dcq :: Type -> Type) where {
type family Fold (arg_a6dmp :: t_a6dcq m_a6dcr) :: m_a6dcr;
type family FoldMap (arg_a6dmr :: (~>) a_a6dct m_a6dcs) (arg_a6dms :: t_a6dcq a_a6dct) :: m_a6dcs;
type family Foldr (arg_a6dmv :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (arg_a6dmw :: b_a6dcv) (arg_a6dmx :: t_a6dcq a_a6dcu) :: b_a6dcv;
type family Foldr' (arg_a6dmB :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (arg_a6dmC :: b_a6dcx) (arg_a6dmD :: t_a6dcq a_a6dcw) :: b_a6dcx;
type family Foldl (arg_a6dmH :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (arg_a6dmI :: b_a6dcy) (arg_a6dmJ :: t_a6dcq a_a6dcz) :: b_a6dcy;
type family Foldl' (arg_a6dmN :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (arg_a6dmO :: b_a6dcA) (arg_a6dmP :: t_a6dcq a_a6dcB) :: b_a6dcA;
type family Foldr1 (arg_a6dmT :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (arg_a6dmU :: t_a6dcq a_a6dcC) :: a_a6dcC;
type family Foldl1 (arg_a6dmX :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (arg_a6dmY :: t_a6dcq a_a6dcD) :: a_a6dcD;
type family ToList (arg_a6dn1 :: t_a6dcq a_a6dcE) :: [a_a6dcE];
type family Null (arg_a6dn3 :: t_a6dcq a_a6dcF) :: Bool;
type family Length (arg_a6dn5 :: t_a6dcq a_a6dcG) :: Nat;
type family Elem (arg_a6dn7 :: a_a6dcH) (arg_a6dn8 :: t_a6dcq a_a6dcH) :: Bool;
type family Maximum (arg_a6dnb :: t_a6dcq a_a6dcI) :: a_a6dcI;
type family Minimum (arg_a6dnd :: t_a6dcq a_a6dcJ) :: a_a6dcJ;
type family Sum (arg_a6dnf :: t_a6dcq a_a6dcK) :: a_a6dcK;
type family Product (arg_a6dnh :: t_a6dcq a_a6dcL) :: a_a6dcL;
type Fold a_a6dnj = Apply Fold_6989586621680491178Sym0 a_a6dnj;
type FoldMap a_a6dns a_a6dnt = Apply (Apply FoldMap_6989586621680491188Sym0 a_a6dns) a_a6dnt;
type Foldr a_a6dnG a_a6dnH a_a6dnI = Apply (Apply (Apply Foldr_6989586621680491203Sym0 a_a6dnG) a_a6dnH) a_a6dnI;
type Foldr' a_a6do5 a_a6do6 a_a6do7 = Apply (Apply (Apply Foldr'_6989586621680491228Sym0 a_a6do5) a_a6do6) a_a6do7;
type Foldl a_a6doz a_a6doA a_a6doB = Apply (Apply (Apply Foldl_6989586621680491258Sym0 a_a6doz) a_a6doA) a_a6doB;
type Foldl' a_a6doY a_a6doZ a_a6dp0 = Apply (Apply (Apply Foldl'_6989586621680491283Sym0 a_a6doY) a_a6doZ) a_a6dp0;
type Foldr1 a_a6dps a_a6dpt = Apply (Apply Foldr1_6989586621680491312Sym0 a_a6dps) a_a6dpt;
type Foldl1 a_a6dpR a_a6dpS = Apply (Apply Foldl1_6989586621680491337Sym0 a_a6dpR) a_a6dpS;
type ToList a_a6dqg = Apply ToList_6989586621680491361Sym0 a_a6dqg;
type Null a_a6dqp = Apply Null_6989586621680491370Sym0 a_a6dqp;
type Length a_a6dqK = Apply Length_6989586621680491391Sym0 a_a6dqK;
type Elem a_a6dr6 a_a6dr7 = Apply (Apply Elem_6989586621680491414Sym0 a_a6dr6) a_a6dr7;
type Maximum a_a6drm = Apply Maximum_6989586621680491429Sym0 a_a6drm;
type Minimum a_a6drz = Apply Minimum_6989586621680491442Sym0 a_a6drz;
type Sum a_a6drM = Apply Sum_6989586621680491455Sym0 a_a6drM;
type Product a_a6drZ = Apply Product_6989586621680491468Sym0 a_a6drZ;
}
class SFoldable (t_a6dcq :: Type -> Type)
sFold :: forall m_a6dcr (t_a6dIh :: t_a6dcq m_a6dcr). (SFoldable t_a6dcq, SMonoid m_a6dcr) => Sing t_a6dIh -> Sing (Apply FoldSym0 t_a6dIh :: m_a6dcr)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). SFoldable t_a6dcq => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldr' :: forall a_a6dcw b_a6dcx (t_a6dIt :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (t_a6dIu :: b_a6dcx) (t_a6dIv :: t_a6dcq a_a6dcw). SFoldable t_a6dcq => Sing t_a6dIt -> Sing t_a6dIu -> Sing t_a6dIv -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). SFoldable t_a6dcq => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldl' :: forall b_a6dcA a_a6dcB (t_a6dIF :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (t_a6dIG :: b_a6dcA) (t_a6dIH :: t_a6dcq a_a6dcB). SFoldable t_a6dcq => Sing t_a6dIF -> Sing t_a6dIG -> Sing t_a6dIH -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). SFoldable t_a6dcq => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). SFoldable t_a6dcq => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sToList :: forall a_a6dcE (t_a6dIT :: t_a6dcq a_a6dcE). SFoldable t_a6dcq => Sing t_a6dIT -> Sing (Apply ToListSym0 t_a6dIT :: [a_a6dcE])
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). SFoldable t_a6dcq => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
sLength :: forall a_a6dcG (t_a6dIX :: t_a6dcq a_a6dcG). SFoldable t_a6dcq => Sing t_a6dIX -> Sing (Apply LengthSym0 t_a6dIX :: Nat)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
sFold :: forall m_a6dcr (t_a6dIh :: t_a6dcq m_a6dcr). (SFoldable t_a6dcq, (Apply FoldSym0 t_a6dIh :: m_a6dcr) ~ Apply Fold_6989586621680491178Sym0 t_a6dIh, SMonoid m_a6dcr) => Sing t_a6dIh -> Sing (Apply FoldSym0 t_a6dIh :: m_a6dcr)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs) ~ Apply (Apply FoldMap_6989586621680491188Sym0 t_a6dIj) t_a6dIk, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv) ~ Apply (Apply (Apply Foldr_6989586621680491203Sym0 t_a6dIn) t_a6dIo) t_a6dIp) => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldr' :: forall a_a6dcw b_a6dcx (t_a6dIt :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (t_a6dIu :: b_a6dcx) (t_a6dIv :: t_a6dcq a_a6dcw). (SFoldable t_a6dcq, (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx) ~ Apply (Apply (Apply Foldr'_6989586621680491228Sym0 t_a6dIt) t_a6dIu) t_a6dIv) => Sing t_a6dIt -> Sing t_a6dIu -> Sing t_a6dIv -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy) ~ Apply (Apply (Apply Foldl_6989586621680491258Sym0 t_a6dIz) t_a6dIA) t_a6dIB) => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldl' :: forall b_a6dcA a_a6dcB (t_a6dIF :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (t_a6dIG :: b_a6dcA) (t_a6dIH :: t_a6dcq a_a6dcB). (SFoldable t_a6dcq, (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA) ~ Apply (Apply (Apply Foldl'_6989586621680491283Sym0 t_a6dIF) t_a6dIG) t_a6dIH) => Sing t_a6dIF -> Sing t_a6dIG -> Sing t_a6dIH -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). (SFoldable t_a6dcq, (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC) ~ Apply (Apply Foldr1_6989586621680491312Sym0 t_a6dIL) t_a6dIM) => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). (SFoldable t_a6dcq, (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD) ~ Apply (Apply Foldl1_6989586621680491337Sym0 t_a6dIP) t_a6dIQ) => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sToList :: forall a_a6dcE (t_a6dIT :: t_a6dcq a_a6dcE). (SFoldable t_a6dcq, (Apply ToListSym0 t_a6dIT :: [a_a6dcE]) ~ Apply ToList_6989586621680491361Sym0 t_a6dIT) => Sing t_a6dIT -> Sing (Apply ToListSym0 t_a6dIT :: [a_a6dcE])
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). (SFoldable t_a6dcq, (Apply NullSym0 t_a6dIV :: Bool) ~ Apply Null_6989586621680491370Sym0 t_a6dIV) => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
sLength :: forall a_a6dcG (t_a6dIX :: t_a6dcq a_a6dcG). (SFoldable t_a6dcq, (Apply LengthSym0 t_a6dIX :: Nat) ~ Apply Length_6989586621680491391Sym0 t_a6dIX) => Sing t_a6dIX -> Sing (Apply LengthSym0 t_a6dIX :: Nat)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool) ~ Apply (Apply Elem_6989586621680491414Sym0 t_a6dIZ) t_a6dJ0, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI) ~ Apply Maximum_6989586621680491429Sym0 t_a6dJ3, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ) ~ Apply Minimum_6989586621680491442Sym0 t_a6dJ5, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, (Apply SumSym0 t_a6dJ7 :: a_a6dcK) ~ Apply Sum_6989586621680491455Sym0 t_a6dJ7, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, (Apply ProductSym0 t_a6dJ9 :: a_a6dcL) ~ Apply Product_6989586621680491468Sym0 t_a6dJ9, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
type family FoldrM (a_a6dm3 :: (~>) a_a6dbN ((~>) b_a6dbO (m_a6dbM b_a6dbO))) (a_a6dm4 :: b_a6dbO) (a_a6dm5 :: t_a6dbL a_a6dbN) :: m_a6dbM b_a6dbO
sFoldrM :: forall a_a6dbN b_a6dbO m_a6dbM t_a6dbL (t_a6dHw :: (~>) a_a6dbN ((~>) b_a6dbO (m_a6dbM b_a6dbO))) (t_a6dHx :: b_a6dbO) (t_a6dHy :: t_a6dbL a_a6dbN). (SFoldable t_a6dbL, SMonad m_a6dbM) => Sing t_a6dHw -> Sing t_a6dHx -> Sing t_a6dHy -> Sing (Apply (Apply (Apply FoldrMSym0 t_a6dHw) t_a6dHx) t_a6dHy :: m_a6dbM b_a6dbO)
type family FoldlM (a_a6dlH :: (~>) b_a6dbJ ((~>) a_a6dbK (m_a6dbI b_a6dbJ))) (a_a6dlI :: b_a6dbJ) (a_a6dlJ :: t_a6dbH a_a6dbK) :: m_a6dbI b_a6dbJ
sFoldlM :: forall b_a6dbJ a_a6dbK m_a6dbI t_a6dbH (t_a6dHq :: (~>) b_a6dbJ ((~>) a_a6dbK (m_a6dbI b_a6dbJ))) (t_a6dHr :: b_a6dbJ) (t_a6dHs :: t_a6dbH a_a6dbK). (SFoldable t_a6dbH, SMonad m_a6dbI) => Sing t_a6dHq -> Sing t_a6dHr -> Sing t_a6dHs -> Sing (Apply (Apply (Apply FoldlMSym0 t_a6dHq) t_a6dHr) t_a6dHs :: m_a6dbI b_a6dbJ)
type family Traverse_ (a_a6dlz :: (~>) a_a6dbF (f_a6dbE b_a6dbG)) (a_a6dlA :: t_a6dbD a_a6dbF) :: f_a6dbE ()
sTraverse_ :: forall a_a6dbF f_a6dbE b_a6dbG t_a6dbD (t_a6dHm :: (~>) a_a6dbF (f_a6dbE b_a6dbG)) (t_a6dHn :: t_a6dbD a_a6dbF). (SFoldable t_a6dbD, SApplicative f_a6dbE) => Sing t_a6dHm -> Sing t_a6dHn -> Sing (Apply (Apply Traverse_Sym0 t_a6dHm) t_a6dHn :: f_a6dbE ())
type family For_ (a_a6dlt :: t_a6dbz a_a6dbB) (a_a6dlu :: (~>) a_a6dbB (f_a6dbA b_a6dbC)) :: f_a6dbA ()
sFor_ :: forall t_a6dbz a_a6dbB f_a6dbA b_a6dbC (t_a6dHi :: t_a6dbz a_a6dbB) (t_a6dHj :: (~>) a_a6dbB (f_a6dbA b_a6dbC)). (SFoldable t_a6dbz, SApplicative f_a6dbA) => Sing t_a6dHi -> Sing t_a6dHj -> Sing (Apply (Apply For_Sym0 t_a6dHi) t_a6dHj :: f_a6dbA ())
type family SequenceA_ (a_a6dl4 :: t_a6dbo (f_a6dbp a_a6dbq)) :: f_a6dbp ()
sSequenceA_ :: forall t_a6dbo f_a6dbp a_a6dbq (t_a6dH8 :: t_a6dbo (f_a6dbp a_a6dbq)). (SFoldable t_a6dbo, SApplicative f_a6dbp) => Sing t_a6dH8 -> Sing (Apply SequenceA_Sym0 t_a6dH8 :: f_a6dbp ())
type family Asum (a_a6dkU :: t_a6dbi (f_a6dbj a_a6dbk)) :: f_a6dbj a_a6dbk
sAsum :: forall t_a6dbi f_a6dbj a_a6dbk (t_a6dH4 :: t_a6dbi (f_a6dbj a_a6dbk)). (SFoldable t_a6dbi, SAlternative f_a6dbj) => Sing t_a6dH4 -> Sing (Apply AsumSym0 t_a6dH4 :: f_a6dbj a_a6dbk)
type family MapM_ (a_a6dlh :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (a_a6dli :: t_a6dbv a_a6dbx) :: m_a6dbw ()
sMapM_ :: forall a_a6dbx m_a6dbw b_a6dby t_a6dbv (t_a6dHe :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (t_a6dHf :: t_a6dbv a_a6dbx). (SFoldable t_a6dbv, SMonad m_a6dbw) => Sing t_a6dHe -> Sing t_a6dHf -> Sing (Apply (Apply MapM_Sym0 t_a6dHe) t_a6dHf :: m_a6dbw ())
type family ForM_ (a_a6dlb :: t_a6dbr a_a6dbt) (a_a6dlc :: (~>) a_a6dbt (m_a6dbs b_a6dbu)) :: m_a6dbs ()
sForM_ :: forall t_a6dbr a_a6dbt m_a6dbs b_a6dbu (t_a6dHa :: t_a6dbr a_a6dbt) (t_a6dHb :: (~>) a_a6dbt (m_a6dbs b_a6dbu)). (SFoldable t_a6dbr, SMonad m_a6dbs) => Sing t_a6dHa -> Sing t_a6dHb -> Sing (Apply (Apply ForM_Sym0 t_a6dHa) t_a6dHb :: m_a6dbs ())
type family Sequence_ (a_a6dkZ :: t_a6dbl (m_a6dbm a_a6dbn)) :: m_a6dbm ()
sSequence_ :: forall t_a6dbl m_a6dbm a_a6dbn (t_a6dH6 :: t_a6dbl (m_a6dbm a_a6dbn)). (SFoldable t_a6dbl, SMonad m_a6dbm) => Sing t_a6dH6 -> Sing (Apply Sequence_Sym0 t_a6dH6 :: m_a6dbm ())
type family Msum (a_a6dkP :: t_a6dbf (m_a6dbg a_a6dbh)) :: m_a6dbg a_a6dbh
sMsum :: forall t_a6dbf m_a6dbg a_a6dbh (t_a6dH2 :: t_a6dbf (m_a6dbg a_a6dbh)). (SFoldable t_a6dbf, SMonadPlus m_a6dbg) => Sing t_a6dH2 -> Sing (Apply MsumSym0 t_a6dH2 :: m_a6dbg a_a6dbh)
type family Concat (a_a6dkB :: t_a6dbd [a_a6dbe]) :: [a_a6dbe]
sConcat :: forall t_a6dbd a_a6dbe (t_a6dH0 :: t_a6dbd [a_a6dbe]). SFoldable t_a6dbd => Sing t_a6dH0 -> Sing (Apply ConcatSym0 t_a6dH0 :: [a_a6dbe])
type family ConcatMap (a_a6dkl :: (~>) a_a6dbb [b_a6dbc]) (a_a6dkm :: t_a6dba a_a6dbb) :: [b_a6dbc]
sConcatMap :: forall a_a6dbb b_a6dbc t_a6dba (t_a6dGW :: (~>) a_a6dbb [b_a6dbc]) (t_a6dGX :: t_a6dba a_a6dbb). SFoldable t_a6dba => Sing t_a6dGW -> Sing t_a6dGX -> Sing (Apply (Apply ConcatMapSym0 t_a6dGW) t_a6dGX :: [b_a6dbc])
type family And (a_a6dkc :: t_a6db9 Bool) :: Bool
sAnd :: forall t_a6db9 (t_a6dGU :: t_a6db9 Bool). SFoldable t_a6db9 => Sing t_a6dGU -> Sing (Apply AndSym0 t_a6dGU :: Bool)
type family Or (a_a6dk3 :: t_a6db8 Bool) :: Bool
sOr :: forall t_a6db8 (t_a6dGS :: t_a6db8 Bool). SFoldable t_a6db8 => Sing t_a6dGS -> Sing (Apply OrSym0 t_a6dGS :: Bool)
type family Any (a_a6djQ :: (~>) a_a6db7 Bool) (a_a6djR :: t_a6db6 a_a6db7) :: Bool
sAny :: forall a_a6db7 t_a6db6 (t_a6dGO :: (~>) a_a6db7 Bool) (t_a6dGP :: t_a6db6 a_a6db7). SFoldable t_a6db6 => Sing t_a6dGO -> Sing t_a6dGP -> Sing (Apply (Apply AnySym0 t_a6dGO) t_a6dGP :: Bool)
type family All (a_a6djD :: (~>) a_a6db5 Bool) (a_a6djE :: t_a6db4 a_a6db5) :: Bool
sAll :: forall a_a6db5 t_a6db4 (t_a6dGK :: (~>) a_a6db5 Bool) (t_a6dGL :: t_a6db4 a_a6db5). SFoldable t_a6db4 => Sing t_a6dGK -> Sing t_a6dGL -> Sing (Apply (Apply AllSym0 t_a6dGK) t_a6dGL :: Bool)
type family MaximumBy (a_a6dje :: (~>) a_a6db3 ((~>) a_a6db3 Ordering)) (a_a6djf :: t_a6db2 a_a6db3) :: a_a6db3
sMaximumBy :: forall a_a6db3 t_a6db2 (t_a6dGG :: (~>) a_a6db3 ((~>) a_a6db3 Ordering)) (t_a6dGH :: t_a6db2 a_a6db3). SFoldable t_a6db2 => Sing t_a6dGG -> Sing t_a6dGH -> Sing (Apply (Apply MaximumBySym0 t_a6dGG) t_a6dGH :: a_a6db3)
type family MinimumBy (a_a6diP :: (~>) a_a6db1 ((~>) a_a6db1 Ordering)) (a_a6diQ :: t_a6db0 a_a6db1) :: a_a6db1
sMinimumBy :: forall a_a6db1 t_a6db0 (t_a6dGC :: (~>) a_a6db1 ((~>) a_a6db1 Ordering)) (t_a6dGD :: t_a6db0 a_a6db1). SFoldable t_a6db0 => Sing t_a6dGC -> Sing t_a6dGD -> Sing (Apply (Apply MinimumBySym0 t_a6dGC) t_a6dGD :: a_a6db1)
type family NotElem (a_a6diH :: a_a6daZ) (a_a6diI :: t_a6daY a_a6daZ) :: Bool
sNotElem :: forall a_a6daZ t_a6daY (t_a6dGy :: a_a6daZ) (t_a6dGz :: t_a6daY a_a6daZ). (SFoldable t_a6daY, SEq a_a6daZ) => Sing t_a6dGy -> Sing t_a6dGz -> Sing (Apply (Apply NotElemSym0 t_a6dGy) t_a6dGz :: Bool)
type family Find (a_a6dig :: (~>) a_a6daX Bool) (a_a6dih :: t_a6daW a_a6daX) :: Maybe a_a6daX
sFind :: forall a_a6daX t_a6daW (t_a6dGu :: (~>) a_a6daX Bool) (t_a6dGv :: t_a6daW a_a6daX). SFoldable t_a6daW => Sing t_a6dGu -> Sing t_a6dGv -> Sing (Apply (Apply FindSym0 t_a6dGu) t_a6dGv :: Maybe a_a6daX)
data FoldSym0 :: forall t6989586621680490502 m6989586621680490503. (~>) (t6989586621680490502 m6989586621680490503) m6989586621680490503
type FoldSym1 (arg6989586621680491121 :: t6989586621680490502 m6989586621680490503) = Fold arg6989586621680491121
data FoldMapSym0 :: forall a6989586621680490505 m6989586621680490504 t6989586621680490502. (~>) ((~>) a6989586621680490505 m6989586621680490504) ((~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504)
data FoldMapSym1 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504
type FoldMapSym2 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) (arg6989586621680491124 :: t6989586621680490502 a6989586621680490505) = FoldMap arg6989586621680491123 arg6989586621680491124
data FoldrSym0 :: forall a6989586621680490506 b6989586621680490507 t6989586621680490502. (~>) ((~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) ((~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507))
data FoldrSym1 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) :: forall t6989586621680490502. (~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507)
data FoldrSym2 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507
type FoldrSym3 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) (arg6989586621680491129 :: t6989586621680490502 a6989586621680490506) = Foldr arg6989586621680491127 arg6989586621680491128 arg6989586621680491129
data Foldr'Sym0 :: forall a6989586621680490508 b6989586621680490509 t6989586621680490502. (~>) ((~>) a6989586621680490508 ((~>) b6989586621680490509 b6989586621680490509)) ((~>) b6989586621680490509 ((~>) (t6989586621680490502 a6989586621680490508) b6989586621680490509))
data Foldr'Sym1 (arg6989586621680491133 :: (~>) a6989586621680490508 ((~>) b6989586621680490509 b6989586621680490509)) :: forall t6989586621680490502. (~>) b6989586621680490509 ((~>) (t6989586621680490502 a6989586621680490508) b6989586621680490509)
data Foldr'Sym2 (arg6989586621680491133 :: (~>) a6989586621680490508 ((~>) b6989586621680490509 b6989586621680490509)) (arg6989586621680491134 :: b6989586621680490509) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490508) b6989586621680490509
type Foldr'Sym3 (arg6989586621680491133 :: (~>) a6989586621680490508 ((~>) b6989586621680490509 b6989586621680490509)) (arg6989586621680491134 :: b6989586621680490509) (arg6989586621680491135 :: t6989586621680490502 a6989586621680490508) = Foldr' arg6989586621680491133 arg6989586621680491134 arg6989586621680491135
data FoldlSym0 :: forall b6989586621680490510 a6989586621680490511 t6989586621680490502. (~>) ((~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) ((~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510))
data FoldlSym1 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) :: forall t6989586621680490502. (~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510)
data FoldlSym2 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510
type FoldlSym3 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) (arg6989586621680491141 :: t6989586621680490502 a6989586621680490511) = Foldl arg6989586621680491139 arg6989586621680491140 arg6989586621680491141
data Foldl'Sym0 :: forall b6989586621680490512 a6989586621680490513 t6989586621680490502. (~>) ((~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) ((~>) b6989586621680490512 ((~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512))
data Foldl'Sym1 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) :: forall t6989586621680490502. (~>) b6989586621680490512 ((~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512)
data Foldl'Sym2 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) (arg6989586621680491146 :: b6989586621680490512) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512
type Foldl'Sym3 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) (arg6989586621680491146 :: b6989586621680490512) (arg6989586621680491147 :: t6989586621680490502 a6989586621680490513) = Foldl' arg6989586621680491145 arg6989586621680491146 arg6989586621680491147
data Foldr1Sym0 :: forall a6989586621680490514 t6989586621680490502. (~>) ((~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) ((~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514)
data Foldr1Sym1 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514
type Foldr1Sym2 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) (arg6989586621680491152 :: t6989586621680490502 a6989586621680490514) = Foldr1 arg6989586621680491151 arg6989586621680491152
data Foldl1Sym0 :: forall a6989586621680490515 t6989586621680490502. (~>) ((~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) ((~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515)
data Foldl1Sym1 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515
type Foldl1Sym2 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) (arg6989586621680491156 :: t6989586621680490502 a6989586621680490515) = Foldl1 arg6989586621680491155 arg6989586621680491156
data ToListSym0 :: forall t6989586621680490502 a6989586621680490516. (~>) (t6989586621680490502 a6989586621680490516) [a6989586621680490516]
type ToListSym1 (arg6989586621680491159 :: t6989586621680490502 a6989586621680490516) = ToList arg6989586621680491159
data NullSym0 :: forall t6989586621680490502 a6989586621680490517. (~>) (t6989586621680490502 a6989586621680490517) Bool
type NullSym1 (arg6989586621680491161 :: t6989586621680490502 a6989586621680490517) = Null arg6989586621680491161
data LengthSym0 :: forall t6989586621680490502 a6989586621680490518. (~>) (t6989586621680490502 a6989586621680490518) Nat
type LengthSym1 (arg6989586621680491163 :: t6989586621680490502 a6989586621680490518) = Length arg6989586621680491163
data ElemSym0 :: forall a6989586621680490519 t6989586621680490502. (~>) a6989586621680490519 ((~>) (t6989586621680490502 a6989586621680490519) Bool)
data ElemSym1 (arg6989586621680491165 :: a6989586621680490519) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490519) Bool
type ElemSym2 (arg6989586621680491165 :: a6989586621680490519) (arg6989586621680491166 :: t6989586621680490502 a6989586621680490519) = Elem arg6989586621680491165 arg6989586621680491166
data MaximumSym0 :: forall t6989586621680490502 a6989586621680490520. (~>) (t6989586621680490502 a6989586621680490520) a6989586621680490520
type MaximumSym1 (arg6989586621680491169 :: t6989586621680490502 a6989586621680490520) = Maximum arg6989586621680491169
data MinimumSym0 :: forall t6989586621680490502 a6989586621680490521. (~>) (t6989586621680490502 a6989586621680490521) a6989586621680490521
type MinimumSym1 (arg6989586621680491171 :: t6989586621680490502 a6989586621680490521) = Minimum arg6989586621680491171
data SumSym0 :: forall t6989586621680490502 a6989586621680490522. (~>) (t6989586621680490502 a6989586621680490522) a6989586621680490522
type SumSym1 (arg6989586621680491173 :: t6989586621680490502 a6989586621680490522) = Sum arg6989586621680491173
data ProductSym0 :: forall t6989586621680490502 a6989586621680490523. (~>) (t6989586621680490502 a6989586621680490523) a6989586621680490523
type ProductSym1 (arg6989586621680491175 :: t6989586621680490502 a6989586621680490523) = Product arg6989586621680491175
data FoldrMSym0 :: forall a6989586621680490463 b6989586621680490464 m6989586621680490462 t6989586621680490461. (~>) ((~>) a6989586621680490463 ((~>) b6989586621680490464 (m6989586621680490462 b6989586621680490464))) ((~>) b6989586621680490464 ((~>) (t6989586621680490461 a6989586621680490463) (m6989586621680490462 b6989586621680490464)))
data FoldrMSym1 (a6989586621680491099 :: (~>) a6989586621680490463 ((~>) b6989586621680490464 (m6989586621680490462 b6989586621680490464))) :: forall t6989586621680490461. (~>) b6989586621680490464 ((~>) (t6989586621680490461 a6989586621680490463) (m6989586621680490462 b6989586621680490464))
data FoldrMSym2 (a6989586621680491099 :: (~>) a6989586621680490463 ((~>) b6989586621680490464 (m6989586621680490462 b6989586621680490464))) (a6989586621680491100 :: b6989586621680490464) :: forall t6989586621680490461. (~>) (t6989586621680490461 a6989586621680490463) (m6989586621680490462 b6989586621680490464)
type FoldrMSym3 (a6989586621680491099 :: (~>) a6989586621680490463 ((~>) b6989586621680490464 (m6989586621680490462 b6989586621680490464))) (a6989586621680491100 :: b6989586621680490464) (a6989586621680491101 :: t6989586621680490461 a6989586621680490463) = FoldrM a6989586621680491099 a6989586621680491100 a6989586621680491101
data FoldlMSym0 :: forall b6989586621680490459 a6989586621680490460 m6989586621680490458 t6989586621680490457. (~>) ((~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) ((~>) b6989586621680490459 ((~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459)))
data FoldlMSym1 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) :: forall t6989586621680490457. (~>) b6989586621680490459 ((~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459))
data FoldlMSym2 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) (a6989586621680491078 :: b6989586621680490459) :: forall t6989586621680490457. (~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459)
type FoldlMSym3 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) (a6989586621680491078 :: b6989586621680490459) (a6989586621680491079 :: t6989586621680490457 a6989586621680490460) = FoldlM a6989586621680491077 a6989586621680491078 a6989586621680491079
data Traverse_Sym0 :: forall a6989586621680490455 f6989586621680490454 b6989586621680490456 t6989586621680490453. (~>) ((~>) a6989586621680490455 (f6989586621680490454 b6989586621680490456)) ((~>) (t6989586621680490453 a6989586621680490455) (f6989586621680490454 ()))
data Traverse_Sym1 (a6989586621680491069 :: (~>) a6989586621680490455 (f6989586621680490454 b6989586621680490456)) :: forall t6989586621680490453. (~>) (t6989586621680490453 a6989586621680490455) (f6989586621680490454 ())
type Traverse_Sym2 (a6989586621680491069 :: (~>) a6989586621680490455 (f6989586621680490454 b6989586621680490456)) (a6989586621680491070 :: t6989586621680490453 a6989586621680490455) = Traverse_ a6989586621680491069 a6989586621680491070
data For_Sym0 :: forall t6989586621680490449 a6989586621680490451 f6989586621680490450 b6989586621680490452. (~>) (t6989586621680490449 a6989586621680490451) ((~>) ((~>) a6989586621680490451 (f6989586621680490450 b6989586621680490452)) (f6989586621680490450 ()))
data For_Sym1 (a6989586621680491063 :: t6989586621680490449 a6989586621680490451) :: forall f6989586621680490450 b6989586621680490452. (~>) ((~>) a6989586621680490451 (f6989586621680490450 b6989586621680490452)) (f6989586621680490450 ())
type For_Sym2 (a6989586621680491063 :: t6989586621680490449 a6989586621680490451) (a6989586621680491064 :: (~>) a6989586621680490451 (f6989586621680490450 b6989586621680490452)) = For_ a6989586621680491063 a6989586621680491064
data SequenceA_Sym0 :: forall t6989586621680490438 f6989586621680490439 a6989586621680490440. (~>) (t6989586621680490438 (f6989586621680490439 a6989586621680490440)) (f6989586621680490439 ())
type SequenceA_Sym1 (a6989586621680491038 :: t6989586621680490438 (f6989586621680490439 a6989586621680490440)) = SequenceA_ a6989586621680491038
data AsumSym0 :: forall t6989586621680490432 f6989586621680490433 a6989586621680490434. (~>) (t6989586621680490432 (f6989586621680490433 a6989586621680490434)) (f6989586621680490433 a6989586621680490434)
type AsumSym1 (a6989586621680491028 :: t6989586621680490432 (f6989586621680490433 a6989586621680490434)) = Asum a6989586621680491028
data MapM_Sym0 :: forall a6989586621680490447 m6989586621680490446 b6989586621680490448 t6989586621680490445. (~>) ((~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) ((~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ()))
data MapM_Sym1 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) :: forall t6989586621680490445. (~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ())
type MapM_Sym2 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) (a6989586621680491052 :: t6989586621680490445 a6989586621680490447) = MapM_ a6989586621680491051 a6989586621680491052
data ForM_Sym0 :: forall t6989586621680490441 a6989586621680490443 m6989586621680490442 b6989586621680490444. (~>) (t6989586621680490441 a6989586621680490443) ((~>) ((~>) a6989586621680490443 (m6989586621680490442 b6989586621680490444)) (m6989586621680490442 ()))
data ForM_Sym1 (a6989586621680491045 :: t6989586621680490441 a6989586621680490443) :: forall m6989586621680490442 b6989586621680490444. (~>) ((~>) a6989586621680490443 (m6989586621680490442 b6989586621680490444)) (m6989586621680490442 ())
type ForM_Sym2 (a6989586621680491045 :: t6989586621680490441 a6989586621680490443) (a6989586621680491046 :: (~>) a6989586621680490443 (m6989586621680490442 b6989586621680490444)) = ForM_ a6989586621680491045 a6989586621680491046
data Sequence_Sym0 :: forall t6989586621680490435 m6989586621680490436 a6989586621680490437. (~>) (t6989586621680490435 (m6989586621680490436 a6989586621680490437)) (m6989586621680490436 ())
type Sequence_Sym1 (a6989586621680491033 :: t6989586621680490435 (m6989586621680490436 a6989586621680490437)) = Sequence_ a6989586621680491033
data MsumSym0 :: forall t6989586621680490429 m6989586621680490430 a6989586621680490431. (~>) (t6989586621680490429 (m6989586621680490430 a6989586621680490431)) (m6989586621680490430 a6989586621680490431)
type MsumSym1 (a6989586621680491023 :: t6989586621680490429 (m6989586621680490430 a6989586621680490431)) = Msum a6989586621680491023
data ConcatSym0 :: forall t6989586621680490427 a6989586621680490428. (~>) (t6989586621680490427 [a6989586621680490428]) [a6989586621680490428]
type ConcatSym1 (a6989586621680491009 :: t6989586621680490427 [a6989586621680490428]) = Concat a6989586621680491009
data ConcatMapSym0 :: forall a6989586621680490425 b6989586621680490426 t6989586621680490424. (~>) ((~>) a6989586621680490425 [b6989586621680490426]) ((~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426])
data ConcatMapSym1 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) :: forall t6989586621680490424. (~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426]
type ConcatMapSym2 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) (a6989586621680490994 :: t6989586621680490424 a6989586621680490425) = ConcatMap a6989586621680490993 a6989586621680490994
data AndSym0 :: forall t6989586621680490423. (~>) (t6989586621680490423 Bool) Bool
type AndSym1 (a6989586621680490984 :: t6989586621680490423 Bool) = And a6989586621680490984
data OrSym0 :: forall t6989586621680490422. (~>) (t6989586621680490422 Bool) Bool
type OrSym1 (a6989586621680490975 :: t6989586621680490422 Bool) = Or a6989586621680490975
data AnySym0 :: forall a6989586621680490421 t6989586621680490420. (~>) ((~>) a6989586621680490421 Bool) ((~>) (t6989586621680490420 a6989586621680490421) Bool)
data AnySym1 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) :: forall t6989586621680490420. (~>) (t6989586621680490420 a6989586621680490421) Bool
type AnySym2 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) (a6989586621680490963 :: t6989586621680490420 a6989586621680490421) = Any a6989586621680490962 a6989586621680490963
data AllSym0 :: forall a6989586621680490419 t6989586621680490418. (~>) ((~>) a6989586621680490419 Bool) ((~>) (t6989586621680490418 a6989586621680490419) Bool)
data AllSym1 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) :: forall t6989586621680490418. (~>) (t6989586621680490418 a6989586621680490419) Bool
type AllSym2 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) (a6989586621680490950 :: t6989586621680490418 a6989586621680490419) = All a6989586621680490949 a6989586621680490950
data MaximumBySym0 :: forall a6989586621680490417 t6989586621680490416. (~>) ((~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) ((~>) (t6989586621680490416 a6989586621680490417) a6989586621680490417)
data MaximumBySym1 (a6989586621680490924 :: (~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) :: forall t6989586621680490416. (~>) (t6989586621680490416 a6989586621680490417) a6989586621680490417
type MaximumBySym2 (a6989586621680490924 :: (~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) (a6989586621680490925 :: t6989586621680490416 a6989586621680490417) = MaximumBy a6989586621680490924 a6989586621680490925
data MinimumBySym0 :: forall a6989586621680490415 t6989586621680490414. (~>) ((~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) ((~>) (t6989586621680490414 a6989586621680490415) a6989586621680490415)
data MinimumBySym1 (a6989586621680490899 :: (~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) :: forall t6989586621680490414. (~>) (t6989586621680490414 a6989586621680490415) a6989586621680490415
type MinimumBySym2 (a6989586621680490899 :: (~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) (a6989586621680490900 :: t6989586621680490414 a6989586621680490415) = MinimumBy a6989586621680490899 a6989586621680490900
data NotElemSym0 :: forall a6989586621680490413 t6989586621680490412. (~>) a6989586621680490413 ((~>) (t6989586621680490412 a6989586621680490413) Bool)
data NotElemSym1 (a6989586621680490891 :: a6989586621680490413) :: forall t6989586621680490412. (~>) (t6989586621680490412 a6989586621680490413) Bool
type NotElemSym2 (a6989586621680490891 :: a6989586621680490413) (a6989586621680490892 :: t6989586621680490412 a6989586621680490413) = NotElem a6989586621680490891 a6989586621680490892
data FindSym0 :: forall a6989586621680490411 t6989586621680490410. (~>) ((~>) a6989586621680490411 Bool) ((~>) (t6989586621680490410 a6989586621680490411) (Maybe a6989586621680490411))
data FindSym1 (a6989586621680490864 :: (~>) a6989586621680490411 Bool) :: forall t6989586621680490410. (~>) (t6989586621680490410 a6989586621680490411) (Maybe a6989586621680490411)
type FindSym2 (a6989586621680490864 :: (~>) a6989586621680490411 Bool) (a6989586621680490865 :: t6989586621680490410 a6989586621680490411) = Find a6989586621680490864 a6989586621680490865
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680572324Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.Last
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680572321 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572324Sym1 a6989586621680572321)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680572322 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680572321 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572324Sym2 a6989586621680572322 a6989586621680572321)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680572335Sym0
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.Last
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (_f_69895866216805721946989586621680572332 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572335Sym1 _f_69895866216805721946989586621680572332)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (_z_69895866216805721966989586621680572333 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (_f_69895866216805721946989586621680572332 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572335Sym2 _z_69895866216805721966989586621680572333 _f_69895866216805721946989586621680572332)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (a_69895866216805722166989586621680572334 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (_z_69895866216805721966989586621680572333 :: k2) (_f_69895866216805721946989586621680572332 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572335Sym3 a_69895866216805722166989586621680572334 _z_69895866216805721966989586621680572333 _f_69895866216805721946989586621680572332)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (t6989586621680572339 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (a_69895866216805722166989586621680572334 :: k2) (_z_69895866216805721966989586621680572333 :: k3) (_f_69895866216805721946989586621680572332 :: t6989586621680490502 a6989586621680490506). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572335Sym4 t6989586621680572339 a_69895866216805722166989586621680572334 _z_69895866216805721966989586621680572333 _f_69895866216805721946989586621680572332)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572311Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680572309 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572311Sym1 a6989586621680572309)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680572284Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.First
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680572281 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572284Sym1 a6989586621680572281)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680572282 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680572281 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572284Sym2 a6989586621680572282 a6989586621680572281)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680572295Sym0
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.First
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (_f_69895866216805721616989586621680572292 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572295Sym1 _f_69895866216805721616989586621680572292)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (_z_69895866216805721636989586621680572293 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (_f_69895866216805721616989586621680572292 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572295Sym2 _z_69895866216805721636989586621680572293 _f_69895866216805721616989586621680572292)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (a_69895866216805721836989586621680572294 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (_z_69895866216805721636989586621680572293 :: k2) (_f_69895866216805721616989586621680572292 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572295Sym3 a_69895866216805721836989586621680572294 _z_69895866216805721636989586621680572293 _f_69895866216805721616989586621680572292)
instance forall a6989586621680490506 k1 k2 k3 (t6989586621680490502 :: * -> *) (t6989586621680572299 :: a6989586621680490506 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> k1)) (a_69895866216805721836989586621680572294 :: k2) (_z_69895866216805721636989586621680572293 :: k3) (_f_69895866216805721616989586621680572292 :: t6989586621680490502 a6989586621680490506). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572295Sym4 t6989586621680572299 a_69895866216805721836989586621680572294 _z_69895866216805721636989586621680572293 _f_69895866216805721616989586621680572292)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572271Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680572269 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572271Sym1 a6989586621680572269)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680572242Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable ((,) a)
instance forall a6989586621680490506 b6989586621680490507 a6989586621680572113 (a6989586621680572239 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572242Sym1 a6989586621680572239)
instance forall a6989586621680490506 b6989586621680490507 a6989586621680572113 (a6989586621680572240 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680572239 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680572242Sym2 a6989586621680572240 a6989586621680572239)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym0
instance Data.Singletons.Prelude.Foldable.SFoldable ((,) a)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216805721346989586621680572250 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym1 _f_69895866216805721346989586621680572250)
instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216805721366989586621680572251 :: k1) (_f_69895866216805721346989586621680572250 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym2 _z_69895866216805721366989586621680572251 _f_69895866216805721346989586621680572250)
instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805721486989586621680572252 :: k1) (_z_69895866216805721366989586621680572251 :: k2) (_f_69895866216805721346989586621680572250 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym3 a_69895866216805721486989586621680572252 _z_69895866216805721366989586621680572251 _f_69895866216805721346989586621680572250)
instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805721506989586621680572253 :: k1) (a_69895866216805721486989586621680572252 :: k2) (_z_69895866216805721366989586621680572251 :: k3) (_f_69895866216805721346989586621680572250 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym4 a_69895866216805721506989586621680572253 a_69895866216805721486989586621680572252 _z_69895866216805721366989586621680572251 _f_69895866216805721346989586621680572250)
instance forall k1 k2 k3 k4 k5 k6 (t6989586621680572258 :: k1) (a_69895866216805721506989586621680572253 :: k2) (a_69895866216805721486989586621680572252 :: k3) (_z_69895866216805721366989586621680572251 :: k4) (_f_69895866216805721346989586621680572250 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572254Sym5 t6989586621680572258 a_69895866216805721506989586621680572253 a_69895866216805721486989586621680572252 _z_69895866216805721366989586621680572251 _f_69895866216805721346989586621680572250)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572220Sym0
instance forall a6989586621680490505 m6989586621680490504 a6989586621680572113 (a6989586621680572218 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680572220Sym1 a6989586621680572218)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680572229Sym0
instance forall k1 k2 k3 k4 k5 (_f_69895866216805721346989586621680572226 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572229Sym1 _f_69895866216805721346989586621680572226)
instance forall k1 k2 k3 k4 k5 (a_69895866216805721406989586621680572227 :: k1) (_f_69895866216805721346989586621680572226 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572229Sym2 a_69895866216805721406989586621680572227 _f_69895866216805721346989586621680572226)
instance forall k1 k2 k3 k4 k5 (a_69895866216805721426989586621680572228 :: k1) (a_69895866216805721406989586621680572227 :: k2) (_f_69895866216805721346989586621680572226 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680572229Sym3 a_69895866216805721426989586621680572228 a_69895866216805721406989586621680572227 _f_69895866216805721346989586621680572226)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FindSym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FindSym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Eq.SEq a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.NotElemSym0
instance forall a (t :: * -> *) (d :: a). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.NotElemSym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MinimumBySym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Ordering)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.MinimumBySym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MaximumBySym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Ordering)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.MaximumBySym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.AllSym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.AllSym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.AnySym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.AnySym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.OrSym0
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.AndSym0
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ConcatMapSym0
instance forall a b (t :: * -> *) (d :: a Data.Singletons.Internal.~> [b]). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.ConcatMapSym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ConcatSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonadPlus m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MsumSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SAlternative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.AsumSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Sequence_Sym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.SequenceA_Sym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ForM_Sym0
instance forall (t :: * -> *) a (m :: * -> *) b (d :: t a). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.ForM_Sym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MapM_Sym0
instance forall a (m :: * -> *) b (t :: * -> *) (d :: a Data.Singletons.Internal.~> m b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.MapM_Sym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.For_Sym0
instance forall (t :: * -> *) a (f :: * -> *) b (d :: t a). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.For_Sym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Traverse_Sym0
instance forall a (f :: * -> *) b (t :: * -> *) (d :: a Data.Singletons.Internal.~> f b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Traverse_Sym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldlMSym0
instance forall b a (m :: * -> *) (t :: * -> *) (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldlMSym1 d)
instance forall b a (m :: * -> *) (t :: * -> *) (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldlMSym2 d1 d2)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldrMSym0
instance forall a b (m :: * -> *) (t :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldrMSym1 d)
instance forall a b (m :: * -> *) (t :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldrMSym2 d1 d2)
instance Data.Singletons.Prelude.Foldable.SFoldable GHC.Maybe.Maybe
instance Data.Singletons.Prelude.Foldable.SFoldable []
instance Data.Singletons.Prelude.Foldable.SFoldable GHC.Base.NonEmpty
instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Either.Either a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Internal.Dual
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Internal.Sum
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Internal.Product
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monoid.SMonoid m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monoid.SMonoid m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldMapSym0
instance forall a m (t :: * -> *) (d :: a Data.Singletons.Internal.~> m). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monoid.SMonoid m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldMapSym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldrSym0
instance forall a b (t :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldrSym1 d)
instance forall a b (t :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldrSym2 d1 d2)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Foldr'Sym0
instance forall a b (t :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldr'Sym1 d)
instance forall a b (t :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldr'Sym2 d1 d2)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.FoldlSym0
instance forall b a (t :: * -> *) (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldlSym1 d)
instance forall b a (t :: * -> *) (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.FoldlSym2 d1 d2)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Foldl'Sym0
instance forall b a (t :: * -> *) (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldl'Sym1 d)
instance forall b a (t :: * -> *) (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldl'Sym2 d1 d2)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Foldr1Sym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldr1Sym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.Foldl1Sym0
instance forall a (t :: * -> *) (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.Foldl1Sym1 d)
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ToListSym0
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.NullSym0
instance Data.Singletons.Prelude.Foldable.SFoldable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.LengthSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Eq.SEq a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ElemSym0
instance forall a (t :: * -> *) (d :: a). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Foldable.ElemSym1 d)
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Ord.SOrd a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MaximumSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Ord.SOrd a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.MinimumSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Num.SNum a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.SumSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Num.SNum a) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.ProductSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680492360Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Product
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680492353Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680492346Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680492340Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680492333Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680492326Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680492320Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680492310Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680492308 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680492310Sym1 a6989586621680492308)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492288Sym0
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680492285 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492288Sym1 a6989586621680492285)
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680492286 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (a6989586621680492285 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492288Sym2 a6989586621680492286 a6989586621680492285)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680492271Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680492268 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680492271Sym1 a6989586621680492268)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680492269 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680492268 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680492271Sym2 a6989586621680492269 a6989586621680492268)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680492259Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680492257 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680492259Sym1 a6989586621680492257)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492243Sym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680492240 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492243Sym1 a6989586621680492240)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680492241 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680492240 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492243Sym2 a6989586621680492241 a6989586621680492240)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680492226Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680492223 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680492226Sym1 a6989586621680492223)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680492224 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680492223 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680492226Sym2 a6989586621680492224 a6989586621680492223)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680492213Sym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (a6989586621680492211 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680492213Sym1 a6989586621680492211)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680492201Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680492199 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680492201Sym1 a6989586621680492199)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680492193Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Sum
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680492186Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680492179Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680492173Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680492166Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680492159Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680492153Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680492143Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680492141 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680492143Sym1 a6989586621680492141)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492121Sym0
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680492118 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492121Sym1 a6989586621680492118)
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680492119 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (a6989586621680492118 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680492121Sym2 a6989586621680492119 a6989586621680492118)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680492104Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680492101 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680492104Sym1 a6989586621680492101)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680492102 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680492101 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680492104Sym2 a6989586621680492102 a6989586621680492101)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680492092Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680492090 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680492092Sym1 a6989586621680492090)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492076Sym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680492073 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492076Sym1 a6989586621680492073)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680492074 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680492073 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680492076Sym2 a6989586621680492074 a6989586621680492073)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680492059Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680492056 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680492059Sym1 a6989586621680492056)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680492057 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680492056 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680492059Sym2 a6989586621680492057 a6989586621680492056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680492046Sym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (a6989586621680492044 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680492046Sym1 a6989586621680492044)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680492034Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680492032 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680492034Sym1 a6989586621680492032)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680492026Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Dual
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680492019Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680492012Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680492006Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680491999Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680491992Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680491986Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491976Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680491974 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491976Sym1 a6989586621680491974)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491954Sym0
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680491951 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491954Sym1 a6989586621680491951)
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680491952 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (a6989586621680491951 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491954Sym2 a6989586621680491952 a6989586621680491951)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491937Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491934 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491937Sym1 a6989586621680491934)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491935 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491934 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491937Sym2 a6989586621680491935 a6989586621680491934)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491925Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680491923 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491925Sym1 a6989586621680491923)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491909Sym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491906 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491909Sym1 a6989586621680491906)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491907 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680491906 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491909Sym2 a6989586621680491907 a6989586621680491906)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680491892Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491889 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491892Sym1 a6989586621680491889)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491890 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680491889 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491892Sym2 a6989586621680491890 a6989586621680491889)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680491879Sym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (a6989586621680491877 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680491879Sym1 a6989586621680491877)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491867Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680491865 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491867Sym1 a6989586621680491865)
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680491857Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Either.Either a)
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680491851Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491835Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491832 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491835Sym1 a6989586621680491832)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491833 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491832 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491835Sym2 a6989586621680491833 a6989586621680491832)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491822Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680491820 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491822Sym1 a6989586621680491820)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680491813Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Base.NonEmpty
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680491805Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491793Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680491791 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491793Sym1 a6989586621680491791)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491767Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680491765 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491767Sym1 a6989586621680491765)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680491773 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym1 f6989586621680491773)
instance forall k2 k3 k4 k5 k6 k7 (p6989586621680491774 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (f6989586621680491773 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym2 p6989586621680491774 f6989586621680491773)
instance forall k2 k3 k4 k5 k6 k7 (ps6989586621680491775 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (p6989586621680491774 :: k5) (f6989586621680491773 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym3 ps6989586621680491775 p6989586621680491774 f6989586621680491773)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491777 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (ps6989586621680491775 :: k5) (p6989586621680491774 :: k6) (f6989586621680491773 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym4 a6989586621680491777 ps6989586621680491775 p6989586621680491774 f6989586621680491773)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491778 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (a6989586621680491777 :: k5) (ps6989586621680491775 :: k6) (p6989586621680491774 :: k7) (f6989586621680491773 :: k7 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491776GoSym5 a6989586621680491778 a6989586621680491777 ps6989586621680491775 p6989586621680491774 f6989586621680491773)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491754Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680491752 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491754Sym1 a6989586621680491752)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680491737Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491734 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491737Sym1 a6989586621680491734)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491735 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680491734 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491737Sym2 a6989586621680491735 a6989586621680491734)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491719Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491716 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491719Sym1 a6989586621680491716)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491717 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491716 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491719Sym2 a6989586621680491717 a6989586621680491716)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680491708Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable []
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680491699Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680491690Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680491681Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680491672Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680491663Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680491654Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491639Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680491637 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491639Sym1 a6989586621680491637)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491617Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491614 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491617Sym1 a6989586621680491614)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491615 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491614 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491617Sym2 a6989586621680491615 a6989586621680491614)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491600Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680491598 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491600Sym1 a6989586621680491598)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491578Sym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491575 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491578Sym1 a6989586621680491575)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491576 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680491575 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491578Sym2 a6989586621680491576 a6989586621680491575)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680491555Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491552 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491555Sym1 a6989586621680491552)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491553 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680491552 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491555Sym2 a6989586621680491553 a6989586621680491552)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680491538Sym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (a6989586621680491536 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680491538Sym1 a6989586621680491536)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680491521Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Maybe.Maybe
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491518 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491521Sym1 a6989586621680491518)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491519 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680491518 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491521Sym2 a6989586621680491519 a6989586621680491518)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491503Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491500 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491503Sym1 a6989586621680491500)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491501 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491500 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491503Sym2 a6989586621680491501 a6989586621680491500)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491486Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680491484 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491486Sym1 a6989586621680491484)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490870Scrutinee_6989586621680490761Sym0
instance forall a6989586621680490505 (t6989586621680490502 :: * -> *) (p6989586621680490868 :: a6989586621680490505 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490870Scrutinee_6989586621680490761Sym1 p6989586621680490868)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FindSym0
instance forall a6989586621680490411 (t6989586621680490410 :: * -> *) (a6989586621680490864 :: a6989586621680490411 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FindSym1 a6989586621680490864)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490955Scrutinee_6989586621680490755Sym0
instance forall a6989586621680490505 (t6989586621680490502 :: * -> *) (p6989586621680490953 :: a6989586621680490505 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490955Scrutinee_6989586621680490755Sym1 p6989586621680490953)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AllSym0
instance forall a6989586621680490419 (t6989586621680490418 :: * -> *) (a6989586621680490949 :: a6989586621680490419 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AllSym1 a6989586621680490949)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490968Scrutinee_6989586621680490753Sym0
instance forall a6989586621680490505 (t6989586621680490502 :: * -> *) (p6989586621680490966 :: a6989586621680490505 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490968Scrutinee_6989586621680490753Sym1 p6989586621680490966)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490978Scrutinee_6989586621680490751Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.OrSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490987Scrutinee_6989586621680490749Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AndSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491214Scrutinee_6989586621680490714Sym0
instance forall a6989586621680490505 a k (t6989586621680490502 :: * -> *) (f6989586621680491211 :: a6989586621680490505 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491214Scrutinee_6989586621680490714Sym1 f6989586621680491211)
instance forall a6989586621680490505 a k (t6989586621680490502 :: * -> *) (z6989586621680491212 :: a6989586621680490505 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)) (f6989586621680491211 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491214Scrutinee_6989586621680490714Sym2 z6989586621680491212 f6989586621680491211)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491269Scrutinee_6989586621680490717Sym0
instance forall a a6989586621680490505 k (t6989586621680490502 :: * -> *) (f6989586621680491266 :: a Data.Singletons.Internal.~> (a6989586621680490505 Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491269Scrutinee_6989586621680490717Sym1 f6989586621680491266)
instance forall a a6989586621680490505 k (t6989586621680490502 :: * -> *) (z6989586621680491267 :: a Data.Singletons.Internal.~> (a6989586621680490505 Data.Singletons.Internal.~> a)) (f6989586621680491266 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491269Scrutinee_6989586621680490717Sym2 z6989586621680491267 f6989586621680491266)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491434Scrutinee_6989586621680490737Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491447Scrutinee_6989586621680490740Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491460Scrutinee_6989586621680490743Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491473Scrutinee_6989586621680490746Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatMapSym0
instance forall a6989586621680490425 b6989586621680490426 (t6989586621680490424 :: * -> *) (a6989586621680490993 :: a6989586621680490425 Data.Singletons.Internal.~> [b6989586621680490426]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ConcatMapSym1 a6989586621680490993)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680490999Sym0
instance forall k1 (t6989586621680490502 :: * -> *) a6989586621680490506 k (f6989586621680490997 :: k1 Data.Singletons.Internal.~> t6989586621680490502 a6989586621680490506). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680490999Sym1 f6989586621680490997)
instance forall k1 (t6989586621680490502 :: * -> *) a6989586621680490506 k (xs6989586621680490998 :: k1 Data.Singletons.Internal.~> t6989586621680490502 a6989586621680490506) (f6989586621680490997 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680490999Sym2 xs6989586621680490998 f6989586621680490997)
instance forall k1 (t6989586621680490502 :: * -> *) a6989586621680490506 k (t6989586621680491003 :: k1 Data.Singletons.Internal.~> t6989586621680490502 a6989586621680490506) (xs6989586621680490998 :: k) (f6989586621680490997 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680490999Sym3 t6989586621680491003 xs6989586621680490998 f6989586621680490997)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680491012Sym0
instance forall k (t6989586621680490502 :: * -> *) a6989586621680490506 (xs6989586621680491011 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491012Sym1 xs6989586621680491011)
instance forall k (t6989586621680490502 :: * -> *) a6989586621680490506 (t6989586621680491016 :: k) (xs6989586621680491011 :: t6989586621680490502 a6989586621680490506). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491012Sym2 t6989586621680491016 xs6989586621680491011)
instance forall (t6989586621680490429 :: * -> *) k (m6989586621680490430 :: k -> *) (a6989586621680490431 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MsumSym0
instance forall (t6989586621680490432 :: * -> *) k (f6989586621680490433 :: k -> *) (a6989586621680490434 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AsumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sequence_Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.SequenceA_Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ForM_Sym0
instance forall (t6989586621680490441 :: * -> *) a6989586621680490443 (m6989586621680490442 :: * -> *) b6989586621680490444 (a6989586621680491045 :: t6989586621680490441 a6989586621680490443). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ForM_Sym1 a6989586621680491045)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MapM_Sym0
instance forall a6989586621680490447 (m6989586621680490446 :: * -> *) b6989586621680490448 (t6989586621680490445 :: * -> *) (a6989586621680491051 :: a6989586621680490447 Data.Singletons.Internal.~> m6989586621680490446 b6989586621680490448). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MapM_Sym1 a6989586621680491051)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.For_Sym0
instance forall (t6989586621680490449 :: * -> *) a6989586621680490451 (f6989586621680490450 :: * -> *) b6989586621680490452 (a6989586621680491063 :: t6989586621680490449 a6989586621680490451). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.For_Sym1 a6989586621680491063)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Traverse_Sym0
instance forall a6989586621680490455 (f6989586621680490454 :: * -> *) b6989586621680490456 (t6989586621680490453 :: * -> *) (a6989586621680491069 :: a6989586621680490455 Data.Singletons.Internal.~> f6989586621680490454 b6989586621680490456). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Traverse_Sym1 a6989586621680491069)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlMSym0
instance forall b6989586621680490459 a6989586621680490460 (m6989586621680490458 :: * -> *) (t6989586621680490457 :: * -> *) (a6989586621680491077 :: b6989586621680490459 Data.Singletons.Internal.~> (a6989586621680490460 Data.Singletons.Internal.~> m6989586621680490458 b6989586621680490459)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym1 a6989586621680491077)
instance forall b6989586621680490459 a6989586621680490460 (m6989586621680490458 :: * -> *) (t6989586621680490457 :: * -> *) (a6989586621680491078 :: b6989586621680490459 Data.Singletons.Internal.~> (a6989586621680490460 Data.Singletons.Internal.~> m6989586621680490458 b6989586621680490459)) (a6989586621680491077 :: b6989586621680490459). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym2 a6989586621680491078 a6989586621680491077)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'Sym0
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (arg6989586621680491133 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym1 arg6989586621680491133)
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (arg6989586621680491134 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (arg6989586621680491133 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym2 arg6989586621680491134 arg6989586621680491133)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrMSym0
instance forall a6989586621680490463 b6989586621680490464 (m6989586621680490462 :: * -> *) (t6989586621680490461 :: * -> *) (a6989586621680491099 :: a6989586621680490463 Data.Singletons.Internal.~> (b6989586621680490464 Data.Singletons.Internal.~> m6989586621680490462 b6989586621680490464)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym1 a6989586621680491099)
instance forall a6989586621680490463 b6989586621680490464 (m6989586621680490462 :: * -> *) (t6989586621680490461 :: * -> *) (a6989586621680491100 :: a6989586621680490463 Data.Singletons.Internal.~> (b6989586621680490464 Data.Singletons.Internal.~> m6989586621680490462 b6989586621680490464)) (a6989586621680491099 :: b6989586621680490464). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym2 a6989586621680491100 a6989586621680491099)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (arg6989586621680491151 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1Sym1 arg6989586621680491151)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MinimumBySym0
instance forall a6989586621680490415 (t6989586621680490414 :: * -> *) (a6989586621680490899 :: a6989586621680490415 Data.Singletons.Internal.~> (a6989586621680490415 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MinimumBySym1 a6989586621680490899)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MaximumBySym0
instance forall a6989586621680490417 (t6989586621680490416 :: * -> *) (a6989586621680490924 :: a6989586621680490417 Data.Singletons.Internal.~> (a6989586621680490417 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MaximumBySym1 a6989586621680490924)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (arg6989586621680491155 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1Sym1 arg6989586621680491155)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToListSym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NullSym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.LengthSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NotElemSym0
instance forall a6989586621680490413 (t6989586621680490412 :: * -> *) (a6989586621680490891 :: a6989586621680490413). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.NotElemSym1 a6989586621680490891)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ElemSym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (arg6989586621680491165 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ElemSym1 arg6989586621680491165)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MaximumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MinimumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.SumSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ProductSym0
instance forall a6989586621680490421 (t6989586621680490420 :: * -> *) (a6989586621680490962 :: a6989586621680490421 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AnySym1 a6989586621680490962)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AnySym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (arg6989586621680491123 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMapSym1 arg6989586621680491123)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMapSym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (arg6989586621680491128 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (arg6989586621680491127 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym2 arg6989586621680491128 arg6989586621680491127)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (arg6989586621680491127 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym1 arg6989586621680491127)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrSym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (arg6989586621680491140 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (arg6989586621680491139 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym2 arg6989586621680491140 arg6989586621680491139)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (arg6989586621680491139 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym1 arg6989586621680491139)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlSym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (arg6989586621680491146 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (arg6989586621680491145 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym2 arg6989586621680491146 arg6989586621680491145)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (arg6989586621680491145 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym1 arg6989586621680491145)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680491178Sym0
instance forall a6989586621680490505 m6989586621680490504 (t6989586621680490502 :: * -> *) (a6989586621680491186 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491188Sym1 a6989586621680491186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680491188Sym0
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491201 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680491200 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491203Sym2 a6989586621680491201 a6989586621680491200)
instance forall a6989586621680490506 b6989586621680490507 (t6989586621680490502 :: * -> *) (a6989586621680491200 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680491203Sym1 a6989586621680491200)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680491203Sym0
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680491226 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (a6989586621680491225 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491228Sym2 a6989586621680491226 a6989586621680491225)
instance forall a6989586621680490508 b6989586621680490509 (t6989586621680490502 :: * -> *) (a6989586621680491225 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491228Sym1 a6989586621680491225)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680491228Sym0
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491256 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680491255 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491258Sym2 a6989586621680491256 a6989586621680491255)
instance forall b6989586621680490510 a6989586621680490511 (t6989586621680490502 :: * -> *) (a6989586621680491255 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680491258Sym1 a6989586621680491255)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680491258Sym0
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491281 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680491280 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491283Sym2 a6989586621680491281 a6989586621680491280)
instance forall b6989586621680490512 a6989586621680490513 (t6989586621680490502 :: * -> *) (a6989586621680491280 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491283Sym1 a6989586621680491280)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680491283Sym0
instance forall a6989586621680490514 (t6989586621680490502 :: * -> *) (a6989586621680491310 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491312Sym1 a6989586621680491310)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680491312Sym0
instance forall a6989586621680490515 (t6989586621680490502 :: * -> *) (a6989586621680491335 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491337Sym1 a6989586621680491335)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680491337Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680491361Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490517 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680491370Sym0
instance forall k (t6989586621680490502 :: k -> *) (a6989586621680490518 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680491391Sym0
instance forall a6989586621680490519 (t6989586621680490502 :: * -> *) (a6989586621680491412 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680491414Sym1 a6989586621680491412)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680491414Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680491429Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680491442Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680491455Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680491468Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680491398Sym0
instance forall k1 k2 k3 (a_69895866216804913936989586621680491397 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491398Sym1 a_69895866216804913936989586621680491397)
instance forall k1 k2 k3 (t6989586621680491406 :: k1) (a_69895866216804913936989586621680491397 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491398Sym2 t6989586621680491406 a_69895866216804913936989586621680491397)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680491377Sym0
instance forall k1 k2 k3 (a_69895866216804913726989586621680491376 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491377Sym1 a_69895866216804913726989586621680491376)
instance forall k1 k2 k3 (t6989586621680491384 :: k1) (a_69895866216804913726989586621680491376 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680491377Sym2 t6989586621680491384 a_69895866216804913726989586621680491376)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491345MfSym0
instance forall k2 k3 k (f6989586621680491343 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491345MfSym1 f6989586621680491343)
instance forall k2 k3 k (xs6989586621680491344 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (f6989586621680491343 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491345MfSym2 xs6989586621680491344 f6989586621680491343)
instance forall k2 k3 k (a6989586621680491346 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (xs6989586621680491344 :: k) (f6989586621680491343 :: GHC.Maybe.Maybe k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491345MfSym3 a6989586621680491346 xs6989586621680491344 f6989586621680491343)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491320MfSym0
instance forall k2 k3 k (f6989586621680491318 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491320MfSym1 f6989586621680491318)
instance forall k2 k3 k (xs6989586621680491319 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k2)) (f6989586621680491318 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491320MfSym2 xs6989586621680491319 f6989586621680491318)
instance forall k2 k3 k (a6989586621680491321 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k2)) (xs6989586621680491319 :: k) (f6989586621680491318 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491320MfSym3 a6989586621680491321 xs6989586621680491319 f6989586621680491318)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680491291 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym1 f6989586621680491291)
instance forall k2 k3 k4 k5 k6 k7 (z06989586621680491292 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (f6989586621680491291 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym2 z06989586621680491292 f6989586621680491291)
instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680491293 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (z06989586621680491292 :: k5) (f6989586621680491291 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym3 xs6989586621680491293 z06989586621680491292 f6989586621680491291)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491295 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (xs6989586621680491293 :: k5) (z06989586621680491292 :: k6) (f6989586621680491291 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym4 a6989586621680491295 xs6989586621680491293 z06989586621680491292 f6989586621680491291)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491296 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (a6989586621680491295 :: k5) (xs6989586621680491293 :: k6) (z06989586621680491292 :: k3) (f6989586621680491291 :: k4 Data.Singletons.Internal.~> k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491294F'Sym5 a6989586621680491296 a6989586621680491295 xs6989586621680491293 z06989586621680491292 f6989586621680491291)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym0
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680491236 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym1 f6989586621680491236)
instance forall k2 k3 k4 k5 k6 k7 (z06989586621680491237 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (f6989586621680491236 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym2 z06989586621680491237 f6989586621680491236)
instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680491238 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (z06989586621680491237 :: k5) (f6989586621680491236 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym3 xs6989586621680491238 z06989586621680491237 f6989586621680491236)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491240 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (xs6989586621680491238 :: k5) (z06989586621680491237 :: k6) (f6989586621680491236 :: k4 Data.Singletons.Internal.~> k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym4 a6989586621680491240 xs6989586621680491238 z06989586621680491237 f6989586621680491236)
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680491241 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (a6989586621680491240 :: k5) (xs6989586621680491238 :: k6) (z06989586621680491237 :: k4 Data.Singletons.Internal.~> k7) (f6989586621680491236 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491239F'Sym5 a6989586621680491241 a6989586621680491240 xs6989586621680491238 z06989586621680491237 f6989586621680491236)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym0
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (f6989586621680491105 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym1 f6989586621680491105)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (z06989586621680491106 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (f6989586621680491105 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym2 z06989586621680491106 f6989586621680491105)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (xs6989586621680491107 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (z06989586621680491106 :: k4) (f6989586621680491105 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym3 xs6989586621680491107 z06989586621680491106 f6989586621680491105)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (a6989586621680491109 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (xs6989586621680491107 :: k4) (z06989586621680491106 :: k5) (f6989586621680491105 :: a6989586621679570849 Data.Singletons.Internal.~> m6989586621679570848 b6989586621679570850). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym4 a6989586621680491109 xs6989586621680491107 z06989586621680491106 f6989586621680491105)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (a6989586621680491110 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (a6989586621680491109 :: k4) (xs6989586621680491107 :: k5) (z06989586621680491106 :: a6989586621679570849 Data.Singletons.Internal.~> m6989586621679570848 b6989586621679570850) (f6989586621680491105 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491108F'Sym5 a6989586621680491110 a6989586621680491109 xs6989586621680491107 z06989586621680491106 f6989586621680491105)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym0
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (f6989586621680491083 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym1 f6989586621680491083)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (z06989586621680491084 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (f6989586621680491083 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym2 z06989586621680491084 f6989586621680491083)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (xs6989586621680491085 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (z06989586621680491084 :: k4) (f6989586621680491083 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym3 xs6989586621680491085 z06989586621680491084 f6989586621680491083)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (a6989586621680491087 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (xs6989586621680491085 :: k4) (z06989586621680491084 :: k5) (f6989586621680491083 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym4 a6989586621680491087 xs6989586621680491085 z06989586621680491084 f6989586621680491083)
instance forall k2 k3 (m6989586621679570848 :: * -> *) a6989586621679570849 k4 k5 b6989586621679570850 (a6989586621680491088 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849)) (a6989586621680491087 :: k4) (xs6989586621680491085 :: k5) (z06989586621680491084 :: k3) (f6989586621680491083 :: a6989586621679570849 Data.Singletons.Internal.~> m6989586621679570848 b6989586621679570850). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680491086F'Sym5 a6989586621680491088 a6989586621680491087 xs6989586621680491085 z06989586621680491084 f6989586621680491083)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490932Max'Sym0
instance forall k1 k2 (cmp6989586621680490930 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490932Max'Sym1 cmp6989586621680490930)
instance forall k1 k2 (a_69895866216804909286989586621680490931 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680490930 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490932Max'Sym2 a_69895866216804909286989586621680490931 cmp6989586621680490930)
instance forall k1 k2 (a6989586621680490933 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804909286989586621680490931 :: k2) (cmp6989586621680490930 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490932Max'Sym3 a6989586621680490933 a_69895866216804909286989586621680490931 cmp6989586621680490930)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490941Scrutinee_6989586621680490757Sym0
instance forall k2 k3 k4 k5 (x6989586621680490939 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490941Scrutinee_6989586621680490757Sym1 x6989586621680490939)
instance forall k2 k3 k4 k5 (y6989586621680490940 :: k2) (x6989586621680490939 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490941Scrutinee_6989586621680490757Sym2 y6989586621680490940 x6989586621680490939)
instance forall k2 k3 k4 k5 (cmp6989586621680490930 :: k2) (y6989586621680490940 :: k3) (x6989586621680490939 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490941Scrutinee_6989586621680490757Sym3 cmp6989586621680490930 y6989586621680490940 x6989586621680490939)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490907Min'Sym0
instance forall k1 k2 (cmp6989586621680490905 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490907Min'Sym1 cmp6989586621680490905)
instance forall k1 k2 (a_69895866216804909036989586621680490906 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680490905 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490907Min'Sym2 a_69895866216804909036989586621680490906 cmp6989586621680490905)
instance forall k1 k2 (a6989586621680490908 :: k1 Data.Singletons.Internal.~> (k1 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804909036989586621680490906 :: k2) (cmp6989586621680490905 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490907Min'Sym3 a6989586621680490908 a_69895866216804909036989586621680490906 cmp6989586621680490905)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490916Scrutinee_6989586621680490759Sym0
instance forall k2 k3 k4 k5 (x6989586621680490914 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490916Scrutinee_6989586621680490759Sym1 x6989586621680490914)
instance forall k2 k3 k4 k5 (y6989586621680490915 :: k2) (x6989586621680490914 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490916Scrutinee_6989586621680490759Sym2 y6989586621680490915 x6989586621680490914)
instance forall k2 k3 k4 k5 (cmp6989586621680490905 :: k2) (y6989586621680490915 :: k3) (x6989586621680490914 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490916Scrutinee_6989586621680490759Sym3 cmp6989586621680490905 y6989586621680490915 x6989586621680490914)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680490871Sym0
instance forall a6989586621679091750 k (p6989586621680490868 :: a6989586621679091750 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680490871Sym1 p6989586621680490868)
instance forall a6989586621679091750 k (y6989586621680490869 :: a6989586621679091750 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621680490868 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680490871Sym2 y6989586621680490869 p6989586621680490868)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680490874Scrutinee_6989586621680490763Sym0
instance forall k1 k2 k3 (x6989586621680490873 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490874Scrutinee_6989586621680490763Sym1 x6989586621680490873)
instance forall k1 k2 k3 (p6989586621680490868 :: k1) (x6989586621680490873 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680490874Scrutinee_6989586621680490763Sym2 p6989586621680490868 x6989586621680490873)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MinInternal a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680482430Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MinInternal a)
instance forall a6989586621680482373 (a6989586621680482428 :: Data.Singletons.Prelude.Foldable.MinInternal a6989586621680482373). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680482430Sym1 a6989586621680482428)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Singletons.Prelude.Foldable.MinInternal a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482445Scrutinee_6989586621680482383Sym0
instance forall k1 (x6989586621680482438 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482445Scrutinee_6989586621680482383Sym1 x6989586621680482438)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482440MSym0
instance forall k1 k (x6989586621680482438 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482440MSym1 x6989586621680482438)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482440NSym0
instance forall k k1 (x6989586621680482438 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482440NSym1 x6989586621680482438)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MaxInternal a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680482403Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MaxInternal a)
instance forall a6989586621680482365 (a6989586621680482401 :: Data.Singletons.Prelude.Foldable.MaxInternal a6989586621680482365). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680482403Sym1 a6989586621680482401)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Singletons.Prelude.Foldable.MaxInternal a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482418Scrutinee_6989586621680482381Sym0
instance forall k1 (x6989586621680482411 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482418Scrutinee_6989586621680482381Sym1 x6989586621680482411)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482413MSym0
instance forall k1 k (x6989586621680482411 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482413MSym1 x6989586621680482411)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680482413NSym0
instance forall k k1 (x6989586621680482411 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680482413NSym1 x6989586621680482411)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Singletons.Prelude.Foldable.MaxInternal a)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Singletons.Prelude.Foldable.MinInternal a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MinInternalSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MaxInternalSym0
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.Endo a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680480965Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.Endo a)
instance forall a6989586621680480951 (a6989586621680480963 :: Data.Singletons.Prelude.Foldable.Endo a6989586621680480951). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680480965Sym1 a6989586621680480963)
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Singletons.Prelude.Foldable.Endo a)
instance Data.Singletons.Prelude.Monoid.SMonoid (Data.Singletons.Prelude.Foldable.Endo a)
-- | Exports the promoted and singled versions of the Identity data
-- type.
module Data.Singletons.Prelude.Identity
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SIdentity :: forall a_aljK. Identity a_aljK -> Type
[SIdentity] :: forall a_aljK (n_a1hza :: a_aljK). () => {sRunIdentity :: Sing (n_a1hza :: a_aljK)} -> SIdentity ('Identity n_a1hza)
type family RunIdentity (a_a1hz5 :: Identity (a_aljK :: Type)) :: a_aljK
data IdentitySym0 :: forall (a6989586621679091740 :: Type). (~>) a6989586621679091740 (Identity (a6989586621679091740 :: Type))
type IdentitySym1 (t6989586621679315646 :: a6989586621679091740) = 'Identity t6989586621679315646
data RunIdentitySym0 :: forall (a6989586621679091740 :: Type). (~>) (Identity (a6989586621679091740 :: Type)) a6989586621679091740
type RunIdentitySym1 (a6989586621679315643 :: Identity (a6989586621679091740 :: Type)) = RunIdentity a6989586621679315643
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723810Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Functor.Identity.Identity
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680723808 :: Data.Functor.Identity.Identity a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723810Sym1 a6989586621680723808)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.LiftA2_6989586621680723794Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Functor.Identity.Identity
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680723791 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680723794Sym1 a6989586621680723791)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680723792 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680723791 :: Data.Functor.Identity.Identity a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680723794Sym2 a6989586621680723792 a6989586621680723791)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723781Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680723779 :: Data.Functor.Identity.Identity (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723781Sym1 a6989586621680723779)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pure_6989586621680723771Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToList_6989586621680723764Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Functor.Identity.Identity
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Sum_6989586621680723757Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Product_6989586621680723750Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Null_6989586621680723744Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Minimum_6989586621680723737Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Maximum_6989586621680723730Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Length_6989586621680723724Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr1_6989586621680723714Sym0
instance forall a6989586621680490514 (a6989586621680723712 :: a6989586621680490514 Data.Singletons.Internal.~> (a6989586621680490514 Data.Singletons.Internal.~> a6989586621680490514)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr1_6989586621680723714Sym1 a6989586621680723712)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr'_6989586621680723692Sym0
instance forall a6989586621680490508 b6989586621680490509 (a6989586621680723689 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680723692Sym1 a6989586621680723689)
instance forall a6989586621680490508 b6989586621680490509 (a6989586621680723690 :: a6989586621680490508 Data.Singletons.Internal.~> (b6989586621680490509 Data.Singletons.Internal.~> b6989586621680490509)) (a6989586621680723689 :: b6989586621680490509). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680723692Sym2 a6989586621680723690 a6989586621680723689)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr_6989586621680723675Sym0
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680723672 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680723675Sym1 a6989586621680723672)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680723673 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680723672 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680723675Sym2 a6989586621680723673 a6989586621680723672)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl1_6989586621680723663Sym0
instance forall a6989586621680490515 (a6989586621680723661 :: a6989586621680490515 Data.Singletons.Internal.~> (a6989586621680490515 Data.Singletons.Internal.~> a6989586621680490515)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl1_6989586621680723663Sym1 a6989586621680723661)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl'_6989586621680723647Sym0
instance forall b6989586621680490512 a6989586621680490513 (a6989586621680723644 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680723647Sym1 a6989586621680723644)
instance forall b6989586621680490512 a6989586621680490513 (a6989586621680723645 :: b6989586621680490512 Data.Singletons.Internal.~> (a6989586621680490513 Data.Singletons.Internal.~> b6989586621680490512)) (a6989586621680723644 :: b6989586621680490512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680723647Sym2 a6989586621680723645 a6989586621680723644)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl_6989586621680723630Sym0
instance forall b6989586621680490510 a6989586621680490511 (a6989586621680723627 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680723630Sym1 a6989586621680723627)
instance forall b6989586621680490510 a6989586621680490511 (a6989586621680723628 :: b6989586621680490510 Data.Singletons.Internal.~> (a6989586621680490511 Data.Singletons.Internal.~> b6989586621680490510)) (a6989586621680723627 :: b6989586621680490510). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680723630Sym2 a6989586621680723628 a6989586621680723627)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Elem_6989586621680723617Sym0
instance forall a6989586621680490519 (a6989586621680723615 :: a6989586621680490519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Elem_6989586621680723617Sym1 a6989586621680723615)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FoldMap_6989586621680723605Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680723603 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.FoldMap_6989586621680723605Sym1 a6989586621680723603)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723586Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Functor.Identity.Identity
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680723584 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723586Sym1 a6989586621680723584)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Lambda_6989586621680723594Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Functor.Identity.Identity
instance forall k1 k2 k3 (_z_69895866216807234106989586621680723592 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680723594Sym1 _z_69895866216807234106989586621680723592)
instance forall k1 k2 k3 (a_69895866216807234166989586621680723593 :: k1) (_z_69895866216807234106989586621680723592 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680723594Sym2 a_69895866216807234166989586621680723593 _z_69895866216807234106989586621680723592)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Fmap_6989586621680723574Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680723572 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Fmap_6989586621680723574Sym1 a6989586621680723572)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680723556Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Functor.Identity.Identity a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680723556Sym1 a6989586621680723553)
instance forall a6989586621680723057 (a6989586621680723554 :: GHC.Types.Nat) (a6989586621680723553 :: Data.Functor.Identity.Identity a6989586621680723057). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680723556Sym2 a6989586621680723554 a6989586621680723553)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723543Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Identity.Identity a)
instance forall a6989586621680723054 (a6989586621680723541 :: Data.Functor.Identity.Identity a6989586621680723054). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723543Sym1 a6989586621680723541)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromInteger_6989586621680723535Sym0
instance Data.Singletons.Prelude.Num.PNum (Data.Functor.Identity.Identity a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Signum_6989586621680723528Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Abs_6989586621680723521Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Negate_6989586621680723514Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723503Sym0
instance forall a6989586621680723043 (a6989586621680723501 :: Data.Functor.Identity.Identity a6989586621680723043). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723503Sym1 a6989586621680723501)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723491Sym0
instance forall a6989586621680723043 (a6989586621680723489 :: Data.Functor.Identity.Identity a6989586621680723043). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723491Sym1 a6989586621680723489)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680723479Sym0
instance forall a6989586621680723043 (a6989586621680723477 :: Data.Functor.Identity.Identity a6989586621680723043). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680723479Sym1 a6989586621680723477)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Identity.Identity a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680723461Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Identity.Identity a)
instance forall a6989586621680723032 (a6989586621680723458 :: Data.Functor.Identity.Identity a6989586621680723032). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680723461Sym1 a6989586621680723458)
instance forall a6989586621680723032 (a6989586621680723459 :: Data.Functor.Identity.Identity a6989586621680723032) (a6989586621680723458 :: Data.Functor.Identity.Identity a6989586621680723032). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680723461Sym2 a6989586621680723459 a6989586621680723458)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680723448Sym0
instance forall a6989586621680723032 (a6989586621680723446 :: Data.Functor.Identity.Identity a6989586621680723032). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680723448Sym1 a6989586621680723446)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromEnum_6989586621680723440Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToEnum_6989586621680723433Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pred_6989586621680723426Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Succ_6989586621680723419Sym0
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Num.SNum (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Functor.Identity.Identity
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Functor.Identity.Identity
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Functor.Identity.Identity
-- | Exports the promoted and singled versions of the Const data
-- type.
module Data.Singletons.Prelude.Const
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SConst :: forall (k :: Type) (a :: Type) (b :: k). Const a b -> Type
[SConst] :: {sGetConst :: Sing a} -> SConst ('Const a)
type family GetConst (x_a7kY3 :: Const a_a7kY1 b_a7kY2) :: a_a7kY1
data ConstSym0 :: forall (a6989586621679097555 :: Type) k6989586621679097554 (b6989586621679097556 :: k6989586621679097554). (~>) a6989586621679097555 (Const (a6989586621679097555 :: Type) (b6989586621679097556 :: k6989586621679097554))
type ConstSym1 (t6989586621680758421 :: a6989586621679097555) = 'Const t6989586621680758421
data GetConstSym0 :: forall a6989586621680758689 b6989586621680758690. (~>) (Const a6989586621680758689 b6989586621680758690) a6989586621680758689
type GetConstSym1 (x6989586621680758691 :: Const a6989586621680758689 b6989586621680758690) = GetConst x6989586621680758691
instance forall k a (b :: k). Data.Singletons.Prelude.Eq.PEq (Data.Functor.Const.Const a b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760726Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Functor.Const.Const m)
instance forall m6989586621680760084 a6989586621679570826 b6989586621679570827 (a6989586621680760724 :: Data.Functor.Const.Const m6989586621680760084 (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760726Sym1 a6989586621680760724)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.LiftA2_6989586621680760711Sym0
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 m6989586621680760084 (a6989586621680760708 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680760711Sym1 a6989586621680760708)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 m6989586621680760084 (a6989586621680760709 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680760708 :: Data.Functor.Const.Const m6989586621680760084 a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680760711Sym2 a6989586621680760709 a6989586621680760708)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pure_6989586621680760703Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Foldr_6989586621680760677Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Functor.Const.Const m)
instance forall a6989586621680490506 b6989586621680490507 m6989586621680760083 (a6989586621680760674 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680760677Sym1 a6989586621680760674)
instance forall a6989586621680490506 b6989586621680490507 m6989586621680760083 (a6989586621680760675 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680760674 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680760677Sym2 a6989586621680760675 a6989586621680760674)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680760688Sym0
instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Functor.Const.Const m)
instance forall k1 k2 k3 k4 k5 (_f_69895866216807604336989586621680760685 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760688Sym1 _f_69895866216807604336989586621680760685)
instance forall k1 k2 k3 k4 k5 (_z_69895866216807604356989586621680760686 :: k1) (_f_69895866216807604336989586621680760685 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760688Sym2 _z_69895866216807604356989586621680760686 _f_69895866216807604336989586621680760685)
instance forall k1 k2 k3 k4 k5 (a_69895866216807604456989586621680760687 :: k1) (_z_69895866216807604356989586621680760686 :: k2) (_f_69895866216807604336989586621680760685 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760688Sym3 a_69895866216807604456989586621680760687 _z_69895866216807604356989586621680760686 _f_69895866216807604336989586621680760685)
instance forall k1 k2 k3 k4 k5 (t6989586621680760692 :: k1) (a_69895866216807604456989586621680760687 :: k2) (_z_69895866216807604356989586621680760686 :: k3) (_f_69895866216807604336989586621680760685 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760688Sym4 t6989586621680760692 a_69895866216807604456989586621680760687 _z_69895866216807604356989586621680760686 _f_69895866216807604336989586621680760685)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FoldMap_6989586621680760657Sym0
instance forall a6989586621680490505 m6989586621680490504 m6989586621680760083 (a6989586621680760655 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.FoldMap_6989586621680760657Sym1 a6989586621680760655)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680760665Sym0
instance forall k1 k2 k3 k4 (_f_69895866216807604336989586621680760663 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760665Sym1 _f_69895866216807604336989586621680760663)
instance forall k1 k2 k3 k4 (a_69895866216807604396989586621680760664 :: k1) (_f_69895866216807604336989586621680760663 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760665Sym2 a_69895866216807604396989586621680760664 _f_69895866216807604336989586621680760663)
instance forall a6989586621679570822 k m6989586621680760082 (b6989586621679570823 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760638Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Functor.Const.Const m)
instance forall a6989586621679570822 k m6989586621680760082 (b6989586621679570823 :: k) (a6989586621680760636 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760638Sym1 a6989586621680760636)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680760646Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Functor.Const.Const m)
instance forall k1 k2 k3 (_z_69895866216807604146989586621680760644 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760646Sym1 _z_69895866216807604146989586621680760644)
instance forall k1 k2 k3 (a_69895866216807604226989586621680760645 :: k1) (_z_69895866216807604146989586621680760644 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760646Sym2 a_69895866216807604226989586621680760645 _z_69895866216807604146989586621680760644)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Fmap_6989586621680760619Sym0
instance forall a6989586621679570820 b6989586621679570821 m6989586621680760082 (a6989586621680760617 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Fmap_6989586621680760619Sym1 a6989586621680760617)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680760627Sym0
instance forall k1 k2 k3 (_f_69895866216807604126989586621680760625 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760627Sym1 _f_69895866216807604126989586621680760625)
instance forall k1 k2 k3 (a_69895866216807604186989586621680760626 :: k1) (_f_69895866216807604126989586621680760625 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680760627Sym2 a_69895866216807604186989586621680760626 _f_69895866216807604126989586621680760625)
instance forall k a6989586621680760078 (b6989586621680760079 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ShowsPrec_6989586621680760601Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.Show.PShow (Data.Functor.Const.Const a b)
instance forall k a6989586621680760078 (b6989586621680760079 :: k) (a6989586621680760598 :: GHC.Types.Nat). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680760601Sym1 a6989586621680760598)
instance forall k a6989586621680760078 (b6989586621680760079 :: k) (a6989586621680760599 :: GHC.Types.Nat) (a6989586621680760598 :: Data.Functor.Const.Const a6989586621680760078 b6989586621680760079). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680760601Sym2 a6989586621680760599 a6989586621680760598)
instance forall k a6989586621680760074 (b6989586621680760075 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760588Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Const.Const a b)
instance forall k a6989586621680760074 (b6989586621680760075 :: k) (a6989586621680760586 :: Data.Functor.Const.Const a6989586621680760074 b6989586621680760075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760588Sym1 a6989586621680760586)
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromInteger_6989586621680760580Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.Num.PNum (Data.Functor.Const.Const a b)
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Signum_6989586621680760573Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Abs_6989586621680760566Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Negate_6989586621680760559Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760548Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k) (a6989586621680760546 :: Data.Functor.Const.Const a6989586621680760062 b6989586621680760063). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760548Sym1 a6989586621680760546)
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760536Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k) (a6989586621680760534 :: Data.Functor.Const.Const a6989586621680760062 b6989586621680760063). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760536Sym1 a6989586621680760534)
instance forall k a6989586621680760062 (b6989586621680760063 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680760524Sym0
instance forall k a6989586621680760062 (b6989586621680760063 :: k) (a6989586621680760522 :: Data.Functor.Const.Const a6989586621680760062 b6989586621680760063). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680760524Sym1 a6989586621680760522)
instance forall k a (b :: k). Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Const.Const a b)
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680760506Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Const.Const a b)
instance forall k a6989586621680760049 (b6989586621680760050 :: k) (a6989586621680760503 :: Data.Functor.Const.Const a6989586621680760049 b6989586621680760050). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680760506Sym1 a6989586621680760503)
instance forall k a6989586621680760049 (b6989586621680760050 :: k) (a6989586621680760504 :: Data.Functor.Const.Const a6989586621680760049 b6989586621680760050) (a6989586621680760503 :: Data.Functor.Const.Const a6989586621680760049 b6989586621680760050). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680760506Sym2 a6989586621680760504 a6989586621680760503)
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromTo_6989586621680760493Sym0
instance forall k a6989586621680760049 (b6989586621680760050 :: k) (a6989586621680760491 :: Data.Functor.Const.Const a6989586621680760049 b6989586621680760050). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromTo_6989586621680760493Sym1 a6989586621680760491)
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromEnum_6989586621680760485Sym0
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ToEnum_6989586621680760478Sym0
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pred_6989586621680760471Sym0
instance forall k a6989586621680760049 (b6989586621680760050 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Succ_6989586621680760464Sym0
instance forall k a6989586621680760047 (b6989586621680760048 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Compare_6989586621680760453Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.Ord.POrd (Data.Functor.Const.Const a b)
instance forall k a6989586621680760047 (b6989586621680760048 :: k) (a6989586621680760451 :: Data.Functor.Const.Const a6989586621680760047 b6989586621680760048). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Compare_6989586621680760453Sym1 a6989586621680760451)
instance forall k a (b :: k). Data.Singletons.Prelude.Enum.PBounded (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Enum.SBounded a => Data.Singletons.Prelude.Enum.SBounded (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Ord.SOrd (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Num.SNum (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Semigroup.Internal.SSemigroup a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Functor.Const.Const a b)
instance Data.Singletons.Prelude.Monoid.SMonoid m => Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Functor.Const.Const m)
instance forall k a (b :: k). Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Prelude.Eq.SEq (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => Data.Singletons.Decide.SDecide (Data.Functor.Const.Const a b)
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => Data.Type.Equality.TestEquality Data.Singletons.Prelude.Const.SConst
instance forall k a (b :: k). Data.Singletons.Decide.SDecide a => Data.Type.Coercion.TestCoercion Data.Singletons.Prelude.Const.SConst
instance forall k a6989586621680758689 (b6989586621680758690 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.GetConstSym0
instance forall a6989586621679097555 k6989586621679097554 (b6989586621679097556 :: k6989586621679097554). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ConstSym0
instance forall a6989586621679097555 k6989586621679097554 (b6989586621679097556 :: k6989586621679097554). Data.Singletons.Internal.SingI Data.Singletons.Prelude.Const.ConstSym0
instance forall k a (b :: k). Data.Singletons.Internal.SingKind a => Data.Singletons.Internal.SingKind (Data.Functor.Const.Const a b)
instance forall a1 k (b :: k) (a2 :: a1). Data.Singletons.Internal.SingI a2 => Data.Singletons.Internal.SingI ('Data.Functor.Const.Const a2)
-- | Defines the promoted and singled versions of the Traversable
-- type class.
module Data.Singletons.Prelude.Traversable
class PTraversable (t_a7vnf :: Type -> Type) where {
type family Traverse (arg_a7vnr :: (~>) a_a7vnh (f_a7vng b_a7vni)) (arg_a7vns :: t_a7vnf a_a7vnh) :: f_a7vng (t_a7vnf b_a7vni);
type family SequenceA (arg_a7vnv :: t_a7vnf (f_a7vnj a_a7vnk)) :: f_a7vnj (t_a7vnf a_a7vnk);
type family MapM (arg_a7vnx :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (arg_a7vny :: t_a7vnf a_a7vnm) :: m_a7vnl (t_a7vnf b_a7vnn);
type family Sequence (arg_a7vnB :: t_a7vnf (m_a7vno a_a7vnp)) :: m_a7vno (t_a7vnf a_a7vnp);
type Traverse a_a7vnD a_a7vnE = Apply (Apply Traverse_6989586621680798719Sym0 a_a7vnD) a_a7vnE;
type SequenceA a_a7vnR = Apply SequenceA_6989586621680798732Sym0 a_a7vnR;
type MapM a_a7vo0 a_a7vo1 = Apply (Apply MapM_6989586621680798742Sym0 a_a7vo0) a_a7vo1;
type Sequence a_a7vog = Apply Sequence_6989586621680798757Sym0 a_a7vog;
}
class (SFunctor t_a7vnf, SFoldable t_a7vnf) => STraversable (t_a7vnf :: Type -> Type)
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni)) ~ Apply (Apply Traverse_6989586621680798719Sym0 t_a7vop) t_a7voq, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk)) ~ Apply SequenceA_6989586621680798732Sym0 t_a7vot, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn)) ~ Apply (Apply MapM_6989586621680798742Sym0 t_a7vov) t_a7vow, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp)) ~ Apply Sequence_6989586621680798757Sym0 t_a7voz, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
type family For (a_a7wX7 :: t_a7wOC a_a7wOE) (a_a7wX8 :: (~>) a_a7wOE (f_a7wOD b_a7wOF)) :: f_a7wOD (t_a7wOC b_a7wOF)
sFor :: forall t_a7wOC a_a7wOE f_a7wOD b_a7wOF (t_a7x6u :: t_a7wOC a_a7wOE) (t_a7x6v :: (~>) a_a7wOE (f_a7wOD b_a7wOF)). (STraversable t_a7wOC, SApplicative f_a7wOD) => Sing t_a7x6u -> Sing t_a7x6v -> Sing (Apply (Apply ForSym0 t_a7x6u) t_a7x6v :: f_a7wOD (t_a7wOC b_a7wOF))
type family ForM (a_a7wWX :: t_a7wOy a_a7wOA) (a_a7wWY :: (~>) a_a7wOA (m_a7wOz b_a7wOB)) :: m_a7wOz (t_a7wOy b_a7wOB)
sForM :: forall t_a7wOy a_a7wOA m_a7wOz b_a7wOB (t_a7x6q :: t_a7wOy a_a7wOA) (t_a7x6r :: (~>) a_a7wOA (m_a7wOz b_a7wOB)). (STraversable t_a7wOy, SMonad m_a7wOz) => Sing t_a7x6q -> Sing t_a7x6r -> Sing (Apply (Apply ForMSym0 t_a7x6q) t_a7x6r :: m_a7wOz (t_a7wOy b_a7wOB))
type family MapAccumL (a_a7wWC :: (~>) a_a7wOv ((~>) b_a7wOw (a_a7wOv, c_a7wOx))) (a_a7wWD :: a_a7wOv) (a_a7wWE :: t_a7wOu b_a7wOw) :: (a_a7wOv, t_a7wOu c_a7wOx)
sMapAccumL :: forall a_a7wOv b_a7wOw c_a7wOx t_a7wOu (t_a7x6k :: (~>) a_a7wOv ((~>) b_a7wOw (a_a7wOv, c_a7wOx))) (t_a7x6l :: a_a7wOv) (t_a7x6m :: t_a7wOu b_a7wOw). STraversable t_a7wOu => Sing t_a7x6k -> Sing t_a7x6l -> Sing t_a7x6m -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7x6k) t_a7x6l) t_a7x6m :: (a_a7wOv, t_a7wOu c_a7wOx))
type family MapAccumR (a_a7wWl :: (~>) a_a7wOr ((~>) b_a7wOs (a_a7wOr, c_a7wOt))) (a_a7wWm :: a_a7wOr) (a_a7wWn :: t_a7wOq b_a7wOs) :: (a_a7wOr, t_a7wOq c_a7wOt)
sMapAccumR :: forall a_a7wOr b_a7wOs c_a7wOt t_a7wOq (t_a7x6e :: (~>) a_a7wOr ((~>) b_a7wOs (a_a7wOr, c_a7wOt))) (t_a7x6f :: a_a7wOr) (t_a7x6g :: t_a7wOq b_a7wOs). STraversable t_a7wOq => Sing t_a7x6e -> Sing t_a7x6f -> Sing t_a7x6g -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7x6e) t_a7x6f) t_a7x6g :: (a_a7wOr, t_a7wOq c_a7wOt))
type family FmapDefault (a_a7wW8 :: (~>) a_a7wOo b_a7wOp) (a_a7wW9 :: t_a7wOn a_a7wOo) :: t_a7wOn b_a7wOp
sFmapDefault :: forall a_a7wOo b_a7wOp t_a7wOn (t_a7x6a :: (~>) a_a7wOo b_a7wOp) (t_a7x6b :: t_a7wOn a_a7wOo). STraversable t_a7wOn => Sing t_a7x6a -> Sing t_a7x6b -> Sing (Apply (Apply FmapDefaultSym0 t_a7x6a) t_a7x6b :: t_a7wOn b_a7wOp)
type family FoldMapDefault (a_a7wVN :: (~>) a_a7wOm m_a7wOl) (a_a7wVO :: t_a7wOk a_a7wOm) :: m_a7wOl
sFoldMapDefault :: forall a_a7wOm m_a7wOl t_a7wOk (t_a7x66 :: (~>) a_a7wOm m_a7wOl) (t_a7x67 :: t_a7wOk a_a7wOm). (STraversable t_a7wOk, SMonoid m_a7wOl) => Sing t_a7x66 -> Sing t_a7x67 -> Sing (Apply (Apply FoldMapDefaultSym0 t_a7x66) t_a7x67 :: m_a7wOl)
data TraverseSym0 :: forall a6989586621680798695 f6989586621680798694 b6989586621680798696 t6989586621680798693. (~>) ((~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) ((~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696)))
data TraverseSym1 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696))
type TraverseSym2 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) (arg6989586621680798706 :: t6989586621680798693 a6989586621680798695) = Traverse arg6989586621680798705 arg6989586621680798706
data SequenceASym0 :: forall t6989586621680798693 f6989586621680798697 a6989586621680798698. (~>) (t6989586621680798693 (f6989586621680798697 a6989586621680798698)) (f6989586621680798697 (t6989586621680798693 a6989586621680798698))
type SequenceASym1 (arg6989586621680798709 :: t6989586621680798693 (f6989586621680798697 a6989586621680798698)) = SequenceA arg6989586621680798709
data MapMSym0 :: forall a6989586621680798700 m6989586621680798699 b6989586621680798701 t6989586621680798693. (~>) ((~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) ((~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701)))
data MapMSym1 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701))
type MapMSym2 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) (arg6989586621680798712 :: t6989586621680798693 a6989586621680798700) = MapM arg6989586621680798711 arg6989586621680798712
data SequenceSym0 :: forall t6989586621680798693 m6989586621680798702 a6989586621680798703. (~>) (t6989586621680798693 (m6989586621680798702 a6989586621680798703)) (m6989586621680798702 (t6989586621680798693 a6989586621680798703))
type SequenceSym1 (arg6989586621680798715 :: t6989586621680798693 (m6989586621680798702 a6989586621680798703)) = Sequence arg6989586621680798715
data ForSym0 :: forall t6989586621680804234 a6989586621680804236 f6989586621680804235 b6989586621680804237. (~>) (t6989586621680804234 a6989586621680804236) ((~>) ((~>) a6989586621680804236 (f6989586621680804235 b6989586621680804237)) (f6989586621680804235 (t6989586621680804234 b6989586621680804237)))
data ForSym1 (a6989586621680804761 :: t6989586621680804234 a6989586621680804236) :: forall f6989586621680804235 b6989586621680804237. (~>) ((~>) a6989586621680804236 (f6989586621680804235 b6989586621680804237)) (f6989586621680804235 (t6989586621680804234 b6989586621680804237))
type ForSym2 (a6989586621680804761 :: t6989586621680804234 a6989586621680804236) (a6989586621680804762 :: (~>) a6989586621680804236 (f6989586621680804235 b6989586621680804237)) = For a6989586621680804761 a6989586621680804762
data ForMSym0 :: forall t6989586621680804230 a6989586621680804232 m6989586621680804231 b6989586621680804233. (~>) (t6989586621680804230 a6989586621680804232) ((~>) ((~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) (m6989586621680804231 (t6989586621680804230 b6989586621680804233)))
data ForMSym1 (a6989586621680804751 :: t6989586621680804230 a6989586621680804232) :: forall m6989586621680804231 b6989586621680804233. (~>) ((~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) (m6989586621680804231 (t6989586621680804230 b6989586621680804233))
type ForMSym2 (a6989586621680804751 :: t6989586621680804230 a6989586621680804232) (a6989586621680804752 :: (~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) = ForM a6989586621680804751 a6989586621680804752
data MapAccumLSym0 :: forall a6989586621680804227 b6989586621680804228 c6989586621680804229 t6989586621680804226. (~>) ((~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) ((~>) a6989586621680804227 ((~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229)))
data MapAccumLSym1 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) :: forall t6989586621680804226. (~>) a6989586621680804227 ((~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229))
data MapAccumLSym2 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) (a6989586621680804731 :: a6989586621680804227) :: forall t6989586621680804226. (~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229)
type MapAccumLSym3 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) (a6989586621680804731 :: a6989586621680804227) (a6989586621680804732 :: t6989586621680804226 b6989586621680804228) = MapAccumL a6989586621680804730 a6989586621680804731 a6989586621680804732
data MapAccumRSym0 :: forall a6989586621680804223 b6989586621680804224 c6989586621680804225 t6989586621680804222. (~>) ((~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) ((~>) a6989586621680804223 ((~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225)))
data MapAccumRSym1 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) :: forall t6989586621680804222. (~>) a6989586621680804223 ((~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225))
data MapAccumRSym2 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) (a6989586621680804714 :: a6989586621680804223) :: forall t6989586621680804222. (~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225)
type MapAccumRSym3 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) (a6989586621680804714 :: a6989586621680804223) (a6989586621680804715 :: t6989586621680804222 b6989586621680804224) = MapAccumR a6989586621680804713 a6989586621680804714 a6989586621680804715
data FmapDefaultSym0 :: forall a6989586621680804220 b6989586621680804221 t6989586621680804219. (~>) ((~>) a6989586621680804220 b6989586621680804221) ((~>) (t6989586621680804219 a6989586621680804220) (t6989586621680804219 b6989586621680804221))
data FmapDefaultSym1 (a6989586621680804700 :: (~>) a6989586621680804220 b6989586621680804221) :: forall t6989586621680804219. (~>) (t6989586621680804219 a6989586621680804220) (t6989586621680804219 b6989586621680804221)
type FmapDefaultSym2 (a6989586621680804700 :: (~>) a6989586621680804220 b6989586621680804221) (a6989586621680804701 :: t6989586621680804219 a6989586621680804220) = FmapDefault a6989586621680804700 a6989586621680804701
data FoldMapDefaultSym0 :: forall a6989586621680804218 m6989586621680804217 t6989586621680804216. (~>) ((~>) a6989586621680804218 m6989586621680804217) ((~>) (t6989586621680804216 a6989586621680804218) m6989586621680804217)
data FoldMapDefaultSym1 (a6989586621680804679 :: (~>) a6989586621680804218 m6989586621680804217) :: forall t6989586621680804216. (~>) (t6989586621680804216 a6989586621680804218) m6989586621680804217
type FoldMapDefaultSym2 (a6989586621680804679 :: (~>) a6989586621680804218 m6989586621680804217) (a6989586621680804680 :: t6989586621680804216 a6989586621680804218) = FoldMapDefault a6989586621680804679 a6989586621680804680
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805243Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateR s)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 s6989586621680804277 (a6989586621680805240 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805243Sym1 a6989586621680805240)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 s6989586621680804277 (a6989586621680805241 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680805240 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680804277 a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805243Sym2 a6989586621680805241 a6989586621680805240)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680805254Sym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateR s)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805251 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805254Sym1 f6989586621680805251)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805252 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (f6989586621680805251 :: k5 Data.Singletons.Internal.~> (k6, k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805254Sym2 kx6989586621680805252 f6989586621680805251)
instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680805253 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (kx6989586621680805252 :: k5 Data.Singletons.Internal.~> (k6, k2)) (f6989586621680805251 :: k7 Data.Singletons.Internal.~> (k5, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805254Sym3 ky6989586621680805253 kx6989586621680805252 f6989586621680805251)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805258Sym0
instance forall k1 k2 k3 k4 (s6989586621680805256 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805258Sym1 s6989586621680805256)
instance forall k1 k2 k3 k4 (f6989586621680805251 :: k1) (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805258Sym2 f6989586621680805251 s6989586621680805256)
instance forall k1 k2 k3 k4 (kx6989586621680805252 :: k1) (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805258Sym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257YSym0
instance forall k1 k2 k3 k4 k5 (s6989586621680805256 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257YSym1 s6989586621680805256)
instance forall k1 k2 k3 k4 k5 (f6989586621680805251 :: k1) (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257YSym2 f6989586621680805251 s6989586621680805256)
instance forall k1 k2 k3 k4 k5 (kx6989586621680805252 :: k1) (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257YSym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257S'Sym0
instance forall k1 k2 k3 k4 k5 (s6989586621680805256 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S'Sym1 s6989586621680805256)
instance forall k1 k2 k3 k4 k5 (f6989586621680805251 :: k1) (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S'Sym2 f6989586621680805251 s6989586621680805256)
instance forall k1 k2 k3 k4 k5 (kx6989586621680805252 :: k1) (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S'Sym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805264Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805264Sym1 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805264Sym2 f6989586621680805251 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 (kx6989586621680805252 :: k2) (f6989586621680805251 :: k3) (s6989586621680805256 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257X_6989586621680805264Sym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257XSym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257XSym1 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257XSym2 f6989586621680805251 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805252 :: k2) (f6989586621680805251 :: k3) (s6989586621680805256 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257XSym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805257S''Sym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680805256 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S''Sym1 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805251 :: k2) (s6989586621680805256 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S''Sym2 f6989586621680805251 s6989586621680805256)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805252 :: k2) (f6989586621680805251 :: k3) (s6989586621680805256 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805257S''Sym3 kx6989586621680805252 f6989586621680805251 s6989586621680805256)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680805176Sym0
instance forall s6989586621680804277 a6989586621679570826 b6989586621679570827 (a6989586621680805174 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680804277 (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680805176Sym1 a6989586621680805174)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680805184Sym0
instance forall k2 k3 k4 k5 k6 (kf6989586621680805182 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805184Sym1 kf6989586621680805182)
instance forall k2 k3 k4 k5 k6 (kv6989586621680805183 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)) (kf6989586621680805182 :: k6 Data.Singletons.Internal.~> (k2, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805184Sym2 kv6989586621680805183 kf6989586621680805182)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805188Sym0
instance forall k1 k2 k3 (s6989586621680805186 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805188Sym1 s6989586621680805186)
instance forall k1 k2 k3 (kf6989586621680805182 :: k1) (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805188Sym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187VSym0
instance forall k1 k2 k3 k4 (s6989586621680805186 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187VSym1 s6989586621680805186)
instance forall k1 k2 k3 k4 (kf6989586621680805182 :: k1) (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187VSym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680805186 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187S'Sym1 s6989586621680805186)
instance forall k1 k2 k3 k4 (kf6989586621680805182 :: k1) (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187S'Sym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805194Sym0
instance forall k2 k3 k4 k5 (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805194Sym1 s6989586621680805186)
instance forall k2 k3 k4 k5 (kf6989586621680805182 :: k2) (s6989586621680805186 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187X_6989586621680805194Sym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187FSym0
instance forall k2 k3 k4 k5 k6 (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187FSym1 s6989586621680805186)
instance forall k2 k3 k4 k5 k6 (kf6989586621680805182 :: k2) (s6989586621680805186 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187FSym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805187S''Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680805186 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187S''Sym1 s6989586621680805186)
instance forall k2 k3 k4 k5 k6 (kf6989586621680805182 :: k2) (s6989586621680805186 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805187S''Sym2 kf6989586621680805182 s6989586621680805186)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680805162Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680805167Sym0
instance forall k2 k3 (x6989586621680805166 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805167Sym1 x6989586621680805166)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680805120Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateR s)
instance forall a6989586621679570820 b6989586621679570821 s6989586621680804271 (a6989586621680805118 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680805120Sym1 a6989586621680805118)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680805128Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateR s)
instance forall k2 k3 k4 k (f6989586621680805126 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805128Sym1 f6989586621680805126)
instance forall k2 k3 k4 k (k6989586621680805127 :: k2 Data.Singletons.Internal.~> k3) (f6989586621680805126 :: k4 Data.Singletons.Internal.~> (k, k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805128Sym2 k6989586621680805127 f6989586621680805126)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805131X_6989586621680805132Sym0
instance forall k1 k2 k3 (s6989586621680805130 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131X_6989586621680805132Sym1 s6989586621680805130)
instance forall k1 k2 k3 (f6989586621680805126 :: k1) (s6989586621680805130 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131X_6989586621680805132Sym2 f6989586621680805126 s6989586621680805130)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805131VSym0
instance forall k1 k2 k3 k4 (s6989586621680805130 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131VSym1 s6989586621680805130)
instance forall k1 k2 k3 k4 (f6989586621680805126 :: k1) (s6989586621680805130 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131VSym2 f6989586621680805126 s6989586621680805130)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805131S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680805130 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131S'Sym1 s6989586621680805130)
instance forall k1 k2 k3 k4 (f6989586621680805126 :: k1) (s6989586621680805130 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805131S'Sym2 f6989586621680805126 s6989586621680805130)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805043Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateL s)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 s6989586621680804253 (a6989586621680805040 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805043Sym1 a6989586621680805040)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 s6989586621680804253 (a6989586621680805041 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680805040 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680804253 a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680805043Sym2 a6989586621680805041 a6989586621680805040)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680805054Sym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateL s)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805051 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805054Sym1 f6989586621680805051)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805052 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (f6989586621680805051 :: k5 Data.Singletons.Internal.~> (k6, k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805054Sym2 kx6989586621680805052 f6989586621680805051)
instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680805053 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k4)) (kx6989586621680805052 :: k5 Data.Singletons.Internal.~> (k6, k2)) (f6989586621680805051 :: k6 Data.Singletons.Internal.~> (k7, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680805054Sym3 ky6989586621680805053 kx6989586621680805052 f6989586621680805051)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805058Sym0
instance forall k1 k2 k3 k4 (s6989586621680805056 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805058Sym1 s6989586621680805056)
instance forall k1 k2 k3 k4 (f6989586621680805051 :: k1) (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805058Sym2 f6989586621680805051 s6989586621680805056)
instance forall k1 k2 k3 k4 (kx6989586621680805052 :: k1) (f6989586621680805051 :: k2) (s6989586621680805056 :: k1 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805058Sym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057XSym0
instance forall k1 k2 k3 k4 k5 (s6989586621680805056 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057XSym1 s6989586621680805056)
instance forall k1 k2 k3 k4 k5 (f6989586621680805051 :: k1) (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057XSym2 f6989586621680805051 s6989586621680805056)
instance forall k1 k2 k3 k4 k5 (kx6989586621680805052 :: k1) (f6989586621680805051 :: k2) (s6989586621680805056 :: k1 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057XSym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057S'Sym0
instance forall k1 k2 k3 k4 k5 (s6989586621680805056 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S'Sym1 s6989586621680805056)
instance forall k1 k2 k3 k4 k5 (f6989586621680805051 :: k1) (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S'Sym2 f6989586621680805051 s6989586621680805056)
instance forall k1 k2 k3 k4 k5 (kx6989586621680805052 :: k1) (f6989586621680805051 :: k2) (s6989586621680805056 :: k1 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S'Sym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805064Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805064Sym1 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 (f6989586621680805051 :: k2) (s6989586621680805056 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805064Sym2 f6989586621680805051 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 (kx6989586621680805052 :: k2) (f6989586621680805051 :: k3) (s6989586621680805056 :: k2 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057X_6989586621680805064Sym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057YSym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057YSym1 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805051 :: k2) (s6989586621680805056 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057YSym2 f6989586621680805051 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805052 :: k2) (f6989586621680805051 :: k3) (s6989586621680805056 :: k2 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057YSym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680805057S''Sym0
instance forall k2 k3 k4 k5 k6 k7 (s6989586621680805056 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S''Sym1 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 k7 (f6989586621680805051 :: k2) (s6989586621680805056 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S''Sym2 f6989586621680805051 s6989586621680805056)
instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680805052 :: k2) (f6989586621680805051 :: k3) (s6989586621680805056 :: k2 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680805057S''Sym3 kx6989586621680805052 f6989586621680805051 s6989586621680805056)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680804976Sym0
instance forall s6989586621680804253 a6989586621679570826 b6989586621679570827 (a6989586621680804974 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680804253 (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680804976Sym1 a6989586621680804974)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680804984Sym0
instance forall k2 k3 k4 k5 k (kf6989586621680804982 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680804984Sym1 kf6989586621680804982)
instance forall k2 k3 k4 k5 k (kv6989586621680804983 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)) (kf6989586621680804982 :: k3 Data.Singletons.Internal.~> (k, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680804984Sym2 kv6989586621680804983 kf6989586621680804982)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804988Sym0
instance forall k1 k2 k3 (s6989586621680804986 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804988Sym1 s6989586621680804986)
instance forall k1 k2 k3 (kf6989586621680804982 :: k1) (s6989586621680804986 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804988Sym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987FSym0
instance forall k1 k2 k3 k4 (s6989586621680804986 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987FSym1 s6989586621680804986)
instance forall k1 k2 k3 k4 (kf6989586621680804982 :: k1) (s6989586621680804986 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987FSym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680804986 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987S'Sym1 s6989586621680804986)
instance forall k1 k2 k3 k4 (kf6989586621680804982 :: k1) (s6989586621680804986 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987S'Sym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804994Sym0
instance forall k2 k3 k4 k5 (s6989586621680804986 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804994Sym1 s6989586621680804986)
instance forall k2 k3 k4 k5 (kf6989586621680804982 :: k2) (s6989586621680804986 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987X_6989586621680804994Sym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987VSym0
instance forall k2 k3 k4 k5 k6 (s6989586621680804986 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987VSym1 s6989586621680804986)
instance forall k2 k3 k4 k5 k6 (kf6989586621680804982 :: k2) (s6989586621680804986 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987VSym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804987S''Sym0
instance forall k2 k3 k4 k5 k6 (s6989586621680804986 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987S''Sym1 s6989586621680804986)
instance forall k2 k3 k4 k5 k6 (kf6989586621680804982 :: k2) (s6989586621680804986 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804987S''Sym2 kf6989586621680804982 s6989586621680804986)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680804962Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680804967Sym0
instance forall k2 k3 (x6989586621680804966 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680804967Sym1 x6989586621680804966)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680804920Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateL s)
instance forall a6989586621679570820 b6989586621679570821 s6989586621680804247 (a6989586621680804918 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680804920Sym1 a6989586621680804918)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680804928Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateL s)
instance forall k2 k3 k4 k (f6989586621680804926 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680804928Sym1 f6989586621680804926)
instance forall k2 k3 k4 k (k6989586621680804927 :: k2 Data.Singletons.Internal.~> k3) (f6989586621680804926 :: k4 Data.Singletons.Internal.~> (k, k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680804928Sym2 k6989586621680804927 f6989586621680804926)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804931X_6989586621680804932Sym0
instance forall k1 k2 k3 (s6989586621680804930 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931X_6989586621680804932Sym1 s6989586621680804930)
instance forall k1 k2 k3 (f6989586621680804926 :: k1) (s6989586621680804930 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931X_6989586621680804932Sym2 f6989586621680804926 s6989586621680804930)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804931VSym0
instance forall k1 k2 k3 k4 (s6989586621680804930 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931VSym1 s6989586621680804930)
instance forall k1 k2 k3 k4 (f6989586621680804926 :: k1) (s6989586621680804930 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931VSym2 f6989586621680804926 s6989586621680804930)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804931S'Sym0
instance forall k1 k2 k3 k4 (s6989586621680804930 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931S'Sym1 s6989586621680804930)
instance forall k1 k2 k3 k4 (f6989586621680804926 :: k1) (s6989586621680804930 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804931S'Sym2 f6989586621680804926 s6989586621680804930)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804908Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Functor.Identity.Identity
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804906 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804908Sym1 a6989586621680804906)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804896Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.Last
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804894 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804896Sym1 a6989586621680804894)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804884Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.First
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804882 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804884Sym1 a6989586621680804882)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804872Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Product
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804870 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804872Sym1 a6989586621680804870)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804860Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Sum
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804858 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804860Sym1 a6989586621680804858)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804848Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Dual
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804846 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804848Sym1 a6989586621680804846)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804836Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Functor.Const.Const m)
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 m6989586621680804246 (a6989586621680804834 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804836Sym1 a6989586621680804834)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804823Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable ((,) a)
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 a6989586621680804245 (a6989586621680804821 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804823Sym1 a6989586621680804821)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804809Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Either.Either a)
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 a6989586621680804244 (a6989586621680804807 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804809Sym1 a6989586621680804807)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804796Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Base.NonEmpty
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804794 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804796Sym1 a6989586621680804794)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804782Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable []
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804780 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804782Sym1 a6989586621680804780)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680804769Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Maybe.Maybe
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680804767 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680804769Sym1 a6989586621680804767)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.ForSym0
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.ForSym0
instance forall (t6989586621680804234 :: * -> *) a6989586621680804236 (f6989586621680804235 :: * -> *) b6989586621680804237 (a6989586621680804761 :: t6989586621680804234 a6989586621680804236). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForSym1 a6989586621680804761)
instance forall (t :: * -> *) a (f :: * -> *) b (d :: t a). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.ForSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.ForMSym0
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.ForMSym0
instance forall (t6989586621680804230 :: * -> *) a6989586621680804232 (m6989586621680804231 :: * -> *) b6989586621680804233 (a6989586621680804751 :: t6989586621680804230 a6989586621680804232). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForMSym1 a6989586621680804751)
instance forall (t :: * -> *) a (m :: * -> *) b (d :: t a). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.ForMSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapAccumLSym0
instance Data.Singletons.Prelude.Traversable.STraversable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.MapAccumLSym0
instance forall a6989586621680804227 b6989586621680804228 c6989586621680804229 (t6989586621680804226 :: * -> *) (a6989586621680804730 :: a6989586621680804227 Data.Singletons.Internal.~> (b6989586621680804228 Data.Singletons.Internal.~> (a6989586621680804227, c6989586621680804229))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym1 a6989586621680804730)
instance forall a b c (t :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> (a, c))). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.MapAccumLSym1 d)
instance forall a6989586621680804227 b6989586621680804228 c6989586621680804229 (t6989586621680804226 :: * -> *) (a6989586621680804731 :: a6989586621680804227 Data.Singletons.Internal.~> (b6989586621680804228 Data.Singletons.Internal.~> (a6989586621680804227, c6989586621680804229))) (a6989586621680804730 :: a6989586621680804227). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym2 a6989586621680804731 a6989586621680804730)
instance forall a b c (t :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> (a, c))) (d2 :: a). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.MapAccumLSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapAccumRSym0
instance Data.Singletons.Prelude.Traversable.STraversable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.MapAccumRSym0
instance forall a6989586621680804223 b6989586621680804224 c6989586621680804225 (t6989586621680804222 :: * -> *) (a6989586621680804713 :: a6989586621680804223 Data.Singletons.Internal.~> (b6989586621680804224 Data.Singletons.Internal.~> (a6989586621680804223, c6989586621680804225))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym1 a6989586621680804713)
instance forall a b c (t :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> (a, c))). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.MapAccumRSym1 d)
instance forall a6989586621680804223 b6989586621680804224 c6989586621680804225 (t6989586621680804222 :: * -> *) (a6989586621680804714 :: a6989586621680804223 Data.Singletons.Internal.~> (b6989586621680804224 Data.Singletons.Internal.~> (a6989586621680804223, c6989586621680804225))) (a6989586621680804713 :: a6989586621680804223). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym2 a6989586621680804714 a6989586621680804713)
instance forall a b c (t :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> (a, c))) (d2 :: a). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.MapAccumRSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.FmapDefaultSym0
instance Data.Singletons.Prelude.Traversable.STraversable t => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.FmapDefaultSym0
instance forall a6989586621680804220 b6989586621680804221 (t6989586621680804219 :: * -> *) (a6989586621680804700 :: a6989586621680804220 Data.Singletons.Internal.~> b6989586621680804221). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FmapDefaultSym1 a6989586621680804700)
instance forall a b (t :: * -> *) (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.FmapDefaultSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.FoldMapDefaultSym0
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monoid.SMonoid m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.FoldMapDefaultSym0
instance forall a6989586621680804218 m6989586621680804217 (t6989586621680804216 :: * -> *) (a6989586621680804679 :: a6989586621680804218 Data.Singletons.Internal.~> m6989586621680804217). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FoldMapDefaultSym1 a6989586621680804679)
instance forall a m (t :: * -> *) (d :: a Data.Singletons.Internal.~> m). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monoid.SMonoid m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.FoldMapDefaultSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804739Scrutinee_6989586621680804310Sym0
instance forall s a6989586621680798695 b6989586621680798696 k (t6989586621680798693 :: * -> *) (f6989586621680804736 :: s Data.Singletons.Internal.~> (a6989586621680798695 Data.Singletons.Internal.~> (s, b6989586621680798696))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804739Scrutinee_6989586621680804310Sym1 f6989586621680804736)
instance forall s a6989586621680798695 b6989586621680798696 k (t6989586621680798693 :: * -> *) (s6989586621680804737 :: s Data.Singletons.Internal.~> (a6989586621680798695 Data.Singletons.Internal.~> (s, b6989586621680798696))) (f6989586621680804736 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804739Scrutinee_6989586621680804310Sym2 s6989586621680804737 f6989586621680804736)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804722Scrutinee_6989586621680804314Sym0
instance forall s a6989586621680798695 b6989586621680798696 k (t6989586621680798693 :: * -> *) (f6989586621680804719 :: s Data.Singletons.Internal.~> (a6989586621680798695 Data.Singletons.Internal.~> (s, b6989586621680798696))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804722Scrutinee_6989586621680804314Sym1 f6989586621680804719)
instance forall s a6989586621680798695 b6989586621680798696 k (t6989586621680798693 :: * -> *) (s6989586621680804720 :: s Data.Singletons.Internal.~> (a6989586621680798695 Data.Singletons.Internal.~> (s, b6989586621680798696))) (f6989586621680804719 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804722Scrutinee_6989586621680804314Sym2 s6989586621680804720 f6989586621680804719)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804706Scrutinee_6989586621680804318Sym0
instance forall a6989586621680798695 b6989586621680798696 (t6989586621680798693 :: * -> *) (f6989586621680804704 :: a6989586621680798695 Data.Singletons.Internal.~> b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804706Scrutinee_6989586621680804318Sym1 f6989586621680804704)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804693Scrutinee_6989586621680804321Sym0
instance forall a6989586621680798695 b6989586621679545427 (t6989586621680798693 :: * -> *) (f6989586621680804683 :: a6989586621680798695 Data.Singletons.Internal.~> b6989586621679545427). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804693Scrutinee_6989586621680804321Sym1 f6989586621680804683)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680804685MkConstSym0
instance forall k1 k2 m6989586621680804217 (f6989586621680804683 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804685MkConstSym1 f6989586621680804683)
instance forall k1 k2 m6989586621680804217 (x6989586621680804684 :: k1) (f6989586621680804683 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680804685MkConstSym2 x6989586621680804684 f6989586621680804683)
instance Data.Singletons.Prelude.Traversable.STraversable GHC.Maybe.Maybe
instance Data.Singletons.Prelude.Traversable.STraversable []
instance Data.Singletons.Prelude.Traversable.STraversable GHC.Base.NonEmpty
instance Data.Singletons.Prelude.Traversable.STraversable (Data.Either.Either a)
instance Data.Singletons.Prelude.Traversable.STraversable ((,) a)
instance Data.Singletons.Prelude.Traversable.STraversable (Data.Functor.Const.Const m)
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Internal.Dual
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Internal.Sum
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Internal.Product
instance Data.Singletons.Prelude.Traversable.STraversable Data.Monoid.First
instance Data.Singletons.Prelude.Traversable.STraversable Data.Monoid.Last
instance Data.Singletons.Prelude.Traversable.STraversable Data.Functor.Identity.Identity
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.TraverseSym0
instance forall a (f :: * -> *) b (t :: * -> *) (d :: a Data.Singletons.Internal.~> f b). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.TraverseSym1 d)
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SApplicative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.SequenceASym0
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.MapMSym0
instance forall a (m :: * -> *) b (t :: * -> *) (d :: a Data.Singletons.Internal.~> m b). (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Traversable.MapMSym1 d)
instance (Data.Singletons.Prelude.Traversable.STraversable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Traversable.SequenceSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapMSym0
instance forall a6989586621680798700 (m6989586621680798699 :: * -> *) b6989586621680798701 (t6989586621680798693 :: * -> *) (arg6989586621680798711 :: a6989586621680798700 Data.Singletons.Internal.~> m6989586621680798699 b6989586621680798701). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapMSym1 arg6989586621680798711)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceSym0
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (t6989586621680798693 :: * -> *) (arg6989586621680798705 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TraverseSym1 arg6989586621680798705)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TraverseSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceASym0
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (t6989586621680798693 :: * -> *) (a6989586621680798717 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680798719Sym1 a6989586621680798717)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680798719Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceA_6989586621680798732Sym0
instance forall a6989586621680798700 (m6989586621680798699 :: * -> *) b6989586621680798701 (t6989586621680798693 :: * -> *) (a6989586621680798740 :: a6989586621680798700 Data.Singletons.Internal.~> m6989586621680798699 b6989586621680798701). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapM_6989586621680798742Sym1 a6989586621680798740)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapM_6989586621680798742Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Sequence_6989586621680798757Sym0
-- | Defines the promoted version of Semigroup, PSemigroup,
-- and the singleton version, SSemigroup.
module Data.Singletons.Prelude.Semigroup
class PSemigroup (a_a3u8k :: Type) where {
type family (<>) (arg_a3uc7 :: a_a3u8k) (arg_a3uc8 :: a_a3u8k) :: a_a3u8k;
type family Sconcat (arg_a3ucb :: NonEmpty a_a3u8k) :: a_a3u8k;
type Sconcat a_a3ucd = Apply Sconcat_6989586621679840854Sym0 a_a3ucd;
}
infixr 6 <>
class SSemigroup a_a3u8k
(%<>) :: forall (t_a3ufW :: a_a3u8k) (t_a3ufX :: a_a3u8k). SSemigroup a_a3u8k => Sing t_a3ufW -> Sing t_a3ufX -> Sing (Apply (Apply (<>@#@$) t_a3ufW) t_a3ufX :: a_a3u8k)
sSconcat :: forall (t_a3ug0 :: NonEmpty a_a3u8k). SSemigroup a_a3u8k => Sing t_a3ug0 -> Sing (Apply SconcatSym0 t_a3ug0 :: a_a3u8k)
sSconcat :: forall (t_a3ug0 :: NonEmpty a_a3u8k). (SSemigroup a_a3u8k, (Apply SconcatSym0 t_a3ug0 :: a_a3u8k) ~ Apply Sconcat_6989586621679840854Sym0 t_a3ug0) => Sing t_a3ug0 -> Sing (Apply SconcatSym0 t_a3ug0 :: a_a3u8k)
infixr 6 %<>
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SMin :: forall a_afAv. Min a_afAv -> Type
[SMin] :: forall a_afAv (n_a3wDw :: a_afAv). () => {sGetMin :: Sing (n_a3wDw :: a_afAv)} -> SMin ('Min n_a3wDw)
data SMax :: forall a_afAz. Max a_afAz -> Type
[SMax] :: forall a_afAz (n_a3wDP :: a_afAz). () => {sGetMax :: Sing (n_a3wDP :: a_afAz)} -> SMax ('Max n_a3wDP)
data SFirst :: forall a_afAH. First a_afAH -> Type
[SFirst] :: forall a_afAH (n_a3wE8 :: a_afAH). () => {sGetFirst :: Sing (n_a3wE8 :: a_afAH)} -> SFirst ('First n_a3wE8)
data SLast :: forall a_afAD. Last a_afAD -> Type
[SLast] :: forall a_afAD (n_a3wEr :: a_afAD). () => {sGetLast :: Sing (n_a3wEr :: a_afAD)} -> SLast ('Last n_a3wEr)
data SWrappedMonoid :: forall m_alOa. WrappedMonoid m_alOa -> Type
[SWrapMonoid] :: forall m_alOa (n_a3wEK :: m_alOa). () => {sUnwrapMonoid :: Sing (n_a3wEK :: m_alOa)} -> SWrappedMonoid ('WrapMonoid n_a3wEK)
data SDual :: forall a_alj6. Dual a_alj6 -> Type
[SDual] :: forall a_alj6 (n_a3wC9 :: a_alj6). () => {sGetDual :: Sing (n_a3wC9 :: a_alj6)} -> SDual ('Dual n_a3wC9)
data SAll :: All -> Type
[SAll] :: forall (n_a3wCn :: Bool). () => {sGetAll :: Sing (n_a3wCn :: Bool)} -> SAll ('All n_a3wCn)
data SAny :: Any -> Type
[SAny] :: forall (n_a3wCB :: Bool). () => {sGetAny :: Sing (n_a3wCB :: Bool)} -> SAny ('Any n_a3wCB)
data SSum :: forall a_aliR. Sum a_aliR -> Type
[SSum] :: forall a_aliR (n_a3wCU :: a_aliR). () => {sGetSum :: Sing (n_a3wCU :: a_aliR)} -> SSum ('Sum n_a3wCU)
data SProduct :: forall a_aliW. Product a_aliW -> Type
[SProduct] :: forall a_aliW (n_a3wDd :: a_aliW). () => {sGetProduct :: Sing (n_a3wDd :: a_aliW)} -> SProduct ('Product n_a3wDd)
data SOption :: forall a_afAr. Option a_afAr -> Type
[SOption] :: forall a_afAr (n_a3wBQ :: Maybe a_afAr). () => {sGetOption :: Sing (n_a3wBQ :: Maybe a_afAr)} -> SOption ('Option n_a3wBQ)
data SArg :: forall a_afOY b_afOZ. Arg a_afOY b_afOZ -> Type
[SArg] :: forall a_afOY b_afOZ (n_a7ZMR :: a_afOY) (n_a7ZMS :: b_afOZ). () => Sing (n_a7ZMR :: a_afOY) -> Sing (n_a7ZMS :: b_afOZ) -> SArg ('Arg n_a7ZMR n_a7ZMS)
type family GetMin (a_a3wDr :: Min (a_afAv :: Type)) :: a_afAv
type family GetMax (a_a3wDK :: Max (a_afAz :: Type)) :: a_afAz
type family GetFirst (a_a3wE3 :: First (a_afAH :: Type)) :: a_afAH
type family GetLast (a_a3wEm :: Last (a_afAD :: Type)) :: a_afAD
type family UnwrapMonoid (a_a3wEF :: WrappedMonoid (m_alOa :: Type)) :: m_alOa
type family GetDual (a_a3wC4 :: Dual (a_alj6 :: Type)) :: a_alj6
type family GetAll (a_a3wCi :: All) :: Bool
type family GetAny (a_a3wCw :: Any) :: Bool
type family GetSum (a_a3wCP :: Sum (a_aliR :: Type)) :: a_aliR
type family GetProduct (a_a3wD8 :: Product (a_aliW :: Type)) :: a_aliW
type family GetOption (a_a3wBL :: Option (a_afAr :: Type)) :: Maybe a_afAr
option_ :: b_a8m8i -> (a_a8m8j -> b_a8m8i) -> Option a_a8m8j -> b_a8m8i
sOption_ :: forall b_a8m8i a_a8m8j (t_a8m8D :: b_a8m8i) (t_a8m8E :: (~>) a_a8m8j b_a8m8i) (t_a8m8F :: Option a_a8m8j). Sing t_a8m8D -> Sing t_a8m8E -> Sing t_a8m8F -> Sing (Apply (Apply (Apply Option_Sym0 t_a8m8D) t_a8m8E) t_a8m8F :: b_a8m8i)
type family Option_ (a_a8m8u :: b_a8m8i) (a_a8m8v :: (~>) a_a8m8j b_a8m8i) (a_a8m8w :: Option a_a8m8j) :: b_a8m8i
data (<>@#@$) :: forall a6989586621679840612. (~>) a6989586621679840612 ((~>) a6989586621679840612 a6989586621679840612)
infixr 6 <>@#@$
data (<>@#@$$) (arg6989586621679840847 :: a6989586621679840612) :: (~>) a6989586621679840612 a6989586621679840612
infixr 6 <>@#@$$
type (<>@#@$$$) (arg6989586621679840847 :: a6989586621679840612) (arg6989586621679840848 :: a6989586621679840612) = (<>) arg6989586621679840847 arg6989586621679840848
data SconcatSym0 :: forall a6989586621679840612. (~>) (NonEmpty a6989586621679840612) a6989586621679840612
type SconcatSym1 (arg6989586621679840851 :: NonEmpty a6989586621679840612) = Sconcat arg6989586621679840851
data MinSym0 :: forall (a6989586621679069715 :: Type). (~>) a6989586621679069715 (Min (a6989586621679069715 :: Type))
type MinSym1 (t6989586621679850232 :: a6989586621679069715) = 'Min t6989586621679850232
data GetMinSym0 :: forall (a6989586621679069715 :: Type). (~>) (Min (a6989586621679069715 :: Type)) a6989586621679069715
type GetMinSym1 (a6989586621679850229 :: Min (a6989586621679069715 :: Type)) = GetMin a6989586621679850229
data MaxSym0 :: forall (a6989586621679069719 :: Type). (~>) a6989586621679069719 (Max (a6989586621679069719 :: Type))
type MaxSym1 (t6989586621679850251 :: a6989586621679069719) = 'Max t6989586621679850251
data GetMaxSym0 :: forall (a6989586621679069719 :: Type). (~>) (Max (a6989586621679069719 :: Type)) a6989586621679069719
type GetMaxSym1 (a6989586621679850248 :: Max (a6989586621679069719 :: Type)) = GetMax a6989586621679850248
data FirstSym0 :: forall (a6989586621679069727 :: Type). (~>) a6989586621679069727 (First (a6989586621679069727 :: Type))
type FirstSym1 (t6989586621679850270 :: a6989586621679069727) = 'First t6989586621679850270
data GetFirstSym0 :: forall (a6989586621679069727 :: Type). (~>) (First (a6989586621679069727 :: Type)) a6989586621679069727
type GetFirstSym1 (a6989586621679850267 :: First (a6989586621679069727 :: Type)) = GetFirst a6989586621679850267
data LastSym0 :: forall (a6989586621679069723 :: Type). (~>) a6989586621679069723 (Last (a6989586621679069723 :: Type))
type LastSym1 (t6989586621679850289 :: a6989586621679069723) = 'Last t6989586621679850289
data GetLastSym0 :: forall (a6989586621679069723 :: Type). (~>) (Last (a6989586621679069723 :: Type)) a6989586621679069723
type GetLastSym1 (a6989586621679850286 :: Last (a6989586621679069723 :: Type)) = GetLast a6989586621679850286
data WrapMonoidSym0 :: forall (m6989586621679093626 :: Type). (~>) m6989586621679093626 (WrappedMonoid (m6989586621679093626 :: Type))
type WrapMonoidSym1 (t6989586621679850308 :: m6989586621679093626) = 'WrapMonoid t6989586621679850308
data UnwrapMonoidSym0 :: forall (m6989586621679093626 :: Type). (~>) (WrappedMonoid (m6989586621679093626 :: Type)) m6989586621679093626
type UnwrapMonoidSym1 (a6989586621679850305 :: WrappedMonoid (m6989586621679093626 :: Type)) = UnwrapMonoid a6989586621679850305
data DualSym0 :: forall (a6989586621679091700 :: Type). (~>) a6989586621679091700 (Dual (a6989586621679091700 :: Type))
type DualSym1 (t6989586621679850147 :: a6989586621679091700) = 'Dual t6989586621679850147
data GetDualSym0 :: forall (a6989586621679091700 :: Type). (~>) (Dual (a6989586621679091700 :: Type)) a6989586621679091700
type GetDualSym1 (a6989586621679850144 :: Dual (a6989586621679091700 :: Type)) = GetDual a6989586621679850144
data AllSym0 :: (~>) Bool All
type AllSym1 (t6989586621679850161 :: Bool) = 'All t6989586621679850161
data GetAllSym0 :: (~>) All Bool
type GetAllSym1 (a6989586621679850158 :: All) = GetAll a6989586621679850158
data AnySym0 :: (~>) Bool Any
type AnySym1 (t6989586621679850175 :: Bool) = 'Any t6989586621679850175
data GetAnySym0 :: (~>) Any Bool
type GetAnySym1 (a6989586621679850172 :: Any) = GetAny a6989586621679850172
data SumSym0 :: forall (a6989586621679091685 :: Type). (~>) a6989586621679091685 (Sum (a6989586621679091685 :: Type))
type SumSym1 (t6989586621679850194 :: a6989586621679091685) = 'Sum t6989586621679850194
data GetSumSym0 :: forall (a6989586621679091685 :: Type). (~>) (Sum (a6989586621679091685 :: Type)) a6989586621679091685
type GetSumSym1 (a6989586621679850191 :: Sum (a6989586621679091685 :: Type)) = GetSum a6989586621679850191
data ProductSym0 :: forall (a6989586621679091690 :: Type). (~>) a6989586621679091690 (Product (a6989586621679091690 :: Type))
type ProductSym1 (t6989586621679850213 :: a6989586621679091690) = 'Product t6989586621679850213
data GetProductSym0 :: forall (a6989586621679091690 :: Type). (~>) (Product (a6989586621679091690 :: Type)) a6989586621679091690
type GetProductSym1 (a6989586621679850210 :: Product (a6989586621679091690 :: Type)) = GetProduct a6989586621679850210
data OptionSym0 :: forall (a6989586621679069711 :: Type). (~>) (Maybe a6989586621679069711) (Option (a6989586621679069711 :: Type))
type OptionSym1 (t6989586621679850128 :: Maybe a6989586621679069711) = 'Option t6989586621679850128
data GetOptionSym0 :: forall (a6989586621679069711 :: Type). (~>) (Option (a6989586621679069711 :: Type)) (Maybe a6989586621679069711)
type GetOptionSym1 (a6989586621679850125 :: Option (a6989586621679069711 :: Type)) = GetOption a6989586621679850125
data ArgSym0 :: forall (a6989586621679070612 :: Type) (b6989586621679070613 :: Type). (~>) a6989586621679070612 ((~>) b6989586621679070613 (Arg (a6989586621679070612 :: Type) (b6989586621679070613 :: Type)))
data ArgSym1 (t6989586621680915597 :: a6989586621679070612 :: Type) :: forall (b6989586621679070613 :: Type). (~>) b6989586621679070613 (Arg (a6989586621679070612 :: Type) (b6989586621679070613 :: Type))
type ArgSym2 (t6989586621680915597 :: a6989586621679070612) (t6989586621680915598 :: b6989586621679070613) = 'Arg t6989586621680915597 t6989586621680915598
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Option_Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Semigroup.Option_Sym0
instance forall b6989586621681001498 a6989586621681001499 (a6989586621681001510 :: b6989586621681001498). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym1 a6989586621681001510)
instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.Option_Sym1 d)
instance forall b6989586621681001498 a6989586621681001499 (a6989586621681001511 :: b6989586621681001498) (a6989586621681001510 :: a6989586621681001499 Data.Singletons.Internal.~> b6989586621681001498). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym2 a6989586621681001511 a6989586621681001510)
instance forall b a (d1 :: b) (d2 :: a Data.Singletons.Internal.~> b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.Option_Sym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680935384Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Option
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680935382 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680935384Sym1 a6989586621680935382)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680935372Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Option
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680935370 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680935372Sym1 a6989586621680935370)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Option a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935358Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Option a)
instance forall a6989586621680933418 (a6989586621680935356 :: Data.Semigroup.Option a6989586621680933418). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935358Sym1 a6989586621680935356)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935342Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Option
instance forall a6989586621679570851 b6989586621679570852 (a6989586621680935340 :: Data.Semigroup.Option a6989586621679570851). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935342Sym1 a6989586621680935340)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935330Sym0
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680935328 :: Data.Semigroup.Option a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935330Sym1 a6989586621680935328)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935318Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Option
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680935316 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935318Sym1 a6989586621680935316)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680935306Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680935304 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680935306Sym1 a6989586621680935304)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935295Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Option
instance forall a6989586621679570831 b6989586621679570832 (a6989586621680935293 :: Data.Semigroup.Option a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935295Sym1 a6989586621680935293)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680935279Sym0
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680935276 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680935279Sym1 a6989586621680935276)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680935277 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680935276 :: Data.Semigroup.Option a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680935279Sym2 a6989586621680935277 a6989586621680935276)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935266Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680935264 :: Data.Semigroup.Option (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935266Sym1 a6989586621680935264)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680935258Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935245Sym0
instance Data.Singletons.Prelude.Monad.Internal.PAlternative Data.Semigroup.Option
instance forall a6989586621679570901 (a6989586621680935243 :: Data.Semigroup.Option a6989586621679570901). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935245Sym1 a6989586621680935243)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680935253ASym0
instance Data.Singletons.Prelude.Monad.Internal.SAlternative Data.Semigroup.Option
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935227Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.WrappedMonoid a)
instance forall a6989586621680933398 (a6989586621680935224 :: Data.Semigroup.WrappedMonoid a6989586621680933398). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935227Sym1 a6989586621680935224)
instance forall a6989586621680933398 (a6989586621680935225 :: Data.Semigroup.WrappedMonoid a6989586621680933398) (a6989586621680935224 :: Data.Semigroup.WrappedMonoid a6989586621680933398). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935227Sym2 a6989586621680935225 a6989586621680935224)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680935214Sym0
instance forall a6989586621680933398 (a6989586621680935212 :: Data.Semigroup.WrappedMonoid a6989586621680933398). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680935214Sym1 a6989586621680935212)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680935206Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680935197Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680935190Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680935183Sym0
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.WrappedMonoid m)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935170Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.WrappedMonoid m)
instance forall m6989586621680933394 (a6989586621680935168 :: Data.Semigroup.WrappedMonoid m6989586621680933394). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935170Sym1 a6989586621680935168)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680935158Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Last
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680935156 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680935158Sym1 a6989586621680935156)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680935142Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Last
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680935139 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680935142Sym1 a6989586621680935139)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680935140 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680935139 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680935142Sym2 a6989586621680935140 a6989586621680935139)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680935129Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680935127 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680935129Sym1 a6989586621680935127)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935118Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Last a)
instance forall a6989586621680933392 (a6989586621680935116 :: Data.Semigroup.Last a6989586621680933392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935118Sym1 a6989586621680935116)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935106Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Last
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680935104 :: Data.Semigroup.Last a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935106Sym1 a6989586621680935104)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935090Sym0
instance forall a6989586621679570851 b6989586621679570852 (a6989586621680935088 :: Data.Semigroup.Last a6989586621679570851). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935090Sym1 a6989586621680935088)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935071Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Last
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680935069 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680935071Sym1 a6989586621680935069)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680935079Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Last
instance forall k1 k2 k3 (_z_69895866216809338296989586621680935077 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680935079Sym1 _z_69895866216809338296989586621680935077)
instance forall k1 k2 k3 (a_69895866216809338356989586621680935078 :: k1) (_z_69895866216809338296989586621680935077 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680935079Sym2 a_69895866216809338356989586621680935078 _z_69895866216809338296989586621680935077)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680935059Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680935057 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680935059Sym1 a6989586621680935057)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935043Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Last a)
instance forall a6989586621680933381 (a6989586621680935040 :: Data.Semigroup.Last a6989586621680933381). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935043Sym1 a6989586621680935040)
instance forall a6989586621680933381 (a6989586621680935041 :: Data.Semigroup.Last a6989586621680933381) (a6989586621680935040 :: Data.Semigroup.Last a6989586621680933381). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680935043Sym2 a6989586621680935041 a6989586621680935040)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680935030Sym0
instance forall a6989586621680933381 (a6989586621680935028 :: Data.Semigroup.Last a6989586621680933381). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680935030Sym1 a6989586621680935028)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680935022Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680935013Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680935006Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680934999Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934984Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Last
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934981 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934984Sym1 a6989586621680934981)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934982 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680934981 :: Data.Semigroup.Last a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934984Sym2 a6989586621680934982 a6989586621680934981)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934971Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680934969 :: Data.Semigroup.Last (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934971Sym1 a6989586621680934969)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934960Sym0
instance forall a6989586621679570831 b6989586621679570832 (a6989586621680934958 :: Data.Semigroup.Last a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934960Sym1 a6989586621680934958)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934949Sym0
instance forall a6989586621679570833 b6989586621679570834 (a6989586621680934947 :: Data.Semigroup.Last a6989586621679570833). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934949Sym1 a6989586621680934947)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680934941Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934930Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.First
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680934928 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934930Sym1 a6989586621680934928)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934914Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.First
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934911 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934914Sym1 a6989586621680934911)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934912 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680934911 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934914Sym2 a6989586621680934912 a6989586621680934911)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934901Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680934899 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934901Sym1 a6989586621680934899)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934890Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.First a)
instance forall a6989586621680933371 (a6989586621680934888 :: Data.Semigroup.First a6989586621680933371). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934890Sym1 a6989586621680934888)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934878Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.First
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680934876 :: Data.Semigroup.First a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934878Sym1 a6989586621680934876)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934862Sym0
instance forall a6989586621679570851 b6989586621679570852 (a6989586621680934860 :: Data.Semigroup.First a6989586621679570851). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934862Sym1 a6989586621680934860)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934843Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.First
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680934841 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934843Sym1 a6989586621680934841)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934851Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.First
instance forall k1 k2 k3 (_z_69895866216809337986989586621680934849 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934851Sym1 _z_69895866216809337986989586621680934849)
instance forall k1 k2 k3 (a_69895866216809338046989586621680934850 :: k1) (_z_69895866216809337986989586621680934849 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934851Sym2 a_69895866216809338046989586621680934850 _z_69895866216809337986989586621680934849)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934831Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680934829 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934831Sym1 a6989586621680934829)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934815Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.First a)
instance forall a6989586621680933360 (a6989586621680934812 :: Data.Semigroup.First a6989586621680933360). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934815Sym1 a6989586621680934812)
instance forall a6989586621680933360 (a6989586621680934813 :: Data.Semigroup.First a6989586621680933360) (a6989586621680934812 :: Data.Semigroup.First a6989586621680933360). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934815Sym2 a6989586621680934813 a6989586621680934812)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680934802Sym0
instance forall a6989586621680933360 (a6989586621680934800 :: Data.Semigroup.First a6989586621680933360). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680934802Sym1 a6989586621680934800)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680934794Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680934785Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680934778Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680934771Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934756Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.First
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934753 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934756Sym1 a6989586621680934753)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934754 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680934753 :: Data.Semigroup.First a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934756Sym2 a6989586621680934754 a6989586621680934753)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934743Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680934741 :: Data.Semigroup.First (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934743Sym1 a6989586621680934741)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934732Sym0
instance forall a6989586621679570831 b6989586621679570832 (a6989586621680934730 :: Data.Semigroup.First a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934732Sym1 a6989586621680934730)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934721Sym0
instance forall a6989586621679570833 b6989586621679570834 (a6989586621680934719 :: Data.Semigroup.First a6989586621679570833). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934721Sym1 a6989586621680934719)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680934713Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934701Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Semigroup.Arg a)
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 a6989586621680933351 (a6989586621680934699 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934701Sym1 a6989586621680934699)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934672Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Semigroup.Arg a)
instance forall a6989586621680490506 b6989586621680490507 a6989586621680933350 (a6989586621680934669 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934672Sym1 a6989586621680934669)
instance forall a6989586621680490506 b6989586621680490507 a6989586621680933350 (a6989586621680934670 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680934669 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934672Sym2 a6989586621680934670 a6989586621680934669)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym0
instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Semigroup.Arg a)
instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216809337636989586621680934680 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym1 _f_69895866216809337636989586621680934680)
instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216809337656989586621680934681 :: k1) (_f_69895866216809337636989586621680934680 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym2 _z_69895866216809337656989586621680934681 _f_69895866216809337636989586621680934680)
instance forall k1 k2 k3 k4 k5 k6 (a_69895866216809337776989586621680934682 :: k1) (_z_69895866216809337656989586621680934681 :: k2) (_f_69895866216809337636989586621680934680 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym3 a_69895866216809337776989586621680934682 _z_69895866216809337656989586621680934681 _f_69895866216809337636989586621680934680)
instance forall k1 k2 k3 k4 k5 k6 (a_69895866216809337796989586621680934683 :: k1) (a_69895866216809337776989586621680934682 :: k2) (_z_69895866216809337656989586621680934681 :: k3) (_f_69895866216809337636989586621680934680 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym4 a_69895866216809337796989586621680934683 a_69895866216809337776989586621680934682 _z_69895866216809337656989586621680934681 _f_69895866216809337636989586621680934680)
instance forall k1 k2 k3 k4 k5 k6 (t6989586621680934688 :: k1) (a_69895866216809337796989586621680934683 :: k2) (a_69895866216809337776989586621680934682 :: k3) (_z_69895866216809337656989586621680934681 :: k4) (_f_69895866216809337636989586621680934680 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934684Sym5 t6989586621680934688 a_69895866216809337796989586621680934683 a_69895866216809337776989586621680934682 _z_69895866216809337656989586621680934681 _f_69895866216809337636989586621680934680)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934650Sym0
instance forall a6989586621680490505 m6989586621680490504 a6989586621680933350 (a6989586621680934648 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934650Sym1 a6989586621680934648)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934659Sym0
instance forall k1 k2 k3 k4 k5 (_f_69895866216809337636989586621680934656 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934659Sym1 _f_69895866216809337636989586621680934656)
instance forall k1 k2 k3 k4 k5 (a_69895866216809337696989586621680934657 :: k1) (_f_69895866216809337636989586621680934656 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934659Sym2 a_69895866216809337696989586621680934657 _f_69895866216809337636989586621680934656)
instance forall k1 k2 k3 k4 k5 (a_69895866216809337716989586621680934658 :: k1) (a_69895866216809337696989586621680934657 :: k2) (_f_69895866216809337636989586621680934656 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934659Sym3 a_69895866216809337716989586621680934658 a_69895866216809337696989586621680934657 _f_69895866216809337636989586621680934656)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680934631Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Arg a b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680934631Sym1 a6989586621680934628)
instance forall a6989586621680933348 b6989586621680933349 (a6989586621680934629 :: GHC.Types.Nat) (a6989586621680934628 :: Data.Semigroup.Arg a6989586621680933348 b6989586621680933349). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680934631Sym2 a6989586621680934629 a6989586621680934628)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Max_6989586621680934595Sym0
instance Data.Singletons.Prelude.Ord.POrd (Data.Semigroup.Arg a b)
instance forall a6989586621680933336 b6989586621680933337 (a6989586621680934593 :: Data.Semigroup.Arg a6989586621680933336 b6989586621680933337). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Max_6989586621680934595Sym1 a6989586621680934593)
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Ord.SOrd (Data.Semigroup.Arg a b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680934605 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym1 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334426989586621680934606 :: k2) (a6989586621680934605 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym2 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (b6989586621680934607 :: k2) (wild_69895866216809334426989586621680934606 :: k3) (a6989586621680934605 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym3 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334446989586621680934608 :: k2) (b6989586621680934607 :: k3) (wild_69895866216809334426989586621680934606 :: k4) (a6989586621680934605 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym4 wild_69895866216809334446989586621680934608 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216809334386989586621680934601 :: k2) (wild_69895866216809334446989586621680934608 :: k3) (b6989586621680934607 :: k4) (wild_69895866216809334426989586621680934606 :: k5) (a6989586621680934605 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609XSym5 arg_69895866216809334386989586621680934601 wild_69895866216809334446989586621680934608 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680934605 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym1 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334426989586621680934606 :: k2) (a6989586621680934605 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym2 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (b6989586621680934607 :: k2) (wild_69895866216809334426989586621680934606 :: k3) (a6989586621680934605 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym3 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334446989586621680934608 :: k2) (b6989586621680934607 :: k3) (wild_69895866216809334426989586621680934606 :: k4) (a6989586621680934605 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym4 wild_69895866216809334446989586621680934608 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216809334386989586621680934601 :: k2) (wild_69895866216809334446989586621680934608 :: k3) (b6989586621680934607 :: k4) (wild_69895866216809334426989586621680934606 :: k5) (a6989586621680934605 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934609YSym5 arg_69895866216809334386989586621680934601 wild_69895866216809334446989586621680934608 b6989586621680934607 wild_69895866216809334426989586621680934606 a6989586621680934605)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Min_6989586621680934560Sym0
instance forall a6989586621680933336 b6989586621680933337 (a6989586621680934558 :: Data.Semigroup.Arg a6989586621680933336 b6989586621680933337). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Min_6989586621680934560Sym1 a6989586621680934558)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680934570 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym1 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334306989586621680934571 :: k2) (a6989586621680934570 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym2 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (b6989586621680934572 :: k2) (wild_69895866216809334306989586621680934571 :: k3) (a6989586621680934570 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym3 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334326989586621680934573 :: k2) (b6989586621680934572 :: k3) (wild_69895866216809334306989586621680934571 :: k4) (a6989586621680934570 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym4 wild_69895866216809334326989586621680934573 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216809334266989586621680934566 :: k2) (wild_69895866216809334326989586621680934573 :: k3) (b6989586621680934572 :: k4) (wild_69895866216809334306989586621680934571 :: k5) (a6989586621680934570 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574XSym5 arg_69895866216809334266989586621680934566 wild_69895866216809334326989586621680934573 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym0
instance forall k2 k3 k4 k5 k6 k7 (a6989586621680934570 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym1 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334306989586621680934571 :: k2) (a6989586621680934570 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym2 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (b6989586621680934572 :: k2) (wild_69895866216809334306989586621680934571 :: k3) (a6989586621680934570 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym3 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216809334326989586621680934573 :: k2) (b6989586621680934572 :: k3) (wild_69895866216809334306989586621680934571 :: k4) (a6989586621680934570 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym4 wild_69895866216809334326989586621680934573 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216809334266989586621680934566 :: k2) (wild_69895866216809334326989586621680934573 :: k3) (b6989586621680934572 :: k4) (wild_69895866216809334306989586621680934571 :: k5) (a6989586621680934570 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680934574YSym5 arg_69895866216809334266989586621680934566 wild_69895866216809334326989586621680934573 b6989586621680934572 wild_69895866216809334306989586621680934571 a6989586621680934570)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Compare_6989586621680934548Sym0
instance forall a6989586621680933336 b6989586621680933337 (a6989586621680934546 :: Data.Semigroup.Arg a6989586621680933336 b6989586621680933337). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Compare_6989586621680934548Sym1 a6989586621680934546)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934519Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Semigroup.Arg a)
instance forall a6989586621679570822 a6989586621680933335 b6989586621679570823 (a6989586621680934517 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934519Sym1 a6989586621680934517)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934536Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Semigroup.Arg a)
instance forall k1 k2 k3 k4 (_z_69895866216809337296989586621680934525 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934536Sym1 _z_69895866216809337296989586621680934525)
instance forall k1 k2 k3 k4 (a_69895866216809337416989586621680934526 :: k1) (_z_69895866216809337296989586621680934525 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934536Sym2 a_69895866216809337416989586621680934526 _z_69895866216809337296989586621680934525)
instance forall k1 k2 k3 k4 (a_69895866216809337436989586621680934527 :: k1) (a_69895866216809337416989586621680934526 :: k2) (_z_69895866216809337296989586621680934525 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934536Sym3 a_69895866216809337436989586621680934527 a_69895866216809337416989586621680934526 _z_69895866216809337296989586621680934525)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934528Sym0
instance forall k1 k2 k3 k4 (_z_69895866216809337296989586621680934525 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934528Sym1 _z_69895866216809337296989586621680934525)
instance forall k1 k2 k3 k4 (a_69895866216809337416989586621680934526 :: k1) (_z_69895866216809337296989586621680934525 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934528Sym2 a_69895866216809337416989586621680934526 _z_69895866216809337296989586621680934525)
instance forall k1 k2 k3 k4 (a_69895866216809337436989586621680934527 :: k1) (a_69895866216809337416989586621680934526 :: k2) (_z_69895866216809337296989586621680934525 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934528Sym3 a_69895866216809337436989586621680934527 a_69895866216809337416989586621680934526 _z_69895866216809337296989586621680934525)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934498Sym0
instance forall a6989586621679570820 b6989586621679570821 a6989586621680933335 (a6989586621680934496 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934498Sym1 a6989586621680934496)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934507Sym0
instance forall k1 k2 k3 k4 (_f_69895866216809337276989586621680934504 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934507Sym1 _f_69895866216809337276989586621680934504)
instance forall k1 k2 k3 k4 (a_69895866216809337336989586621680934505 :: k1) (_f_69895866216809337276989586621680934504 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934507Sym2 a_69895866216809337336989586621680934505 _f_69895866216809337276989586621680934504)
instance forall k1 k2 k3 k4 (a_69895866216809337356989586621680934506 :: k1) (a_69895866216809337336989586621680934505 :: k2) (_f_69895866216809337276989586621680934504 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934507Sym3 a_69895866216809337356989586621680934506 a_69895866216809337336989586621680934505 _f_69895866216809337276989586621680934504)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934486Sym0
instance Data.Singletons.Prelude.Eq.PEq (Data.Semigroup.Arg a b)
instance forall a6989586621680933331 b6989586621680933332 (a6989586621680934484 :: Data.Semigroup.Arg a6989586621680933331 b6989586621680933332). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934486Sym1 a6989586621680934484)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934474Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Max
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680934472 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934474Sym1 a6989586621680934472)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934458Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Max
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934455 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934458Sym1 a6989586621680934455)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934456 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680934455 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934458Sym2 a6989586621680934456 a6989586621680934455)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934445Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680934443 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934445Sym1 a6989586621680934443)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680934435Sym0
instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Max a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680934428Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680934421Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680934414Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934403Sym0
instance forall a6989586621680933321 (a6989586621680934401 :: Data.Semigroup.Max a6989586621680933321). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934403Sym1 a6989586621680934401)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934391Sym0
instance forall a6989586621680933321 (a6989586621680934389 :: Data.Semigroup.Max a6989586621680933321). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934391Sym1 a6989586621680934389)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934379Sym0
instance forall a6989586621680933321 (a6989586621680934377 :: Data.Semigroup.Max a6989586621680933321). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934379Sym1 a6989586621680934377)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Max a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934365Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Max a)
instance forall a6989586621680933317 (a6989586621680934363 :: Data.Semigroup.Max a6989586621680933317). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934365Sym1 a6989586621680934363)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934353Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Max
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680934351 :: Data.Semigroup.Max a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934353Sym1 a6989586621680934351)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934337Sym0
instance forall a6989586621679570851 b6989586621679570852 (a6989586621680934335 :: Data.Semigroup.Max a6989586621679570851). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934337Sym1 a6989586621680934335)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934318Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Max
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680934316 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934318Sym1 a6989586621680934316)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934326Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Max
instance forall k1 k2 k3 (_z_69895866216809336956989586621680934324 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934326Sym1 _z_69895866216809336956989586621680934324)
instance forall k1 k2 k3 (a_69895866216809337016989586621680934325 :: k1) (_z_69895866216809336956989586621680934324 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934326Sym2 a_69895866216809337016989586621680934325 _z_69895866216809336956989586621680934324)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934306Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680934304 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934306Sym1 a6989586621680934304)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934290Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Max a)
instance forall a6989586621680933306 (a6989586621680934287 :: Data.Semigroup.Max a6989586621680933306). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934290Sym1 a6989586621680934287)
instance forall a6989586621680933306 (a6989586621680934288 :: Data.Semigroup.Max a6989586621680933306) (a6989586621680934287 :: Data.Semigroup.Max a6989586621680933306). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680934290Sym2 a6989586621680934288 a6989586621680934287)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680934277Sym0
instance forall a6989586621680933306 (a6989586621680934275 :: Data.Semigroup.Max a6989586621680933306). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680934277Sym1 a6989586621680934275)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680934269Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680934260Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680934253Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680934246Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934231Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Max
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934228 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934231Sym1 a6989586621680934228)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680934229 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680934228 :: Data.Semigroup.Max a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680934231Sym2 a6989586621680934229 a6989586621680934228)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934218Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680934216 :: Data.Semigroup.Max (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934218Sym1 a6989586621680934216)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934207Sym0
instance forall a6989586621679570831 b6989586621679570832 (a6989586621680934205 :: Data.Semigroup.Max a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934207Sym1 a6989586621680934205)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934196Sym0
instance forall a6989586621679570833 b6989586621679570834 (a6989586621680934194 :: Data.Semigroup.Max a6989586621679570833). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934196Sym1 a6989586621680934194)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680934186Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934175Sym0
instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Min
instance forall a6989586621680798695 (f6989586621680798694 :: * -> *) b6989586621680798696 (a6989586621680934173 :: a6989586621680798695 Data.Singletons.Internal.~> f6989586621680798694 b6989586621680798696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680934175Sym1 a6989586621680934173)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934159Sym0
instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Min
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934156 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934159Sym1 a6989586621680934156)
instance forall a6989586621680490506 b6989586621680490507 (a6989586621680934157 :: a6989586621680490506 Data.Singletons.Internal.~> (b6989586621680490507 Data.Singletons.Internal.~> b6989586621680490507)) (a6989586621680934156 :: b6989586621680490507). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680934159Sym2 a6989586621680934157 a6989586621680934156)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934146Sym0
instance forall a6989586621680490505 m6989586621680490504 (a6989586621680934144 :: a6989586621680490505 Data.Singletons.Internal.~> m6989586621680490504). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680934146Sym1 a6989586621680934144)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680934136Sym0
instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Min a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680934129Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680934122Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680934115Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934104Sym0
instance forall a6989586621680933289 (a6989586621680934102 :: Data.Semigroup.Min a6989586621680933289). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934104Sym1 a6989586621680934102)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934092Sym0
instance forall a6989586621680933289 (a6989586621680934090 :: Data.Semigroup.Min a6989586621680933289). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934092Sym1 a6989586621680934090)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934080Sym0
instance forall a6989586621680933289 (a6989586621680934078 :: Data.Semigroup.Min a6989586621680933289). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934080Sym1 a6989586621680934078)
instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Min a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934066Sym0
instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Min a)
instance forall a6989586621680933285 (a6989586621680934064 :: Data.Semigroup.Min a6989586621680933285). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934066Sym1 a6989586621680934064)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934054Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Min
instance forall a6989586621679570849 b6989586621679570850 (a6989586621680934052 :: Data.Semigroup.Min a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934054Sym1 a6989586621680934052)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934038Sym0
instance forall a6989586621679570851 b6989586621679570852 (a6989586621680934036 :: Data.Semigroup.Min a6989586621679570851). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934038Sym1 a6989586621680934036)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934019Sym0
instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Min
instance forall a6989586621679570822 b6989586621679570823 (a6989586621680934017 :: a6989586621679570822). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680934019Sym1 a6989586621680934017)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934027Sym0
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Min
instance forall k1 k2 k3 (_z_69895866216809336646989586621680934025 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934027Sym1 _z_69895866216809336646989586621680934025)
instance forall k1 k2 k3 (a_69895866216809336706989586621680934026 :: k1) (_z_69895866216809336646989586621680934025 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680934027Sym2 a_69895866216809336706989586621680934026 _z_69895866216809336646989586621680934025)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934007Sym0
instance forall a6989586621679570820 b6989586621679570821 (a6989586621680934005 :: a6989586621679570820 Data.Singletons.Internal.~> b6989586621679570821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680934007Sym1 a6989586621680934005)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680933991Sym0
instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Min a)
instance forall a6989586621680933274 (a6989586621680933988 :: Data.Semigroup.Min a6989586621680933274). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680933991Sym1 a6989586621680933988)
instance forall a6989586621680933274 (a6989586621680933989 :: Data.Semigroup.Min a6989586621680933274) (a6989586621680933988 :: Data.Semigroup.Min a6989586621680933274). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680933991Sym2 a6989586621680933989 a6989586621680933988)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680933978Sym0
instance forall a6989586621680933274 (a6989586621680933976 :: Data.Semigroup.Min a6989586621680933274). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680933978Sym1 a6989586621680933976)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680933970Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680933961Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680933954Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680933947Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680933932Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Min
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680933929 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680933932Sym1 a6989586621680933929)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 (a6989586621680933930 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621680933929 :: Data.Semigroup.Min a6989586621679570828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680933932Sym2 a6989586621680933930 a6989586621680933929)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933919Sym0
instance forall a6989586621679570826 b6989586621679570827 (a6989586621680933917 :: Data.Semigroup.Min (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933919Sym1 a6989586621680933917)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933908Sym0
instance forall a6989586621679570831 b6989586621679570832 (a6989586621680933906 :: Data.Semigroup.Min a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933908Sym1 a6989586621680933906)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933897Sym0
instance forall a6989586621679570833 b6989586621679570834 (a6989586621680933895 :: Data.Semigroup.Min a6989586621679570833). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680933897Sym1 a6989586621680933895)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680933887Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonadPlus Data.Semigroup.Option
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Semigroup.Min
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Semigroup.Min a)
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Semigroup.Min
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.Min a)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Enum.SBounded a) => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Min a)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Num.SNum (Data.Semigroup.Min a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Min
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Min
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Semigroup.Max
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Semigroup.Max a)
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Semigroup.Max
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.Max a)
instance (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Prelude.Enum.SBounded a) => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Max a)
instance Data.Singletons.Prelude.Num.SNum a => Data.Singletons.Prelude.Num.SNum (Data.Semigroup.Max a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Max
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Max
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Prelude.Eq.SEq (Data.Semigroup.Arg a b)
instance (Data.Singletons.Prelude.Show.SShow a, Data.Singletons.Prelude.Show.SShow b) => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Arg a b)
instance Data.Singletons.Prelude.Traversable.STraversable (Data.Semigroup.Arg a)
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Semigroup.First
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Semigroup.First a)
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Semigroup.First
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.First a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.First
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.First
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Semigroup.Last
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Semigroup.Last a)
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Semigroup.Last
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.Last a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Last
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Last
instance Data.Singletons.Prelude.Monoid.SMonoid m => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.WrappedMonoid m)
instance Data.Singletons.Prelude.Monoid.SMonoid m => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.WrappedMonoid m)
instance Data.Singletons.Prelude.Enum.SEnum a => Data.Singletons.Prelude.Enum.SEnum (Data.Semigroup.WrappedMonoid a)
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Semigroup.Option
instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Option
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Semigroup.Option
instance Data.Singletons.Prelude.Monad.Internal.SMonadPlus Data.Semigroup.Option
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup a => Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Semigroup.Option a)
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup a => Data.Singletons.Prelude.Monoid.SMonoid (Data.Semigroup.Option a)
instance Data.Singletons.Prelude.Foldable.SFoldable Data.Semigroup.Option
instance Data.Singletons.Prelude.Traversable.STraversable Data.Semigroup.Option
instance forall a b (z :: Data.Semigroup.Arg a b). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.SArg z)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917713Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.WrappedMonoid m)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917713Sym1 a6989586621680917710)
instance forall m6989586621679093626 (a6989586621680917711 :: GHC.Types.Nat) (a6989586621680917710 :: Data.Semigroup.WrappedMonoid m6989586621679093626). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917713Sym2 a6989586621680917711 a6989586621680917710)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917682Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Last a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917682Sym1 a6989586621680917679)
instance forall a6989586621679069723 (a6989586621680917680 :: GHC.Types.Nat) (a6989586621680917679 :: Data.Semigroup.Last a6989586621679069723). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917682Sym2 a6989586621680917680 a6989586621680917679)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917651Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.First a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917651Sym1 a6989586621680917648)
instance forall a6989586621679069727 (a6989586621680917649 :: GHC.Types.Nat) (a6989586621680917648 :: Data.Semigroup.First a6989586621679069727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917651Sym2 a6989586621680917649 a6989586621680917648)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917620Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Max a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917620Sym1 a6989586621680917617)
instance forall a6989586621679069719 (a6989586621680917618 :: GHC.Types.Nat) (a6989586621680917617 :: Data.Semigroup.Max a6989586621679069719). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917620Sym2 a6989586621680917618 a6989586621680917617)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917589Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Min a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917589Sym1 a6989586621680917586)
instance forall a6989586621679069715 (a6989586621680917587 :: GHC.Types.Nat) (a6989586621680917586 :: Data.Semigroup.Min a6989586621679069715). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917589Sym2 a6989586621680917587 a6989586621680917586)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917558Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Product a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917558Sym1 a6989586621680917555)
instance forall a6989586621679091690 (a6989586621680917556 :: GHC.Types.Nat) (a6989586621680917555 :: Data.Semigroup.Internal.Product a6989586621679091690). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917558Sym2 a6989586621680917556 a6989586621680917555)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917527Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Sum a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917527Sym1 a6989586621680917524)
instance forall a6989586621679091685 (a6989586621680917525 :: GHC.Types.Nat) (a6989586621680917524 :: Data.Semigroup.Internal.Sum a6989586621679091685). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917527Sym2 a6989586621680917525 a6989586621680917524)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917496Sym0
instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.Any
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917496Sym1 a6989586621680917493)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917496Sym2 a6989586621680917494 a6989586621680917493)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917468Sym0
instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.All
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917468Sym1 a6989586621680917465)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917468Sym2 a6989586621680917466 a6989586621680917465)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917440Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Dual a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917440Sym1 a6989586621680917437)
instance forall a6989586621679091700 (a6989586621680917438 :: GHC.Types.Nat) (a6989586621680917437 :: Data.Semigroup.Internal.Dual a6989586621679091700). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917440Sym2 a6989586621680917438 a6989586621680917437)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917409Sym0
instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Option a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917409Sym1 a6989586621680917406)
instance forall a6989586621679069711 (a6989586621680917407 :: GHC.Types.Nat) (a6989586621680917406 :: Data.Semigroup.Option a6989586621679069711). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680917409Sym2 a6989586621680917407 a6989586621680917406)
instance Data.Singletons.Prelude.Show.SShow (GHC.Maybe.Maybe a) => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Option a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Internal.Dual a)
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Bool => Data.Singletons.Prelude.Show.SShow Data.Semigroup.Internal.All
instance Data.Singletons.Prelude.Show.SShow GHC.Types.Bool => Data.Singletons.Prelude.Show.SShow Data.Semigroup.Internal.Any
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Internal.Sum a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Internal.Product a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Min a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Max a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.First a)
instance Data.Singletons.Prelude.Show.SShow a => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.Last a)
instance Data.Singletons.Prelude.Show.SShow m => Data.Singletons.Prelude.Show.SShow (Data.Semigroup.WrappedMonoid m)
instance forall a (z :: Data.Semigroup.Option a). Data.Singletons.ShowSing.ShowSing (GHC.Maybe.Maybe a) => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SOption z)
instance forall a (z :: Data.Semigroup.Internal.Dual a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SDual z)
instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SAll z)
instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SAny z)
instance forall a (z :: Data.Semigroup.Internal.Sum a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SSum z)
instance forall a (z :: Data.Semigroup.Internal.Product a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SProduct z)
instance forall a (z :: Data.Semigroup.Min a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SMin z)
instance forall a (z :: Data.Semigroup.Max a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SMax z)
instance forall a (z :: Data.Semigroup.First a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SFirst z)
instance forall a (z :: Data.Semigroup.Last a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SLast z)
instance forall m (z :: Data.Semigroup.WrappedMonoid m). Data.Singletons.ShowSing.ShowSing m => GHC.Show.Show (Data.Singletons.Prelude.Semigroup.Internal.SWrappedMonoid z)
instance (Data.Singletons.Internal.SingKind a, Data.Singletons.Internal.SingKind b) => Data.Singletons.Internal.SingKind (Data.Semigroup.Arg a b)
instance forall a b (n1 :: a) (n2 :: b). (Data.Singletons.Internal.SingI n1, Data.Singletons.Internal.SingI n2) => Data.Singletons.Internal.SingI ('Data.Semigroup.Arg n1 n2)
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Semigroup.ArgSym0
instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.ArgSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ArgSym0
instance forall a6989586621679070612 b6989586621679070613 (t6989586621680915597 :: a6989586621679070612). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ArgSym1 t6989586621680915597)
-- | Defines functions and datatypes relating to the singleton for '[]',
-- including a singletons version 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.Singletons.Prelude.List
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SList :: forall a_11. [a_11] -> Type
[SNil] :: SList '[]
[SCons] :: forall a_11 (n_a1hri :: a_11) (n_a1hrj :: [a_11]). () => Sing (n_a1hri :: a_11) -> Sing (n_a1hrj :: [a_11]) -> SList ('(:) n_a1hri n_a1hrj)
infixr 5 `SCons`
type family (++) (a_a2foy :: [a_a2fln]) (a_a2foz :: [a_a2fln]) :: [a_a2fln]
infixr 5 ++
(%++) :: forall a_a2fln (t_a2fpK :: [a_a2fln]) (t_a2fpL :: [a_a2fln]). Sing t_a2fpK -> Sing t_a2fpL -> Sing (Apply (Apply (++@#@$) t_a2fpK) t_a2fpL :: [a_a2fln])
infixr 5 %++
type family Head (a_a44gW :: [a_a42SH]) :: a_a42SH
sHead :: forall a_a42SH (t_a44mr :: [a_a42SH]). Sing t_a44mr -> Sing (Apply HeadSym0 t_a44mr :: a_a42SH)
type family Last (a_a44gR :: [a_a42SG]) :: a_a42SG
sLast :: forall a_a42SG (t_a44mp :: [a_a42SG]). Sing t_a44mp -> Sing (Apply LastSym0 t_a44mp :: a_a42SG)
type family Tail (a_a44gO :: [a_a42SF]) :: [a_a42SF]
sTail :: forall a_a42SF (t_a44mn :: [a_a42SF]). Sing t_a44mn -> Sing (Apply TailSym0 t_a44mn :: [a_a42SF])
type family Init (a_a44gA :: [a_a42SE]) :: [a_a42SE]
sInit :: forall a_a42SE (t_a44ml :: [a_a42SE]). Sing t_a44ml -> Sing (Apply InitSym0 t_a44ml :: [a_a42SE])
type family Null (arg_a6dn3 :: t_a6dcq a_a6dcF) :: Bool
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). SFoldable t_a6dcq => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
type family Length (arg_a6dn5 :: t_a6dcq a_a6dcG) :: Nat
sLength :: forall a_a6dcG (t_a6dIX :: t_a6dcq a_a6dcG). SFoldable t_a6dcq => Sing t_a6dIX -> Sing (Apply LengthSym0 t_a6dIX :: Nat)
type family Map (a_a2foG :: (~>) a_a2flo b_a2flp) (a_a2foH :: [a_a2flo]) :: [b_a2flp]
sMap :: forall a_a2flo b_a2flp (t_a2fpO :: (~>) a_a2flo b_a2flp) (t_a2fpP :: [a_a2flo]). Sing t_a2fpO -> Sing t_a2fpP -> Sing (Apply (Apply MapSym0 t_a2fpO) t_a2fpP :: [b_a2flp])
type family Reverse (a_a44gl :: [a_a42SC]) :: [a_a42SC]
sReverse :: forall a_a42SC (t_a44mh :: [a_a42SC]). Sing t_a44mh -> Sing (Apply ReverseSym0 t_a44mh :: [a_a42SC])
type family Intersperse (a_a44ge :: a_a42SB) (a_a44gf :: [a_a42SB]) :: [a_a42SB]
sIntersperse :: forall a_a42SB (t_a44md :: a_a42SB) (t_a44me :: [a_a42SB]). Sing t_a44md -> Sing t_a44me -> Sing (Apply (Apply IntersperseSym0 t_a44md) t_a44me :: [a_a42SB])
type family Intercalate (a_a44g8 :: [a_a42SA]) (a_a44g9 :: [[a_a42SA]]) :: [a_a42SA]
sIntercalate :: forall a_a42SA (t_a44m9 :: [a_a42SA]) (t_a44ma :: [[a_a42SA]]). Sing t_a44m9 -> Sing t_a44ma -> Sing (Apply (Apply IntercalateSym0 t_a44m9) t_a44ma :: [a_a42SA])
type family Transpose (a_a43VR :: [[a_a42QL]]) :: [[a_a42QL]]
sTranspose :: forall a_a42QL (t_a44hr :: [[a_a42QL]]). Sing t_a44hr -> Sing (Apply TransposeSym0 t_a44hr :: [[a_a42QL]])
type family Subsequences (a_a44g5 :: [a_a42Sz]) :: [[a_a42Sz]]
sSubsequences :: forall a_a42Sz (t_a44m7 :: [a_a42Sz]). Sing t_a44m7 -> Sing (Apply SubsequencesSym0 t_a44m7 :: [[a_a42Sz]])
type family Permutations (a_a44eb :: [a_a42Sw]) :: [[a_a42Sw]]
sPermutations :: forall a_a42Sw (t_a44lZ :: [a_a42Sw]). Sing t_a44lZ -> Sing (Apply PermutationsSym0 t_a44lZ :: [[a_a42Sw]])
type family Foldl (arg_a6dmH :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (arg_a6dmI :: b_a6dcy) (arg_a6dmJ :: t_a6dcq a_a6dcz) :: b_a6dcy
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). SFoldable t_a6dcq => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
type family Foldl' (arg_a6dmN :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (arg_a6dmO :: b_a6dcA) (arg_a6dmP :: t_a6dcq a_a6dcB) :: b_a6dcA
sFoldl' :: forall b_a6dcA a_a6dcB (t_a6dIF :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (t_a6dIG :: b_a6dcA) (t_a6dIH :: t_a6dcq a_a6dcB). SFoldable t_a6dcq => Sing t_a6dIF -> Sing t_a6dIG -> Sing t_a6dIH -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA)
type family Foldl1 (arg_a6dmX :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (arg_a6dmY :: t_a6dcq a_a6dcD) :: a_a6dcD
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). SFoldable t_a6dcq => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
type family Foldl1' (a_a44dv :: (~>) a_a42Ss ((~>) a_a42Ss a_a42Ss)) (a_a44dw :: [a_a42Ss]) :: a_a42Ss
sFoldl1' :: forall a_a42Ss (t_a44lL :: (~>) a_a42Ss ((~>) a_a42Ss a_a42Ss)) (t_a44lM :: [a_a42Ss]). Sing t_a44lL -> Sing t_a44lM -> Sing (Apply (Apply Foldl1'Sym0 t_a44lL) t_a44lM :: a_a42Ss)
type family Foldr (arg_a6dmv :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (arg_a6dmw :: b_a6dcv) (arg_a6dmx :: t_a6dcq a_a6dcu) :: b_a6dcv
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). SFoldable t_a6dcq => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
type family Foldr1 (arg_a6dmT :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (arg_a6dmU :: t_a6dcq a_a6dcC) :: a_a6dcC
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). SFoldable t_a6dcq => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
type family Concat (a_a6dkB :: t_a6dbd [a_a6dbe]) :: [a_a6dbe]
sConcat :: forall t_a6dbd a_a6dbe (t_a6dH0 :: t_a6dbd [a_a6dbe]). SFoldable t_a6dbd => Sing t_a6dH0 -> Sing (Apply ConcatSym0 t_a6dH0 :: [a_a6dbe])
type family ConcatMap (a_a6dkl :: (~>) a_a6dbb [b_a6dbc]) (a_a6dkm :: t_a6dba a_a6dbb) :: [b_a6dbc]
sConcatMap :: forall a_a6dbb b_a6dbc t_a6dba (t_a6dGW :: (~>) a_a6dbb [b_a6dbc]) (t_a6dGX :: t_a6dba a_a6dbb). SFoldable t_a6dba => Sing t_a6dGW -> Sing t_a6dGX -> Sing (Apply (Apply ConcatMapSym0 t_a6dGW) t_a6dGX :: [b_a6dbc])
type family And (a_a6dkc :: t_a6db9 Bool) :: Bool
sAnd :: forall t_a6db9 (t_a6dGU :: t_a6db9 Bool). SFoldable t_a6db9 => Sing t_a6dGU -> Sing (Apply AndSym0 t_a6dGU :: Bool)
type family Or (a_a6dk3 :: t_a6db8 Bool) :: Bool
sOr :: forall t_a6db8 (t_a6dGS :: t_a6db8 Bool). SFoldable t_a6db8 => Sing t_a6dGS -> Sing (Apply OrSym0 t_a6dGS :: Bool)
type family Any (a_a6djQ :: (~>) a_a6db7 Bool) (a_a6djR :: t_a6db6 a_a6db7) :: Bool
sAny :: forall a_a6db7 t_a6db6 (t_a6dGO :: (~>) a_a6db7 Bool) (t_a6dGP :: t_a6db6 a_a6db7). SFoldable t_a6db6 => Sing t_a6dGO -> Sing t_a6dGP -> Sing (Apply (Apply AnySym0 t_a6dGO) t_a6dGP :: Bool)
type family All (a_a6djD :: (~>) a_a6db5 Bool) (a_a6djE :: t_a6db4 a_a6db5) :: Bool
sAll :: forall a_a6db5 t_a6db4 (t_a6dGK :: (~>) a_a6db5 Bool) (t_a6dGL :: t_a6db4 a_a6db5). SFoldable t_a6db4 => Sing t_a6dGK -> Sing t_a6dGL -> Sing (Apply (Apply AllSym0 t_a6dGK) t_a6dGL :: Bool)
type family Sum (arg_a6dnf :: t_a6dcq a_a6dcK) :: a_a6dcK
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
type family Product (arg_a6dnh :: t_a6dcq a_a6dcL) :: a_a6dcL
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
type family Maximum (arg_a6dnb :: t_a6dcq a_a6dcI) :: a_a6dcI
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
type family Minimum (arg_a6dnd :: t_a6dcq a_a6dcJ) :: a_a6dcJ
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
type family Scanl (a_a44cu :: (~>) b_a42Sk ((~>) a_a42Sl b_a42Sk)) (a_a44cv :: b_a42Sk) (a_a44cw :: [a_a42Sl]) :: [b_a42Sk]
sScanl :: forall b_a42Sk a_a42Sl (t_a44lj :: (~>) b_a42Sk ((~>) a_a42Sl b_a42Sk)) (t_a44lk :: b_a42Sk) (t_a44ll :: [a_a42Sl]). Sing t_a44lj -> Sing t_a44lk -> Sing t_a44ll -> Sing (Apply (Apply (Apply ScanlSym0 t_a44lj) t_a44lk) t_a44ll :: [b_a42Sk])
type family Scanl1 (a_a44cn :: (~>) a_a42Sj ((~>) a_a42Sj a_a42Sj)) (a_a44co :: [a_a42Sj]) :: [a_a42Sj]
sScanl1 :: forall a_a42Sj (t_a44lf :: (~>) a_a42Sj ((~>) a_a42Sj a_a42Sj)) (t_a44lg :: [a_a42Sj]). Sing t_a44lf -> Sing t_a44lg -> Sing (Apply (Apply Scanl1Sym0 t_a44lf) t_a44lg :: [a_a42Sj])
type family Scanr (a_a44c2 :: (~>) a_a42Sh ((~>) b_a42Si b_a42Si)) (a_a44c3 :: b_a42Si) (a_a44c4 :: [a_a42Sh]) :: [b_a42Si]
sScanr :: forall a_a42Sh b_a42Si (t_a44l9 :: (~>) a_a42Sh ((~>) b_a42Si b_a42Si)) (t_a44la :: b_a42Si) (t_a44lb :: [a_a42Sh]). Sing t_a44l9 -> Sing t_a44la -> Sing t_a44lb -> Sing (Apply (Apply (Apply ScanrSym0 t_a44l9) t_a44la) t_a44lb :: [b_a42Si])
type family Scanr1 (a_a44bE :: (~>) a_a42Sg ((~>) a_a42Sg a_a42Sg)) (a_a44bF :: [a_a42Sg]) :: [a_a42Sg]
sScanr1 :: forall a_a42Sg (t_a44l5 :: (~>) a_a42Sg ((~>) a_a42Sg a_a42Sg)) (t_a44l6 :: [a_a42Sg]). Sing t_a44l5 -> Sing t_a44l6 -> Sing (Apply (Apply Scanr1Sym0 t_a44l5) t_a44l6 :: [a_a42Sg])
type family MapAccumL (a_a7wWC :: (~>) a_a7wOv ((~>) b_a7wOw (a_a7wOv, c_a7wOx))) (a_a7wWD :: a_a7wOv) (a_a7wWE :: t_a7wOu b_a7wOw) :: (a_a7wOv, t_a7wOu c_a7wOx)
sMapAccumL :: forall a_a7wOv b_a7wOw c_a7wOx t_a7wOu (t_a7x6k :: (~>) a_a7wOv ((~>) b_a7wOw (a_a7wOv, c_a7wOx))) (t_a7x6l :: a_a7wOv) (t_a7x6m :: t_a7wOu b_a7wOw). STraversable t_a7wOu => Sing t_a7x6k -> Sing t_a7x6l -> Sing t_a7x6m -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7x6k) t_a7x6l) t_a7x6m :: (a_a7wOv, t_a7wOu c_a7wOx))
type family MapAccumR (a_a7wWl :: (~>) a_a7wOr ((~>) b_a7wOs (a_a7wOr, c_a7wOt))) (a_a7wWm :: a_a7wOr) (a_a7wWn :: t_a7wOq b_a7wOs) :: (a_a7wOr, t_a7wOq c_a7wOt)
sMapAccumR :: forall a_a7wOr b_a7wOs c_a7wOt t_a7wOq (t_a7x6e :: (~>) a_a7wOr ((~>) b_a7wOs (a_a7wOr, c_a7wOt))) (t_a7x6f :: a_a7wOr) (t_a7x6g :: t_a7wOq b_a7wOs). STraversable t_a7wOq => Sing t_a7x6e -> Sing t_a7x6f -> Sing t_a7x6g -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7x6e) t_a7x6f) t_a7x6g :: (a_a7wOr, t_a7wOq c_a7wOt))
type family Replicate (a_a43VX :: Nat) (a_a43VY :: a_a42QM) :: [a_a42QM]
sReplicate :: forall a_a42QM (t_a44ht :: Nat) (t_a44hu :: a_a42QM). Sing t_a44ht -> Sing t_a44hu -> Sing (Apply (Apply ReplicateSym0 t_a44ht) t_a44hu :: [a_a42QM])
type family Unfoldr (a_a449m :: (~>) b_a42S8 (Maybe (a_a42S9, b_a42S8))) (a_a449n :: b_a42S8) :: [a_a42S9]
sUnfoldr :: forall b_a42S8 a_a42S9 (t_a44kP :: (~>) b_a42S8 (Maybe (a_a42S9, b_a42S8))) (t_a44kQ :: b_a42S8). Sing t_a44kP -> Sing t_a44kQ -> Sing (Apply (Apply UnfoldrSym0 t_a44kP) t_a44kQ :: [a_a42S9])
type family Take (a_a43Yy :: Nat) (a_a43Yz :: [a_a42R2]) :: [a_a42R2]
sTake :: forall a_a42R2 (t_a44if :: Nat) (t_a44ig :: [a_a42R2]). Sing t_a44if -> Sing t_a44ig -> Sing (Apply (Apply TakeSym0 t_a44if) t_a44ig :: [a_a42R2])
type family Drop (a_a43Yk :: Nat) (a_a43Yl :: [a_a42R1]) :: [a_a42R1]
sDrop :: forall a_a42R1 (t_a44ib :: Nat) (t_a44ic :: [a_a42R1]). Sing t_a44ib -> Sing t_a44ic -> Sing (Apply (Apply DropSym0 t_a44ib) t_a44ic :: [a_a42R1])
type family SplitAt (a_a43Ye :: Nat) (a_a43Yf :: [a_a42R0]) :: ([a_a42R0], [a_a42R0])
sSplitAt :: forall a_a42R0 (t_a44i7 :: Nat) (t_a44i8 :: [a_a42R0]). Sing t_a44i7 -> Sing t_a44i8 -> Sing (Apply (Apply SplitAtSym0 t_a44i7) t_a44i8 :: ([a_a42R0], [a_a42R0]))
type family TakeWhile (a_a440S :: (~>) a_a42R7 Bool) (a_a440T :: [a_a42R7]) :: [a_a42R7]
sTakeWhile :: forall a_a42R7 (t_a44iz :: (~>) a_a42R7 Bool) (t_a44iA :: [a_a42R7]). Sing t_a44iz -> Sing t_a44iA -> Sing (Apply (Apply TakeWhileSym0 t_a44iz) t_a44iA :: [a_a42R7])
type family DropWhile (a_a440A :: (~>) a_a42R6 Bool) (a_a440B :: [a_a42R6]) :: [a_a42R6]
sDropWhile :: forall a_a42R6 (t_a44iv :: (~>) a_a42R6 Bool) (t_a44iw :: [a_a42R6]). Sing t_a44iv -> Sing t_a44iw -> Sing (Apply (Apply DropWhileSym0 t_a44iv) t_a44iw :: [a_a42R6])
type family DropWhileEnd (a_a440a :: (~>) a_a42R5 Bool) (a_a440b :: [a_a42R5]) :: [a_a42R5]
sDropWhileEnd :: forall a_a42R5 (t_a44ir :: (~>) a_a42R5 Bool) (t_a44is :: [a_a42R5]). Sing t_a44ir -> Sing t_a44is -> Sing (Apply (Apply DropWhileEndSym0 t_a44ir) t_a44is :: [a_a42R5])
type family Span (a_a43Zt :: (~>) a_a42R4 Bool) (a_a43Zu :: [a_a42R4]) :: ([a_a42R4], [a_a42R4])
sSpan :: forall a_a42R4 (t_a44in :: (~>) a_a42R4 Bool) (t_a44io :: [a_a42R4]). Sing t_a44in -> Sing t_a44io -> Sing (Apply (Apply SpanSym0 t_a44in) t_a44io :: ([a_a42R4], [a_a42R4]))
type family Break (a_a43YM :: (~>) a_a42R3 Bool) (a_a43YN :: [a_a42R3]) :: ([a_a42R3], [a_a42R3])
sBreak :: forall a_a42R3 (t_a44ij :: (~>) a_a42R3 Bool) (t_a44ik :: [a_a42R3]). Sing t_a44ij -> Sing t_a44ik -> Sing (Apply (Apply BreakSym0 t_a44ij) t_a44ik :: ([a_a42R3], [a_a42R3]))
type family StripPrefix (a_a4z5d :: [a_a4yDR]) (a_a4z5e :: [a_a4yDR]) :: Maybe [a_a4yDR]
type family Group (a_a43Yb :: [a_a42QZ]) :: [[a_a42QZ]]
sGroup :: forall a_a42QZ (t_a44i5 :: [a_a42QZ]). SEq a_a42QZ => Sing t_a44i5 -> Sing (Apply GroupSym0 t_a44i5 :: [[a_a42QZ]])
type family Inits (a_a449e :: [a_a42S7]) :: [[a_a42S7]]
sInits :: forall a_a42S7 (t_a44kN :: [a_a42S7]). Sing t_a44kN -> Sing (Apply InitsSym0 t_a44kN :: [[a_a42S7]])
type family Tails (a_a4497 :: [a_a42S6]) :: [[a_a42S6]]
sTails :: forall a_a42S6 (t_a44kL :: [a_a42S6]). Sing t_a44kL -> Sing (Apply TailsSym0 t_a44kL :: [[a_a42S6]])
type family IsPrefixOf (a_a448Z :: [a_a42S5]) (a_a4490 :: [a_a42S5]) :: Bool
sIsPrefixOf :: forall a_a42S5 (t_a44kH :: [a_a42S5]) (t_a44kI :: [a_a42S5]). SEq a_a42S5 => Sing t_a44kH -> Sing t_a44kI -> Sing (Apply (Apply IsPrefixOfSym0 t_a44kH) t_a44kI :: Bool)
type family IsSuffixOf (a_a448T :: [a_a42S4]) (a_a448U :: [a_a42S4]) :: Bool
sIsSuffixOf :: forall a_a42S4 (t_a44kD :: [a_a42S4]) (t_a44kE :: [a_a42S4]). SEq a_a42S4 => Sing t_a44kD -> Sing t_a44kE -> Sing (Apply (Apply IsSuffixOfSym0 t_a44kD) t_a44kE :: Bool)
type family IsInfixOf (a_a448N :: [a_a42S3]) (a_a448O :: [a_a42S3]) :: Bool
sIsInfixOf :: forall a_a42S3 (t_a44kz :: [a_a42S3]) (t_a44kA :: [a_a42S3]). SEq a_a42S3 => Sing t_a44kz -> Sing t_a44kA -> Sing (Apply (Apply IsInfixOfSym0 t_a44kz) t_a44kA :: Bool)
type family Elem (arg_a6dn7 :: a_a6dcH) (arg_a6dn8 :: t_a6dcq a_a6dcH) :: Bool
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
type family NotElem (a_a6diH :: a_a6daZ) (a_a6diI :: t_a6daY a_a6daZ) :: Bool
sNotElem :: forall a_a6daZ t_a6daY (t_a6dGy :: a_a6daZ) (t_a6dGz :: t_a6daY a_a6daZ). (SFoldable t_a6daY, SEq a_a6daZ) => Sing t_a6dGy -> Sing t_a6dGz -> Sing (Apply (Apply NotElemSym0 t_a6dGy) t_a6dGz :: Bool)
type family Lookup (a_a43X0 :: a_a42QS) (a_a43X1 :: [(a_a42QS, b_a42QT)]) :: Maybe b_a42QT
sLookup :: forall a_a42QS b_a42QT (t_a44hN :: a_a42QS) (t_a44hO :: [(a_a42QS, b_a42QT)]). SEq a_a42QS => Sing t_a44hN -> Sing t_a44hO -> Sing (Apply (Apply LookupSym0 t_a44hN) t_a44hO :: Maybe b_a42QT)
type family Find (a_a6dig :: (~>) a_a6daX Bool) (a_a6dih :: t_a6daW a_a6daX) :: Maybe a_a6daX
sFind :: forall a_a6daX t_a6daW (t_a6dGu :: (~>) a_a6daX Bool) (t_a6dGv :: t_a6daW a_a6daX). SFoldable t_a6daW => Sing t_a6dGu -> Sing t_a6dGv -> Sing (Apply (Apply FindSym0 t_a6dGu) t_a6dGv :: Maybe a_a6daX)
type family Filter (a_a442I :: (~>) a_a42Rf Bool) (a_a442J :: [a_a42Rf]) :: [a_a42Rf]
sFilter :: forall a_a42Rf (t_a44j7 :: (~>) a_a42Rf Bool) (t_a44j8 :: [a_a42Rf]). Sing t_a44j7 -> Sing t_a44j8 -> Sing (Apply (Apply FilterSym0 t_a44j7) t_a44j8 :: [a_a42Rf])
type family Partition (a_a43WU :: (~>) a_a42QR Bool) (a_a43WV :: [a_a42QR]) :: ([a_a42QR], [a_a42QR])
sPartition :: forall a_a42QR (t_a44hJ :: (~>) a_a42QR Bool) (t_a44hK :: [a_a42QR]). Sing t_a44hJ -> Sing t_a44hK -> Sing (Apply (Apply PartitionSym0 t_a44hJ) t_a44hK :: ([a_a42QR], [a_a42QR]))
type family (!!) (a_a43VD :: [a_a42QK]) (a_a43VE :: Nat) :: a_a42QK
infixl 9 !!
(%!!) :: forall a_a42QK (t_a44hn :: [a_a42QK]) (t_a44ho :: Nat). Sing t_a44hn -> Sing t_a44ho -> Sing (Apply (Apply (!!@#@$) t_a44hn) t_a44ho :: a_a42QK)
infixl 9 %!!
type family ElemIndex (a_a442s :: a_a42Rd) (a_a442t :: [a_a42Rd]) :: Maybe Nat
sElemIndex :: forall a_a42Rd (t_a44iZ :: a_a42Rd) (t_a44j0 :: [a_a42Rd]). SEq a_a42Rd => Sing t_a44iZ -> Sing t_a44j0 -> Sing (Apply (Apply ElemIndexSym0 t_a44iZ) t_a44j0 :: Maybe Nat)
type family ElemIndices (a_a442k :: a_a42Rc) (a_a442l :: [a_a42Rc]) :: [Nat]
sElemIndices :: forall a_a42Rc (t_a44iV :: a_a42Rc) (t_a44iW :: [a_a42Rc]). SEq a_a42Rc => Sing t_a44iV -> Sing t_a44iW -> Sing (Apply (Apply ElemIndicesSym0 t_a44iV) t_a44iW :: [Nat])
type family FindIndex (a_a442c :: (~>) a_a42Rb Bool) (a_a442d :: [a_a42Rb]) :: Maybe Nat
sFindIndex :: forall a_a42Rb (t_a44iR :: (~>) a_a42Rb Bool) (t_a44iS :: [a_a42Rb]). Sing t_a44iR -> Sing t_a44iS -> Sing (Apply (Apply FindIndexSym0 t_a44iR) t_a44iS :: Maybe Nat)
type family FindIndices (a_a441M :: (~>) a_a42Ra Bool) (a_a441N :: [a_a42Ra]) :: [Nat]
sFindIndices :: forall a_a42Ra (t_a44iN :: (~>) a_a42Ra Bool) (t_a44iO :: [a_a42Ra]). Sing t_a44iN -> Sing t_a44iO -> Sing (Apply (Apply FindIndicesSym0 t_a44iN) t_a44iO :: [Nat])
type family Zip (a_a448r :: [a_a42RZ]) (a_a448s :: [b_a42S0]) :: [(a_a42RZ, b_a42S0)]
sZip :: forall a_a42RZ b_a42S0 (t_a44kn :: [a_a42RZ]) (t_a44ko :: [b_a42S0]). Sing t_a44kn -> Sing t_a44ko -> Sing (Apply (Apply ZipSym0 t_a44kn) t_a44ko :: [(a_a42RZ, b_a42S0)])
type family Zip3 (a_a448f :: [a_a42RW]) (a_a448g :: [b_a42RX]) (a_a448h :: [c_a42RY]) :: [(a_a42RW, b_a42RX, c_a42RY)]
sZip3 :: forall a_a42RW b_a42RX c_a42RY (t_a44kh :: [a_a42RW]) (t_a44ki :: [b_a42RX]) (t_a44kj :: [c_a42RY]). Sing t_a44kh -> Sing t_a44ki -> Sing t_a44kj -> Sing (Apply (Apply (Apply Zip3Sym0 t_a44kh) t_a44ki) t_a44kj :: [(a_a42RW, b_a42RX, c_a42RY)])
type family Zip4 (a_a4z51 :: [a_a4yDN]) (a_a4z52 :: [b_a4yDO]) (a_a4z53 :: [c_a4yDP]) (a_a4z54 :: [d_a4yDQ]) :: [(a_a4yDN, b_a4yDO, c_a4yDP, d_a4yDQ)]
type family Zip5 (a_a4z4E :: [a_a4yDI]) (a_a4z4F :: [b_a4yDJ]) (a_a4z4G :: [c_a4yDK]) (a_a4z4H :: [d_a4yDL]) (a_a4z4I :: [e_a4yDM]) :: [(a_a4yDI, b_a4yDJ, c_a4yDK, d_a4yDL, e_a4yDM)]
type family Zip6 (a_a4z4c :: [a_a4yDC]) (a_a4z4d :: [b_a4yDD]) (a_a4z4e :: [c_a4yDE]) (a_a4z4f :: [d_a4yDF]) (a_a4z4g :: [e_a4yDG]) (a_a4z4h :: [f_a4yDH]) :: [(a_a4yDC, b_a4yDD, c_a4yDE, d_a4yDF, e_a4yDG, f_a4yDH)]
type family Zip7 (a_a4z3F :: [a_a4yDv]) (a_a4z3G :: [b_a4yDw]) (a_a4z3H :: [c_a4yDx]) (a_a4z3I :: [d_a4yDy]) (a_a4z3J :: [e_a4yDz]) (a_a4z3K :: [f_a4yDA]) (a_a4z3L :: [g_a4yDB]) :: [(a_a4yDv, b_a4yDw, c_a4yDx, d_a4yDy, e_a4yDz, f_a4yDA, g_a4yDB)]
type family ZipWith (a_a4484 :: (~>) a_a42RT ((~>) b_a42RU c_a42RV)) (a_a4485 :: [a_a42RT]) (a_a4486 :: [b_a42RU]) :: [c_a42RV]
sZipWith :: forall a_a42RT b_a42RU c_a42RV (t_a44kb :: (~>) a_a42RT ((~>) b_a42RU c_a42RV)) (t_a44kc :: [a_a42RT]) (t_a44kd :: [b_a42RU]). Sing t_a44kb -> Sing t_a44kc -> Sing t_a44kd -> Sing (Apply (Apply (Apply ZipWithSym0 t_a44kb) t_a44kc) t_a44kd :: [c_a42RV])
type family ZipWith3 (a_a447P :: (~>) a_a42RP ((~>) b_a42RQ ((~>) c_a42RR d_a42RS))) (a_a447Q :: [a_a42RP]) (a_a447R :: [b_a42RQ]) (a_a447S :: [c_a42RR]) :: [d_a42RS]
sZipWith3 :: forall a_a42RP b_a42RQ c_a42RR d_a42RS (t_a44k3 :: (~>) a_a42RP ((~>) b_a42RQ ((~>) c_a42RR d_a42RS))) (t_a44k4 :: [a_a42RP]) (t_a44k5 :: [b_a42RQ]) (t_a44k6 :: [c_a42RR]). Sing t_a44k3 -> Sing t_a44k4 -> Sing t_a44k5 -> Sing t_a44k6 -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a44k3) t_a44k4) t_a44k5) t_a44k6 :: [d_a42RS])
type family ZipWith4 (a_a4z38 :: (~>) a_a4yDq ((~>) b_a4yDr ((~>) c_a4yDs ((~>) d_a4yDt e_a4yDu)))) (a_a4z39 :: [a_a4yDq]) (a_a4z3a :: [b_a4yDr]) (a_a4z3b :: [c_a4yDs]) (a_a4z3c :: [d_a4yDt]) :: [e_a4yDu]
type family ZipWith5 (a_a4z2L :: (~>) a_a4yDk ((~>) b_a4yDl ((~>) c_a4yDm ((~>) d_a4yDn ((~>) e_a4yDo f_a4yDp))))) (a_a4z2M :: [a_a4yDk]) (a_a4z2N :: [b_a4yDl]) (a_a4z2O :: [c_a4yDm]) (a_a4z2P :: [d_a4yDn]) (a_a4z2Q :: [e_a4yDo]) :: [f_a4yDp]
type family ZipWith6 (a_a4z2k :: (~>) a_a4yDd ((~>) b_a4yDe ((~>) c_a4yDf ((~>) d_a4yDg ((~>) e_a4yDh ((~>) f_a4yDi g_a4yDj)))))) (a_a4z2l :: [a_a4yDd]) (a_a4z2m :: [b_a4yDe]) (a_a4z2n :: [c_a4yDf]) (a_a4z2o :: [d_a4yDg]) (a_a4z2p :: [e_a4yDh]) (a_a4z2q :: [f_a4yDi]) :: [g_a4yDj]
type family ZipWith7 (a_a4z1P :: (~>) a_a4yD5 ((~>) b_a4yD6 ((~>) c_a4yD7 ((~>) d_a4yD8 ((~>) e_a4yD9 ((~>) f_a4yDa ((~>) g_a4yDb h_a4yDc))))))) (a_a4z1Q :: [a_a4yD5]) (a_a4z1R :: [b_a4yD6]) (a_a4z1S :: [c_a4yD7]) (a_a4z1T :: [d_a4yD8]) (a_a4z1U :: [e_a4yD9]) (a_a4z1V :: [f_a4yDa]) (a_a4z1W :: [g_a4yDb]) :: [h_a4yDc]
type family Unzip (a_a447w :: [(a_a42RN, b_a42RO)]) :: ([a_a42RN], [b_a42RO])
sUnzip :: forall a_a42RN b_a42RO (t_a44k1 :: [(a_a42RN, b_a42RO)]). Sing t_a44k1 -> Sing (Apply UnzipSym0 t_a44k1 :: ([a_a42RN], [b_a42RO]))
type family Unzip3 (a_a447b :: [(a_a42RK, b_a42RL, c_a42RM)]) :: ([a_a42RK], [b_a42RL], [c_a42RM])
sUnzip3 :: forall a_a42RK b_a42RL c_a42RM (t_a44jZ :: [(a_a42RK, b_a42RL, c_a42RM)]). Sing t_a44jZ -> Sing (Apply Unzip3Sym0 t_a44jZ :: ([a_a42RK], [b_a42RL], [c_a42RM]))
type family Unzip4 (a_a446O :: [(a_a42RG, b_a42RH, c_a42RI, d_a42RJ)]) :: ([a_a42RG], [b_a42RH], [c_a42RI], [d_a42RJ])
sUnzip4 :: forall a_a42RG b_a42RH c_a42RI d_a42RJ (t_a44jX :: [(a_a42RG, b_a42RH, c_a42RI, d_a42RJ)]). Sing t_a44jX -> Sing (Apply Unzip4Sym0 t_a44jX :: ([a_a42RG], [b_a42RH], [c_a42RI], [d_a42RJ]))
type family Unzip5 (a_a446p :: [(a_a42RB, b_a42RC, c_a42RD, d_a42RE, e_a42RF)]) :: ([a_a42RB], [b_a42RC], [c_a42RD], [d_a42RE], [e_a42RF])
sUnzip5 :: forall a_a42RB b_a42RC c_a42RD d_a42RE e_a42RF (t_a44jV :: [(a_a42RB, b_a42RC, c_a42RD, d_a42RE, e_a42RF)]). Sing t_a44jV -> Sing (Apply Unzip5Sym0 t_a44jV :: ([a_a42RB], [b_a42RC], [c_a42RD], [d_a42RE], [e_a42RF]))
type family Unzip6 (a_a445Y :: [(a_a42Rv, b_a42Rw, c_a42Rx, d_a42Ry, e_a42Rz, f_a42RA)]) :: ([a_a42Rv], [b_a42Rw], [c_a42Rx], [d_a42Ry], [e_a42Rz], [f_a42RA])
sUnzip6 :: forall a_a42Rv b_a42Rw c_a42Rx d_a42Ry e_a42Rz f_a42RA (t_a44jT :: [(a_a42Rv, b_a42Rw, c_a42Rx, d_a42Ry, e_a42Rz, f_a42RA)]). Sing t_a44jT -> Sing (Apply Unzip6Sym0 t_a44jT :: ([a_a42Rv], [b_a42Rw], [c_a42Rx], [d_a42Ry], [e_a42Rz], [f_a42RA]))
type family Unzip7 (a_a445v :: [(a_a42Ro, b_a42Rp, c_a42Rq, d_a42Rr, e_a42Rs, f_a42Rt, g_a42Ru)]) :: ([a_a42Ro], [b_a42Rp], [c_a42Rq], [d_a42Rr], [e_a42Rs], [f_a42Rt], [g_a42Ru])
sUnzip7 :: forall a_a42Ro b_a42Rp c_a42Rq d_a42Rr e_a42Rs f_a42Rt g_a42Ru (t_a44jR :: [(a_a42Ro, b_a42Rp, c_a42Rq, d_a42Rr, e_a42Rs, f_a42Rt, g_a42Ru)]). Sing t_a44jR -> Sing (Apply Unzip7Sym0 t_a44jR :: ([a_a42Ro], [b_a42Rp], [c_a42Rq], [d_a42Rr], [e_a42Rs], [f_a42Rt], [g_a42Ru]))
type family Unlines (a_a445r :: [Symbol]) :: Symbol
sUnlines :: forall (t_a44jP :: [Symbol]). Sing t_a44jP -> Sing (Apply UnlinesSym0 t_a44jP :: Symbol)
type family Unwords (a_a445g :: [Symbol]) :: Symbol
sUnwords :: forall (t_a44jN :: [Symbol]). Sing t_a44jN -> Sing (Apply UnwordsSym0 t_a44jN :: Symbol)
type family Nub (a_a43Vj :: [a_a42QJ]) :: [a_a42QJ]
sNub :: forall a_a42QJ (t_a44hl :: [a_a42QJ]). SEq a_a42QJ => Sing t_a44hl -> Sing (Apply NubSym0 t_a44hl :: [a_a42QJ])
type family Delete (a_a445a :: a_a42Rn) (a_a445b :: [a_a42Rn]) :: [a_a42Rn]
sDelete :: forall a_a42Rn (t_a44jJ :: a_a42Rn) (t_a44jK :: [a_a42Rn]). SEq a_a42Rn => Sing t_a44jJ -> Sing t_a44jK -> Sing (Apply (Apply DeleteSym0 t_a44jJ) t_a44jK :: [a_a42Rn])
type family (\\) (a_a4450 :: [a_a42Rm]) (a_a4451 :: [a_a42Rm]) :: [a_a42Rm]
infix 5 \\
(%\\) :: forall a_a42Rm (t_a44jF :: [a_a42Rm]) (t_a44jG :: [a_a42Rm]). SEq a_a42Rm => Sing t_a44jF -> Sing t_a44jG -> Sing (Apply (Apply (\\@#@$) t_a44jF) t_a44jG :: [a_a42Rm])
infix 5 %\\
type family Union (a_a43Uv :: [a_a42QF]) (a_a43Uw :: [a_a42QF]) :: [a_a42QF]
sUnion :: forall a_a42QF (t_a44h1 :: [a_a42QF]) (t_a44h2 :: [a_a42QF]). SEq a_a42QF => Sing t_a44h1 -> Sing t_a44h2 -> Sing (Apply (Apply UnionSym0 t_a44h1) t_a44h2 :: [a_a42QF])
type family Intersect (a_a441G :: [a_a42R9]) (a_a441H :: [a_a42R9]) :: [a_a42R9]
sIntersect :: forall a_a42R9 (t_a44iJ :: [a_a42R9]) (t_a44iK :: [a_a42R9]). SEq a_a42R9 => Sing t_a44iJ -> Sing t_a44iK -> Sing (Apply (Apply IntersectSym0 t_a44iJ) t_a44iK :: [a_a42R9])
type family Insert (a_a43XR :: a_a42QW) (a_a43XS :: [a_a42QW]) :: [a_a42QW]
sInsert :: forall a_a42QW (t_a44hX :: a_a42QW) (t_a44hY :: [a_a42QW]). SOrd a_a42QW => Sing t_a44hX -> Sing t_a44hY -> Sing (Apply (Apply InsertSym0 t_a44hX) t_a44hY :: [a_a42QW])
type family Sort (a_a43XO :: [a_a42QV]) :: [a_a42QV]
sSort :: forall a_a42QV (t_a44hV :: [a_a42QV]). SOrd a_a42QV => Sing t_a44hV -> Sing (Apply SortSym0 t_a44hV :: [a_a42QV])
type family NubBy (a_a43UU :: (~>) a_a42QI ((~>) a_a42QI Bool)) (a_a43UV :: [a_a42QI]) :: [a_a42QI]
sNubBy :: forall a_a42QI (t_a44hh :: (~>) a_a42QI ((~>) a_a42QI Bool)) (t_a44hi :: [a_a42QI]). Sing t_a44hh -> Sing t_a44hi -> Sing (Apply (Apply NubBySym0 t_a44hh) t_a44hi :: [a_a42QI])
type family DeleteBy (a_a444E :: (~>) a_a42Rl ((~>) a_a42Rl Bool)) (a_a444F :: a_a42Rl) (a_a444G :: [a_a42Rl]) :: [a_a42Rl]
sDeleteBy :: forall a_a42Rl (t_a44jz :: (~>) a_a42Rl ((~>) a_a42Rl Bool)) (t_a44jA :: a_a42Rl) (t_a44jB :: [a_a42Rl]). Sing t_a44jz -> Sing t_a44jA -> Sing t_a44jB -> Sing (Apply (Apply (Apply DeleteBySym0 t_a44jz) t_a44jA) t_a44jB :: [a_a42Rl])
type family DeleteFirstsBy (a_a444r :: (~>) a_a42Rk ((~>) a_a42Rk Bool)) (a_a444s :: [a_a42Rk]) (a_a444t :: [a_a42Rk]) :: [a_a42Rk]
sDeleteFirstsBy :: forall a_a42Rk (t_a44jt :: (~>) a_a42Rk ((~>) a_a42Rk Bool)) (t_a44ju :: [a_a42Rk]) (t_a44jv :: [a_a42Rk]). Sing t_a44jt -> Sing t_a44ju -> Sing t_a44jv -> Sing (Apply (Apply (Apply DeleteFirstsBySym0 t_a44jt) t_a44ju) t_a44jv :: [a_a42Rk])
type family UnionBy (a_a43UB :: (~>) a_a42QG ((~>) a_a42QG Bool)) (a_a43UC :: [a_a42QG]) (a_a43UD :: [a_a42QG]) :: [a_a42QG]
sUnionBy :: forall a_a42QG (t_a44h5 :: (~>) a_a42QG ((~>) a_a42QG Bool)) (t_a44h6 :: [a_a42QG]) (t_a44h7 :: [a_a42QG]). Sing t_a44h5 -> Sing t_a44h6 -> Sing t_a44h7 -> Sing (Apply (Apply (Apply UnionBySym0 t_a44h5) t_a44h6) t_a44h7 :: [a_a42QG])
type family IntersectBy (a_a4416 :: (~>) a_a42R8 ((~>) a_a42R8 Bool)) (a_a4417 :: [a_a42R8]) (a_a4418 :: [a_a42R8]) :: [a_a42R8]
sIntersectBy :: forall a_a42R8 (t_a44iD :: (~>) a_a42R8 ((~>) a_a42R8 Bool)) (t_a44iE :: [a_a42R8]) (t_a44iF :: [a_a42R8]). Sing t_a44iD -> Sing t_a44iE -> Sing t_a44iF -> Sing (Apply (Apply (Apply IntersectBySym0 t_a44iD) t_a44iE) t_a44iF :: [a_a42R8])
type family GroupBy (a_a43Xh :: (~>) a_a42QU ((~>) a_a42QU Bool)) (a_a43Xi :: [a_a42QU]) :: [[a_a42QU]]
sGroupBy :: forall a_a42QU (t_a44hR :: (~>) a_a42QU ((~>) a_a42QU Bool)) (t_a44hS :: [a_a42QU]). Sing t_a44hR -> Sing t_a44hS -> Sing (Apply (Apply GroupBySym0 t_a44hR) t_a44hS :: [[a_a42QU]])
type family SortBy (a_a444j :: (~>) a_a42Rj ((~>) a_a42Rj Ordering)) (a_a444k :: [a_a42Rj]) :: [a_a42Rj]
sSortBy :: forall a_a42Rj (t_a44jp :: (~>) a_a42Rj ((~>) a_a42Rj Ordering)) (t_a44jq :: [a_a42Rj]). Sing t_a44jp -> Sing t_a44jq -> Sing (Apply (Apply SortBySym0 t_a44jp) t_a44jq :: [a_a42Rj])
type family InsertBy (a_a443V :: (~>) a_a42Ri ((~>) a_a42Ri Ordering)) (a_a443W :: a_a42Ri) (a_a443X :: [a_a42Ri]) :: [a_a42Ri]
sInsertBy :: forall a_a42Ri (t_a44jj :: (~>) a_a42Ri ((~>) a_a42Ri Ordering)) (t_a44jk :: a_a42Ri) (t_a44jl :: [a_a42Ri]). Sing t_a44jj -> Sing t_a44jk -> Sing t_a44jl -> Sing (Apply (Apply (Apply InsertBySym0 t_a44jj) t_a44jk) t_a44jl :: [a_a42Ri])
type family MaximumBy (a_a6dje :: (~>) a_a6db3 ((~>) a_a6db3 Ordering)) (a_a6djf :: t_a6db2 a_a6db3) :: a_a6db3
sMaximumBy :: forall a_a6db3 t_a6db2 (t_a6dGG :: (~>) a_a6db3 ((~>) a_a6db3 Ordering)) (t_a6dGH :: t_a6db2 a_a6db3). SFoldable t_a6db2 => Sing t_a6dGG -> Sing t_a6dGH -> Sing (Apply (Apply MaximumBySym0 t_a6dGG) t_a6dGH :: a_a6db3)
type family MinimumBy (a_a6diP :: (~>) a_a6db1 ((~>) a_a6db1 Ordering)) (a_a6diQ :: t_a6db0 a_a6db1) :: a_a6db1
sMinimumBy :: forall a_a6db1 t_a6db0 (t_a6dGC :: (~>) a_a6db1 ((~>) a_a6db1 Ordering)) (t_a6dGD :: t_a6db0 a_a6db1). SFoldable t_a6db0 => Sing t_a6dGC -> Sing t_a6dGD -> Sing (Apply (Apply MinimumBySym0 t_a6dGC) t_a6dGD :: a_a6db1)
type family GenericLength (a_a43Uo :: [a_a42QE]) :: i_a42QD
sGenericLength :: forall a_a42QE i_a42QD (t_a44gZ :: [a_a42QE]). SNum i_a42QD => Sing t_a44gZ -> Sing (Apply GenericLengthSym0 t_a44gZ :: i_a42QD)
type family GenericTake (a_a4z1J :: i_a4yD3) (a_a4z1K :: [a_a4yD4]) :: [a_a4yD4]
type family GenericDrop (a_a4z1z :: i_a4yD1) (a_a4z1A :: [a_a4yD2]) :: [a_a4yD2]
type family GenericSplitAt (a_a4z1p :: i_a4yCZ) (a_a4z1q :: [a_a4yD0]) :: ([a_a4yD0], [a_a4yD0])
type family GenericIndex (a_a4z1f :: [a_a4yCY]) (a_a4z1g :: i_a4yCX) :: a_a4yCY
type family GenericReplicate (a_a4z15 :: i_a4yCV) (a_a4z16 :: a_a4yCW) :: [a_a4yCW]
type NilSym0 = '[]
data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [a3530822107858468865 :: Type])
infixr 5 :@#@$
data (:@#@$$) (t6989586621679315156 :: a3530822107858468865 :: Type) :: (~>) [a3530822107858468865] [a3530822107858468865 :: Type]
infixr 5 :@#@$$
type (:@#@$$$) (t6989586621679315156 :: a3530822107858468865) (t6989586621679315157 :: [a3530822107858468865]) = '(:) t6989586621679315156 t6989586621679315157
type (++@#@$$$) (a6989586621679545630 :: [a6989586621679545433]) (a6989586621679545631 :: [a6989586621679545433]) = (++) a6989586621679545630 a6989586621679545631
data (++@#@$$) (a6989586621679545630 :: [a6989586621679545433]) :: (~>) [a6989586621679545433] [a6989586621679545433]
infixr 5 ++@#@$$
data (++@#@$) :: forall a6989586621679545433. (~>) [a6989586621679545433] ((~>) [a6989586621679545433] [a6989586621679545433])
infixr 5 ++@#@$
data HeadSym0 :: forall a6989586621679974183. (~>) [a6989586621679974183] a6989586621679974183
type HeadSym1 (a6989586621679979530 :: [a6989586621679974183]) = Head a6989586621679979530
data LastSym0 :: forall a6989586621679974182. (~>) [a6989586621679974182] a6989586621679974182
type LastSym1 (a6989586621679979525 :: [a6989586621679974182]) = Last a6989586621679979525
data TailSym0 :: forall a6989586621679974181. (~>) [a6989586621679974181] [a6989586621679974181]
type TailSym1 (a6989586621679979522 :: [a6989586621679974181]) = Tail a6989586621679979522
data InitSym0 :: forall a6989586621679974180. (~>) [a6989586621679974180] [a6989586621679974180]
type InitSym1 (a6989586621679979508 :: [a6989586621679974180]) = Init a6989586621679979508
data NullSym0 :: forall t6989586621680490502 a6989586621680490517. (~>) (t6989586621680490502 a6989586621680490517) Bool
type NullSym1 (arg6989586621680491161 :: t6989586621680490502 a6989586621680490517) = Null arg6989586621680491161
data LengthSym0 :: forall t6989586621680490502 a6989586621680490518. (~>) (t6989586621680490502 a6989586621680490518) Nat
type LengthSym1 (arg6989586621680491163 :: t6989586621680490502 a6989586621680490518) = Length arg6989586621680491163
data MapSym0 :: forall a6989586621679545434 b6989586621679545435. (~>) ((~>) a6989586621679545434 b6989586621679545435) ((~>) [a6989586621679545434] [b6989586621679545435])
data MapSym1 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) :: (~>) [a6989586621679545434] [b6989586621679545435]
type MapSym2 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) (a6989586621679545639 :: [a6989586621679545434]) = Map a6989586621679545638 a6989586621679545639
data ReverseSym0 :: forall a6989586621679974178. (~>) [a6989586621679974178] [a6989586621679974178]
type ReverseSym1 (a6989586621679979493 :: [a6989586621679974178]) = Reverse a6989586621679979493
data IntersperseSym0 :: forall a6989586621679974177. (~>) a6989586621679974177 ((~>) [a6989586621679974177] [a6989586621679974177])
data IntersperseSym1 (a6989586621679979486 :: a6989586621679974177) :: (~>) [a6989586621679974177] [a6989586621679974177]
type IntersperseSym2 (a6989586621679979486 :: a6989586621679974177) (a6989586621679979487 :: [a6989586621679974177]) = Intersperse a6989586621679979486 a6989586621679979487
data IntercalateSym0 :: forall a6989586621679974176. (~>) [a6989586621679974176] ((~>) [[a6989586621679974176]] [a6989586621679974176])
data IntercalateSym1 (a6989586621679979480 :: [a6989586621679974176]) :: (~>) [[a6989586621679974176]] [a6989586621679974176]
type IntercalateSym2 (a6989586621679979480 :: [a6989586621679974176]) (a6989586621679979481 :: [[a6989586621679974176]]) = Intercalate a6989586621679979480 a6989586621679979481
data TransposeSym0 :: forall a6989586621679974063. (~>) [[a6989586621679974063]] [[a6989586621679974063]]
type TransposeSym1 (a6989586621679978223 :: [[a6989586621679974063]]) = Transpose a6989586621679978223
data SubsequencesSym0 :: forall a6989586621679974175. (~>) [a6989586621679974175] [[a6989586621679974175]]
type SubsequencesSym1 (a6989586621679979477 :: [a6989586621679974175]) = Subsequences a6989586621679979477
data PermutationsSym0 :: forall a6989586621679974172. (~>) [a6989586621679974172] [[a6989586621679974172]]
type PermutationsSym1 (a6989586621679979359 :: [a6989586621679974172]) = Permutations a6989586621679979359
data FoldlSym0 :: forall b6989586621680490510 a6989586621680490511 t6989586621680490502. (~>) ((~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) ((~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510))
data FoldlSym1 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) :: forall t6989586621680490502. (~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510)
data FoldlSym2 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510
type FoldlSym3 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) (arg6989586621680491141 :: t6989586621680490502 a6989586621680490511) = Foldl arg6989586621680491139 arg6989586621680491140 arg6989586621680491141
data Foldl'Sym0 :: forall b6989586621680490512 a6989586621680490513 t6989586621680490502. (~>) ((~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) ((~>) b6989586621680490512 ((~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512))
data Foldl'Sym1 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) :: forall t6989586621680490502. (~>) b6989586621680490512 ((~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512)
data Foldl'Sym2 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) (arg6989586621680491146 :: b6989586621680490512) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490513) b6989586621680490512
type Foldl'Sym3 (arg6989586621680491145 :: (~>) b6989586621680490512 ((~>) a6989586621680490513 b6989586621680490512)) (arg6989586621680491146 :: b6989586621680490512) (arg6989586621680491147 :: t6989586621680490502 a6989586621680490513) = Foldl' arg6989586621680491145 arg6989586621680491146 arg6989586621680491147
data Foldl1Sym0 :: forall a6989586621680490515 t6989586621680490502. (~>) ((~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) ((~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515)
data Foldl1Sym1 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515
type Foldl1Sym2 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) (arg6989586621680491156 :: t6989586621680490502 a6989586621680490515) = Foldl1 arg6989586621680491155 arg6989586621680491156
data Foldl1'Sym0 :: forall a6989586621679974168. (~>) ((~>) a6989586621679974168 ((~>) a6989586621679974168 a6989586621679974168)) ((~>) [a6989586621679974168] a6989586621679974168)
data Foldl1'Sym1 (a6989586621679979317 :: (~>) a6989586621679974168 ((~>) a6989586621679974168 a6989586621679974168)) :: (~>) [a6989586621679974168] a6989586621679974168
type Foldl1'Sym2 (a6989586621679979317 :: (~>) a6989586621679974168 ((~>) a6989586621679974168 a6989586621679974168)) (a6989586621679979318 :: [a6989586621679974168]) = Foldl1' a6989586621679979317 a6989586621679979318
data FoldrSym0 :: forall a6989586621680490506 b6989586621680490507 t6989586621680490502. (~>) ((~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) ((~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507))
data FoldrSym1 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) :: forall t6989586621680490502. (~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507)
data FoldrSym2 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507
type FoldrSym3 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) (arg6989586621680491129 :: t6989586621680490502 a6989586621680490506) = Foldr arg6989586621680491127 arg6989586621680491128 arg6989586621680491129
data Foldr1Sym0 :: forall a6989586621680490514 t6989586621680490502. (~>) ((~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) ((~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514)
data Foldr1Sym1 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514
type Foldr1Sym2 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) (arg6989586621680491152 :: t6989586621680490502 a6989586621680490514) = Foldr1 arg6989586621680491151 arg6989586621680491152
data ConcatSym0 :: forall t6989586621680490427 a6989586621680490428. (~>) (t6989586621680490427 [a6989586621680490428]) [a6989586621680490428]
type ConcatSym1 (a6989586621680491009 :: t6989586621680490427 [a6989586621680490428]) = Concat a6989586621680491009
data ConcatMapSym0 :: forall a6989586621680490425 b6989586621680490426 t6989586621680490424. (~>) ((~>) a6989586621680490425 [b6989586621680490426]) ((~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426])
data ConcatMapSym1 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) :: forall t6989586621680490424. (~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426]
type ConcatMapSym2 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) (a6989586621680490994 :: t6989586621680490424 a6989586621680490425) = ConcatMap a6989586621680490993 a6989586621680490994
data AndSym0 :: forall t6989586621680490423. (~>) (t6989586621680490423 Bool) Bool
type AndSym1 (a6989586621680490984 :: t6989586621680490423 Bool) = And a6989586621680490984
data OrSym0 :: forall t6989586621680490422. (~>) (t6989586621680490422 Bool) Bool
type OrSym1 (a6989586621680490975 :: t6989586621680490422 Bool) = Or a6989586621680490975
data AnySym0 :: forall a6989586621680490421 t6989586621680490420. (~>) ((~>) a6989586621680490421 Bool) ((~>) (t6989586621680490420 a6989586621680490421) Bool)
data AnySym1 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) :: forall t6989586621680490420. (~>) (t6989586621680490420 a6989586621680490421) Bool
type AnySym2 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) (a6989586621680490963 :: t6989586621680490420 a6989586621680490421) = Any a6989586621680490962 a6989586621680490963
data AllSym0 :: forall a6989586621680490419 t6989586621680490418. (~>) ((~>) a6989586621680490419 Bool) ((~>) (t6989586621680490418 a6989586621680490419) Bool)
data AllSym1 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) :: forall t6989586621680490418. (~>) (t6989586621680490418 a6989586621680490419) Bool
type AllSym2 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) (a6989586621680490950 :: t6989586621680490418 a6989586621680490419) = All a6989586621680490949 a6989586621680490950
data SumSym0 :: forall t6989586621680490502 a6989586621680490522. (~>) (t6989586621680490502 a6989586621680490522) a6989586621680490522
type SumSym1 (arg6989586621680491173 :: t6989586621680490502 a6989586621680490522) = Sum arg6989586621680491173
data ProductSym0 :: forall t6989586621680490502 a6989586621680490523. (~>) (t6989586621680490502 a6989586621680490523) a6989586621680490523
type ProductSym1 (arg6989586621680491175 :: t6989586621680490502 a6989586621680490523) = Product arg6989586621680491175
data MaximumSym0 :: forall t6989586621680490502 a6989586621680490520. (~>) (t6989586621680490502 a6989586621680490520) a6989586621680490520
type MaximumSym1 (arg6989586621680491169 :: t6989586621680490502 a6989586621680490520) = Maximum arg6989586621680491169
data MinimumSym0 :: forall t6989586621680490502 a6989586621680490521. (~>) (t6989586621680490502 a6989586621680490521) a6989586621680490521
type MinimumSym1 (arg6989586621680491171 :: t6989586621680490502 a6989586621680490521) = Minimum arg6989586621680491171
data ScanlSym0 :: forall b6989586621679974160 a6989586621679974161. (~>) ((~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) ((~>) b6989586621679974160 ((~>) [a6989586621679974161] [b6989586621679974160]))
data ScanlSym1 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) :: (~>) b6989586621679974160 ((~>) [a6989586621679974161] [b6989586621679974160])
data ScanlSym2 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) (a6989586621679979255 :: b6989586621679974160) :: (~>) [a6989586621679974161] [b6989586621679974160]
type ScanlSym3 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) (a6989586621679979255 :: b6989586621679974160) (a6989586621679979256 :: [a6989586621679974161]) = Scanl a6989586621679979254 a6989586621679979255 a6989586621679979256
data Scanl1Sym0 :: forall a6989586621679974159. (~>) ((~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) ((~>) [a6989586621679974159] [a6989586621679974159])
data Scanl1Sym1 (a6989586621679979247 :: (~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) :: (~>) [a6989586621679974159] [a6989586621679974159]
type Scanl1Sym2 (a6989586621679979247 :: (~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) (a6989586621679979248 :: [a6989586621679974159]) = Scanl1 a6989586621679979247 a6989586621679979248
data ScanrSym0 :: forall a6989586621679974157 b6989586621679974158. (~>) ((~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) ((~>) b6989586621679974158 ((~>) [a6989586621679974157] [b6989586621679974158]))
data ScanrSym1 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) :: (~>) b6989586621679974158 ((~>) [a6989586621679974157] [b6989586621679974158])
data ScanrSym2 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) (a6989586621679979227 :: b6989586621679974158) :: (~>) [a6989586621679974157] [b6989586621679974158]
type ScanrSym3 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) (a6989586621679979227 :: b6989586621679974158) (a6989586621679979228 :: [a6989586621679974157]) = Scanr a6989586621679979226 a6989586621679979227 a6989586621679979228
data Scanr1Sym0 :: forall a6989586621679974156. (~>) ((~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) ((~>) [a6989586621679974156] [a6989586621679974156])
data Scanr1Sym1 (a6989586621679979202 :: (~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) :: (~>) [a6989586621679974156] [a6989586621679974156]
type Scanr1Sym2 (a6989586621679979202 :: (~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) (a6989586621679979203 :: [a6989586621679974156]) = Scanr1 a6989586621679979202 a6989586621679979203
data MapAccumLSym0 :: forall a6989586621680804227 b6989586621680804228 c6989586621680804229 t6989586621680804226. (~>) ((~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) ((~>) a6989586621680804227 ((~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229)))
data MapAccumLSym1 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) :: forall t6989586621680804226. (~>) a6989586621680804227 ((~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229))
data MapAccumLSym2 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) (a6989586621680804731 :: a6989586621680804227) :: forall t6989586621680804226. (~>) (t6989586621680804226 b6989586621680804228) (a6989586621680804227, t6989586621680804226 c6989586621680804229)
type MapAccumLSym3 (a6989586621680804730 :: (~>) a6989586621680804227 ((~>) b6989586621680804228 (a6989586621680804227, c6989586621680804229))) (a6989586621680804731 :: a6989586621680804227) (a6989586621680804732 :: t6989586621680804226 b6989586621680804228) = MapAccumL a6989586621680804730 a6989586621680804731 a6989586621680804732
data MapAccumRSym0 :: forall a6989586621680804223 b6989586621680804224 c6989586621680804225 t6989586621680804222. (~>) ((~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) ((~>) a6989586621680804223 ((~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225)))
data MapAccumRSym1 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) :: forall t6989586621680804222. (~>) a6989586621680804223 ((~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225))
data MapAccumRSym2 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) (a6989586621680804714 :: a6989586621680804223) :: forall t6989586621680804222. (~>) (t6989586621680804222 b6989586621680804224) (a6989586621680804223, t6989586621680804222 c6989586621680804225)
type MapAccumRSym3 (a6989586621680804713 :: (~>) a6989586621680804223 ((~>) b6989586621680804224 (a6989586621680804223, c6989586621680804225))) (a6989586621680804714 :: a6989586621680804223) (a6989586621680804715 :: t6989586621680804222 b6989586621680804224) = MapAccumR a6989586621680804713 a6989586621680804714 a6989586621680804715
data ReplicateSym0 :: forall a6989586621679974064. (~>) Nat ((~>) a6989586621679974064 [a6989586621679974064])
data ReplicateSym1 (a6989586621679978229 :: Nat) :: forall a6989586621679974064. (~>) a6989586621679974064 [a6989586621679974064]
type ReplicateSym2 (a6989586621679978229 :: Nat) (a6989586621679978230 :: a6989586621679974064) = Replicate a6989586621679978229 a6989586621679978230
data UnfoldrSym0 :: forall b6989586621679974148 a6989586621679974149. (~>) ((~>) b6989586621679974148 (Maybe (a6989586621679974149, b6989586621679974148))) ((~>) b6989586621679974148 [a6989586621679974149])
data UnfoldrSym1 (a6989586621679979060 :: (~>) b6989586621679974148 (Maybe (a6989586621679974149, b6989586621679974148))) :: (~>) b6989586621679974148 [a6989586621679974149]
type UnfoldrSym2 (a6989586621679979060 :: (~>) b6989586621679974148 (Maybe (a6989586621679974149, b6989586621679974148))) (a6989586621679979061 :: b6989586621679974148) = Unfoldr a6989586621679979060 a6989586621679979061
data TakeSym0 :: forall a6989586621679974080. (~>) Nat ((~>) [a6989586621679974080] [a6989586621679974080])
data TakeSym1 (a6989586621679978390 :: Nat) :: forall a6989586621679974080. (~>) [a6989586621679974080] [a6989586621679974080]
type TakeSym2 (a6989586621679978390 :: Nat) (a6989586621679978391 :: [a6989586621679974080]) = Take a6989586621679978390 a6989586621679978391
data DropSym0 :: forall a6989586621679974079. (~>) Nat ((~>) [a6989586621679974079] [a6989586621679974079])
data DropSym1 (a6989586621679978376 :: Nat) :: forall a6989586621679974079. (~>) [a6989586621679974079] [a6989586621679974079]
type DropSym2 (a6989586621679978376 :: Nat) (a6989586621679978377 :: [a6989586621679974079]) = Drop a6989586621679978376 a6989586621679978377
data SplitAtSym0 :: forall a6989586621679974078. (~>) Nat ((~>) [a6989586621679974078] ([a6989586621679974078], [a6989586621679974078]))
data SplitAtSym1 (a6989586621679978370 :: Nat) :: forall a6989586621679974078. (~>) [a6989586621679974078] ([a6989586621679974078], [a6989586621679974078])
type SplitAtSym2 (a6989586621679978370 :: Nat) (a6989586621679978371 :: [a6989586621679974078]) = SplitAt a6989586621679978370 a6989586621679978371
data TakeWhileSym0 :: forall a6989586621679974085. (~>) ((~>) a6989586621679974085 Bool) ((~>) [a6989586621679974085] [a6989586621679974085])
data TakeWhileSym1 (a6989586621679978534 :: (~>) a6989586621679974085 Bool) :: (~>) [a6989586621679974085] [a6989586621679974085]
type TakeWhileSym2 (a6989586621679978534 :: (~>) a6989586621679974085 Bool) (a6989586621679978535 :: [a6989586621679974085]) = TakeWhile a6989586621679978534 a6989586621679978535
data DropWhileSym0 :: forall a6989586621679974084. (~>) ((~>) a6989586621679974084 Bool) ((~>) [a6989586621679974084] [a6989586621679974084])
data DropWhileSym1 (a6989586621679978516 :: (~>) a6989586621679974084 Bool) :: (~>) [a6989586621679974084] [a6989586621679974084]
type DropWhileSym2 (a6989586621679978516 :: (~>) a6989586621679974084 Bool) (a6989586621679978517 :: [a6989586621679974084]) = DropWhile a6989586621679978516 a6989586621679978517
data DropWhileEndSym0 :: forall a6989586621679974083. (~>) ((~>) a6989586621679974083 Bool) ((~>) [a6989586621679974083] [a6989586621679974083])
data DropWhileEndSym1 (a6989586621679978490 :: (~>) a6989586621679974083 Bool) :: (~>) [a6989586621679974083] [a6989586621679974083]
type DropWhileEndSym2 (a6989586621679978490 :: (~>) a6989586621679974083 Bool) (a6989586621679978491 :: [a6989586621679974083]) = DropWhileEnd a6989586621679978490 a6989586621679978491
data SpanSym0 :: forall a6989586621679974082. (~>) ((~>) a6989586621679974082 Bool) ((~>) [a6989586621679974082] ([a6989586621679974082], [a6989586621679974082]))
data SpanSym1 (a6989586621679978447 :: (~>) a6989586621679974082 Bool) :: (~>) [a6989586621679974082] ([a6989586621679974082], [a6989586621679974082])
type SpanSym2 (a6989586621679978447 :: (~>) a6989586621679974082 Bool) (a6989586621679978448 :: [a6989586621679974082]) = Span a6989586621679978447 a6989586621679978448
data BreakSym0 :: forall a6989586621679974081. (~>) ((~>) a6989586621679974081 Bool) ((~>) [a6989586621679974081] ([a6989586621679974081], [a6989586621679974081]))
data BreakSym1 (a6989586621679978404 :: (~>) a6989586621679974081 Bool) :: (~>) [a6989586621679974081] ([a6989586621679974081], [a6989586621679974081])
type BreakSym2 (a6989586621679978404 :: (~>) a6989586621679974081 Bool) (a6989586621679978405 :: [a6989586621679974081]) = Break a6989586621679978404 a6989586621679978405
data StripPrefixSym0 :: forall a6989586621680096271. (~>) [a6989586621680096271] ((~>) [a6989586621680096271] (Maybe [a6989586621680096271]))
data StripPrefixSym1 (a6989586621680097967 :: [a6989586621680096271]) :: (~>) [a6989586621680096271] (Maybe [a6989586621680096271])
type StripPrefixSym2 (a6989586621680097967 :: [a6989586621680096271]) (a6989586621680097968 :: [a6989586621680096271]) = StripPrefix a6989586621680097967 a6989586621680097968
data GroupSym0 :: forall a6989586621679974077. (~>) [a6989586621679974077] [[a6989586621679974077]]
type GroupSym1 (a6989586621679978367 :: [a6989586621679974077]) = Group a6989586621679978367
data InitsSym0 :: forall a6989586621679974147. (~>) [a6989586621679974147] [[a6989586621679974147]]
type InitsSym1 (a6989586621679979052 :: [a6989586621679974147]) = Inits a6989586621679979052
data TailsSym0 :: forall a6989586621679974146. (~>) [a6989586621679974146] [[a6989586621679974146]]
type TailsSym1 (a6989586621679979045 :: [a6989586621679974146]) = Tails a6989586621679979045
data IsPrefixOfSym0 :: forall a6989586621679974145. (~>) [a6989586621679974145] ((~>) [a6989586621679974145] Bool)
data IsPrefixOfSym1 (a6989586621679979037 :: [a6989586621679974145]) :: (~>) [a6989586621679974145] Bool
type IsPrefixOfSym2 (a6989586621679979037 :: [a6989586621679974145]) (a6989586621679979038 :: [a6989586621679974145]) = IsPrefixOf a6989586621679979037 a6989586621679979038
data IsSuffixOfSym0 :: forall a6989586621679974144. (~>) [a6989586621679974144] ((~>) [a6989586621679974144] Bool)
data IsSuffixOfSym1 (a6989586621679979031 :: [a6989586621679974144]) :: (~>) [a6989586621679974144] Bool
type IsSuffixOfSym2 (a6989586621679979031 :: [a6989586621679974144]) (a6989586621679979032 :: [a6989586621679974144]) = IsSuffixOf a6989586621679979031 a6989586621679979032
data IsInfixOfSym0 :: forall a6989586621679974143. (~>) [a6989586621679974143] ((~>) [a6989586621679974143] Bool)
data IsInfixOfSym1 (a6989586621679979025 :: [a6989586621679974143]) :: (~>) [a6989586621679974143] Bool
type IsInfixOfSym2 (a6989586621679979025 :: [a6989586621679974143]) (a6989586621679979026 :: [a6989586621679974143]) = IsInfixOf a6989586621679979025 a6989586621679979026
data ElemSym0 :: forall a6989586621680490519 t6989586621680490502. (~>) a6989586621680490519 ((~>) (t6989586621680490502 a6989586621680490519) Bool)
data ElemSym1 (arg6989586621680491165 :: a6989586621680490519) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490519) Bool
type ElemSym2 (arg6989586621680491165 :: a6989586621680490519) (arg6989586621680491166 :: t6989586621680490502 a6989586621680490519) = Elem arg6989586621680491165 arg6989586621680491166
data NotElemSym0 :: forall a6989586621680490413 t6989586621680490412. (~>) a6989586621680490413 ((~>) (t6989586621680490412 a6989586621680490413) Bool)
data NotElemSym1 (a6989586621680490891 :: a6989586621680490413) :: forall t6989586621680490412. (~>) (t6989586621680490412 a6989586621680490413) Bool
type NotElemSym2 (a6989586621680490891 :: a6989586621680490413) (a6989586621680490892 :: t6989586621680490412 a6989586621680490413) = NotElem a6989586621680490891 a6989586621680490892
data LookupSym0 :: forall a6989586621679974070 b6989586621679974071. (~>) a6989586621679974070 ((~>) [(a6989586621679974070, b6989586621679974071)] (Maybe b6989586621679974071))
data LookupSym1 (a6989586621679978294 :: a6989586621679974070) :: forall b6989586621679974071. (~>) [(a6989586621679974070, b6989586621679974071)] (Maybe b6989586621679974071)
type LookupSym2 (a6989586621679978294 :: a6989586621679974070) (a6989586621679978295 :: [(a6989586621679974070, b6989586621679974071)]) = Lookup a6989586621679978294 a6989586621679978295
data FindSym0 :: forall a6989586621680490411 t6989586621680490410. (~>) ((~>) a6989586621680490411 Bool) ((~>) (t6989586621680490410 a6989586621680490411) (Maybe a6989586621680490411))
data FindSym1 (a6989586621680490864 :: (~>) a6989586621680490411 Bool) :: forall t6989586621680490410. (~>) (t6989586621680490410 a6989586621680490411) (Maybe a6989586621680490411)
type FindSym2 (a6989586621680490864 :: (~>) a6989586621680490411 Bool) (a6989586621680490865 :: t6989586621680490410 a6989586621680490411) = Find a6989586621680490864 a6989586621680490865
data FilterSym0 :: forall a6989586621679974093. (~>) ((~>) a6989586621679974093 Bool) ((~>) [a6989586621679974093] [a6989586621679974093])
data FilterSym1 (a6989586621679978648 :: (~>) a6989586621679974093 Bool) :: (~>) [a6989586621679974093] [a6989586621679974093]
type FilterSym2 (a6989586621679978648 :: (~>) a6989586621679974093 Bool) (a6989586621679978649 :: [a6989586621679974093]) = Filter a6989586621679978648 a6989586621679978649
data PartitionSym0 :: forall a6989586621679974069. (~>) ((~>) a6989586621679974069 Bool) ((~>) [a6989586621679974069] ([a6989586621679974069], [a6989586621679974069]))
data PartitionSym1 (a6989586621679978288 :: (~>) a6989586621679974069 Bool) :: (~>) [a6989586621679974069] ([a6989586621679974069], [a6989586621679974069])
type PartitionSym2 (a6989586621679978288 :: (~>) a6989586621679974069 Bool) (a6989586621679978289 :: [a6989586621679974069]) = Partition a6989586621679978288 a6989586621679978289
data (!!@#@$) :: forall a6989586621679974062. (~>) [a6989586621679974062] ((~>) Nat a6989586621679974062)
infixl 9 !!@#@$
data (!!@#@$$) (a6989586621679978209 :: [a6989586621679974062]) :: (~>) Nat a6989586621679974062
infixl 9 !!@#@$$
type (!!@#@$$$) (a6989586621679978209 :: [a6989586621679974062]) (a6989586621679978210 :: Nat) = (!!) a6989586621679978209 a6989586621679978210
data ElemIndexSym0 :: forall a6989586621679974091. (~>) a6989586621679974091 ((~>) [a6989586621679974091] (Maybe Nat))
data ElemIndexSym1 (a6989586621679978632 :: a6989586621679974091) :: (~>) [a6989586621679974091] (Maybe Nat)
type ElemIndexSym2 (a6989586621679978632 :: a6989586621679974091) (a6989586621679978633 :: [a6989586621679974091]) = ElemIndex a6989586621679978632 a6989586621679978633
data ElemIndicesSym0 :: forall a6989586621679974090. (~>) a6989586621679974090 ((~>) [a6989586621679974090] [Nat])
data ElemIndicesSym1 (a6989586621679978624 :: a6989586621679974090) :: (~>) [a6989586621679974090] [Nat]
type ElemIndicesSym2 (a6989586621679978624 :: a6989586621679974090) (a6989586621679978625 :: [a6989586621679974090]) = ElemIndices a6989586621679978624 a6989586621679978625
data FindIndexSym0 :: forall a6989586621679974089. (~>) ((~>) a6989586621679974089 Bool) ((~>) [a6989586621679974089] (Maybe Nat))
data FindIndexSym1 (a6989586621679978616 :: (~>) a6989586621679974089 Bool) :: (~>) [a6989586621679974089] (Maybe Nat)
type FindIndexSym2 (a6989586621679978616 :: (~>) a6989586621679974089 Bool) (a6989586621679978617 :: [a6989586621679974089]) = FindIndex a6989586621679978616 a6989586621679978617
data FindIndicesSym0 :: forall a6989586621679974088. (~>) ((~>) a6989586621679974088 Bool) ((~>) [a6989586621679974088] [Nat])
data FindIndicesSym1 (a6989586621679978590 :: (~>) a6989586621679974088 Bool) :: (~>) [a6989586621679974088] [Nat]
type FindIndicesSym2 (a6989586621679978590 :: (~>) a6989586621679974088 Bool) (a6989586621679978591 :: [a6989586621679974088]) = FindIndices a6989586621679978590 a6989586621679978591
data ZipSym0 :: forall a6989586621679974139 b6989586621679974140. (~>) [a6989586621679974139] ((~>) [b6989586621679974140] [(a6989586621679974139, b6989586621679974140)])
data ZipSym1 (a6989586621679979003 :: [a6989586621679974139]) :: forall b6989586621679974140. (~>) [b6989586621679974140] [(a6989586621679974139, b6989586621679974140)]
type ZipSym2 (a6989586621679979003 :: [a6989586621679974139]) (a6989586621679979004 :: [b6989586621679974140]) = Zip a6989586621679979003 a6989586621679979004
data Zip3Sym0 :: forall a6989586621679974136 b6989586621679974137 c6989586621679974138. (~>) [a6989586621679974136] ((~>) [b6989586621679974137] ((~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)]))
data Zip3Sym1 (a6989586621679978991 :: [a6989586621679974136]) :: forall b6989586621679974137 c6989586621679974138. (~>) [b6989586621679974137] ((~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)])
data Zip3Sym2 (a6989586621679978991 :: [a6989586621679974136]) (a6989586621679978992 :: [b6989586621679974137]) :: forall c6989586621679974138. (~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)]
type Zip3Sym3 (a6989586621679978991 :: [a6989586621679974136]) (a6989586621679978992 :: [b6989586621679974137]) (a6989586621679978993 :: [c6989586621679974138]) = Zip3 a6989586621679978991 a6989586621679978992 a6989586621679978993
data Zip4Sym0 :: forall a6989586621680096267 b6989586621680096268 c6989586621680096269 d6989586621680096270. (~>) [a6989586621680096267] ((~>) [b6989586621680096268] ((~>) [c6989586621680096269] ((~>) [d6989586621680096270] [(a6989586621680096267, b6989586621680096268, c6989586621680096269, d6989586621680096270)])))
data Zip4Sym1 (a6989586621680097955 :: [a6989586621680096267]) :: forall b6989586621680096268 c6989586621680096269 d6989586621680096270. (~>) [b6989586621680096268] ((~>) [c6989586621680096269] ((~>) [d6989586621680096270] [(a6989586621680096267, b6989586621680096268, c6989586621680096269, d6989586621680096270)]))
data Zip4Sym2 (a6989586621680097955 :: [a6989586621680096267]) (a6989586621680097956 :: [b6989586621680096268]) :: forall c6989586621680096269 d6989586621680096270. (~>) [c6989586621680096269] ((~>) [d6989586621680096270] [(a6989586621680096267, b6989586621680096268, c6989586621680096269, d6989586621680096270)])
data Zip4Sym3 (a6989586621680097955 :: [a6989586621680096267]) (a6989586621680097956 :: [b6989586621680096268]) (a6989586621680097957 :: [c6989586621680096269]) :: forall d6989586621680096270. (~>) [d6989586621680096270] [(a6989586621680096267, b6989586621680096268, c6989586621680096269, d6989586621680096270)]
type Zip4Sym4 (a6989586621680097955 :: [a6989586621680096267]) (a6989586621680097956 :: [b6989586621680096268]) (a6989586621680097957 :: [c6989586621680096269]) (a6989586621680097958 :: [d6989586621680096270]) = Zip4 a6989586621680097955 a6989586621680097956 a6989586621680097957 a6989586621680097958
data Zip5Sym0 :: forall a6989586621680096262 b6989586621680096263 c6989586621680096264 d6989586621680096265 e6989586621680096266. (~>) [a6989586621680096262] ((~>) [b6989586621680096263] ((~>) [c6989586621680096264] ((~>) [d6989586621680096265] ((~>) [e6989586621680096266] [(a6989586621680096262, b6989586621680096263, c6989586621680096264, d6989586621680096265, e6989586621680096266)]))))
data Zip5Sym1 (a6989586621680097932 :: [a6989586621680096262]) :: forall b6989586621680096263 c6989586621680096264 d6989586621680096265 e6989586621680096266. (~>) [b6989586621680096263] ((~>) [c6989586621680096264] ((~>) [d6989586621680096265] ((~>) [e6989586621680096266] [(a6989586621680096262, b6989586621680096263, c6989586621680096264, d6989586621680096265, e6989586621680096266)])))
data Zip5Sym2 (a6989586621680097932 :: [a6989586621680096262]) (a6989586621680097933 :: [b6989586621680096263]) :: forall c6989586621680096264 d6989586621680096265 e6989586621680096266. (~>) [c6989586621680096264] ((~>) [d6989586621680096265] ((~>) [e6989586621680096266] [(a6989586621680096262, b6989586621680096263, c6989586621680096264, d6989586621680096265, e6989586621680096266)]))
data Zip5Sym3 (a6989586621680097932 :: [a6989586621680096262]) (a6989586621680097933 :: [b6989586621680096263]) (a6989586621680097934 :: [c6989586621680096264]) :: forall d6989586621680096265 e6989586621680096266. (~>) [d6989586621680096265] ((~>) [e6989586621680096266] [(a6989586621680096262, b6989586621680096263, c6989586621680096264, d6989586621680096265, e6989586621680096266)])
data Zip5Sym4 (a6989586621680097932 :: [a6989586621680096262]) (a6989586621680097933 :: [b6989586621680096263]) (a6989586621680097934 :: [c6989586621680096264]) (a6989586621680097935 :: [d6989586621680096265]) :: forall e6989586621680096266. (~>) [e6989586621680096266] [(a6989586621680096262, b6989586621680096263, c6989586621680096264, d6989586621680096265, e6989586621680096266)]
type Zip5Sym5 (a6989586621680097932 :: [a6989586621680096262]) (a6989586621680097933 :: [b6989586621680096263]) (a6989586621680097934 :: [c6989586621680096264]) (a6989586621680097935 :: [d6989586621680096265]) (a6989586621680097936 :: [e6989586621680096266]) = Zip5 a6989586621680097932 a6989586621680097933 a6989586621680097934 a6989586621680097935 a6989586621680097936
data Zip6Sym0 :: forall a6989586621680096256 b6989586621680096257 c6989586621680096258 d6989586621680096259 e6989586621680096260 f6989586621680096261. (~>) [a6989586621680096256] ((~>) [b6989586621680096257] ((~>) [c6989586621680096258] ((~>) [d6989586621680096259] ((~>) [e6989586621680096260] ((~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)])))))
data Zip6Sym1 (a6989586621680097904 :: [a6989586621680096256]) :: forall b6989586621680096257 c6989586621680096258 d6989586621680096259 e6989586621680096260 f6989586621680096261. (~>) [b6989586621680096257] ((~>) [c6989586621680096258] ((~>) [d6989586621680096259] ((~>) [e6989586621680096260] ((~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)]))))
data Zip6Sym2 (a6989586621680097904 :: [a6989586621680096256]) (a6989586621680097905 :: [b6989586621680096257]) :: forall c6989586621680096258 d6989586621680096259 e6989586621680096260 f6989586621680096261. (~>) [c6989586621680096258] ((~>) [d6989586621680096259] ((~>) [e6989586621680096260] ((~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)])))
data Zip6Sym3 (a6989586621680097904 :: [a6989586621680096256]) (a6989586621680097905 :: [b6989586621680096257]) (a6989586621680097906 :: [c6989586621680096258]) :: forall d6989586621680096259 e6989586621680096260 f6989586621680096261. (~>) [d6989586621680096259] ((~>) [e6989586621680096260] ((~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)]))
data Zip6Sym4 (a6989586621680097904 :: [a6989586621680096256]) (a6989586621680097905 :: [b6989586621680096257]) (a6989586621680097906 :: [c6989586621680096258]) (a6989586621680097907 :: [d6989586621680096259]) :: forall e6989586621680096260 f6989586621680096261. (~>) [e6989586621680096260] ((~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)])
data Zip6Sym5 (a6989586621680097904 :: [a6989586621680096256]) (a6989586621680097905 :: [b6989586621680096257]) (a6989586621680097906 :: [c6989586621680096258]) (a6989586621680097907 :: [d6989586621680096259]) (a6989586621680097908 :: [e6989586621680096260]) :: forall f6989586621680096261. (~>) [f6989586621680096261] [(a6989586621680096256, b6989586621680096257, c6989586621680096258, d6989586621680096259, e6989586621680096260, f6989586621680096261)]
type Zip6Sym6 (a6989586621680097904 :: [a6989586621680096256]) (a6989586621680097905 :: [b6989586621680096257]) (a6989586621680097906 :: [c6989586621680096258]) (a6989586621680097907 :: [d6989586621680096259]) (a6989586621680097908 :: [e6989586621680096260]) (a6989586621680097909 :: [f6989586621680096261]) = Zip6 a6989586621680097904 a6989586621680097905 a6989586621680097906 a6989586621680097907 a6989586621680097908 a6989586621680097909
data Zip7Sym0 :: forall a6989586621680096249 b6989586621680096250 c6989586621680096251 d6989586621680096252 e6989586621680096253 f6989586621680096254 g6989586621680096255. (~>) [a6989586621680096249] ((~>) [b6989586621680096250] ((~>) [c6989586621680096251] ((~>) [d6989586621680096252] ((~>) [e6989586621680096253] ((~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)]))))))
data Zip7Sym1 (a6989586621680097871 :: [a6989586621680096249]) :: forall b6989586621680096250 c6989586621680096251 d6989586621680096252 e6989586621680096253 f6989586621680096254 g6989586621680096255. (~>) [b6989586621680096250] ((~>) [c6989586621680096251] ((~>) [d6989586621680096252] ((~>) [e6989586621680096253] ((~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)])))))
data Zip7Sym2 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) :: forall c6989586621680096251 d6989586621680096252 e6989586621680096253 f6989586621680096254 g6989586621680096255. (~>) [c6989586621680096251] ((~>) [d6989586621680096252] ((~>) [e6989586621680096253] ((~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)]))))
data Zip7Sym3 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) (a6989586621680097873 :: [c6989586621680096251]) :: forall d6989586621680096252 e6989586621680096253 f6989586621680096254 g6989586621680096255. (~>) [d6989586621680096252] ((~>) [e6989586621680096253] ((~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)])))
data Zip7Sym4 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) (a6989586621680097873 :: [c6989586621680096251]) (a6989586621680097874 :: [d6989586621680096252]) :: forall e6989586621680096253 f6989586621680096254 g6989586621680096255. (~>) [e6989586621680096253] ((~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)]))
data Zip7Sym5 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) (a6989586621680097873 :: [c6989586621680096251]) (a6989586621680097874 :: [d6989586621680096252]) (a6989586621680097875 :: [e6989586621680096253]) :: forall f6989586621680096254 g6989586621680096255. (~>) [f6989586621680096254] ((~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)])
data Zip7Sym6 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) (a6989586621680097873 :: [c6989586621680096251]) (a6989586621680097874 :: [d6989586621680096252]) (a6989586621680097875 :: [e6989586621680096253]) (a6989586621680097876 :: [f6989586621680096254]) :: forall g6989586621680096255. (~>) [g6989586621680096255] [(a6989586621680096249, b6989586621680096250, c6989586621680096251, d6989586621680096252, e6989586621680096253, f6989586621680096254, g6989586621680096255)]
type Zip7Sym7 (a6989586621680097871 :: [a6989586621680096249]) (a6989586621680097872 :: [b6989586621680096250]) (a6989586621680097873 :: [c6989586621680096251]) (a6989586621680097874 :: [d6989586621680096252]) (a6989586621680097875 :: [e6989586621680096253]) (a6989586621680097876 :: [f6989586621680096254]) (a6989586621680097877 :: [g6989586621680096255]) = Zip7 a6989586621680097871 a6989586621680097872 a6989586621680097873 a6989586621680097874 a6989586621680097875 a6989586621680097876 a6989586621680097877
data ZipWithSym0 :: forall a6989586621679974133 b6989586621679974134 c6989586621679974135. (~>) ((~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) ((~>) [a6989586621679974133] ((~>) [b6989586621679974134] [c6989586621679974135]))
data ZipWithSym1 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) :: (~>) [a6989586621679974133] ((~>) [b6989586621679974134] [c6989586621679974135])
data ZipWithSym2 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) (a6989586621679978981 :: [a6989586621679974133]) :: (~>) [b6989586621679974134] [c6989586621679974135]
type ZipWithSym3 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) (a6989586621679978981 :: [a6989586621679974133]) (a6989586621679978982 :: [b6989586621679974134]) = ZipWith a6989586621679978980 a6989586621679978981 a6989586621679978982
data ZipWith3Sym0 :: forall a6989586621679974129 b6989586621679974130 c6989586621679974131 d6989586621679974132. (~>) ((~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) ((~>) [a6989586621679974129] ((~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132])))
data ZipWith3Sym1 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) :: (~>) [a6989586621679974129] ((~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132]))
data ZipWith3Sym2 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) (a6989586621679978966 :: [a6989586621679974129]) :: (~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132])
data ZipWith3Sym3 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) (a6989586621679978966 :: [a6989586621679974129]) (a6989586621679978967 :: [b6989586621679974130]) :: (~>) [c6989586621679974131] [d6989586621679974132]
type ZipWith3Sym4 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) (a6989586621679978966 :: [a6989586621679974129]) (a6989586621679978967 :: [b6989586621679974130]) (a6989586621679978968 :: [c6989586621679974131]) = ZipWith3 a6989586621679978965 a6989586621679978966 a6989586621679978967 a6989586621679978968
data ZipWith4Sym0 :: forall a6989586621680096244 b6989586621680096245 c6989586621680096246 d6989586621680096247 e6989586621680096248. (~>) ((~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) ((~>) [a6989586621680096244] ((~>) [b6989586621680096245] ((~>) [c6989586621680096246] ((~>) [d6989586621680096247] [e6989586621680096248]))))
data ZipWith4Sym1 (a6989586621680097838 :: (~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) :: (~>) [a6989586621680096244] ((~>) [b6989586621680096245] ((~>) [c6989586621680096246] ((~>) [d6989586621680096247] [e6989586621680096248])))
data ZipWith4Sym2 (a6989586621680097838 :: (~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) (a6989586621680097839 :: [a6989586621680096244]) :: (~>) [b6989586621680096245] ((~>) [c6989586621680096246] ((~>) [d6989586621680096247] [e6989586621680096248]))
data ZipWith4Sym3 (a6989586621680097838 :: (~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) (a6989586621680097839 :: [a6989586621680096244]) (a6989586621680097840 :: [b6989586621680096245]) :: (~>) [c6989586621680096246] ((~>) [d6989586621680096247] [e6989586621680096248])
data ZipWith4Sym4 (a6989586621680097838 :: (~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) (a6989586621680097839 :: [a6989586621680096244]) (a6989586621680097840 :: [b6989586621680096245]) (a6989586621680097841 :: [c6989586621680096246]) :: (~>) [d6989586621680096247] [e6989586621680096248]
type ZipWith4Sym5 (a6989586621680097838 :: (~>) a6989586621680096244 ((~>) b6989586621680096245 ((~>) c6989586621680096246 ((~>) d6989586621680096247 e6989586621680096248)))) (a6989586621680097839 :: [a6989586621680096244]) (a6989586621680097840 :: [b6989586621680096245]) (a6989586621680097841 :: [c6989586621680096246]) (a6989586621680097842 :: [d6989586621680096247]) = ZipWith4 a6989586621680097838 a6989586621680097839 a6989586621680097840 a6989586621680097841 a6989586621680097842
data ZipWith5Sym0 :: forall a6989586621680096238 b6989586621680096239 c6989586621680096240 d6989586621680096241 e6989586621680096242 f6989586621680096243. (~>) ((~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) ((~>) [a6989586621680096238] ((~>) [b6989586621680096239] ((~>) [c6989586621680096240] ((~>) [d6989586621680096241] ((~>) [e6989586621680096242] [f6989586621680096243])))))
data ZipWith5Sym1 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) :: (~>) [a6989586621680096238] ((~>) [b6989586621680096239] ((~>) [c6989586621680096240] ((~>) [d6989586621680096241] ((~>) [e6989586621680096242] [f6989586621680096243]))))
data ZipWith5Sym2 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) (a6989586621680097816 :: [a6989586621680096238]) :: (~>) [b6989586621680096239] ((~>) [c6989586621680096240] ((~>) [d6989586621680096241] ((~>) [e6989586621680096242] [f6989586621680096243])))
data ZipWith5Sym3 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) (a6989586621680097816 :: [a6989586621680096238]) (a6989586621680097817 :: [b6989586621680096239]) :: (~>) [c6989586621680096240] ((~>) [d6989586621680096241] ((~>) [e6989586621680096242] [f6989586621680096243]))
data ZipWith5Sym4 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) (a6989586621680097816 :: [a6989586621680096238]) (a6989586621680097817 :: [b6989586621680096239]) (a6989586621680097818 :: [c6989586621680096240]) :: (~>) [d6989586621680096241] ((~>) [e6989586621680096242] [f6989586621680096243])
data ZipWith5Sym5 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) (a6989586621680097816 :: [a6989586621680096238]) (a6989586621680097817 :: [b6989586621680096239]) (a6989586621680097818 :: [c6989586621680096240]) (a6989586621680097819 :: [d6989586621680096241]) :: (~>) [e6989586621680096242] [f6989586621680096243]
type ZipWith5Sym6 (a6989586621680097815 :: (~>) a6989586621680096238 ((~>) b6989586621680096239 ((~>) c6989586621680096240 ((~>) d6989586621680096241 ((~>) e6989586621680096242 f6989586621680096243))))) (a6989586621680097816 :: [a6989586621680096238]) (a6989586621680097817 :: [b6989586621680096239]) (a6989586621680097818 :: [c6989586621680096240]) (a6989586621680097819 :: [d6989586621680096241]) (a6989586621680097820 :: [e6989586621680096242]) = ZipWith5 a6989586621680097815 a6989586621680097816 a6989586621680097817 a6989586621680097818 a6989586621680097819 a6989586621680097820
data ZipWith6Sym0 :: forall a6989586621680096231 b6989586621680096232 c6989586621680096233 d6989586621680096234 e6989586621680096235 f6989586621680096236 g6989586621680096237. (~>) ((~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) ((~>) [a6989586621680096231] ((~>) [b6989586621680096232] ((~>) [c6989586621680096233] ((~>) [d6989586621680096234] ((~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237]))))))
data ZipWith6Sym1 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) :: (~>) [a6989586621680096231] ((~>) [b6989586621680096232] ((~>) [c6989586621680096233] ((~>) [d6989586621680096234] ((~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237])))))
data ZipWith6Sym2 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) :: (~>) [b6989586621680096232] ((~>) [c6989586621680096233] ((~>) [d6989586621680096234] ((~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237]))))
data ZipWith6Sym3 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) (a6989586621680097790 :: [b6989586621680096232]) :: (~>) [c6989586621680096233] ((~>) [d6989586621680096234] ((~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237])))
data ZipWith6Sym4 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) (a6989586621680097790 :: [b6989586621680096232]) (a6989586621680097791 :: [c6989586621680096233]) :: (~>) [d6989586621680096234] ((~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237]))
data ZipWith6Sym5 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) (a6989586621680097790 :: [b6989586621680096232]) (a6989586621680097791 :: [c6989586621680096233]) (a6989586621680097792 :: [d6989586621680096234]) :: (~>) [e6989586621680096235] ((~>) [f6989586621680096236] [g6989586621680096237])
data ZipWith6Sym6 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) (a6989586621680097790 :: [b6989586621680096232]) (a6989586621680097791 :: [c6989586621680096233]) (a6989586621680097792 :: [d6989586621680096234]) (a6989586621680097793 :: [e6989586621680096235]) :: (~>) [f6989586621680096236] [g6989586621680096237]
type ZipWith6Sym7 (a6989586621680097788 :: (~>) a6989586621680096231 ((~>) b6989586621680096232 ((~>) c6989586621680096233 ((~>) d6989586621680096234 ((~>) e6989586621680096235 ((~>) f6989586621680096236 g6989586621680096237)))))) (a6989586621680097789 :: [a6989586621680096231]) (a6989586621680097790 :: [b6989586621680096232]) (a6989586621680097791 :: [c6989586621680096233]) (a6989586621680097792 :: [d6989586621680096234]) (a6989586621680097793 :: [e6989586621680096235]) (a6989586621680097794 :: [f6989586621680096236]) = ZipWith6 a6989586621680097788 a6989586621680097789 a6989586621680097790 a6989586621680097791 a6989586621680097792 a6989586621680097793 a6989586621680097794
data ZipWith7Sym0 :: forall a6989586621680096223 b6989586621680096224 c6989586621680096225 d6989586621680096226 e6989586621680096227 f6989586621680096228 g6989586621680096229 h6989586621680096230. (~>) ((~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) ((~>) [a6989586621680096223] ((~>) [b6989586621680096224] ((~>) [c6989586621680096225] ((~>) [d6989586621680096226] ((~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230])))))))
data ZipWith7Sym1 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) :: (~>) [a6989586621680096223] ((~>) [b6989586621680096224] ((~>) [c6989586621680096225] ((~>) [d6989586621680096226] ((~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230]))))))
data ZipWith7Sym2 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) :: (~>) [b6989586621680096224] ((~>) [c6989586621680096225] ((~>) [d6989586621680096226] ((~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230])))))
data ZipWith7Sym3 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) :: (~>) [c6989586621680096225] ((~>) [d6989586621680096226] ((~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230]))))
data ZipWith7Sym4 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) (a6989586621680097760 :: [c6989586621680096225]) :: (~>) [d6989586621680096226] ((~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230])))
data ZipWith7Sym5 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) (a6989586621680097760 :: [c6989586621680096225]) (a6989586621680097761 :: [d6989586621680096226]) :: (~>) [e6989586621680096227] ((~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230]))
data ZipWith7Sym6 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) (a6989586621680097760 :: [c6989586621680096225]) (a6989586621680097761 :: [d6989586621680096226]) (a6989586621680097762 :: [e6989586621680096227]) :: (~>) [f6989586621680096228] ((~>) [g6989586621680096229] [h6989586621680096230])
data ZipWith7Sym7 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) (a6989586621680097760 :: [c6989586621680096225]) (a6989586621680097761 :: [d6989586621680096226]) (a6989586621680097762 :: [e6989586621680096227]) (a6989586621680097763 :: [f6989586621680096228]) :: (~>) [g6989586621680096229] [h6989586621680096230]
type ZipWith7Sym8 (a6989586621680097757 :: (~>) a6989586621680096223 ((~>) b6989586621680096224 ((~>) c6989586621680096225 ((~>) d6989586621680096226 ((~>) e6989586621680096227 ((~>) f6989586621680096228 ((~>) g6989586621680096229 h6989586621680096230))))))) (a6989586621680097758 :: [a6989586621680096223]) (a6989586621680097759 :: [b6989586621680096224]) (a6989586621680097760 :: [c6989586621680096225]) (a6989586621680097761 :: [d6989586621680096226]) (a6989586621680097762 :: [e6989586621680096227]) (a6989586621680097763 :: [f6989586621680096228]) (a6989586621680097764 :: [g6989586621680096229]) = ZipWith7 a6989586621680097757 a6989586621680097758 a6989586621680097759 a6989586621680097760 a6989586621680097761 a6989586621680097762 a6989586621680097763 a6989586621680097764
data UnzipSym0 :: forall a6989586621679974127 b6989586621679974128. (~>) [(a6989586621679974127, b6989586621679974128)] ([a6989586621679974127], [b6989586621679974128])
type UnzipSym1 (a6989586621679978946 :: [(a6989586621679974127, b6989586621679974128)]) = Unzip a6989586621679978946
data Unzip3Sym0 :: forall a6989586621679974124 b6989586621679974125 c6989586621679974126. (~>) [(a6989586621679974124, b6989586621679974125, c6989586621679974126)] ([a6989586621679974124], [b6989586621679974125], [c6989586621679974126])
type Unzip3Sym1 (a6989586621679978925 :: [(a6989586621679974124, b6989586621679974125, c6989586621679974126)]) = Unzip3 a6989586621679978925
data Unzip4Sym0 :: forall a6989586621679974120 b6989586621679974121 c6989586621679974122 d6989586621679974123. (~>) [(a6989586621679974120, b6989586621679974121, c6989586621679974122, d6989586621679974123)] ([a6989586621679974120], [b6989586621679974121], [c6989586621679974122], [d6989586621679974123])
type Unzip4Sym1 (a6989586621679978902 :: [(a6989586621679974120, b6989586621679974121, c6989586621679974122, d6989586621679974123)]) = Unzip4 a6989586621679978902
data Unzip5Sym0 :: forall a6989586621679974115 b6989586621679974116 c6989586621679974117 d6989586621679974118 e6989586621679974119. (~>) [(a6989586621679974115, b6989586621679974116, c6989586621679974117, d6989586621679974118, e6989586621679974119)] ([a6989586621679974115], [b6989586621679974116], [c6989586621679974117], [d6989586621679974118], [e6989586621679974119])
type Unzip5Sym1 (a6989586621679978877 :: [(a6989586621679974115, b6989586621679974116, c6989586621679974117, d6989586621679974118, e6989586621679974119)]) = Unzip5 a6989586621679978877
data Unzip6Sym0 :: forall a6989586621679974109 b6989586621679974110 c6989586621679974111 d6989586621679974112 e6989586621679974113 f6989586621679974114. (~>) [(a6989586621679974109, b6989586621679974110, c6989586621679974111, d6989586621679974112, e6989586621679974113, f6989586621679974114)] ([a6989586621679974109], [b6989586621679974110], [c6989586621679974111], [d6989586621679974112], [e6989586621679974113], [f6989586621679974114])
type Unzip6Sym1 (a6989586621679978850 :: [(a6989586621679974109, b6989586621679974110, c6989586621679974111, d6989586621679974112, e6989586621679974113, f6989586621679974114)]) = Unzip6 a6989586621679978850
data Unzip7Sym0 :: forall a6989586621679974102 b6989586621679974103 c6989586621679974104 d6989586621679974105 e6989586621679974106 f6989586621679974107 g6989586621679974108. (~>) [(a6989586621679974102, b6989586621679974103, c6989586621679974104, d6989586621679974105, e6989586621679974106, f6989586621679974107, g6989586621679974108)] ([a6989586621679974102], [b6989586621679974103], [c6989586621679974104], [d6989586621679974105], [e6989586621679974106], [f6989586621679974107], [g6989586621679974108])
type Unzip7Sym1 (a6989586621679978821 :: [(a6989586621679974102, b6989586621679974103, c6989586621679974104, d6989586621679974105, e6989586621679974106, f6989586621679974107, g6989586621679974108)]) = Unzip7 a6989586621679978821
data UnlinesSym0 :: (~>) [Symbol] Symbol
type UnlinesSym1 (a6989586621679978817 :: [Symbol]) = Unlines a6989586621679978817
data UnwordsSym0 :: (~>) [Symbol] Symbol
type UnwordsSym1 (a6989586621679978806 :: [Symbol]) = Unwords a6989586621679978806
data NubSym0 :: forall a6989586621679974061. (~>) [a6989586621679974061] [a6989586621679974061]
type NubSym1 (a6989586621679978189 :: [a6989586621679974061]) = Nub a6989586621679978189
data DeleteSym0 :: forall a6989586621679974101. (~>) a6989586621679974101 ((~>) [a6989586621679974101] [a6989586621679974101])
data DeleteSym1 (a6989586621679978800 :: a6989586621679974101) :: (~>) [a6989586621679974101] [a6989586621679974101]
type DeleteSym2 (a6989586621679978800 :: a6989586621679974101) (a6989586621679978801 :: [a6989586621679974101]) = Delete a6989586621679978800 a6989586621679978801
data (\\@#@$) :: forall a6989586621679974100. (~>) [a6989586621679974100] ((~>) [a6989586621679974100] [a6989586621679974100])
infix 5 \\@#@$
data (\\@#@$$) (a6989586621679978790 :: [a6989586621679974100]) :: (~>) [a6989586621679974100] [a6989586621679974100]
infix 5 \\@#@$$
type (\\@#@$$$) (a6989586621679978790 :: [a6989586621679974100]) (a6989586621679978791 :: [a6989586621679974100]) = (\\) a6989586621679978790 a6989586621679978791
data UnionSym0 :: forall a6989586621679974057. (~>) [a6989586621679974057] ((~>) [a6989586621679974057] [a6989586621679974057])
data UnionSym1 (a6989586621679978139 :: [a6989586621679974057]) :: (~>) [a6989586621679974057] [a6989586621679974057]
type UnionSym2 (a6989586621679978139 :: [a6989586621679974057]) (a6989586621679978140 :: [a6989586621679974057]) = Union a6989586621679978139 a6989586621679978140
data IntersectSym0 :: forall a6989586621679974087. (~>) [a6989586621679974087] ((~>) [a6989586621679974087] [a6989586621679974087])
data IntersectSym1 (a6989586621679978584 :: [a6989586621679974087]) :: (~>) [a6989586621679974087] [a6989586621679974087]
type IntersectSym2 (a6989586621679978584 :: [a6989586621679974087]) (a6989586621679978585 :: [a6989586621679974087]) = Intersect a6989586621679978584 a6989586621679978585
data InsertSym0 :: forall a6989586621679974074. (~>) a6989586621679974074 ((~>) [a6989586621679974074] [a6989586621679974074])
data InsertSym1 (a6989586621679978347 :: a6989586621679974074) :: (~>) [a6989586621679974074] [a6989586621679974074]
type InsertSym2 (a6989586621679978347 :: a6989586621679974074) (a6989586621679978348 :: [a6989586621679974074]) = Insert a6989586621679978347 a6989586621679978348
data SortSym0 :: forall a6989586621679974073. (~>) [a6989586621679974073] [a6989586621679974073]
type SortSym1 (a6989586621679978344 :: [a6989586621679974073]) = Sort a6989586621679978344
data NubBySym0 :: forall a6989586621679974060. (~>) ((~>) a6989586621679974060 ((~>) a6989586621679974060 Bool)) ((~>) [a6989586621679974060] [a6989586621679974060])
data NubBySym1 (a6989586621679978164 :: (~>) a6989586621679974060 ((~>) a6989586621679974060 Bool)) :: (~>) [a6989586621679974060] [a6989586621679974060]
type NubBySym2 (a6989586621679978164 :: (~>) a6989586621679974060 ((~>) a6989586621679974060 Bool)) (a6989586621679978165 :: [a6989586621679974060]) = NubBy a6989586621679978164 a6989586621679978165
data DeleteBySym0 :: forall a6989586621679974099. (~>) ((~>) a6989586621679974099 ((~>) a6989586621679974099 Bool)) ((~>) a6989586621679974099 ((~>) [a6989586621679974099] [a6989586621679974099]))
data DeleteBySym1 (a6989586621679978768 :: (~>) a6989586621679974099 ((~>) a6989586621679974099 Bool)) :: (~>) a6989586621679974099 ((~>) [a6989586621679974099] [a6989586621679974099])
data DeleteBySym2 (a6989586621679978768 :: (~>) a6989586621679974099 ((~>) a6989586621679974099 Bool)) (a6989586621679978769 :: a6989586621679974099) :: (~>) [a6989586621679974099] [a6989586621679974099]
type DeleteBySym3 (a6989586621679978768 :: (~>) a6989586621679974099 ((~>) a6989586621679974099 Bool)) (a6989586621679978769 :: a6989586621679974099) (a6989586621679978770 :: [a6989586621679974099]) = DeleteBy a6989586621679978768 a6989586621679978769 a6989586621679978770
data DeleteFirstsBySym0 :: forall a6989586621679974098. (~>) ((~>) a6989586621679974098 ((~>) a6989586621679974098 Bool)) ((~>) [a6989586621679974098] ((~>) [a6989586621679974098] [a6989586621679974098]))
data DeleteFirstsBySym1 (a6989586621679978755 :: (~>) a6989586621679974098 ((~>) a6989586621679974098 Bool)) :: (~>) [a6989586621679974098] ((~>) [a6989586621679974098] [a6989586621679974098])
data DeleteFirstsBySym2 (a6989586621679978755 :: (~>) a6989586621679974098 ((~>) a6989586621679974098 Bool)) (a6989586621679978756 :: [a6989586621679974098]) :: (~>) [a6989586621679974098] [a6989586621679974098]
type DeleteFirstsBySym3 (a6989586621679978755 :: (~>) a6989586621679974098 ((~>) a6989586621679974098 Bool)) (a6989586621679978756 :: [a6989586621679974098]) (a6989586621679978757 :: [a6989586621679974098]) = DeleteFirstsBy a6989586621679978755 a6989586621679978756 a6989586621679978757
data UnionBySym0 :: forall a6989586621679974058. (~>) ((~>) a6989586621679974058 ((~>) a6989586621679974058 Bool)) ((~>) [a6989586621679974058] ((~>) [a6989586621679974058] [a6989586621679974058]))
data UnionBySym1 (a6989586621679978145 :: (~>) a6989586621679974058 ((~>) a6989586621679974058 Bool)) :: (~>) [a6989586621679974058] ((~>) [a6989586621679974058] [a6989586621679974058])
data UnionBySym2 (a6989586621679978145 :: (~>) a6989586621679974058 ((~>) a6989586621679974058 Bool)) (a6989586621679978146 :: [a6989586621679974058]) :: (~>) [a6989586621679974058] [a6989586621679974058]
type UnionBySym3 (a6989586621679978145 :: (~>) a6989586621679974058 ((~>) a6989586621679974058 Bool)) (a6989586621679978146 :: [a6989586621679974058]) (a6989586621679978147 :: [a6989586621679974058]) = UnionBy a6989586621679978145 a6989586621679978146 a6989586621679978147
data IntersectBySym0 :: forall a6989586621679974086. (~>) ((~>) a6989586621679974086 ((~>) a6989586621679974086 Bool)) ((~>) [a6989586621679974086] ((~>) [a6989586621679974086] [a6989586621679974086]))
data IntersectBySym1 (a6989586621679978548 :: (~>) a6989586621679974086 ((~>) a6989586621679974086 Bool)) :: (~>) [a6989586621679974086] ((~>) [a6989586621679974086] [a6989586621679974086])
data IntersectBySym2 (a6989586621679978548 :: (~>) a6989586621679974086 ((~>) a6989586621679974086 Bool)) (a6989586621679978549 :: [a6989586621679974086]) :: (~>) [a6989586621679974086] [a6989586621679974086]
type IntersectBySym3 (a6989586621679978548 :: (~>) a6989586621679974086 ((~>) a6989586621679974086 Bool)) (a6989586621679978549 :: [a6989586621679974086]) (a6989586621679978550 :: [a6989586621679974086]) = IntersectBy a6989586621679978548 a6989586621679978549 a6989586621679978550
data GroupBySym0 :: forall a6989586621679974072. (~>) ((~>) a6989586621679974072 ((~>) a6989586621679974072 Bool)) ((~>) [a6989586621679974072] [[a6989586621679974072]])
data GroupBySym1 (a6989586621679978311 :: (~>) a6989586621679974072 ((~>) a6989586621679974072 Bool)) :: (~>) [a6989586621679974072] [[a6989586621679974072]]
type GroupBySym2 (a6989586621679978311 :: (~>) a6989586621679974072 ((~>) a6989586621679974072 Bool)) (a6989586621679978312 :: [a6989586621679974072]) = GroupBy a6989586621679978311 a6989586621679978312
data SortBySym0 :: forall a6989586621679974097. (~>) ((~>) a6989586621679974097 ((~>) a6989586621679974097 Ordering)) ((~>) [a6989586621679974097] [a6989586621679974097])
data SortBySym1 (a6989586621679978747 :: (~>) a6989586621679974097 ((~>) a6989586621679974097 Ordering)) :: (~>) [a6989586621679974097] [a6989586621679974097]
type SortBySym2 (a6989586621679978747 :: (~>) a6989586621679974097 ((~>) a6989586621679974097 Ordering)) (a6989586621679978748 :: [a6989586621679974097]) = SortBy a6989586621679978747 a6989586621679978748
data InsertBySym0 :: forall a6989586621679974096. (~>) ((~>) a6989586621679974096 ((~>) a6989586621679974096 Ordering)) ((~>) a6989586621679974096 ((~>) [a6989586621679974096] [a6989586621679974096]))
data InsertBySym1 (a6989586621679978723 :: (~>) a6989586621679974096 ((~>) a6989586621679974096 Ordering)) :: (~>) a6989586621679974096 ((~>) [a6989586621679974096] [a6989586621679974096])
data InsertBySym2 (a6989586621679978723 :: (~>) a6989586621679974096 ((~>) a6989586621679974096 Ordering)) (a6989586621679978724 :: a6989586621679974096) :: (~>) [a6989586621679974096] [a6989586621679974096]
type InsertBySym3 (a6989586621679978723 :: (~>) a6989586621679974096 ((~>) a6989586621679974096 Ordering)) (a6989586621679978724 :: a6989586621679974096) (a6989586621679978725 :: [a6989586621679974096]) = InsertBy a6989586621679978723 a6989586621679978724 a6989586621679978725
data MaximumBySym0 :: forall a6989586621680490417 t6989586621680490416. (~>) ((~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) ((~>) (t6989586621680490416 a6989586621680490417) a6989586621680490417)
data MaximumBySym1 (a6989586621680490924 :: (~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) :: forall t6989586621680490416. (~>) (t6989586621680490416 a6989586621680490417) a6989586621680490417
type MaximumBySym2 (a6989586621680490924 :: (~>) a6989586621680490417 ((~>) a6989586621680490417 Ordering)) (a6989586621680490925 :: t6989586621680490416 a6989586621680490417) = MaximumBy a6989586621680490924 a6989586621680490925
data MinimumBySym0 :: forall a6989586621680490415 t6989586621680490414. (~>) ((~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) ((~>) (t6989586621680490414 a6989586621680490415) a6989586621680490415)
data MinimumBySym1 (a6989586621680490899 :: (~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) :: forall t6989586621680490414. (~>) (t6989586621680490414 a6989586621680490415) a6989586621680490415
type MinimumBySym2 (a6989586621680490899 :: (~>) a6989586621680490415 ((~>) a6989586621680490415 Ordering)) (a6989586621680490900 :: t6989586621680490414 a6989586621680490415) = MinimumBy a6989586621680490899 a6989586621680490900
data GenericLengthSym0 :: forall a6989586621679974056 i6989586621679974055. (~>) [a6989586621679974056] i6989586621679974055
type GenericLengthSym1 (a6989586621679978132 :: [a6989586621679974056]) = GenericLength a6989586621679978132
data GenericTakeSym0 :: forall i6989586621680096221 a6989586621680096222. (~>) i6989586621680096221 ((~>) [a6989586621680096222] [a6989586621680096222])
data GenericTakeSym1 (a6989586621680097751 :: i6989586621680096221) :: forall a6989586621680096222. (~>) [a6989586621680096222] [a6989586621680096222]
type GenericTakeSym2 (a6989586621680097751 :: i6989586621680096221) (a6989586621680097752 :: [a6989586621680096222]) = GenericTake a6989586621680097751 a6989586621680097752
data GenericDropSym0 :: forall i6989586621680096219 a6989586621680096220. (~>) i6989586621680096219 ((~>) [a6989586621680096220] [a6989586621680096220])
data GenericDropSym1 (a6989586621680097741 :: i6989586621680096219) :: forall a6989586621680096220. (~>) [a6989586621680096220] [a6989586621680096220]
type GenericDropSym2 (a6989586621680097741 :: i6989586621680096219) (a6989586621680097742 :: [a6989586621680096220]) = GenericDrop a6989586621680097741 a6989586621680097742
data GenericSplitAtSym0 :: forall i6989586621680096217 a6989586621680096218. (~>) i6989586621680096217 ((~>) [a6989586621680096218] ([a6989586621680096218], [a6989586621680096218]))
data GenericSplitAtSym1 (a6989586621680097731 :: i6989586621680096217) :: forall a6989586621680096218. (~>) [a6989586621680096218] ([a6989586621680096218], [a6989586621680096218])
type GenericSplitAtSym2 (a6989586621680097731 :: i6989586621680096217) (a6989586621680097732 :: [a6989586621680096218]) = GenericSplitAt a6989586621680097731 a6989586621680097732
data GenericIndexSym0 :: forall a6989586621680096216 i6989586621680096215. (~>) [a6989586621680096216] ((~>) i6989586621680096215 a6989586621680096216)
data GenericIndexSym1 (a6989586621680097721 :: [a6989586621680096216]) :: forall i6989586621680096215. (~>) i6989586621680096215 a6989586621680096216
type GenericIndexSym2 (a6989586621680097721 :: [a6989586621680096216]) (a6989586621680097722 :: i6989586621680096215) = GenericIndex a6989586621680097721 a6989586621680097722
data GenericReplicateSym0 :: forall i6989586621680096213 a6989586621680096214. (~>) i6989586621680096213 ((~>) a6989586621680096214 [a6989586621680096214])
data GenericReplicateSym1 (a6989586621680097711 :: i6989586621680096213) :: forall a6989586621680096214. (~>) a6989586621680096214 [a6989586621680096214]
type GenericReplicateSym2 (a6989586621680097711 :: i6989586621680096213) (a6989586621680097712 :: a6989586621680096214) = GenericReplicate a6989586621680097711 a6989586621680097712
-- | Defines the promoted and singled versions of the MonadZip type
-- class.
module Data.Singletons.Prelude.Monad.Zip
class PMonadZip (m_a8TVN :: Type -> Type) where {
type family Mzip (arg_a8TX1 :: m_a8TVN a_a8TVO) (arg_a8TX2 :: m_a8TVN b_a8TVP) :: m_a8TVN (a_a8TVO, b_a8TVP);
type family MzipWith (arg_a8TX5 :: (~>) a_a8TVQ ((~>) b_a8TVR c_a8TVS)) (arg_a8TX6 :: m_a8TVN a_a8TVQ) (arg_a8TX7 :: m_a8TVN b_a8TVR) :: m_a8TVN c_a8TVS;
type family Munzip (arg_a8TXb :: m_a8TVN (a_a8TVT, b_a8TVU)) :: (m_a8TVN a_a8TVT, m_a8TVN b_a8TVU);
type Mzip a_a8TXd a_a8TXe = Apply (Apply Mzip_6989586621681131509Sym0 a_a8TXd) a_a8TXe;
type MzipWith a_a8TXt a_a8TXu a_a8TXv = Apply (Apply (Apply MzipWith_6989586621681131526Sym0 a_a8TXt) a_a8TXu) a_a8TXv;
type Munzip a_a8TXK = Apply Munzip_6989586621681131541Sym0 a_a8TXK;
}
class SMonad m_a8TVN => SMonadZip (m_a8TVN :: Type -> Type)
sMzip :: forall a_a8TVO b_a8TVP (t_a8U1V :: m_a8TVN a_a8TVO) (t_a8U1W :: m_a8TVN b_a8TVP). SMonadZip m_a8TVN => Sing t_a8U1V -> Sing t_a8U1W -> Sing (Apply (Apply MzipSym0 t_a8U1V) t_a8U1W :: m_a8TVN (a_a8TVO, b_a8TVP))
sMzipWith :: forall a_a8TVQ b_a8TVR c_a8TVS (t_a8U1Z :: (~>) a_a8TVQ ((~>) b_a8TVR c_a8TVS)) (t_a8U20 :: m_a8TVN a_a8TVQ) (t_a8U21 :: m_a8TVN b_a8TVR). SMonadZip m_a8TVN => Sing t_a8U1Z -> Sing t_a8U20 -> Sing t_a8U21 -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8U1Z) t_a8U20) t_a8U21 :: m_a8TVN c_a8TVS)
sMunzip :: forall a_a8TVT b_a8TVU (t_a8U25 :: m_a8TVN (a_a8TVT, b_a8TVU)). SMonadZip m_a8TVN => Sing t_a8U25 -> Sing (Apply MunzipSym0 t_a8U25 :: (m_a8TVN a_a8TVT, m_a8TVN b_a8TVU))
sMzip :: forall a_a8TVO b_a8TVP (t_a8U1V :: m_a8TVN a_a8TVO) (t_a8U1W :: m_a8TVN b_a8TVP). (SMonadZip m_a8TVN, (Apply (Apply MzipSym0 t_a8U1V) t_a8U1W :: m_a8TVN (a_a8TVO, b_a8TVP)) ~ Apply (Apply Mzip_6989586621681131509Sym0 t_a8U1V) t_a8U1W) => Sing t_a8U1V -> Sing t_a8U1W -> Sing (Apply (Apply MzipSym0 t_a8U1V) t_a8U1W :: m_a8TVN (a_a8TVO, b_a8TVP))
sMzipWith :: forall a_a8TVQ b_a8TVR c_a8TVS (t_a8U1Z :: (~>) a_a8TVQ ((~>) b_a8TVR c_a8TVS)) (t_a8U20 :: m_a8TVN a_a8TVQ) (t_a8U21 :: m_a8TVN b_a8TVR). (SMonadZip m_a8TVN, (Apply (Apply (Apply MzipWithSym0 t_a8U1Z) t_a8U20) t_a8U21 :: m_a8TVN c_a8TVS) ~ Apply (Apply (Apply MzipWith_6989586621681131526Sym0 t_a8U1Z) t_a8U20) t_a8U21) => Sing t_a8U1Z -> Sing t_a8U20 -> Sing t_a8U21 -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8U1Z) t_a8U20) t_a8U21 :: m_a8TVN c_a8TVS)
sMunzip :: forall a_a8TVT b_a8TVU (t_a8U25 :: m_a8TVN (a_a8TVT, b_a8TVU)). (SMonadZip m_a8TVN, (Apply MunzipSym0 t_a8U25 :: (m_a8TVN a_a8TVT, m_a8TVN b_a8TVU)) ~ Apply Munzip_6989586621681131541Sym0 t_a8U25) => Sing t_a8U25 -> Sing (Apply MunzipSym0 t_a8U25 :: (m_a8TVN a_a8TVT, m_a8TVN b_a8TVU))
data MzipSym0 :: forall m6989586621681131419 a6989586621681131420 b6989586621681131421. (~>) (m6989586621681131419 a6989586621681131420) ((~>) (m6989586621681131419 b6989586621681131421) (m6989586621681131419 (a6989586621681131420, b6989586621681131421)))
data MzipSym1 (arg6989586621681131495 :: m6989586621681131419 a6989586621681131420) :: forall b6989586621681131421. (~>) (m6989586621681131419 b6989586621681131421) (m6989586621681131419 (a6989586621681131420, b6989586621681131421))
type MzipSym2 (arg6989586621681131495 :: m6989586621681131419 a6989586621681131420) (arg6989586621681131496 :: m6989586621681131419 b6989586621681131421) = Mzip arg6989586621681131495 arg6989586621681131496
data MzipWithSym0 :: forall a6989586621681131422 b6989586621681131423 c6989586621681131424 m6989586621681131419. (~>) ((~>) a6989586621681131422 ((~>) b6989586621681131423 c6989586621681131424)) ((~>) (m6989586621681131419 a6989586621681131422) ((~>) (m6989586621681131419 b6989586621681131423) (m6989586621681131419 c6989586621681131424)))
data MzipWithSym1 (arg6989586621681131499 :: (~>) a6989586621681131422 ((~>) b6989586621681131423 c6989586621681131424)) :: forall m6989586621681131419. (~>) (m6989586621681131419 a6989586621681131422) ((~>) (m6989586621681131419 b6989586621681131423) (m6989586621681131419 c6989586621681131424))
data MzipWithSym2 (arg6989586621681131499 :: (~>) a6989586621681131422 ((~>) b6989586621681131423 c6989586621681131424)) (arg6989586621681131500 :: m6989586621681131419 a6989586621681131422) :: (~>) (m6989586621681131419 b6989586621681131423) (m6989586621681131419 c6989586621681131424)
type MzipWithSym3 (arg6989586621681131499 :: (~>) a6989586621681131422 ((~>) b6989586621681131423 c6989586621681131424)) (arg6989586621681131500 :: m6989586621681131419 a6989586621681131422) (arg6989586621681131501 :: m6989586621681131419 b6989586621681131423) = MzipWith arg6989586621681131499 arg6989586621681131500 arg6989586621681131501
data MunzipSym0 :: forall m6989586621681131419 a6989586621681131425 b6989586621681131426. (~>) (m6989586621681131419 (a6989586621681131425, b6989586621681131426)) (m6989586621681131419 a6989586621681131425, m6989586621681131419 b6989586621681131426)
type MunzipSym1 (arg6989586621681131505 :: m6989586621681131419 (a6989586621681131425, b6989586621681131426)) = Munzip arg6989586621681131505
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip []
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Functor.Identity.Identity
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Semigroup.Internal.Dual
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Semigroup.Internal.Sum
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Semigroup.Internal.Product
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip GHC.Maybe.Maybe
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Monoid.First
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip Data.Monoid.Last
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.Zip.MzipSym0
instance forall (m :: * -> *) a b (d :: m a). (Data.Singletons.Prelude.Monad.Zip.SMonadZip m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.Zip.MzipSym1 d)
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.Zip.MzipWithSym0
instance forall a b c (m :: * -> *) (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)). (Data.Singletons.Prelude.Monad.Zip.SMonadZip m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.Zip.MzipWithSym1 d)
instance forall a b c (m :: * -> *) (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)) (d2 :: m a). (Data.Singletons.Prelude.Monad.Zip.SMonadZip m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.Zip.MzipWithSym2 d1 d2)
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.Zip.MunzipSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131779Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.Last
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131776 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131779Sym1 a6989586621681131776)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131777 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131776 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131779Sym2 a6989586621681131777 a6989586621681131776)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131756Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.First
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131753 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131756Sym1 a6989586621681131753)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131754 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131753 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131756Sym2 a6989586621681131754 a6989586621681131753)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131733Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Maybe.Maybe
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131730 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131733Sym1 a6989586621681131730)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131731 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131730 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131733Sym2 a6989586621681131731 a6989586621681131730)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131710Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Product
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131707 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131710Sym1 a6989586621681131707)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131708 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131707 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131710Sym2 a6989586621681131708 a6989586621681131707)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131687Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Sum
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131684 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131687Sym1 a6989586621681131684)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131685 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131684 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131687Sym2 a6989586621681131685 a6989586621681131684)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131664Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Dual
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131661 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131664Sym1 a6989586621681131661)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131662 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131661 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131664Sym2 a6989586621681131662 a6989586621681131661)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681131654Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Functor.Identity.Identity
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131633Sym0
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131630 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131633Sym1 a6989586621681131630)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131631 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131630 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131633Sym2 a6989586621681131631 a6989586621681131630)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681131622Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip []
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131601Sym0
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131598 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131601Sym1 a6989586621681131598)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131599 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131598 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131601Sym2 a6989586621681131599 a6989586621681131598)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681131584Sym0
instance forall (m6989586621681131419 :: * -> *) a6989586621681131420 b6989586621681131421 (a6989586621681131582 :: m6989586621681131419 a6989586621681131420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681131584Sym1 a6989586621681131582)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MunzipSym0
instance forall (m6989586621681131419 :: * -> *) a6989586621681131420 b6989586621681131421 (arg6989586621681131495 :: m6989586621681131419 a6989586621681131420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipSym1 arg6989586621681131495)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipSym0
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (arg6989586621681131500 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (arg6989586621681131499 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym2 arg6989586621681131500 arg6989586621681131499)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (arg6989586621681131499 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym1 arg6989586621681131499)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWithSym0
instance forall (m6989586621681131419 :: * -> *) a6989586621681131420 b6989586621681131421 (a6989586621681131507 :: m6989586621681131419 a6989586621681131420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681131509Sym1 a6989586621681131507)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681131509Sym0
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131524 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681131523 :: m6989586621681131419 a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131526Sym2 a6989586621681131524 a6989586621681131523)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (m6989586621681131419 :: * -> *) (a6989586621681131523 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131526Sym1 a6989586621681131523)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681131526Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681131541Sym0
-- | Defines functions and datatypes relating to the singleton for
-- NonEmpty, including a singletons version 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.Singletons.Prelude.List.NonEmpty
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SNonEmpty :: forall a_afBu. NonEmpty a_afBu -> Type
[:%|] :: forall a_afBu (n_a1hso :: a_afBu) (n_a1hsp :: [a_afBu]). () => Sing (n_a1hso :: a_afBu) -> Sing (n_a1hsp :: [a_afBu]) -> SNonEmpty ('(:|) n_a1hso n_a1hsp)
infixr 5 :%|
type family Map (a_a92HH :: (~>) a_a92hF b_a92hG) (a_a92HI :: NonEmpty a_a92hF) :: NonEmpty b_a92hG
sMap :: forall a_a92hF b_a92hG (t_a92MN :: (~>) a_a92hF b_a92hG) (t_a92MO :: NonEmpty a_a92hF). Sing t_a92MN -> Sing t_a92MO -> Sing (Apply (Apply MapSym0 t_a92MN) t_a92MO :: NonEmpty b_a92hG)
type family Intersperse (a_a92GF :: a_a92hv) (a_a92GG :: NonEmpty a_a92hv) :: NonEmpty a_a92hv
sIntersperse :: forall a_a92hv (t_a92Mh :: a_a92hv) (t_a92Mi :: NonEmpty a_a92hv). Sing t_a92Mh -> Sing t_a92Mi -> Sing (Apply (Apply IntersperseSym0 t_a92Mh) t_a92Mi :: NonEmpty a_a92hv)
type family Scanl (a_a92He :: (~>) b_a92hA ((~>) a_a92hB b_a92hA)) (a_a92Hf :: b_a92hA) (a_a92Hg :: [a_a92hB]) :: NonEmpty b_a92hA
sScanl :: forall b_a92hA a_a92hB (t_a92Mz :: (~>) b_a92hA ((~>) a_a92hB b_a92hA)) (t_a92MA :: b_a92hA) (t_a92MB :: [a_a92hB]). Sing t_a92Mz -> Sing t_a92MA -> Sing t_a92MB -> Sing (Apply (Apply (Apply ScanlSym0 t_a92Mz) t_a92MA) t_a92MB :: NonEmpty b_a92hA)
type family Scanr (a_a92H3 :: (~>) a_a92hy ((~>) b_a92hz b_a92hz)) (a_a92H4 :: b_a92hz) (a_a92H5 :: [a_a92hy]) :: NonEmpty b_a92hz
sScanr :: forall a_a92hy b_a92hz (t_a92Mt :: (~>) a_a92hy ((~>) b_a92hz b_a92hz)) (t_a92Mu :: b_a92hz) (t_a92Mv :: [a_a92hy]). Sing t_a92Mt -> Sing t_a92Mu -> Sing t_a92Mv -> Sing (Apply (Apply (Apply ScanrSym0 t_a92Mt) t_a92Mu) t_a92Mv :: NonEmpty b_a92hz)
type family Scanl1 (a_a92GW :: (~>) a_a92hx ((~>) a_a92hx a_a92hx)) (a_a92GX :: NonEmpty a_a92hx) :: NonEmpty a_a92hx
sScanl1 :: forall a_a92hx (t_a92Mp :: (~>) a_a92hx ((~>) a_a92hx a_a92hx)) (t_a92Mq :: NonEmpty a_a92hx). Sing t_a92Mp -> Sing t_a92Mq -> Sing (Apply (Apply Scanl1Sym0 t_a92Mp) t_a92Mq :: NonEmpty a_a92hx)
type family Scanr1 (a_a92GP :: (~>) a_a92hw ((~>) a_a92hw a_a92hw)) (a_a92GQ :: NonEmpty a_a92hw) :: NonEmpty a_a92hw
sScanr1 :: forall a_a92hw (t_a92Ml :: (~>) a_a92hw ((~>) a_a92hw a_a92hw)) (t_a92Mm :: NonEmpty a_a92hw). Sing t_a92Ml -> Sing t_a92Mm -> Sing (Apply (Apply Scanr1Sym0 t_a92Ml) t_a92Mm :: NonEmpty a_a92hw)
type family Transpose (a_a92BU :: NonEmpty (NonEmpty a_a92gX)) :: NonEmpty (NonEmpty a_a92gX)
sTranspose :: forall a_a92gX (t_a92KL :: NonEmpty (NonEmpty a_a92gX)). Sing t_a92KL -> Sing (Apply TransposeSym0 t_a92KL :: NonEmpty (NonEmpty a_a92gX))
type family SortBy (a_a92BK :: (~>) a_a92gW ((~>) a_a92gW Ordering)) (a_a92BL :: NonEmpty a_a92gW) :: NonEmpty a_a92gW
sSortBy :: forall a_a92gW (t_a92KH :: (~>) a_a92gW ((~>) a_a92gW Ordering)) (t_a92KI :: NonEmpty a_a92gW). Sing t_a92KH -> Sing t_a92KI -> Sing (Apply (Apply SortBySym0 t_a92KH) t_a92KI :: NonEmpty a_a92gW)
type family SortWith (a_a92BE :: (~>) a_a92gV o_a92gU) (a_a92BF :: NonEmpty a_a92gV) :: NonEmpty a_a92gV
sSortWith :: forall a_a92gV o_a92gU (t_a92KD :: (~>) a_a92gV o_a92gU) (t_a92KE :: NonEmpty a_a92gV). SOrd o_a92gU => Sing t_a92KD -> Sing t_a92KE -> Sing (Apply (Apply SortWithSym0 t_a92KD) t_a92KE :: NonEmpty a_a92gV)
type family Length (a_a92JH :: NonEmpty a_a92hY) :: Nat
sLength :: forall a_a92hY (t_a92Nv :: NonEmpty a_a92hY). Sing t_a92Nv -> Sing (Apply LengthSym0 t_a92Nv :: Nat)
type family Head (a_a92IB :: NonEmpty a_a92hR) :: a_a92hR
sHead :: forall a_a92hR (t_a92Nf :: NonEmpty a_a92hR). Sing t_a92Nf -> Sing (Apply HeadSym0 t_a92Nf :: a_a92hR)
type family Tail (a_a92Iy :: NonEmpty a_a92hQ) :: [a_a92hQ]
sTail :: forall a_a92hQ (t_a92Nd :: NonEmpty a_a92hQ). Sing t_a92Nd -> Sing (Apply TailSym0 t_a92Nd :: [a_a92hQ])
type family Last (a_a92Iu :: NonEmpty a_a92hP) :: a_a92hP
sLast :: forall a_a92hP (t_a92Nb :: NonEmpty a_a92hP). Sing t_a92Nb -> Sing (Apply LastSym0 t_a92Nb :: a_a92hP)
type family Init (a_a92Iq :: NonEmpty a_a92hO) :: [a_a92hO]
sInit :: forall a_a92hO (t_a92N9 :: NonEmpty a_a92hO). Sing t_a92N9 -> Sing (Apply InitSym0 t_a92N9 :: [a_a92hO])
type family (<|) (a_a92Ij :: a_a92hN) (a_a92Ik :: NonEmpty a_a92hN) :: NonEmpty a_a92hN
(%<|) :: forall a_a92hN (t_a92N5 :: a_a92hN) (t_a92N6 :: NonEmpty a_a92hN). Sing t_a92N5 -> Sing t_a92N6 -> Sing (Apply (Apply (<|@#@$) t_a92N5) t_a92N6 :: NonEmpty a_a92hN)
type family Cons (a_a92Id :: a_a92hM) (a_a92Ie :: NonEmpty a_a92hM) :: NonEmpty a_a92hM
sCons :: forall a_a92hM (t_a92N1 :: a_a92hM) (t_a92N2 :: NonEmpty a_a92hM). Sing t_a92N1 -> Sing t_a92N2 -> Sing (Apply (Apply ConsSym0 t_a92N1) t_a92N2 :: NonEmpty a_a92hM)
type family Uncons (a_a92J7 :: NonEmpty a_a92hU) :: (a_a92hU, Maybe (NonEmpty a_a92hU))
sUncons :: forall a_a92hU (t_a92Nl :: NonEmpty a_a92hU). Sing t_a92Nl -> Sing (Apply UnconsSym0 t_a92Nl :: (a_a92hU, Maybe (NonEmpty a_a92hU)))
type family Unfoldr (a_a92IE :: (~>) a_a92hS (b_a92hT, Maybe a_a92hS)) (a_a92IF :: a_a92hS) :: NonEmpty b_a92hT
sUnfoldr :: forall a_a92hS b_a92hT (t_a92Nh :: (~>) a_a92hS (b_a92hT, Maybe a_a92hS)) (t_a92Ni :: a_a92hS). Sing t_a92Nh -> Sing t_a92Ni -> Sing (Apply (Apply UnfoldrSym0 t_a92Nh) t_a92Ni :: NonEmpty b_a92hT)
type family Sort (a_a92I6 :: NonEmpty a_a92hL) :: NonEmpty a_a92hL
sSort :: forall a_a92hL (t_a92MZ :: NonEmpty a_a92hL). SOrd a_a92hL => Sing t_a92MZ -> Sing (Apply SortSym0 t_a92MZ :: NonEmpty a_a92hL)
type family Reverse (a_a92GC :: NonEmpty a_a92hu) :: NonEmpty a_a92hu
sReverse :: forall a_a92hu (t_a92Mf :: NonEmpty a_a92hu). Sing t_a92Mf -> Sing (Apply ReverseSym0 t_a92Mf :: NonEmpty a_a92hu)
type family Inits (a_a92HE :: [a_a92hE]) :: NonEmpty [a_a92hE]
sInits :: forall a_a92hE (t_a92ML :: [a_a92hE]). Sing t_a92ML -> Sing (Apply InitsSym0 t_a92ML :: NonEmpty [a_a92hE])
type family Tails (a_a92Hz :: [a_a92hD]) :: NonEmpty [a_a92hD]
sTails :: forall a_a92hD (t_a92MJ :: [a_a92hD]). Sing t_a92MJ -> Sing (Apply TailsSym0 t_a92MJ :: NonEmpty [a_a92hD])
type family Unfold (a_a92Jf :: (~>) a_a92hW (b_a92hX, Maybe a_a92hW)) (a_a92Jg :: a_a92hW) :: NonEmpty b_a92hX
sUnfold :: forall a_a92hW b_a92hX (t_a92Np :: (~>) a_a92hW (b_a92hX, Maybe a_a92hW)) (t_a92Nq :: a_a92hW). Sing t_a92Np -> Sing t_a92Nq -> Sing (Apply (Apply UnfoldSym0 t_a92Np) t_a92Nq :: NonEmpty b_a92hX)
type family Insert (a_a92Hp :: a_a92hC) (a_a92Hq :: [a_a92hC]) :: NonEmpty a_a92hC
sInsert :: forall a_a92hC (t_a92MF :: a_a92hC) (t_a92MG :: [a_a92hC]). SOrd a_a92hC => Sing t_a92MF -> Sing t_a92MG -> Sing (Apply (Apply InsertSym0 t_a92MF) t_a92MG :: NonEmpty a_a92hC)
type family Take (a_a92Gs :: Nat) (a_a92Gt :: NonEmpty a_a92ht) :: [a_a92ht]
sTake :: forall a_a92ht (t_a92Mb :: Nat) (t_a92Mc :: NonEmpty a_a92ht). Sing t_a92Mb -> Sing t_a92Mc -> Sing (Apply (Apply TakeSym0 t_a92Mb) t_a92Mc :: [a_a92ht])
type family Drop (a_a92Gk :: Nat) (a_a92Gl :: NonEmpty a_a92hs) :: [a_a92hs]
sDrop :: forall a_a92hs (t_a92M7 :: Nat) (t_a92M8 :: NonEmpty a_a92hs). Sing t_a92M7 -> Sing t_a92M8 -> Sing (Apply (Apply DropSym0 t_a92M7) t_a92M8 :: [a_a92hs])
type family SplitAt (a_a92Gc :: Nat) (a_a92Gd :: NonEmpty a_a92hr) :: ([a_a92hr], [a_a92hr])
sSplitAt :: forall a_a92hr (t_a92M3 :: Nat) (t_a92M4 :: NonEmpty a_a92hr). Sing t_a92M3 -> Sing t_a92M4 -> Sing (Apply (Apply SplitAtSym0 t_a92M3) t_a92M4 :: ([a_a92hr], [a_a92hr]))
type family TakeWhile (a_a92G4 :: (~>) a_a92hq Bool) (a_a92G5 :: NonEmpty a_a92hq) :: [a_a92hq]
sTakeWhile :: forall a_a92hq (t_a92LZ :: (~>) a_a92hq Bool) (t_a92M0 :: NonEmpty a_a92hq). Sing t_a92LZ -> Sing t_a92M0 -> Sing (Apply (Apply TakeWhileSym0 t_a92LZ) t_a92M0 :: [a_a92hq])
type family DropWhile (a_a92FW :: (~>) a_a92hp Bool) (a_a92FX :: NonEmpty a_a92hp) :: [a_a92hp]
sDropWhile :: forall a_a92hp (t_a92LV :: (~>) a_a92hp Bool) (t_a92LW :: NonEmpty a_a92hp). Sing t_a92LV -> Sing t_a92LW -> Sing (Apply (Apply DropWhileSym0 t_a92LV) t_a92LW :: [a_a92hp])
type family Span (a_a92FO :: (~>) a_a92ho Bool) (a_a92FP :: NonEmpty a_a92ho) :: ([a_a92ho], [a_a92ho])
sSpan :: forall a_a92ho (t_a92LR :: (~>) a_a92ho Bool) (t_a92LS :: NonEmpty a_a92ho). Sing t_a92LR -> Sing t_a92LS -> Sing (Apply (Apply SpanSym0 t_a92LR) t_a92LS :: ([a_a92ho], [a_a92ho]))
type family Break (a_a92FG :: (~>) a_a92hn Bool) (a_a92FH :: NonEmpty a_a92hn) :: ([a_a92hn], [a_a92hn])
sBreak :: forall a_a92hn (t_a92LN :: (~>) a_a92hn Bool) (t_a92LO :: NonEmpty a_a92hn). Sing t_a92LN -> Sing t_a92LO -> Sing (Apply (Apply BreakSym0 t_a92LN) t_a92LO :: ([a_a92hn], [a_a92hn]))
type family Filter (a_a92Fy :: (~>) a_a92hm Bool) (a_a92Fz :: NonEmpty a_a92hm) :: [a_a92hm]
sFilter :: forall a_a92hm (t_a92LJ :: (~>) a_a92hm Bool) (t_a92LK :: NonEmpty a_a92hm). Sing t_a92LJ -> Sing t_a92LK -> Sing (Apply (Apply FilterSym0 t_a92LJ) t_a92LK :: [a_a92hm])
type family Partition (a_a92Fq :: (~>) a_a92hl Bool) (a_a92Fr :: NonEmpty a_a92hl) :: ([a_a92hl], [a_a92hl])
sPartition :: forall a_a92hl (t_a92LF :: (~>) a_a92hl Bool) (t_a92LG :: NonEmpty a_a92hl). Sing t_a92LF -> Sing t_a92LG -> Sing (Apply (Apply PartitionSym0 t_a92LF) t_a92LG :: ([a_a92hl], [a_a92hl]))
type family Group (a_a92Fn :: [a_a92hk]) :: [NonEmpty a_a92hk]
sGroup :: forall a_a92hk (t_a92LD :: [a_a92hk]). SEq a_a92hk => Sing t_a92LD -> Sing (Apply GroupSym0 t_a92LD :: [NonEmpty a_a92hk])
type family GroupBy (a_a92Ez :: (~>) a_a92hj ((~>) a_a92hj Bool)) (a_a92EA :: [a_a92hj]) :: [NonEmpty a_a92hj]
sGroupBy :: forall a_a92hj (t_a92Lz :: (~>) a_a92hj ((~>) a_a92hj Bool)) (t_a92LA :: [a_a92hj]). Sing t_a92Lz -> Sing t_a92LA -> Sing (Apply (Apply GroupBySym0 t_a92Lz) t_a92LA :: [NonEmpty a_a92hj])
type family GroupWith (a_a92Er :: (~>) a_a92hi b_a92hh) (a_a92Es :: [a_a92hi]) :: [NonEmpty a_a92hi]
sGroupWith :: forall a_a92hi b_a92hh (t_a92Lv :: (~>) a_a92hi b_a92hh) (t_a92Lw :: [a_a92hi]). SEq b_a92hh => Sing t_a92Lv -> Sing t_a92Lw -> Sing (Apply (Apply GroupWithSym0 t_a92Lv) t_a92Lw :: [NonEmpty a_a92hi])
type family GroupAllWith (a_a92Ej :: (~>) a_a92hg b_a92hf) (a_a92Ek :: [a_a92hg]) :: [NonEmpty a_a92hg]
sGroupAllWith :: forall a_a92hg b_a92hf (t_a92Lr :: (~>) a_a92hg b_a92hf) (t_a92Ls :: [a_a92hg]). SOrd b_a92hf => Sing t_a92Lr -> Sing t_a92Ls -> Sing (Apply (Apply GroupAllWithSym0 t_a92Lr) t_a92Ls :: [NonEmpty a_a92hg])
type family Group1 (a_a92Eg :: NonEmpty a_a92he) :: NonEmpty (NonEmpty a_a92he)
sGroup1 :: forall a_a92he (t_a92Lp :: NonEmpty a_a92he). SEq a_a92he => Sing t_a92Lp -> Sing (Apply Group1Sym0 t_a92Lp :: NonEmpty (NonEmpty a_a92he))
type family GroupBy1 (a_a92DJ :: (~>) a_a92hd ((~>) a_a92hd Bool)) (a_a92DK :: NonEmpty a_a92hd) :: NonEmpty (NonEmpty a_a92hd)
sGroupBy1 :: forall a_a92hd (t_a92Ll :: (~>) a_a92hd ((~>) a_a92hd Bool)) (t_a92Lm :: NonEmpty a_a92hd). Sing t_a92Ll -> Sing t_a92Lm -> Sing (Apply (Apply GroupBy1Sym0 t_a92Ll) t_a92Lm :: NonEmpty (NonEmpty a_a92hd))
type family GroupWith1 (a_a92DB :: (~>) a_a92hc b_a92hb) (a_a92DC :: NonEmpty a_a92hc) :: NonEmpty (NonEmpty a_a92hc)
sGroupWith1 :: forall a_a92hc b_a92hb (t_a92Lh :: (~>) a_a92hc b_a92hb) (t_a92Li :: NonEmpty a_a92hc). SEq b_a92hb => Sing t_a92Lh -> Sing t_a92Li -> Sing (Apply (Apply GroupWith1Sym0 t_a92Lh) t_a92Li :: NonEmpty (NonEmpty a_a92hc))
type family GroupAllWith1 (a_a92Dt :: (~>) a_a92ha b_a92h9) (a_a92Du :: NonEmpty a_a92ha) :: NonEmpty (NonEmpty a_a92ha)
sGroupAllWith1 :: forall a_a92ha b_a92h9 (t_a92Ld :: (~>) a_a92ha b_a92h9) (t_a92Le :: NonEmpty a_a92ha). SOrd b_a92h9 => Sing t_a92Ld -> Sing t_a92Le -> Sing (Apply (Apply GroupAllWith1Sym0 t_a92Ld) t_a92Le :: NonEmpty (NonEmpty a_a92ha))
type family IsPrefixOf (a_a92Dl :: [a_a92h8]) (a_a92Dm :: NonEmpty a_a92h8) :: Bool
sIsPrefixOf :: forall a_a92h8 (t_a92L9 :: [a_a92h8]) (t_a92La :: NonEmpty a_a92h8). SEq a_a92h8 => Sing t_a92L9 -> Sing t_a92La -> Sing (Apply (Apply IsPrefixOfSym0 t_a92L9) t_a92La :: Bool)
type family Nub (a_a92Ce :: NonEmpty a_a92gZ) :: NonEmpty a_a92gZ
sNub :: forall a_a92gZ (t_a92KR :: NonEmpty a_a92gZ). SEq a_a92gZ => Sing t_a92KR -> Sing (Apply NubSym0 t_a92KR :: NonEmpty a_a92gZ)
type family NubBy (a_a92BX :: (~>) a_a92gY ((~>) a_a92gY Bool)) (a_a92BY :: NonEmpty a_a92gY) :: NonEmpty a_a92gY
sNubBy :: forall a_a92gY (t_a92KN :: (~>) a_a92gY ((~>) a_a92gY Bool)) (t_a92KO :: NonEmpty a_a92gY). Sing t_a92KN -> Sing t_a92KO -> Sing (Apply (Apply NubBySym0 t_a92KN) t_a92KO :: NonEmpty a_a92gY)
type family (!!) (a_a92D3 :: NonEmpty a_a92h7) (a_a92D4 :: Nat) :: a_a92h7
(%!!) :: forall a_a92h7 (t_a92L5 :: NonEmpty a_a92h7) (t_a92L6 :: Nat). Sing t_a92L5 -> Sing t_a92L6 -> Sing (Apply (Apply (!!@#@$) t_a92L5) t_a92L6 :: a_a92h7)
type family Zip (a_a92CV :: NonEmpty a_a92h5) (a_a92CW :: NonEmpty b_a92h6) :: NonEmpty (a_a92h5, b_a92h6)
sZip :: forall a_a92h5 b_a92h6 (t_a92L1 :: NonEmpty a_a92h5) (t_a92L2 :: NonEmpty b_a92h6). Sing t_a92L1 -> Sing t_a92L2 -> Sing (Apply (Apply ZipSym0 t_a92L1) t_a92L2 :: NonEmpty (a_a92h5, b_a92h6))
type family ZipWith (a_a92CK :: (~>) a_a92h2 ((~>) b_a92h3 c_a92h4)) (a_a92CL :: NonEmpty a_a92h2) (a_a92CM :: NonEmpty b_a92h3) :: NonEmpty c_a92h4
sZipWith :: forall a_a92h2 b_a92h3 c_a92h4 (t_a92KV :: (~>) a_a92h2 ((~>) b_a92h3 c_a92h4)) (t_a92KW :: NonEmpty a_a92h2) (t_a92KX :: NonEmpty b_a92h3). Sing t_a92KV -> Sing t_a92KW -> Sing t_a92KX -> Sing (Apply (Apply (Apply ZipWithSym0 t_a92KV) t_a92KW) t_a92KX :: NonEmpty c_a92h4)
type family Unzip (a_a92Ch :: NonEmpty (a_a92h0, b_a92h1)) :: (NonEmpty a_a92h0, NonEmpty b_a92h1)
sUnzip :: forall a_a92h0 b_a92h1 (t_a92KT :: NonEmpty (a_a92h0, b_a92h1)). Sing t_a92KT -> Sing (Apply UnzipSym0 t_a92KT :: (NonEmpty a_a92h0, NonEmpty b_a92h1))
type family FromList (a_a92I0 :: [a_a92hK]) :: NonEmpty a_a92hK
sFromList :: forall a_a92hK (t_a92MX :: [a_a92hK]). Sing t_a92MX -> Sing (Apply FromListSym0 t_a92MX :: NonEmpty a_a92hK)
type family ToList (a_a92HW :: NonEmpty a_a92hJ) :: [a_a92hJ]
sToList :: forall a_a92hJ (t_a92MV :: NonEmpty a_a92hJ). Sing t_a92MV -> Sing (Apply ToListSym0 t_a92MV :: [a_a92hJ])
type family NonEmpty_ (a_a92Jb :: [a_a92hV]) :: Maybe (NonEmpty a_a92hV)
sNonEmpty_ :: forall a_a92hV (t_a92Nn :: [a_a92hV]). Sing t_a92Nn -> Sing (Apply NonEmpty_Sym0 t_a92Nn :: Maybe (NonEmpty a_a92hV))
type family Xor (a_a92Ju :: NonEmpty Bool) :: Bool
sXor :: forall (t_a92Nt :: NonEmpty Bool). Sing t_a92Nt -> Sing (Apply XorSym0 t_a92Nt :: Bool)
data (:|@#@$) :: forall (a6989586621679069776 :: Type). (~>) a6989586621679069776 ((~>) [a6989586621679069776] (NonEmpty (a6989586621679069776 :: Type)))
infixr 5 :|@#@$
data (:|@#@$$) (t6989586621679315224 :: a6989586621679069776 :: Type) :: (~>) [a6989586621679069776] (NonEmpty (a6989586621679069776 :: Type))
infixr 5 :|@#@$$
type (:|@#@$$$) (t6989586621679315224 :: a6989586621679069776) (t6989586621679315225 :: [a6989586621679069776]) = '(:|) t6989586621679315224 t6989586621679315225
data MapSym0 :: forall a6989586621681163527 b6989586621681163528. (~>) ((~>) a6989586621681163527 b6989586621681163528) ((~>) (NonEmpty a6989586621681163527) (NonEmpty b6989586621681163528))
data MapSym1 (a6989586621681165141 :: (~>) a6989586621681163527 b6989586621681163528) :: (~>) (NonEmpty a6989586621681163527) (NonEmpty b6989586621681163528)
type MapSym2 (a6989586621681165141 :: (~>) a6989586621681163527 b6989586621681163528) (a6989586621681165142 :: NonEmpty a6989586621681163527) = Map a6989586621681165141 a6989586621681165142
data IntersperseSym0 :: forall a6989586621681163517. (~>) a6989586621681163517 ((~>) (NonEmpty a6989586621681163517) (NonEmpty a6989586621681163517))
data IntersperseSym1 (a6989586621681165077 :: a6989586621681163517) :: (~>) (NonEmpty a6989586621681163517) (NonEmpty a6989586621681163517)
type IntersperseSym2 (a6989586621681165077 :: a6989586621681163517) (a6989586621681165078 :: NonEmpty a6989586621681163517) = Intersperse a6989586621681165077 a6989586621681165078
data ScanlSym0 :: forall b6989586621681163522 a6989586621681163523. (~>) ((~>) b6989586621681163522 ((~>) a6989586621681163523 b6989586621681163522)) ((~>) b6989586621681163522 ((~>) [a6989586621681163523] (NonEmpty b6989586621681163522)))
data ScanlSym1 (a6989586621681165112 :: (~>) b6989586621681163522 ((~>) a6989586621681163523 b6989586621681163522)) :: (~>) b6989586621681163522 ((~>) [a6989586621681163523] (NonEmpty b6989586621681163522))
data ScanlSym2 (a6989586621681165112 :: (~>) b6989586621681163522 ((~>) a6989586621681163523 b6989586621681163522)) (a6989586621681165113 :: b6989586621681163522) :: (~>) [a6989586621681163523] (NonEmpty b6989586621681163522)
type ScanlSym3 (a6989586621681165112 :: (~>) b6989586621681163522 ((~>) a6989586621681163523 b6989586621681163522)) (a6989586621681165113 :: b6989586621681163522) (a6989586621681165114 :: [a6989586621681163523]) = Scanl a6989586621681165112 a6989586621681165113 a6989586621681165114
data ScanrSym0 :: forall a6989586621681163520 b6989586621681163521. (~>) ((~>) a6989586621681163520 ((~>) b6989586621681163521 b6989586621681163521)) ((~>) b6989586621681163521 ((~>) [a6989586621681163520] (NonEmpty b6989586621681163521)))
data ScanrSym1 (a6989586621681165101 :: (~>) a6989586621681163520 ((~>) b6989586621681163521 b6989586621681163521)) :: (~>) b6989586621681163521 ((~>) [a6989586621681163520] (NonEmpty b6989586621681163521))
data ScanrSym2 (a6989586621681165101 :: (~>) a6989586621681163520 ((~>) b6989586621681163521 b6989586621681163521)) (a6989586621681165102 :: b6989586621681163521) :: (~>) [a6989586621681163520] (NonEmpty b6989586621681163521)
type ScanrSym3 (a6989586621681165101 :: (~>) a6989586621681163520 ((~>) b6989586621681163521 b6989586621681163521)) (a6989586621681165102 :: b6989586621681163521) (a6989586621681165103 :: [a6989586621681163520]) = Scanr a6989586621681165101 a6989586621681165102 a6989586621681165103
data Scanl1Sym0 :: forall a6989586621681163519. (~>) ((~>) a6989586621681163519 ((~>) a6989586621681163519 a6989586621681163519)) ((~>) (NonEmpty a6989586621681163519) (NonEmpty a6989586621681163519))
data Scanl1Sym1 (a6989586621681165094 :: (~>) a6989586621681163519 ((~>) a6989586621681163519 a6989586621681163519)) :: (~>) (NonEmpty a6989586621681163519) (NonEmpty a6989586621681163519)
type Scanl1Sym2 (a6989586621681165094 :: (~>) a6989586621681163519 ((~>) a6989586621681163519 a6989586621681163519)) (a6989586621681165095 :: NonEmpty a6989586621681163519) = Scanl1 a6989586621681165094 a6989586621681165095
data Scanr1Sym0 :: forall a6989586621681163518. (~>) ((~>) a6989586621681163518 ((~>) a6989586621681163518 a6989586621681163518)) ((~>) (NonEmpty a6989586621681163518) (NonEmpty a6989586621681163518))
data Scanr1Sym1 (a6989586621681165087 :: (~>) a6989586621681163518 ((~>) a6989586621681163518 a6989586621681163518)) :: (~>) (NonEmpty a6989586621681163518) (NonEmpty a6989586621681163518)
type Scanr1Sym2 (a6989586621681165087 :: (~>) a6989586621681163518 ((~>) a6989586621681163518 a6989586621681163518)) (a6989586621681165088 :: NonEmpty a6989586621681163518) = Scanr1 a6989586621681165087 a6989586621681165088
data TransposeSym0 :: forall a6989586621681163483. (~>) (NonEmpty (NonEmpty a6989586621681163483)) (NonEmpty (NonEmpty a6989586621681163483))
type TransposeSym1 (a6989586621681164782 :: NonEmpty (NonEmpty a6989586621681163483)) = Transpose a6989586621681164782
data SortBySym0 :: forall a6989586621681163482. (~>) ((~>) a6989586621681163482 ((~>) a6989586621681163482 Ordering)) ((~>) (NonEmpty a6989586621681163482) (NonEmpty a6989586621681163482))
data SortBySym1 (a6989586621681164772 :: (~>) a6989586621681163482 ((~>) a6989586621681163482 Ordering)) :: (~>) (NonEmpty a6989586621681163482) (NonEmpty a6989586621681163482)
type SortBySym2 (a6989586621681164772 :: (~>) a6989586621681163482 ((~>) a6989586621681163482 Ordering)) (a6989586621681164773 :: NonEmpty a6989586621681163482) = SortBy a6989586621681164772 a6989586621681164773
data SortWithSym0 :: forall a6989586621681163481 o6989586621681163480. (~>) ((~>) a6989586621681163481 o6989586621681163480) ((~>) (NonEmpty a6989586621681163481) (NonEmpty a6989586621681163481))
data SortWithSym1 (a6989586621681164766 :: (~>) a6989586621681163481 o6989586621681163480) :: (~>) (NonEmpty a6989586621681163481) (NonEmpty a6989586621681163481)
type SortWithSym2 (a6989586621681164766 :: (~>) a6989586621681163481 o6989586621681163480) (a6989586621681164767 :: NonEmpty a6989586621681163481) = SortWith a6989586621681164766 a6989586621681164767
data LengthSym0 :: forall a6989586621681163546. (~>) (NonEmpty a6989586621681163546) Nat
type LengthSym1 (a6989586621681165265 :: NonEmpty a6989586621681163546) = Length a6989586621681165265
data HeadSym0 :: forall a6989586621681163539. (~>) (NonEmpty a6989586621681163539) a6989586621681163539
type HeadSym1 (a6989586621681165197 :: NonEmpty a6989586621681163539) = Head a6989586621681165197
data TailSym0 :: forall a6989586621681163538. (~>) (NonEmpty a6989586621681163538) [a6989586621681163538]
type TailSym1 (a6989586621681165194 :: NonEmpty a6989586621681163538) = Tail a6989586621681165194
data LastSym0 :: forall a6989586621681163537. (~>) (NonEmpty a6989586621681163537) a6989586621681163537
type LastSym1 (a6989586621681165190 :: NonEmpty a6989586621681163537) = Last a6989586621681165190
data InitSym0 :: forall a6989586621681163536. (~>) (NonEmpty a6989586621681163536) [a6989586621681163536]
type InitSym1 (a6989586621681165186 :: NonEmpty a6989586621681163536) = Init a6989586621681165186
data (<|@#@$) :: forall a6989586621681163535. (~>) a6989586621681163535 ((~>) (NonEmpty a6989586621681163535) (NonEmpty a6989586621681163535))
data (<|@#@$$) (a6989586621681165179 :: a6989586621681163535) :: (~>) (NonEmpty a6989586621681163535) (NonEmpty a6989586621681163535)
type (<|@#@$$$) (a6989586621681165179 :: a6989586621681163535) (a6989586621681165180 :: NonEmpty a6989586621681163535) = (<|) a6989586621681165179 a6989586621681165180
data ConsSym0 :: forall a6989586621681163534. (~>) a6989586621681163534 ((~>) (NonEmpty a6989586621681163534) (NonEmpty a6989586621681163534))
data ConsSym1 (a6989586621681165173 :: a6989586621681163534) :: (~>) (NonEmpty a6989586621681163534) (NonEmpty a6989586621681163534)
type ConsSym2 (a6989586621681165173 :: a6989586621681163534) (a6989586621681165174 :: NonEmpty a6989586621681163534) = Cons a6989586621681165173 a6989586621681165174
data UnconsSym0 :: forall a6989586621681163542. (~>) (NonEmpty a6989586621681163542) (a6989586621681163542, Maybe (NonEmpty a6989586621681163542))
type UnconsSym1 (a6989586621681165229 :: NonEmpty a6989586621681163542) = Uncons a6989586621681165229
data UnfoldrSym0 :: forall a6989586621681163540 b6989586621681163541. (~>) ((~>) a6989586621681163540 (b6989586621681163541, Maybe a6989586621681163540)) ((~>) a6989586621681163540 (NonEmpty b6989586621681163541))
data UnfoldrSym1 (a6989586621681165200 :: (~>) a6989586621681163540 (b6989586621681163541, Maybe a6989586621681163540)) :: (~>) a6989586621681163540 (NonEmpty b6989586621681163541)
type UnfoldrSym2 (a6989586621681165200 :: (~>) a6989586621681163540 (b6989586621681163541, Maybe a6989586621681163540)) (a6989586621681165201 :: a6989586621681163540) = Unfoldr a6989586621681165200 a6989586621681165201
data SortSym0 :: forall a6989586621681163533. (~>) (NonEmpty a6989586621681163533) (NonEmpty a6989586621681163533)
type SortSym1 (a6989586621681165166 :: NonEmpty a6989586621681163533) = Sort a6989586621681165166
data ReverseSym0 :: forall a6989586621681163516. (~>) (NonEmpty a6989586621681163516) (NonEmpty a6989586621681163516)
type ReverseSym1 (a6989586621681165074 :: NonEmpty a6989586621681163516) = Reverse a6989586621681165074
data InitsSym0 :: forall a6989586621681163526. (~>) [a6989586621681163526] (NonEmpty [a6989586621681163526])
type InitsSym1 (a6989586621681165138 :: [a6989586621681163526]) = Inits a6989586621681165138
data TailsSym0 :: forall a6989586621681163525. (~>) [a6989586621681163525] (NonEmpty [a6989586621681163525])
type TailsSym1 (a6989586621681165133 :: [a6989586621681163525]) = Tails a6989586621681165133
data UnfoldSym0 :: forall a6989586621681163544 b6989586621681163545. (~>) ((~>) a6989586621681163544 (b6989586621681163545, Maybe a6989586621681163544)) ((~>) a6989586621681163544 (NonEmpty b6989586621681163545))
data UnfoldSym1 (a6989586621681165237 :: (~>) a6989586621681163544 (b6989586621681163545, Maybe a6989586621681163544)) :: (~>) a6989586621681163544 (NonEmpty b6989586621681163545)
data InsertSym0 :: forall a6989586621681163524. (~>) a6989586621681163524 ((~>) [a6989586621681163524] (NonEmpty a6989586621681163524))
data InsertSym1 (a6989586621681165123 :: a6989586621681163524) :: (~>) [a6989586621681163524] (NonEmpty a6989586621681163524)
type InsertSym2 (a6989586621681165123 :: a6989586621681163524) (a6989586621681165124 :: [a6989586621681163524]) = Insert a6989586621681165123 a6989586621681165124
data TakeSym0 :: forall a6989586621681163515. (~>) Nat ((~>) (NonEmpty a6989586621681163515) [a6989586621681163515])
data TakeSym1 (a6989586621681165064 :: Nat) :: forall a6989586621681163515. (~>) (NonEmpty a6989586621681163515) [a6989586621681163515]
type TakeSym2 (a6989586621681165064 :: Nat) (a6989586621681165065 :: NonEmpty a6989586621681163515) = Take a6989586621681165064 a6989586621681165065
data DropSym0 :: forall a6989586621681163514. (~>) Nat ((~>) (NonEmpty a6989586621681163514) [a6989586621681163514])
data DropSym1 (a6989586621681165056 :: Nat) :: forall a6989586621681163514. (~>) (NonEmpty a6989586621681163514) [a6989586621681163514]
type DropSym2 (a6989586621681165056 :: Nat) (a6989586621681165057 :: NonEmpty a6989586621681163514) = Drop a6989586621681165056 a6989586621681165057
data SplitAtSym0 :: forall a6989586621681163513. (~>) Nat ((~>) (NonEmpty a6989586621681163513) ([a6989586621681163513], [a6989586621681163513]))
data SplitAtSym1 (a6989586621681165048 :: Nat) :: forall a6989586621681163513. (~>) (NonEmpty a6989586621681163513) ([a6989586621681163513], [a6989586621681163513])
type SplitAtSym2 (a6989586621681165048 :: Nat) (a6989586621681165049 :: NonEmpty a6989586621681163513) = SplitAt a6989586621681165048 a6989586621681165049
data TakeWhileSym0 :: forall a6989586621681163512. (~>) ((~>) a6989586621681163512 Bool) ((~>) (NonEmpty a6989586621681163512) [a6989586621681163512])
data TakeWhileSym1 (a6989586621681165040 :: (~>) a6989586621681163512 Bool) :: (~>) (NonEmpty a6989586621681163512) [a6989586621681163512]
type TakeWhileSym2 (a6989586621681165040 :: (~>) a6989586621681163512 Bool) (a6989586621681165041 :: NonEmpty a6989586621681163512) = TakeWhile a6989586621681165040 a6989586621681165041
data DropWhileSym0 :: forall a6989586621681163511. (~>) ((~>) a6989586621681163511 Bool) ((~>) (NonEmpty a6989586621681163511) [a6989586621681163511])
data DropWhileSym1 (a6989586621681165032 :: (~>) a6989586621681163511 Bool) :: (~>) (NonEmpty a6989586621681163511) [a6989586621681163511]
type DropWhileSym2 (a6989586621681165032 :: (~>) a6989586621681163511 Bool) (a6989586621681165033 :: NonEmpty a6989586621681163511) = DropWhile a6989586621681165032 a6989586621681165033
data SpanSym0 :: forall a6989586621681163510. (~>) ((~>) a6989586621681163510 Bool) ((~>) (NonEmpty a6989586621681163510) ([a6989586621681163510], [a6989586621681163510]))
data SpanSym1 (a6989586621681165024 :: (~>) a6989586621681163510 Bool) :: (~>) (NonEmpty a6989586621681163510) ([a6989586621681163510], [a6989586621681163510])
type SpanSym2 (a6989586621681165024 :: (~>) a6989586621681163510 Bool) (a6989586621681165025 :: NonEmpty a6989586621681163510) = Span a6989586621681165024 a6989586621681165025
data BreakSym0 :: forall a6989586621681163509. (~>) ((~>) a6989586621681163509 Bool) ((~>) (NonEmpty a6989586621681163509) ([a6989586621681163509], [a6989586621681163509]))
data BreakSym1 (a6989586621681165016 :: (~>) a6989586621681163509 Bool) :: (~>) (NonEmpty a6989586621681163509) ([a6989586621681163509], [a6989586621681163509])
type BreakSym2 (a6989586621681165016 :: (~>) a6989586621681163509 Bool) (a6989586621681165017 :: NonEmpty a6989586621681163509) = Break a6989586621681165016 a6989586621681165017
data FilterSym0 :: forall a6989586621681163508. (~>) ((~>) a6989586621681163508 Bool) ((~>) (NonEmpty a6989586621681163508) [a6989586621681163508])
data FilterSym1 (a6989586621681165008 :: (~>) a6989586621681163508 Bool) :: (~>) (NonEmpty a6989586621681163508) [a6989586621681163508]
type FilterSym2 (a6989586621681165008 :: (~>) a6989586621681163508 Bool) (a6989586621681165009 :: NonEmpty a6989586621681163508) = Filter a6989586621681165008 a6989586621681165009
data PartitionSym0 :: forall a6989586621681163507. (~>) ((~>) a6989586621681163507 Bool) ((~>) (NonEmpty a6989586621681163507) ([a6989586621681163507], [a6989586621681163507]))
data PartitionSym1 (a6989586621681165000 :: (~>) a6989586621681163507 Bool) :: (~>) (NonEmpty a6989586621681163507) ([a6989586621681163507], [a6989586621681163507])
type PartitionSym2 (a6989586621681165000 :: (~>) a6989586621681163507 Bool) (a6989586621681165001 :: NonEmpty a6989586621681163507) = Partition a6989586621681165000 a6989586621681165001
data GroupSym0 :: forall a6989586621681163506. (~>) [a6989586621681163506] [NonEmpty a6989586621681163506]
type GroupSym1 (a6989586621681164997 :: [a6989586621681163506]) = Group a6989586621681164997
data GroupBySym0 :: forall a6989586621681163505. (~>) ((~>) a6989586621681163505 ((~>) a6989586621681163505 Bool)) ((~>) [a6989586621681163505] [NonEmpty a6989586621681163505])
data GroupBySym1 (a6989586621681164947 :: (~>) a6989586621681163505 ((~>) a6989586621681163505 Bool)) :: (~>) [a6989586621681163505] [NonEmpty a6989586621681163505]
type GroupBySym2 (a6989586621681164947 :: (~>) a6989586621681163505 ((~>) a6989586621681163505 Bool)) (a6989586621681164948 :: [a6989586621681163505]) = GroupBy a6989586621681164947 a6989586621681164948
data GroupWithSym0 :: forall a6989586621681163504 b6989586621681163503. (~>) ((~>) a6989586621681163504 b6989586621681163503) ((~>) [a6989586621681163504] [NonEmpty a6989586621681163504])
data GroupWithSym1 (a6989586621681164939 :: (~>) a6989586621681163504 b6989586621681163503) :: (~>) [a6989586621681163504] [NonEmpty a6989586621681163504]
type GroupWithSym2 (a6989586621681164939 :: (~>) a6989586621681163504 b6989586621681163503) (a6989586621681164940 :: [a6989586621681163504]) = GroupWith a6989586621681164939 a6989586621681164940
data GroupAllWithSym0 :: forall a6989586621681163502 b6989586621681163501. (~>) ((~>) a6989586621681163502 b6989586621681163501) ((~>) [a6989586621681163502] [NonEmpty a6989586621681163502])
data GroupAllWithSym1 (a6989586621681164931 :: (~>) a6989586621681163502 b6989586621681163501) :: (~>) [a6989586621681163502] [NonEmpty a6989586621681163502]
type GroupAllWithSym2 (a6989586621681164931 :: (~>) a6989586621681163502 b6989586621681163501) (a6989586621681164932 :: [a6989586621681163502]) = GroupAllWith a6989586621681164931 a6989586621681164932
data Group1Sym0 :: forall a6989586621681163500. (~>) (NonEmpty a6989586621681163500) (NonEmpty (NonEmpty a6989586621681163500))
type Group1Sym1 (a6989586621681164928 :: NonEmpty a6989586621681163500) = Group1 a6989586621681164928
data GroupBy1Sym0 :: forall a6989586621681163499. (~>) ((~>) a6989586621681163499 ((~>) a6989586621681163499 Bool)) ((~>) (NonEmpty a6989586621681163499) (NonEmpty (NonEmpty a6989586621681163499)))
data GroupBy1Sym1 (a6989586621681164895 :: (~>) a6989586621681163499 ((~>) a6989586621681163499 Bool)) :: (~>) (NonEmpty a6989586621681163499) (NonEmpty (NonEmpty a6989586621681163499))
type GroupBy1Sym2 (a6989586621681164895 :: (~>) a6989586621681163499 ((~>) a6989586621681163499 Bool)) (a6989586621681164896 :: NonEmpty a6989586621681163499) = GroupBy1 a6989586621681164895 a6989586621681164896
data GroupWith1Sym0 :: forall a6989586621681163498 b6989586621681163497. (~>) ((~>) a6989586621681163498 b6989586621681163497) ((~>) (NonEmpty a6989586621681163498) (NonEmpty (NonEmpty a6989586621681163498)))
data GroupWith1Sym1 (a6989586621681164887 :: (~>) a6989586621681163498 b6989586621681163497) :: (~>) (NonEmpty a6989586621681163498) (NonEmpty (NonEmpty a6989586621681163498))
type GroupWith1Sym2 (a6989586621681164887 :: (~>) a6989586621681163498 b6989586621681163497) (a6989586621681164888 :: NonEmpty a6989586621681163498) = GroupWith1 a6989586621681164887 a6989586621681164888
data GroupAllWith1Sym0 :: forall a6989586621681163496 b6989586621681163495. (~>) ((~>) a6989586621681163496 b6989586621681163495) ((~>) (NonEmpty a6989586621681163496) (NonEmpty (NonEmpty a6989586621681163496)))
data GroupAllWith1Sym1 (a6989586621681164879 :: (~>) a6989586621681163496 b6989586621681163495) :: (~>) (NonEmpty a6989586621681163496) (NonEmpty (NonEmpty a6989586621681163496))
type GroupAllWith1Sym2 (a6989586621681164879 :: (~>) a6989586621681163496 b6989586621681163495) (a6989586621681164880 :: NonEmpty a6989586621681163496) = GroupAllWith1 a6989586621681164879 a6989586621681164880
data IsPrefixOfSym0 :: forall a6989586621681163494. (~>) [a6989586621681163494] ((~>) (NonEmpty a6989586621681163494) Bool)
data IsPrefixOfSym1 (a6989586621681164871 :: [a6989586621681163494]) :: (~>) (NonEmpty a6989586621681163494) Bool
type IsPrefixOfSym2 (a6989586621681164871 :: [a6989586621681163494]) (a6989586621681164872 :: NonEmpty a6989586621681163494) = IsPrefixOf a6989586621681164871 a6989586621681164872
data NubSym0 :: forall a6989586621681163485. (~>) (NonEmpty a6989586621681163485) (NonEmpty a6989586621681163485)
type NubSym1 (a6989586621681164802 :: NonEmpty a6989586621681163485) = Nub a6989586621681164802
data NubBySym0 :: forall a6989586621681163484. (~>) ((~>) a6989586621681163484 ((~>) a6989586621681163484 Bool)) ((~>) (NonEmpty a6989586621681163484) (NonEmpty a6989586621681163484))
data NubBySym1 (a6989586621681164785 :: (~>) a6989586621681163484 ((~>) a6989586621681163484 Bool)) :: (~>) (NonEmpty a6989586621681163484) (NonEmpty a6989586621681163484)
type NubBySym2 (a6989586621681164785 :: (~>) a6989586621681163484 ((~>) a6989586621681163484 Bool)) (a6989586621681164786 :: NonEmpty a6989586621681163484) = NubBy a6989586621681164785 a6989586621681164786
data (!!@#@$) :: forall a6989586621681163493. (~>) (NonEmpty a6989586621681163493) ((~>) Nat a6989586621681163493)
data (!!@#@$$) (a6989586621681164853 :: NonEmpty a6989586621681163493) :: (~>) Nat a6989586621681163493
type (!!@#@$$$) (a6989586621681164853 :: NonEmpty a6989586621681163493) (a6989586621681164854 :: Nat) = (!!) a6989586621681164853 a6989586621681164854
data ZipSym0 :: forall a6989586621681163491 b6989586621681163492. (~>) (NonEmpty a6989586621681163491) ((~>) (NonEmpty b6989586621681163492) (NonEmpty (a6989586621681163491, b6989586621681163492)))
data ZipSym1 (a6989586621681164845 :: NonEmpty a6989586621681163491) :: forall b6989586621681163492. (~>) (NonEmpty b6989586621681163492) (NonEmpty (a6989586621681163491, b6989586621681163492))
type ZipSym2 (a6989586621681164845 :: NonEmpty a6989586621681163491) (a6989586621681164846 :: NonEmpty b6989586621681163492) = Zip a6989586621681164845 a6989586621681164846
data ZipWithSym0 :: forall a6989586621681163488 b6989586621681163489 c6989586621681163490. (~>) ((~>) a6989586621681163488 ((~>) b6989586621681163489 c6989586621681163490)) ((~>) (NonEmpty a6989586621681163488) ((~>) (NonEmpty b6989586621681163489) (NonEmpty c6989586621681163490)))
data ZipWithSym1 (a6989586621681164834 :: (~>) a6989586621681163488 ((~>) b6989586621681163489 c6989586621681163490)) :: (~>) (NonEmpty a6989586621681163488) ((~>) (NonEmpty b6989586621681163489) (NonEmpty c6989586621681163490))
data ZipWithSym2 (a6989586621681164834 :: (~>) a6989586621681163488 ((~>) b6989586621681163489 c6989586621681163490)) (a6989586621681164835 :: NonEmpty a6989586621681163488) :: (~>) (NonEmpty b6989586621681163489) (NonEmpty c6989586621681163490)
type ZipWithSym3 (a6989586621681164834 :: (~>) a6989586621681163488 ((~>) b6989586621681163489 c6989586621681163490)) (a6989586621681164835 :: NonEmpty a6989586621681163488) (a6989586621681164836 :: NonEmpty b6989586621681163489) = ZipWith a6989586621681164834 a6989586621681164835 a6989586621681164836
data UnzipSym0 :: forall a6989586621681163486 b6989586621681163487. (~>) (NonEmpty (a6989586621681163486, b6989586621681163487)) (NonEmpty a6989586621681163486, NonEmpty b6989586621681163487)
type UnzipSym1 (a6989586621681164805 :: NonEmpty (a6989586621681163486, b6989586621681163487)) = Unzip a6989586621681164805
data FromListSym0 :: forall a6989586621681163532. (~>) [a6989586621681163532] (NonEmpty a6989586621681163532)
type FromListSym1 (a6989586621681165160 :: [a6989586621681163532]) = FromList a6989586621681165160
data ToListSym0 :: forall a6989586621681163531. (~>) (NonEmpty a6989586621681163531) [a6989586621681163531]
type ToListSym1 (a6989586621681165156 :: NonEmpty a6989586621681163531) = ToList a6989586621681165156
data NonEmpty_Sym0 :: forall a6989586621681163543. (~>) [a6989586621681163543] (Maybe (NonEmpty a6989586621681163543))
type NonEmpty_Sym1 (a6989586621681165233 :: [a6989586621681163543]) = NonEmpty_ a6989586621681165233
data XorSym0 :: (~>) (NonEmpty Bool) Bool
type XorSym1 (a6989586621681165252 :: NonEmpty Bool) = Xor a6989586621681165252
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Munzip_6989586621681165315Sym0
instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Base.NonEmpty
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681165294Sym0
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (a6989586621681165291 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681165294Sym1 a6989586621681165291)
instance forall a6989586621681131422 b6989586621681131423 c6989586621681131424 (a6989586621681165292 :: a6989586621681131422 Data.Singletons.Internal.~> (b6989586621681131423 Data.Singletons.Internal.~> c6989586621681131424)) (a6989586621681165291 :: GHC.Base.NonEmpty a6989586621681131422). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681165294Sym2 a6989586621681165292 a6989586621681165291)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681165277Sym0
instance forall a6989586621681131420 b6989586621681131421 (a6989586621681165275 :: GHC.Base.NonEmpty a6989586621681131420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681165277Sym1 a6989586621681165275)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.TransposeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.TransposeSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.FmapSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.FmapSym0
instance forall a6989586621681163547 b6989586621681163548 (a6989586621681165268 :: a6989586621681163547 Data.Singletons.Internal.~> b6989586621681163548). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FmapSym1 a6989586621681165268)
instance forall a b (d :: a Data.Singletons.Internal.~> b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.FmapSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.LengthSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.LengthSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.XorSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.XorSym0
instance forall a6989586621681163544 b6989586621681163545 (a6989586621681165237 :: a6989586621681163544 Data.Singletons.Internal.~> (b6989586621681163545, GHC.Maybe.Maybe a6989586621681163544)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldSym1 a6989586621681165237)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.UnfoldSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.UnfoldSym0
instance forall a b (d :: a Data.Singletons.Internal.~> (b, GHC.Maybe.Maybe a)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.UnfoldSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.UnconsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.UnconsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.NonEmpty_Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.NonEmpty_Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym0
instance forall a6989586621681163540 b6989586621681163541 (a6989586621681165200 :: a6989586621681163540 Data.Singletons.Internal.~> (b6989586621681163541, GHC.Maybe.Maybe a6989586621681163540)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym1 a6989586621681165200)
instance forall a b (d :: a Data.Singletons.Internal.~> (b, GHC.Maybe.Maybe a)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.HeadSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.HeadSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.TailSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.TailSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.LastSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.LastSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.InitSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.InitSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ConsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ConsSym0
instance forall a6989586621681163534 (a6989586621681165173 :: a6989586621681163534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ConsSym1 a6989586621681165173)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ConsSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.<|@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.<|@#@$)
instance forall a6989586621681163535 (a6989586621681165179 :: a6989586621681163535). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.<|@#@$$) a6989586621681165179)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.List.NonEmpty.<|@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.SortSym0
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.SortSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym0
instance forall a6989586621681163518 (a6989586621681165087 :: a6989586621681163518 Data.Singletons.Internal.~> (a6989586621681163518 Data.Singletons.Internal.~> a6989586621681163518)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym1 a6989586621681165087)
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym0
instance forall a6989586621681163519 (a6989586621681165094 :: a6989586621681163519 Data.Singletons.Internal.~> (a6989586621681163519 Data.Singletons.Internal.~> a6989586621681163519)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym1 a6989586621681165094)
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ScanrSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ScanrSym0
instance forall a6989586621681163520 b6989586621681163521 (a6989586621681165101 :: a6989586621681163520 Data.Singletons.Internal.~> (b6989586621681163521 Data.Singletons.Internal.~> b6989586621681163521)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym1 a6989586621681165101)
instance forall a b (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ScanrSym1 d)
instance forall a6989586621681163520 b6989586621681163521 (a6989586621681165102 :: a6989586621681163520 Data.Singletons.Internal.~> (b6989586621681163521 Data.Singletons.Internal.~> b6989586621681163521)) (a6989586621681165101 :: b6989586621681163521). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym2 a6989586621681165102 a6989586621681165101)
instance forall a b (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ScanrSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ScanlSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ScanlSym0
instance forall b6989586621681163522 a6989586621681163523 (a6989586621681165112 :: b6989586621681163522 Data.Singletons.Internal.~> (a6989586621681163523 Data.Singletons.Internal.~> b6989586621681163522)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym1 a6989586621681165112)
instance forall b a (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ScanlSym1 d)
instance forall b6989586621681163522 a6989586621681163523 (a6989586621681165113 :: b6989586621681163522 Data.Singletons.Internal.~> (a6989586621681163523 Data.Singletons.Internal.~> b6989586621681163522)) (a6989586621681165112 :: b6989586621681163522). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym2 a6989586621681165113 a6989586621681165112)
instance forall b a (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> b)) (d2 :: b). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ScanlSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.InsertSym0
instance Data.Singletons.Prelude.Ord.SOrd a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.InsertSym0
instance forall a6989586621681163524 (a6989586621681165123 :: a6989586621681163524). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.InsertSym1 a6989586621681165123)
instance forall a (d :: a). (Data.Singletons.Prelude.Ord.SOrd a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.InsertSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.TailsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.TailsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.InitsSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.InitsSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym0
instance Data.Singletons.Prelude.Ord.SOrd b => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym0
instance forall a6989586621681163496 b6989586621681163495 (a6989586621681164879 :: a6989586621681163496 Data.Singletons.Internal.~> b6989586621681163495). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym1 a6989586621681164879)
instance forall a b (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.SortWithSym0
instance Data.Singletons.Prelude.Ord.SOrd o => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.SortWithSym0
instance forall a6989586621681163481 o6989586621681163480 (a6989586621681164766 :: a6989586621681163481 Data.Singletons.Internal.~> o6989586621681163480). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortWithSym1 a6989586621681164766)
instance forall a o (d :: a Data.Singletons.Internal.~> o). (Data.Singletons.Prelude.Ord.SOrd o, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.SortWithSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.SortBySym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.SortBySym0
instance forall a6989586621681163482 (a6989586621681164772 :: a6989586621681163482 Data.Singletons.Internal.~> (a6989586621681163482 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortBySym1 a6989586621681164772)
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.SortBySym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ReverseSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ReverseSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.LiftSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.LiftSym0
instance forall a6989586621681163529 b6989586621681163530 (a6989586621681165148 :: [a6989586621681163529] Data.Singletons.Internal.~> [b6989586621681163530]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.LiftSym1 a6989586621681165148)
instance forall a b (d :: [a] Data.Singletons.Internal.~> [b]). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.LiftSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.FromListSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.FromListSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.PartitionSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.PartitionSym0
instance forall a6989586621681163507 (a6989586621681165000 :: a6989586621681163507 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.PartitionSym1 a6989586621681165000)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.PartitionSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.FilterSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.FilterSym0
instance forall a6989586621681163508 (a6989586621681165008 :: a6989586621681163508 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FilterSym1 a6989586621681165008)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.FilterSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.BreakSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.BreakSym0
instance forall a6989586621681163509 (a6989586621681165016 :: a6989586621681163509 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.BreakSym1 a6989586621681165016)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.BreakSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.SpanSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.SpanSym0
instance forall a6989586621681163510 (a6989586621681165024 :: a6989586621681163510 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SpanSym1 a6989586621681165024)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.SpanSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.DropWhileSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.DropWhileSym0
instance forall a6989586621681163511 (a6989586621681165032 :: a6989586621681163511 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.DropWhileSym1 a6989586621681165032)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.DropWhileSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym0
instance forall a6989586621681163512 (a6989586621681165040 :: a6989586621681163512 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym1 a6989586621681165040)
instance forall a (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.SplitAtSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.SplitAtSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SplitAtSym1 a6989586621681165048)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.SplitAtSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.DropSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.DropSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.DropSym1 a6989586621681165056)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.DropSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.TakeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.TakeSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.TakeSym1 a6989586621681165064)
instance Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.TakeSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ToListSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ToListSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.MapSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.MapSym0
instance forall a6989586621681163527 b6989586621681163528 (a6989586621681165141 :: a6989586621681163527 Data.Singletons.Internal.~> b6989586621681163528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MapSym1 a6989586621681165141)
instance forall a b (d :: a Data.Singletons.Internal.~> b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.MapSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.IntersperseSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.IntersperseSym0
instance forall a6989586621681163517 (a6989586621681165077 :: a6989586621681163517). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IntersperseSym1 a6989586621681165077)
instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.IntersperseSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupSym0
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164955GoSym0
instance forall k1 k2 a6989586621680423897 (eq06989586621681164953 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164955GoSym1 eq06989586621681164953)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym0
instance Data.Singletons.Prelude.Eq.SEq b => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym0
instance forall a6989586621681163498 b6989586621681163497 (a6989586621681164887 :: a6989586621681163498 Data.Singletons.Internal.~> b6989586621681163497). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym1 a6989586621681164887)
instance forall a b (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Group1Sym0
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.Group1Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym0
instance forall a6989586621681163499 (a6989586621681164895 :: a6989586621681163499 Data.Singletons.Internal.~> (a6989586621681163499 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym1 a6989586621681164895)
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym0
instance Data.Singletons.Prelude.Ord.SOrd b => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym0
instance forall a6989586621681163502 b6989586621681163501 (a6989586621681164931 :: a6989586621681163502 Data.Singletons.Internal.~> b6989586621681163501). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym1 a6989586621681164931)
instance forall a b (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Ord.SOrd b, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupWithSym0
instance Data.Singletons.Prelude.Eq.SEq b => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupWithSym0
instance forall a6989586621681163504 b6989586621681163503 (a6989586621681164939 :: a6989586621681163504 Data.Singletons.Internal.~> b6989586621681163503). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWithSym1 a6989586621681164939)
instance forall a b (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Eq.SEq b, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupWithSym1 d)
instance forall k1 k2 a6989586621680423897 (a6989586621681164956 :: k1) (a_69895866216811649516989586621681164954 :: k2) (eq06989586621681164953 :: a6989586621680423897 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164955GoSym3 a6989586621681164956 a_69895866216811649516989586621681164954 eq06989586621681164953)
instance forall k1 k2 a6989586621680423897 (a_69895866216811649516989586621681164954 :: k1) (eq06989586621681164953 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164955GoSym2 a_69895866216811649516989586621681164954 eq06989586621681164953)
instance forall a6989586621681163505 (a6989586621681164947 :: a6989586621681163505 Data.Singletons.Internal.~> (a6989586621681163505 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBySym1 a6989586621681164947)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.GroupBySym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupBySym0
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.GroupBySym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym0
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym0
instance forall a6989586621681163494 (a6989586621681164871 :: [a6989586621681163494]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym1 a6989586621681164871)
instance forall a (d :: [a]). (Data.Singletons.Prelude.Eq.SEq a, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.!!@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.!!@#@$)
instance forall a6989586621681163493 (a6989586621681164853 :: GHC.Base.NonEmpty a6989586621681163493). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.!!@#@$$) a6989586621681164853)
instance forall a (d :: GHC.Base.NonEmpty a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.List.NonEmpty.!!@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ZipSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ZipSym0
instance Data.Singletons.Prelude.Monad.Zip.SMonadZip GHC.Base.NonEmpty
instance forall a6989586621681163491 b6989586621681163492 (a6989586621681164845 :: GHC.Base.NonEmpty a6989586621681163491). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipSym1 a6989586621681164845)
instance forall a b (d :: GHC.Base.NonEmpty a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ZipSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.ZipWithSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.ZipWithSym0
instance forall a6989586621681163488 b6989586621681163489 c6989586621681163490 (a6989586621681164834 :: a6989586621681163488 Data.Singletons.Internal.~> (b6989586621681163489 Data.Singletons.Internal.~> c6989586621681163490)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym1 a6989586621681164834)
instance forall a b c (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym1 d)
instance forall a6989586621681163488 b6989586621681163489 c6989586621681163490 (a6989586621681164835 :: a6989586621681163488 Data.Singletons.Internal.~> (b6989586621681163489 Data.Singletons.Internal.~> c6989586621681163490)) (a6989586621681164834 :: GHC.Base.NonEmpty a6989586621681163488). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym2 a6989586621681164835 a6989586621681164834)
instance forall a b c (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> c)) (d2 :: GHC.Base.NonEmpty a). (Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.UnzipSym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.UnzipSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.NubSym0
instance Data.Singletons.Prelude.Eq.SEq a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.NubSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.NubBySym0
instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.NubBySym0
instance forall a6989586621681163484 (a6989586621681164785 :: a6989586621681163484 Data.Singletons.Internal.~> (a6989586621681163484 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.NubBySym1 a6989586621681164785)
instance forall a (d :: a Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.List.NonEmpty.NubBySym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165256Xor'Sym0
instance forall k1 k2 (x6989586621681165254 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165256Xor'Sym1 x6989586621681165254)
instance forall k1 k2 (xs6989586621681165255 :: k1) (x6989586621681165254 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165256Xor'Sym2 xs6989586621681165255 x6989586621681165254)
instance forall k1 k2 (a6989586621681165257 :: k1) (xs6989586621681165255 :: k2) (x6989586621681165254 :: GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165256Xor'Sym3 a6989586621681165257 xs6989586621681165255 x6989586621681165254)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165243Scrutinee_6989586621681163711Sym0
instance forall k1 k (f6989586621681165241 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165243Scrutinee_6989586621681163711Sym1 f6989586621681165241)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165221Scrutinee_6989586621681163721Sym0
instance forall k1 k (f6989586621681165204 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165221Scrutinee_6989586621681163721Sym1 f6989586621681165204)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165206GoSym0
instance forall k2 k3 k (f6989586621681165204 :: k2 Data.Singletons.Internal.~> (k3, GHC.Maybe.Maybe k2)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165206GoSym1 f6989586621681165204)
instance forall k2 k3 k (a6989586621681165205 :: k2 Data.Singletons.Internal.~> (k3, GHC.Maybe.Maybe k2)) (f6989586621681165204 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165206GoSym2 a6989586621681165205 f6989586621681165204)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165212Scrutinee_6989586621681163725Sym0
instance forall k1 k2 k3 (c6989586621681165211 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165212Scrutinee_6989586621681163725Sym1 c6989586621681165211)
instance forall k1 k2 k3 (f6989586621681165204 :: k1) (c6989586621681165211 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681165212Scrutinee_6989586621681163725Sym2 f6989586621681165204 c6989586621681165211)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965X_6989586621681164966Sym0
instance forall k1 a6989586621680423897 k2 k3 (eq6989586621681164962 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965X_6989586621681164966Sym1 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (x6989586621681164963 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164962 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965X_6989586621681164966Sym2 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (xs6989586621681164964 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (x6989586621681164963 :: k1) (eq6989586621681164962 :: [a6989586621680423897]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965X_6989586621681164966Sym3 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (eq06989586621681164953 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (xs6989586621681164964 :: k1) (x6989586621681164963 :: [a6989586621680423897]) (eq6989586621681164962 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965X_6989586621681164966Sym4 eq06989586621681164953 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965ZsSym0
instance forall k1 a6989586621680423897 k2 k3 (eq6989586621681164962 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965ZsSym1 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (x6989586621681164963 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164962 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965ZsSym2 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (xs6989586621681164964 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (x6989586621681164963 :: k1) (eq6989586621681164962 :: [a6989586621680423897]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965ZsSym3 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (eq06989586621681164953 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (xs6989586621681164964 :: k1) (x6989586621681164963 :: [a6989586621680423897]) (eq6989586621681164962 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965ZsSym4 eq06989586621681164953 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965YsSym0
instance forall k1 a6989586621680423897 k2 k3 (eq6989586621681164962 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965YsSym1 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (x6989586621681164963 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164962 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965YsSym2 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (xs6989586621681164964 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (x6989586621681164963 :: k1) (eq6989586621681164962 :: [a6989586621680423897]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965YsSym3 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance forall k1 a6989586621680423897 k2 k3 (eq06989586621681164953 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (xs6989586621681164964 :: k1) (x6989586621681164963 :: [a6989586621680423897]) (eq6989586621681164962 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164965YsSym4 eq06989586621681164953 xs6989586621681164964 x6989586621681164963 eq6989586621681164962)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902X_6989586621681164903Sym0
instance forall k1 a6989586621680423897 (eq6989586621681164899 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902X_6989586621681164903Sym1 eq6989586621681164899)
instance forall k1 a6989586621680423897 (x6989586621681164900 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164899 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902X_6989586621681164903Sym2 x6989586621681164900 eq6989586621681164899)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902ZsSym0
instance forall k1 a6989586621680423897 (eq6989586621681164899 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902ZsSym1 eq6989586621681164899)
instance forall k1 a6989586621680423897 (x6989586621681164900 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164899 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902ZsSym2 x6989586621681164900 eq6989586621681164899)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902YsSym0
instance forall k1 a6989586621680423897 (eq6989586621681164899 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902YsSym1 eq6989586621681164899)
instance forall k1 a6989586621680423897 (x6989586621681164900 :: k1 Data.Singletons.Internal.~> (a6989586621680423897 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164899 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164902YsSym2 x6989586621681164900 eq6989586621681164899)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810X_6989586621681164811Sym0
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (a6989586621681164807 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810X_6989586621681164811Sym1 a6989586621681164807)
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (b6989586621681164808 :: k1) (a6989586621681164807 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810X_6989586621681164811Sym2 b6989586621681164808 a6989586621681164807)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810BsSym0
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (a6989586621681164807 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810BsSym1 a6989586621681164807)
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (b6989586621681164808 :: k1) (a6989586621681164807 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810BsSym2 b6989586621681164808 a6989586621681164807)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810AsSym0
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (a6989586621681164807 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810AsSym1 a6989586621681164807)
instance forall k1 k2 a6989586621680423884 b6989586621680423885 (b6989586621681164808 :: k1) (a6989586621681164807 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681164810AsSym2 b6989586621681164808 a6989586621681164807)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681164792Sym0
instance forall k2 k3 k (eq6989586621681164789 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681164792Sym1 eq6989586621681164789)
instance forall k2 k3 k (a6989586621681164790 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681164789 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681164792Sym2 a6989586621681164790 eq6989586621681164789)
instance forall k2 k3 k (as6989586621681164791 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (a6989586621681164790 :: k2) (eq6989586621681164789 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681164792Sym3 as6989586621681164791 a6989586621681164790 eq6989586621681164789)
-- | Defines and exports a promoted and singled version of the
-- IsString type class from Data.String.
module Data.Singletons.Prelude.IsString
class PIsString (a_a9sex :: Type) where {
type family FromString (arg_a9seX :: Symbol) :: a_a9sex;
}
class SIsString a_a9sex
sFromString :: forall (t_a9sfd :: Symbol). SIsString a_a9sex => Sing t_a9sfd -> Sing (Apply FromStringSym0 t_a9sfd :: a_a9sex)
data FromStringSym0 :: forall a6989586621681263277. (~>) Symbol a6989586621681263277
type FromStringSym1 (arg6989586621681263303 :: Symbol) = FromString arg6989586621681263303
instance forall k a (b :: k). Data.Singletons.Prelude.IsString.SIsString a => Data.Singletons.Prelude.IsString.SIsString (Data.Functor.Const.Const a b)
instance Data.Singletons.Prelude.IsString.SIsString a => Data.Singletons.Prelude.IsString.SIsString (Data.Functor.Identity.Identity a)
instance Data.Singletons.Prelude.IsString.SIsString a => Data.Singletons.Internal.SingI Data.Singletons.Prelude.IsString.FromStringSym0
instance Data.Singletons.Prelude.IsString.SIsString GHC.Types.Symbol
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.IsString.FromString_6989586621681263313Sym0
instance Data.Singletons.Prelude.IsString.PIsString (Data.Functor.Identity.Identity a)
instance forall k6989586621681263278 a6989586621681263279 (b6989586621681263280 :: k6989586621681263278). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.IsString.FromString_6989586621681263306Sym0
instance forall k a (b :: k). Data.Singletons.Prelude.IsString.PIsString (Data.Functor.Const.Const a b)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.IsString.FromStringSym0
instance Data.Singletons.Prelude.IsString.PIsString GHC.Types.Symbol
-- | Defines the promoted and singled versions of the Applicative
-- type class.
module Data.Singletons.Prelude.Applicative
class PApplicative (f_a2lWU :: Type -> Type) where {
type family Pure (arg_a2m3x :: a_a2lWV) :: f_a2lWU a_a2lWV;
type family (<*>) (arg_a2m3z :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (arg_a2m3A :: f_a2lWU a_a2lWW) :: f_a2lWU b_a2lWX;
type family LiftA2 (arg_a2m3D :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (arg_a2m3E :: f_a2lWU a_a2lWY) (arg_a2m3F :: f_a2lWU b_a2lWZ) :: f_a2lWU c_a2lX0;
type family (*>) (arg_a2m3J :: f_a2lWU a_a2lX1) (arg_a2m3K :: f_a2lWU b_a2lX2) :: f_a2lWU b_a2lX2;
type family (<*) (arg_a2m3N :: f_a2lWU a_a2lX3) (arg_a2m3O :: f_a2lWU b_a2lX4) :: f_a2lWU a_a2lX3;
type (<*>) a_a2m3R a_a2m3S = Apply (Apply TFHelper_6989586621679571257Sym0 a_a2m3R) a_a2m3S;
type LiftA2 a_a2m47 a_a2m48 a_a2m49 = Apply (Apply (Apply LiftA2_6989586621679571274Sym0 a_a2m47) a_a2m48) a_a2m49;
type (*>) a_a2m4q a_a2m4r = Apply (Apply TFHelper_6989586621679571292Sym0 a_a2m4q) a_a2m4r;
type (<*) a_a2m4C a_a2m4D = Apply (Apply TFHelper_6989586621679571304Sym0 a_a2m4C) a_a2m4D;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f_a2lWU => SApplicative (f_a2lWU :: Type -> Type)
sPure :: forall a_a2lWV (t_a2m7B :: a_a2lWV). SApplicative f_a2lWU => Sing t_a2m7B -> Sing (Apply PureSym0 t_a2m7B :: f_a2lWU a_a2lWV)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). SApplicative f_a2lWU => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
sLiftA2 :: forall a_a2lWY b_a2lWZ c_a2lX0 (t_a2m7H :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (t_a2m7I :: f_a2lWU a_a2lWY) (t_a2m7J :: f_a2lWU b_a2lWZ). SApplicative f_a2lWU => Sing t_a2m7H -> Sing t_a2m7I -> Sing t_a2m7J -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). SApplicative f_a2lWU => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). SApplicative f_a2lWU => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). (SApplicative f_a2lWU, (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX) ~ Apply (Apply TFHelper_6989586621679571257Sym0 t_a2m7D) t_a2m7E) => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
sLiftA2 :: forall a_a2lWY b_a2lWZ c_a2lX0 (t_a2m7H :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (t_a2m7I :: f_a2lWU a_a2lWY) (t_a2m7J :: f_a2lWU b_a2lWZ). (SApplicative f_a2lWU, (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0) ~ Apply (Apply (Apply LiftA2_6989586621679571274Sym0 t_a2m7H) t_a2m7I) t_a2m7J) => Sing t_a2m7H -> Sing t_a2m7I -> Sing t_a2m7J -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). (SApplicative f_a2lWU, (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2) ~ Apply (Apply TFHelper_6989586621679571292Sym0 t_a2m7N) t_a2m7O) => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). (SApplicative f_a2lWU, (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3) ~ Apply (Apply TFHelper_6989586621679571304Sym0 t_a2m7R) t_a2m7S) => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
class PAlternative (f_a2lY7 :: Type -> Type) where {
type family Empty :: f_a2lY7 a_a2lY8;
type family (<|>) (arg_a2m5x :: f_a2lY7 a_a2lY9) (arg_a2m5y :: f_a2lY7 a_a2lY9) :: f_a2lY7 a_a2lY9;
}
infixl 3 <|>
class SApplicative f_a2lY7 => SAlternative (f_a2lY7 :: Type -> Type)
sEmpty :: forall a_a2lY8. SAlternative f_a2lY7 => Sing (EmptySym0 :: f_a2lY7 a_a2lY8)
(%<|>) :: forall a_a2lY9 (t_a2m8g :: f_a2lY7 a_a2lY9) (t_a2m8h :: f_a2lY7 a_a2lY9). SAlternative f_a2lY7 => Sing t_a2m8g -> Sing t_a2m8h -> Sing (Apply (Apply (<|>@#@$) t_a2m8g) t_a2m8h :: f_a2lY7 a_a2lY9)
infixl 3 %<|>
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SConst :: forall (k :: Type) (a :: Type) (b :: k). Const a b -> Type
[SConst] :: {sGetConst :: Sing a} -> SConst ('Const a)
-- | The Const functor.
data Const a (b :: k)
type family GetConst (x_a7kY3 :: Const a_a7kY1 b_a7kY2) :: a_a7kY1
type family (<$>) (a_a34eV :: (~>) a_a34dC b_a34dD) (a_a34eW :: f_a34dB a_a34dC) :: f_a34dB b_a34dD
infixl 4 <$>
(%<$>) :: forall a_a34dC b_a34dD f_a34dB (t_a34gu :: (~>) a_a34dC b_a34dD) (t_a34gv :: f_a34dB a_a34dC). SFunctor f_a34dB => Sing t_a34gu -> Sing t_a34gv -> Sing (Apply (Apply (<$>@#@$) t_a34gu) t_a34gv :: f_a34dB b_a34dD)
infixl 4 %<$>
type family (<$) (arg_a2m3d :: a_a2lWS) (arg_a2m3e :: f_a2lWP b_a2lWT) :: f_a2lWP a_a2lWS
infixl 4 <$
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). SFunctor f_a2lWP => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
infixl 4 %<$
type family (<**>) (a_a2m2T :: f_a2lWg a_a2lWh) (a_a2m2U :: f_a2lWg ((~>) a_a2lWh b_a2lWi)) :: f_a2lWg b_a2lWi
infixl 4 <**>
(%<**>) :: forall f_a2lWg a_a2lWh b_a2lWi (t_a2m73 :: f_a2lWg a_a2lWh) (t_a2m74 :: f_a2lWg ((~>) a_a2lWh b_a2lWi)). SApplicative f_a2lWg => Sing t_a2m73 -> Sing t_a2m74 -> Sing (Apply (Apply (<**>@#@$) t_a2m73) t_a2m74 :: f_a2lWg b_a2lWi)
infixl 4 %<**>
type family LiftA (a_a2m2J :: (~>) a_a2lWe b_a2lWf) (a_a2m2K :: f_a2lWd a_a2lWe) :: f_a2lWd b_a2lWf
sLiftA :: forall a_a2lWe b_a2lWf f_a2lWd (t_a2m6Z :: (~>) a_a2lWe b_a2lWf) (t_a2m70 :: f_a2lWd a_a2lWe). SApplicative f_a2lWd => Sing t_a2m6Z -> Sing t_a2m70 -> Sing (Apply (Apply LiftASym0 t_a2m6Z) t_a2m70 :: f_a2lWd b_a2lWf)
type family LiftA3 (a_a2m2x :: (~>) a_a2lW9 ((~>) b_a2lWa ((~>) c_a2lWb d_a2lWc))) (a_a2m2y :: f_a2lW8 a_a2lW9) (a_a2m2z :: f_a2lW8 b_a2lWa) (a_a2m2A :: f_a2lW8 c_a2lWb) :: f_a2lW8 d_a2lWc
sLiftA3 :: forall a_a2lW9 b_a2lWa c_a2lWb d_a2lWc f_a2lW8 (t_a2m6R :: (~>) a_a2lW9 ((~>) b_a2lWa ((~>) c_a2lWb d_a2lWc))) (t_a2m6S :: f_a2lW8 a_a2lW9) (t_a2m6T :: f_a2lW8 b_a2lWa) (t_a2m6U :: f_a2lW8 c_a2lWb). SApplicative f_a2lW8 => Sing t_a2m6R -> Sing t_a2m6S -> Sing t_a2m6T -> Sing t_a2m6U -> Sing (Apply (Apply (Apply (Apply LiftA3Sym0 t_a2m6R) t_a2m6S) t_a2m6T) t_a2m6U :: f_a2lW8 d_a2lWc)
type family Optional (a_a9sT9 :: f_a9sSx a_a9sSy) :: f_a9sSx (Maybe a_a9sSy)
sOptional :: forall f_a9sSx a_a9sSy (t_a9sUb :: f_a9sSx a_a9sSy). SAlternative f_a9sSx => Sing t_a9sUb -> Sing (Apply OptionalSym0 t_a9sUb :: f_a9sSx (Maybe a_a9sSy))
data PureSym0 :: forall a6989586621679570825 f6989586621679570824. (~>) a6989586621679570825 (f6989586621679570824 a6989586621679570825)
type PureSym1 (arg6989586621679571235 :: a6989586621679570825) = Pure arg6989586621679571235
data (<*>@#@$) :: forall f6989586621679570824 a6989586621679570826 b6989586621679570827. (~>) (f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) ((~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827))
infixl 4 <*>@#@$
data (<*>@#@$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) :: (~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827)
infixl 4 <*>@#@$$
type (<*>@#@$$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) (arg6989586621679571238 :: f6989586621679570824 a6989586621679570826) = (<*>) arg6989586621679571237 arg6989586621679571238
data (*>@#@$) :: forall f6989586621679570824 a6989586621679570831 b6989586621679570832. (~>) (f6989586621679570824 a6989586621679570831) ((~>) (f6989586621679570824 b6989586621679570832) (f6989586621679570824 b6989586621679570832))
infixl 4 *>@#@$
data (*>@#@$$) (arg6989586621679571247 :: f6989586621679570824 a6989586621679570831) :: forall b6989586621679570832. (~>) (f6989586621679570824 b6989586621679570832) (f6989586621679570824 b6989586621679570832)
infixl 4 *>@#@$$
type (*>@#@$$$) (arg6989586621679571247 :: f6989586621679570824 a6989586621679570831) (arg6989586621679571248 :: f6989586621679570824 b6989586621679570832) = (*>) arg6989586621679571247 arg6989586621679571248
data (<*@#@$) :: forall f6989586621679570824 a6989586621679570833 b6989586621679570834. (~>) (f6989586621679570824 a6989586621679570833) ((~>) (f6989586621679570824 b6989586621679570834) (f6989586621679570824 a6989586621679570833))
infixl 4 <*@#@$
data (<*@#@$$) (arg6989586621679571251 :: f6989586621679570824 a6989586621679570833) :: forall b6989586621679570834. (~>) (f6989586621679570824 b6989586621679570834) (f6989586621679570824 a6989586621679570833)
infixl 4 <*@#@$$
type (<*@#@$$$) (arg6989586621679571251 :: f6989586621679570824 a6989586621679570833) (arg6989586621679571252 :: f6989586621679570824 b6989586621679570834) = (<*) arg6989586621679571251 arg6989586621679571252
type EmptySym0 = Empty
data (<|>@#@$) :: forall f6989586621679570899 a6989586621679570901. (~>) (f6989586621679570899 a6989586621679570901) ((~>) (f6989586621679570899 a6989586621679570901) (f6989586621679570899 a6989586621679570901))
infixl 3 <|>@#@$
data (<|>@#@$$) (arg6989586621679571359 :: f6989586621679570899 a6989586621679570901) :: (~>) (f6989586621679570899 a6989586621679570901) (f6989586621679570899 a6989586621679570901)
infixl 3 <|>@#@$$
type (<|>@#@$$$) (arg6989586621679571359 :: f6989586621679570899 a6989586621679570901) (arg6989586621679571360 :: f6989586621679570899 a6989586621679570901) = (<|>) arg6989586621679571359 arg6989586621679571360
data ConstSym0 :: forall (a6989586621679097555 :: Type) k6989586621679097554 (b6989586621679097556 :: k6989586621679097554). (~>) a6989586621679097555 (Const (a6989586621679097555 :: Type) (b6989586621679097556 :: k6989586621679097554))
type ConstSym1 (t6989586621680758421 :: a6989586621679097555) = 'Const t6989586621680758421
data GetConstSym0 :: forall a6989586621680758689 b6989586621680758690. (~>) (Const a6989586621680758689 b6989586621680758690) a6989586621680758689
type GetConstSym1 (x6989586621680758691 :: Const a6989586621680758689 b6989586621680758690) = GetConst x6989586621680758691
data (<$>@#@$) :: forall a6989586621679740996 b6989586621679740997 f6989586621679740995. (~>) ((~>) a6989586621679740996 b6989586621679740997) ((~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997))
infixl 4 <$>@#@$
data (<$>@#@$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) :: forall f6989586621679740995. (~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997)
infixl 4 <$>@#@$$
type (<$>@#@$$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) (a6989586621679741078 :: f6989586621679740995 a6989586621679740996) = (<$>) a6989586621679741077 a6989586621679741078
data (<$@#@$) :: forall a6989586621679570822 f6989586621679570819 b6989586621679570823. (~>) a6989586621679570822 ((~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822))
infixl 4 <$@#@$
data (<$@#@$$) (arg6989586621679571215 :: a6989586621679570822) :: forall f6989586621679570819 b6989586621679570823. (~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822)
infixl 4 <$@#@$$
type (<$@#@$$$) (arg6989586621679571215 :: a6989586621679570822) (arg6989586621679571216 :: f6989586621679570819 b6989586621679570823) = (<$) arg6989586621679571215 arg6989586621679571216
data (<**>@#@$) :: forall f6989586621679570784 a6989586621679570785 b6989586621679570786. (~>) (f6989586621679570784 a6989586621679570785) ((~>) (f6989586621679570784 ((~>) a6989586621679570785 b6989586621679570786)) (f6989586621679570784 b6989586621679570786))
infixl 4 <**>@#@$
data (<**>@#@$$) (a6989586621679571195 :: f6989586621679570784 a6989586621679570785) :: forall b6989586621679570786. (~>) (f6989586621679570784 ((~>) a6989586621679570785 b6989586621679570786)) (f6989586621679570784 b6989586621679570786)
infixl 4 <**>@#@$$
type (<**>@#@$$$) (a6989586621679571195 :: f6989586621679570784 a6989586621679570785) (a6989586621679571196 :: f6989586621679570784 ((~>) a6989586621679570785 b6989586621679570786)) = (<**>) a6989586621679571195 a6989586621679571196
data LiftASym0 :: forall a6989586621679570782 b6989586621679570783 f6989586621679570781. (~>) ((~>) a6989586621679570782 b6989586621679570783) ((~>) (f6989586621679570781 a6989586621679570782) (f6989586621679570781 b6989586621679570783))
data LiftASym1 (a6989586621679571185 :: (~>) a6989586621679570782 b6989586621679570783) :: forall f6989586621679570781. (~>) (f6989586621679570781 a6989586621679570782) (f6989586621679570781 b6989586621679570783)
type LiftASym2 (a6989586621679571185 :: (~>) a6989586621679570782 b6989586621679570783) (a6989586621679571186 :: f6989586621679570781 a6989586621679570782) = LiftA a6989586621679571185 a6989586621679571186
data LiftA2Sym0 :: forall a6989586621679570828 b6989586621679570829 c6989586621679570830 f6989586621679570824. (~>) ((~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) ((~>) (f6989586621679570824 a6989586621679570828) ((~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830)))
data LiftA2Sym1 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) :: forall f6989586621679570824. (~>) (f6989586621679570824 a6989586621679570828) ((~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830))
data LiftA2Sym2 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) (arg6989586621679571242 :: f6989586621679570824 a6989586621679570828) :: (~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830)
type LiftA2Sym3 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) (arg6989586621679571242 :: f6989586621679570824 a6989586621679570828) (arg6989586621679571243 :: f6989586621679570824 b6989586621679570829) = LiftA2 arg6989586621679571241 arg6989586621679571242 arg6989586621679571243
data LiftA3Sym0 :: forall a6989586621679570777 b6989586621679570778 c6989586621679570779 d6989586621679570780 f6989586621679570776. (~>) ((~>) a6989586621679570777 ((~>) b6989586621679570778 ((~>) c6989586621679570779 d6989586621679570780))) ((~>) (f6989586621679570776 a6989586621679570777) ((~>) (f6989586621679570776 b6989586621679570778) ((~>) (f6989586621679570776 c6989586621679570779) (f6989586621679570776 d6989586621679570780))))
data LiftA3Sym1 (a6989586621679571173 :: (~>) a6989586621679570777 ((~>) b6989586621679570778 ((~>) c6989586621679570779 d6989586621679570780))) :: forall f6989586621679570776. (~>) (f6989586621679570776 a6989586621679570777) ((~>) (f6989586621679570776 b6989586621679570778) ((~>) (f6989586621679570776 c6989586621679570779) (f6989586621679570776 d6989586621679570780)))
data LiftA3Sym2 (a6989586621679571173 :: (~>) a6989586621679570777 ((~>) b6989586621679570778 ((~>) c6989586621679570779 d6989586621679570780))) (a6989586621679571174 :: f6989586621679570776 a6989586621679570777) :: (~>) (f6989586621679570776 b6989586621679570778) ((~>) (f6989586621679570776 c6989586621679570779) (f6989586621679570776 d6989586621679570780))
data LiftA3Sym3 (a6989586621679571173 :: (~>) a6989586621679570777 ((~>) b6989586621679570778 ((~>) c6989586621679570779 d6989586621679570780))) (a6989586621679571174 :: f6989586621679570776 a6989586621679570777) (a6989586621679571175 :: f6989586621679570776 b6989586621679570778) :: (~>) (f6989586621679570776 c6989586621679570779) (f6989586621679570776 d6989586621679570780)
data OptionalSym0 :: forall f6989586621681265757 a6989586621681265758. (~>) (f6989586621681265757 a6989586621681265758) (f6989586621681265757 (Maybe a6989586621681265758))
type OptionalSym1 (a6989586621681265795 :: f6989586621681265757 a6989586621681265758) = Optional a6989586621681265795
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681265849Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Ord.Down
instance forall a6989586621679570826 b6989586621679570827 (a6989586621681265847 :: Data.Ord.Down (a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681265849Sym1 a6989586621681265847)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681265839Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.LiftA2_6989586621681265822Sym0
instance Data.Singletons.Prelude.Monad.Internal.PApplicative ((,) a)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 a6989586621681265761 (a6989586621681265819 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681265822Sym1 a6989586621681265819)
instance forall a6989586621679570828 b6989586621679570829 c6989586621679570830 a6989586621681265761 (a6989586621681265820 :: a6989586621679570828 Data.Singletons.Internal.~> (b6989586621679570829 Data.Singletons.Internal.~> c6989586621679570830)) (a6989586621681265819 :: (a6989586621681265761, a6989586621679570828)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681265822Sym2 a6989586621681265820 a6989586621681265819)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681265807Sym0
instance forall a6989586621681265761 a6989586621679570826 b6989586621679570827 (a6989586621681265805 :: (a6989586621681265761, a6989586621679570826 Data.Singletons.Internal.~> b6989586621679570827)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681265807Sym1 a6989586621681265805)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681265799Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.OptionalSym0
instance Data.Singletons.Prelude.Monad.Internal.SAlternative f => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Applicative.OptionalSym0
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monad.Internal.SApplicative ((,) a)
instance Data.Singletons.Prelude.Monad.Internal.SApplicative Data.Ord.Down
-- | Defines the promoted and singled versions of the Monad type
-- class.
module Data.Singletons.Prelude.Monad
class PFunctor (f_a2lWP :: Type -> Type) where {
type family Fmap (arg_a2m39 :: (~>) a_a2lWQ b_a2lWR) (arg_a2m3a :: f_a2lWP a_a2lWQ) :: f_a2lWP b_a2lWR;
type (<$) a_a2m3h a_a2m3i = Apply (Apply TFHelper_6989586621679571221Sym0 a_a2m3h) a_a2m3i;
}
class SFunctor (f_a2lWP :: Type -> Type)
sFmap :: forall a_a2lWQ b_a2lWR (t_a2m7r :: (~>) a_a2lWQ b_a2lWR) (t_a2m7s :: f_a2lWP a_a2lWQ). SFunctor f_a2lWP => Sing t_a2m7r -> Sing t_a2m7s -> Sing (Apply (Apply FmapSym0 t_a2m7r) t_a2m7s :: f_a2lWP b_a2lWR)
class PMonad (m_a2lXi :: Type -> Type) where {
type family (>>=) (arg_a2m4S :: m_a2lXi a_a2lXj) (arg_a2m4T :: (~>) a_a2lXj (m_a2lXi b_a2lXk)) :: m_a2lXi b_a2lXk;
type family (>>) (arg_a2m4W :: m_a2lXi a_a2lXl) (arg_a2m4X :: m_a2lXi b_a2lXm) :: m_a2lXi b_a2lXm;
type family Return (arg_a2m50 :: a_a2lXn) :: m_a2lXi a_a2lXn;
type (>>) a_a2m52 a_a2m53 = Apply (Apply TFHelper_6989586621679571330Sym0 a_a2m52) a_a2m53;
type Return a_a2m5o = Apply Return_6989586621679571351Sym0 a_a2m5o;
}
infixl 1 >>=
infixl 1 >>
class SApplicative m_a2lXi => SMonad (m_a2lXi :: Type -> Type)
(%>>=) :: forall a_a2lXj b_a2lXk (t_a2m82 :: m_a2lXi a_a2lXj) (t_a2m83 :: (~>) a_a2lXj (m_a2lXi b_a2lXk)). SMonad m_a2lXi => Sing t_a2m82 -> Sing t_a2m83 -> Sing (Apply (Apply (>>=@#@$) t_a2m82) t_a2m83 :: m_a2lXi b_a2lXk)
(%>>) :: forall a_a2lXl b_a2lXm (t_a2m86 :: m_a2lXi a_a2lXl) (t_a2m87 :: m_a2lXi b_a2lXm). SMonad m_a2lXi => Sing t_a2m86 -> Sing t_a2m87 -> Sing (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm)
sReturn :: forall a_a2lXn (t_a2m8a :: a_a2lXn). SMonad m_a2lXi => Sing t_a2m8a -> Sing (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn)
(%>>) :: forall a_a2lXl b_a2lXm (t_a2m86 :: m_a2lXi a_a2lXl) (t_a2m87 :: m_a2lXi b_a2lXm). (SMonad m_a2lXi, (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm) ~ Apply (Apply TFHelper_6989586621679571330Sym0 t_a2m86) t_a2m87) => Sing t_a2m86 -> Sing t_a2m87 -> Sing (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm)
sReturn :: forall a_a2lXn (t_a2m8a :: a_a2lXn). (SMonad m_a2lXi, (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn) ~ Apply Return_6989586621679571351Sym0 t_a2m8a) => Sing t_a2m8a -> Sing (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn)
infixl 1 %>>=
infixl 1 %>>
class PMonadPlus (m_a2lYa :: Type -> Type) where {
type family Mzero :: m_a2lYa a_a2lYb;
type family Mplus (arg_a2m5B :: m_a2lYa a_a2lYc) (arg_a2m5C :: m_a2lYa a_a2lYc) :: m_a2lYa a_a2lYc;
type Mzero = Mzero_6989586621679571367Sym0;
type Mplus a_a2m5H a_a2m5I = Apply (Apply Mplus_6989586621679571371Sym0 a_a2m5H) a_a2m5I;
}
class (SAlternative m_a2lYa, SMonad m_a2lYa) => SMonadPlus (m_a2lYa :: Type -> Type)
sMzero :: forall a_a2lYb. SMonadPlus m_a2lYa => Sing (MzeroSym0 :: m_a2lYa a_a2lYb)
sMplus :: forall a_a2lYc (t_a2m8k :: m_a2lYa a_a2lYc) (t_a2m8l :: m_a2lYa a_a2lYc). SMonadPlus m_a2lYa => Sing t_a2m8k -> Sing t_a2m8l -> Sing (Apply (Apply MplusSym0 t_a2m8k) t_a2m8l :: m_a2lYa a_a2lYc)
sMzero :: forall a_a2lYb. (SMonadPlus m_a2lYa, (MzeroSym0 :: m_a2lYa a_a2lYb) ~ Mzero_6989586621679571367Sym0) => Sing (MzeroSym0 :: m_a2lYa a_a2lYb)
sMplus :: forall a_a2lYc (t_a2m8k :: m_a2lYa a_a2lYc) (t_a2m8l :: m_a2lYa a_a2lYc). (SMonadPlus m_a2lYa, (Apply (Apply MplusSym0 t_a2m8k) t_a2m8l :: m_a2lYa a_a2lYc) ~ Apply (Apply Mplus_6989586621679571371Sym0 t_a2m8k) t_a2m8l) => Sing t_a2m8k -> Sing t_a2m8l -> Sing (Apply (Apply MplusSym0 t_a2m8k) t_a2m8l :: m_a2lYa a_a2lYc)
class PMonadFail (m_a33FZ :: Type -> Type) where {
type family Fail (arg_a33Gj :: [Char]) :: m_a33FZ a_a33G0;
}
class SMonad m_a33FZ => SMonadFail (m_a33FZ :: Type -> Type)
sFail :: forall a_a33G0 (t_a33Gx :: [Char]). SMonadFail m_a33FZ => Sing t_a33Gx -> Sing (Apply FailSym0 t_a33Gx :: m_a33FZ a_a33G0)
type family MapM (arg_a7vnx :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (arg_a7vny :: t_a7vnf a_a7vnm) :: m_a7vnl (t_a7vnf b_a7vnn)
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
type family MapM_ (a_a6dlh :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (a_a6dli :: t_a6dbv a_a6dbx) :: m_a6dbw ()
sMapM_ :: forall a_a6dbx m_a6dbw b_a6dby t_a6dbv (t_a6dHe :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (t_a6dHf :: t_a6dbv a_a6dbx). (SFoldable t_a6dbv, SMonad m_a6dbw) => Sing t_a6dHe -> Sing t_a6dHf -> Sing (Apply (Apply MapM_Sym0 t_a6dHe) t_a6dHf :: m_a6dbw ())
type family ForM (a_a7wWX :: t_a7wOy a_a7wOA) (a_a7wWY :: (~>) a_a7wOA (m_a7wOz b_a7wOB)) :: m_a7wOz (t_a7wOy b_a7wOB)
sForM :: forall t_a7wOy a_a7wOA m_a7wOz b_a7wOB (t_a7x6q :: t_a7wOy a_a7wOA) (t_a7x6r :: (~>) a_a7wOA (m_a7wOz b_a7wOB)). (STraversable t_a7wOy, SMonad m_a7wOz) => Sing t_a7x6q -> Sing t_a7x6r -> Sing (Apply (Apply ForMSym0 t_a7x6q) t_a7x6r :: m_a7wOz (t_a7wOy b_a7wOB))
type family Sequence (arg_a7vnB :: t_a7vnf (m_a7vno a_a7vnp)) :: m_a7vno (t_a7vnf a_a7vnp)
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
type family Sequence_ (a_a6dkZ :: t_a6dbl (m_a6dbm a_a6dbn)) :: m_a6dbm ()
sSequence_ :: forall t_a6dbl m_a6dbm a_a6dbn (t_a6dH6 :: t_a6dbl (m_a6dbm a_a6dbn)). (SFoldable t_a6dbl, SMonad m_a6dbm) => Sing t_a6dH6 -> Sing (Apply Sequence_Sym0 t_a6dH6 :: m_a6dbm ())
type family (=<<) (a_a2m2o :: (~>) a_a2lW4 (m_a2lW3 b_a2lW5)) (a_a2m2p :: m_a2lW3 a_a2lW4) :: m_a2lW3 b_a2lW5
infixr 1 =<<
(%=<<) :: forall a_a2lW4 m_a2lW3 b_a2lW5 (t_a2m6L :: (~>) a_a2lW4 (m_a2lW3 b_a2lW5)) (t_a2m6M :: m_a2lW3 a_a2lW4). SMonad m_a2lW3 => Sing t_a2m6L -> Sing t_a2m6M -> Sing (Apply (Apply (=<<@#@$) t_a2m6L) t_a2m6M :: m_a2lW3 b_a2lW5)
infixr 1 %=<<
type family (>=>) (a_a9vlf :: (~>) a_a9veh (m_a9veg b_a9vei)) (a_a9vlg :: (~>) b_a9vei (m_a9veg c_a9vej)) (a_a9vlh :: a_a9veh) :: m_a9veg c_a9vej
infixr 1 >=>
(%>=>) :: forall a_a9veh m_a9veg b_a9vei c_a9vej (t_a9vno :: (~>) a_a9veh (m_a9veg b_a9vei)) (t_a9vnp :: (~>) b_a9vei (m_a9veg c_a9vej)) (t_a9vnq :: a_a9veh). SMonad m_a9veg => Sing t_a9vno -> Sing t_a9vnp -> Sing t_a9vnq -> Sing (Apply (Apply (Apply (>=>@#@$) t_a9vno) t_a9vnp) t_a9vnq :: m_a9veg c_a9vej)
infixr 1 %>=>
type family (<=<) (a_a9vl6 :: (~>) b_a9ved (m_a9vec c_a9vee)) (a_a9vl7 :: (~>) a_a9vef (m_a9vec b_a9ved)) (a_a9vl8 :: a_a9vef) :: m_a9vec c_a9vee
infixr 1 <=<
(%<=<) :: forall b_a9ved m_a9vec c_a9vee a_a9vef (t_a9vni :: (~>) b_a9ved (m_a9vec c_a9vee)) (t_a9vnj :: (~>) a_a9vef (m_a9vec b_a9ved)) (t_a9vnk :: a_a9vef). SMonad m_a9vec => Sing t_a9vni -> Sing t_a9vnj -> Sing t_a9vnk -> Sing (Apply (Apply (Apply (<=<@#@$) t_a9vni) t_a9vnj) t_a9vnk :: m_a9vec c_a9vee)
infixr 1 %<=<
type family Void (a_a34ey :: f_a34dt a_a34du) :: f_a34dt ()
sVoid :: forall f_a34dt a_a34du (t_a34gk :: f_a34dt a_a34du). SFunctor f_a34dt => Sing t_a34gk -> Sing (Apply VoidSym0 t_a34gk :: f_a34dt ())
type family Join (a_a2m2u :: m_a2lW6 (m_a2lW6 a_a2lW7)) :: m_a2lW6 a_a2lW7
sJoin :: forall m_a2lW6 a_a2lW7 (t_a2m6P :: m_a2lW6 (m_a2lW6 a_a2lW7)). SMonad m_a2lW6 => Sing t_a2m6P -> Sing (Apply JoinSym0 t_a2m6P :: m_a2lW6 a_a2lW7)
type family Msum (a_a6dkP :: t_a6dbf (m_a6dbg a_a6dbh)) :: m_a6dbg a_a6dbh
sMsum :: forall t_a6dbf m_a6dbg a_a6dbh (t_a6dH2 :: t_a6dbf (m_a6dbg a_a6dbh)). (SFoldable t_a6dbf, SMonadPlus m_a6dbg) => Sing t_a6dH2 -> Sing (Apply MsumSym0 t_a6dH2 :: m_a6dbg a_a6dbh)
type family Mfilter (a_a9viS :: (~>) a_a9vdJ Bool) (a_a9viT :: m_a9vdI a_a9vdJ) :: m_a9vdI a_a9vdJ
sMfilter :: forall a_a9vdJ m_a9vdI (t_a9vmw :: (~>) a_a9vdJ Bool) (t_a9vmx :: m_a9vdI a_a9vdJ). SMonadPlus m_a9vdI => Sing t_a9vmw -> Sing t_a9vmx -> Sing (Apply (Apply MfilterSym0 t_a9vmw) t_a9vmx :: m_a9vdI a_a9vdJ)
type family FilterM (a_a9vly :: (~>) a_a9vel (m_a9vek Bool)) (a_a9vlz :: [a_a9vel]) :: m_a9vek [a_a9vel]
sFilterM :: forall a_a9vel m_a9vek (t_a9vnu :: (~>) a_a9vel (m_a9vek Bool)) (t_a9vnv :: [a_a9vel]). SApplicative m_a9vek => Sing t_a9vnu -> Sing t_a9vnv -> Sing (Apply (Apply FilterMSym0 t_a9vnu) t_a9vnv :: m_a9vek [a_a9vel])
type family MapAndUnzipM (a_a9vkU :: (~>) a_a9ve9 (m_a9ve8 (b_a9vea, c_a9veb))) (a_a9vkV :: [a_a9ve9]) :: m_a9ve8 ([b_a9vea], [c_a9veb])
sMapAndUnzipM :: forall a_a9ve9 m_a9ve8 b_a9vea c_a9veb (t_a9vne :: (~>) a_a9ve9 (m_a9ve8 (b_a9vea, c_a9veb))) (t_a9vnf :: [a_a9ve9]). SApplicative m_a9ve8 => Sing t_a9vne -> Sing t_a9vnf -> Sing (Apply (Apply MapAndUnzipMSym0 t_a9vne) t_a9vnf :: m_a9ve8 ([b_a9vea], [c_a9veb]))
type family ZipWithM (a_a9vkL :: (~>) a_a9ve5 ((~>) b_a9ve6 (m_a9ve4 c_a9ve7))) (a_a9vkM :: [a_a9ve5]) (a_a9vkN :: [b_a9ve6]) :: m_a9ve4 [c_a9ve7]
sZipWithM :: forall a_a9ve5 b_a9ve6 m_a9ve4 c_a9ve7 (t_a9vn8 :: (~>) a_a9ve5 ((~>) b_a9ve6 (m_a9ve4 c_a9ve7))) (t_a9vn9 :: [a_a9ve5]) (t_a9vna :: [b_a9ve6]). SApplicative m_a9ve4 => Sing t_a9vn8 -> Sing t_a9vn9 -> Sing t_a9vna -> Sing (Apply (Apply (Apply ZipWithMSym0 t_a9vn8) t_a9vn9) t_a9vna :: m_a9ve4 [c_a9ve7])
type family ZipWithM_ (a_a9vkC :: (~>) a_a9ve1 ((~>) b_a9ve2 (m_a9ve0 c_a9ve3))) (a_a9vkD :: [a_a9ve1]) (a_a9vkE :: [b_a9ve2]) :: m_a9ve0 ()
sZipWithM_ :: forall a_a9ve1 b_a9ve2 m_a9ve0 c_a9ve3 (t_a9vn2 :: (~>) a_a9ve1 ((~>) b_a9ve2 (m_a9ve0 c_a9ve3))) (t_a9vn3 :: [a_a9ve1]) (t_a9vn4 :: [b_a9ve2]). SApplicative m_a9ve0 => Sing t_a9vn2 -> Sing t_a9vn3 -> Sing t_a9vn4 -> Sing (Apply (Apply (Apply ZipWithM_Sym0 t_a9vn2) t_a9vn3) t_a9vn4 :: m_a9ve0 ())
type family FoldlM (a_a6dlH :: (~>) b_a6dbJ ((~>) a_a6dbK (m_a6dbI b_a6dbJ))) (a_a6dlI :: b_a6dbJ) (a_a6dlJ :: t_a6dbH a_a6dbK) :: m_a6dbI b_a6dbJ
sFoldlM :: forall b_a6dbJ a_a6dbK m_a6dbI t_a6dbH (t_a6dHq :: (~>) b_a6dbJ ((~>) a_a6dbK (m_a6dbI b_a6dbJ))) (t_a6dHr :: b_a6dbJ) (t_a6dHs :: t_a6dbH a_a6dbK). (SFoldable t_a6dbH, SMonad m_a6dbI) => Sing t_a6dHq -> Sing t_a6dHr -> Sing t_a6dHs -> Sing (Apply (Apply (Apply FoldlMSym0 t_a6dHq) t_a6dHr) t_a6dHs :: m_a6dbI b_a6dbJ)
type family ReplicateM (a_a9vjV :: Nat) (a_a9vjW :: m_a9vdQ a_a9vdR) :: m_a9vdQ [a_a9vdR]
sReplicateM :: forall m_a9vdQ a_a9vdR (t_a9vmM :: Nat) (t_a9vmN :: m_a9vdQ a_a9vdR). SApplicative m_a9vdQ => Sing t_a9vmM -> Sing t_a9vmN -> Sing (Apply (Apply ReplicateMSym0 t_a9vmM) t_a9vmN :: m_a9vdQ [a_a9vdR])
type family ReplicateM_ (a_a9vjC :: Nat) (a_a9vjD :: m_a9vdO a_a9vdP) :: m_a9vdO ()
sReplicateM_ :: forall m_a9vdO a_a9vdP (t_a9vmI :: Nat) (t_a9vmJ :: m_a9vdO a_a9vdP). SApplicative m_a9vdO => Sing t_a9vmI -> Sing t_a9vmJ -> Sing (Apply (Apply ReplicateM_Sym0 t_a9vmI) t_a9vmJ :: m_a9vdO ())
type family Guard (a_a2lYf :: Bool) :: f_a2lVz ()
sGuard :: forall f_a2lVz (t_a2m5X :: Bool). SAlternative f_a2lVz => Sing t_a2m5X -> Sing (Apply GuardSym0 t_a2m5X :: f_a2lVz ())
type family When (a_a2m2f :: Bool) (a_a2m2g :: f_a2lW2 ()) :: f_a2lW2 ()
sWhen :: forall f_a2lW2 (t_a2m6H :: Bool) (t_a2m6I :: f_a2lW2 ()). SApplicative f_a2lW2 => Sing t_a2m6H -> Sing t_a2m6I -> Sing (Apply (Apply WhenSym0 t_a2m6H) t_a2m6I :: f_a2lW2 ())
type family Unless (a_a9vjt :: Bool) (a_a9vju :: f_a9vdN ()) :: f_a9vdN ()
sUnless :: forall f_a9vdN (t_a9vmE :: Bool) (t_a9vmF :: f_a9vdN ()). SApplicative f_a9vdN => Sing t_a9vmE -> Sing t_a9vmF -> Sing (Apply (Apply UnlessSym0 t_a9vmE) t_a9vmF :: f_a9vdN ())
type family LiftM (a_a2m22 :: (~>) a1_a2lW0 r_a2lW1) (a_a2m23 :: m_a2lVZ a1_a2lW0) :: m_a2lVZ r_a2lW1
sLiftM :: forall a1_a2lW0 r_a2lW1 m_a2lVZ (t_a2m6D :: (~>) a1_a2lW0 r_a2lW1) (t_a2m6E :: m_a2lVZ a1_a2lW0). SMonad m_a2lVZ => Sing t_a2m6D -> Sing t_a2m6E -> Sing (Apply (Apply LiftMSym0 t_a2m6D) t_a2m6E :: m_a2lVZ r_a2lW1)
type family LiftM2 (a_a2m1C :: (~>) a1_a2lVW ((~>) a2_a2lVX r_a2lVY)) (a_a2m1D :: m_a2lVV a1_a2lVW) (a_a2m1E :: m_a2lVV a2_a2lVX) :: m_a2lVV r_a2lVY
sLiftM2 :: forall a1_a2lVW a2_a2lVX r_a2lVY m_a2lVV (t_a2m6x :: (~>) a1_a2lVW ((~>) a2_a2lVX r_a2lVY)) (t_a2m6y :: m_a2lVV a1_a2lVW) (t_a2m6z :: m_a2lVV a2_a2lVX). SMonad m_a2lVV => Sing t_a2m6x -> Sing t_a2m6y -> Sing t_a2m6z -> Sing (Apply (Apply (Apply LiftM2Sym0 t_a2m6x) t_a2m6y) t_a2m6z :: m_a2lVV r_a2lVY)
type family LiftM3 (a_a2m0W :: (~>) a1_a2lVR ((~>) a2_a2lVS ((~>) a3_a2lVT r_a2lVU))) (a_a2m0X :: m_a2lVQ a1_a2lVR) (a_a2m0Y :: m_a2lVQ a2_a2lVS) (a_a2m0Z :: m_a2lVQ a3_a2lVT) :: m_a2lVQ r_a2lVU
sLiftM3 :: forall a1_a2lVR a2_a2lVS a3_a2lVT r_a2lVU m_a2lVQ (t_a2m6p :: (~>) a1_a2lVR ((~>) a2_a2lVS ((~>) a3_a2lVT r_a2lVU))) (t_a2m6q :: m_a2lVQ a1_a2lVR) (t_a2m6r :: m_a2lVQ a2_a2lVS) (t_a2m6s :: m_a2lVQ a3_a2lVT). SMonad m_a2lVQ => Sing t_a2m6p -> Sing t_a2m6q -> Sing t_a2m6r -> Sing t_a2m6s -> Sing (Apply (Apply (Apply (Apply LiftM3Sym0 t_a2m6p) t_a2m6q) t_a2m6r) t_a2m6s :: m_a2lVQ r_a2lVU)
type family LiftM4 (a_a2lZX :: (~>) a1_a2lVL ((~>) a2_a2lVM ((~>) a3_a2lVN ((~>) a4_a2lVO r_a2lVP)))) (a_a2lZY :: m_a2lVK a1_a2lVL) (a_a2lZZ :: m_a2lVK a2_a2lVM) (a_a2m00 :: m_a2lVK a3_a2lVN) (a_a2m01 :: m_a2lVK a4_a2lVO) :: m_a2lVK r_a2lVP
sLiftM4 :: forall a1_a2lVL a2_a2lVM a3_a2lVN a4_a2lVO r_a2lVP m_a2lVK (t_a2m6f :: (~>) a1_a2lVL ((~>) a2_a2lVM ((~>) a3_a2lVN ((~>) a4_a2lVO r_a2lVP)))) (t_a2m6g :: m_a2lVK a1_a2lVL) (t_a2m6h :: m_a2lVK a2_a2lVM) (t_a2m6i :: m_a2lVK a3_a2lVN) (t_a2m6j :: m_a2lVK a4_a2lVO). SMonad m_a2lVK => Sing t_a2m6f -> Sing t_a2m6g -> Sing t_a2m6h -> Sing t_a2m6i -> Sing t_a2m6j -> Sing (Apply (Apply (Apply (Apply (Apply LiftM4Sym0 t_a2m6f) t_a2m6g) t_a2m6h) t_a2m6i) t_a2m6j :: m_a2lVK r_a2lVP)
type family LiftM5 (a_a2lYC :: (~>) a1_a2lVE ((~>) a2_a2lVF ((~>) a3_a2lVG ((~>) a4_a2lVH ((~>) a5_a2lVI r_a2lVJ))))) (a_a2lYD :: m_a2lVD a1_a2lVE) (a_a2lYE :: m_a2lVD a2_a2lVF) (a_a2lYF :: m_a2lVD a3_a2lVG) (a_a2lYG :: m_a2lVD a4_a2lVH) (a_a2lYH :: m_a2lVD a5_a2lVI) :: m_a2lVD r_a2lVJ
sLiftM5 :: forall a1_a2lVE a2_a2lVF a3_a2lVG a4_a2lVH a5_a2lVI r_a2lVJ m_a2lVD (t_a2m63 :: (~>) a1_a2lVE ((~>) a2_a2lVF ((~>) a3_a2lVG ((~>) a4_a2lVH ((~>) a5_a2lVI r_a2lVJ))))) (t_a2m64 :: m_a2lVD a1_a2lVE) (t_a2m65 :: m_a2lVD a2_a2lVF) (t_a2m66 :: m_a2lVD a3_a2lVG) (t_a2m67 :: m_a2lVD a4_a2lVH) (t_a2m68 :: m_a2lVD a5_a2lVI). SMonad m_a2lVD => Sing t_a2m63 -> Sing t_a2m64 -> Sing t_a2m65 -> Sing t_a2m66 -> Sing t_a2m67 -> Sing t_a2m68 -> Sing (Apply (Apply (Apply (Apply (Apply (Apply LiftM5Sym0 t_a2m63) t_a2m64) t_a2m65) t_a2m66) t_a2m67) t_a2m68 :: m_a2lVD r_a2lVJ)
type family Ap (a_a2lYh :: m_a2lVA ((~>) a_a2lVB b_a2lVC)) (a_a2lYi :: m_a2lVA a_a2lVB) :: m_a2lVA b_a2lVC
sAp :: forall m_a2lVA a_a2lVB b_a2lVC (t_a2m5Z :: m_a2lVA ((~>) a_a2lVB b_a2lVC)) (t_a2m60 :: m_a2lVA a_a2lVB). SMonad m_a2lVA => Sing t_a2m5Z -> Sing t_a2m60 -> Sing (Apply (Apply ApSym0 t_a2m5Z) t_a2m60 :: m_a2lVA b_a2lVC)
type family (<$!>) (a_a9vjc :: (~>) a_a9vdL b_a9vdM) (a_a9vjd :: m_a9vdK a_a9vdL) :: m_a9vdK b_a9vdM
infixl 4 <$!>
(%<$!>) :: forall a_a9vdL b_a9vdM m_a9vdK (t_a9vmA :: (~>) a_a9vdL b_a9vdM) (t_a9vmB :: m_a9vdK a_a9vdL). SMonad m_a9vdK => Sing t_a9vmA -> Sing t_a9vmB -> Sing (Apply (Apply (<$!>@#@$) t_a9vmA) t_a9vmB :: m_a9vdK b_a9vdM)
infixl 4 %<$!>
data FmapSym0 :: forall a6989586621679570820 b6989586621679570821 f6989586621679570819. (~>) ((~>) a6989586621679570820 b6989586621679570821) ((~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821))
data FmapSym1 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) :: forall f6989586621679570819. (~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821)
type FmapSym2 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) (arg6989586621679571212 :: f6989586621679570819 a6989586621679570820) = Fmap arg6989586621679571211 arg6989586621679571212
data (>>=@#@$) :: forall m6989586621679570848 a6989586621679570849 b6989586621679570850. (~>) (m6989586621679570848 a6989586621679570849) ((~>) ((~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) (m6989586621679570848 b6989586621679570850))
infixl 1 >>=@#@$
data (>>=@#@$$) (arg6989586621679571318 :: m6989586621679570848 a6989586621679570849) :: forall b6989586621679570850. (~>) ((~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) (m6989586621679570848 b6989586621679570850)
infixl 1 >>=@#@$$
type (>>=@#@$$$) (arg6989586621679571318 :: m6989586621679570848 a6989586621679570849) (arg6989586621679571319 :: (~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) = (>>=) arg6989586621679571318 arg6989586621679571319
data (>>@#@$) :: forall m6989586621679570848 a6989586621679570851 b6989586621679570852. (~>) (m6989586621679570848 a6989586621679570851) ((~>) (m6989586621679570848 b6989586621679570852) (m6989586621679570848 b6989586621679570852))
infixl 1 >>@#@$
data (>>@#@$$) (arg6989586621679571322 :: m6989586621679570848 a6989586621679570851) :: forall b6989586621679570852. (~>) (m6989586621679570848 b6989586621679570852) (m6989586621679570848 b6989586621679570852)
infixl 1 >>@#@$$
type (>>@#@$$$) (arg6989586621679571322 :: m6989586621679570848 a6989586621679570851) (arg6989586621679571323 :: m6989586621679570848 b6989586621679570852) = (>>) arg6989586621679571322 arg6989586621679571323
data ReturnSym0 :: forall a6989586621679570853 m6989586621679570848. (~>) a6989586621679570853 (m6989586621679570848 a6989586621679570853)
type ReturnSym1 (arg6989586621679571326 :: a6989586621679570853) = Return arg6989586621679571326
data FailSym0 :: forall m6989586621679738911 a6989586621679738912. (~>) [Char] (m6989586621679738911 a6989586621679738912)
type FailSym1 (arg6989586621679738931 :: [Char]) = Fail arg6989586621679738931
type MzeroSym0 = Mzero
data MplusSym0 :: forall m6989586621679570902 a6989586621679570904. (~>) (m6989586621679570902 a6989586621679570904) ((~>) (m6989586621679570902 a6989586621679570904) (m6989586621679570902 a6989586621679570904))
data MplusSym1 (arg6989586621679571363 :: m6989586621679570902 a6989586621679570904) :: (~>) (m6989586621679570902 a6989586621679570904) (m6989586621679570902 a6989586621679570904)
type MplusSym2 (arg6989586621679571363 :: m6989586621679570902 a6989586621679570904) (arg6989586621679571364 :: m6989586621679570902 a6989586621679570904) = Mplus arg6989586621679571363 arg6989586621679571364
data MapMSym0 :: forall a6989586621680798700 m6989586621680798699 b6989586621680798701 t6989586621680798693. (~>) ((~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) ((~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701)))
data MapMSym1 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701))
type MapMSym2 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) (arg6989586621680798712 :: t6989586621680798693 a6989586621680798700) = MapM arg6989586621680798711 arg6989586621680798712
data MapM_Sym0 :: forall a6989586621680490447 m6989586621680490446 b6989586621680490448 t6989586621680490445. (~>) ((~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) ((~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ()))
data MapM_Sym1 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) :: forall t6989586621680490445. (~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ())
type MapM_Sym2 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) (a6989586621680491052 :: t6989586621680490445 a6989586621680490447) = MapM_ a6989586621680491051 a6989586621680491052
data ForMSym0 :: forall t6989586621680804230 a6989586621680804232 m6989586621680804231 b6989586621680804233. (~>) (t6989586621680804230 a6989586621680804232) ((~>) ((~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) (m6989586621680804231 (t6989586621680804230 b6989586621680804233)))
data ForMSym1 (a6989586621680804751 :: t6989586621680804230 a6989586621680804232) :: forall m6989586621680804231 b6989586621680804233. (~>) ((~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) (m6989586621680804231 (t6989586621680804230 b6989586621680804233))
type ForMSym2 (a6989586621680804751 :: t6989586621680804230 a6989586621680804232) (a6989586621680804752 :: (~>) a6989586621680804232 (m6989586621680804231 b6989586621680804233)) = ForM a6989586621680804751 a6989586621680804752
data SequenceSym0 :: forall t6989586621680798693 m6989586621680798702 a6989586621680798703. (~>) (t6989586621680798693 (m6989586621680798702 a6989586621680798703)) (m6989586621680798702 (t6989586621680798693 a6989586621680798703))
type SequenceSym1 (arg6989586621680798715 :: t6989586621680798693 (m6989586621680798702 a6989586621680798703)) = Sequence arg6989586621680798715
data Sequence_Sym0 :: forall t6989586621680490435 m6989586621680490436 a6989586621680490437. (~>) (t6989586621680490435 (m6989586621680490436 a6989586621680490437)) (m6989586621680490436 ())
type Sequence_Sym1 (a6989586621680491033 :: t6989586621680490435 (m6989586621680490436 a6989586621680490437)) = Sequence_ a6989586621680491033
data (=<<@#@$) :: forall a6989586621679570772 m6989586621679570771 b6989586621679570773. (~>) ((~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) ((~>) (m6989586621679570771 a6989586621679570772) (m6989586621679570771 b6989586621679570773))
infixr 1 =<<@#@$
data (=<<@#@$$) (a6989586621679571164 :: (~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) :: (~>) (m6989586621679570771 a6989586621679570772) (m6989586621679570771 b6989586621679570773)
infixr 1 =<<@#@$$
type (=<<@#@$$$) (a6989586621679571164 :: (~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) (a6989586621679571165 :: m6989586621679570771 a6989586621679570772) = (=<<) a6989586621679571164 a6989586621679571165
data (>=>@#@$) :: forall a6989586621681274793 m6989586621681274792 b6989586621681274794 c6989586621681274795. (~>) ((~>) a6989586621681274793 (m6989586621681274792 b6989586621681274794)) ((~>) ((~>) b6989586621681274794 (m6989586621681274792 c6989586621681274795)) ((~>) a6989586621681274793 (m6989586621681274792 c6989586621681274795)))
infixr 1 >=>@#@$
data (>=>@#@$$) (a6989586621681275225 :: (~>) a6989586621681274793 (m6989586621681274792 b6989586621681274794)) :: forall c6989586621681274795. (~>) ((~>) b6989586621681274794 (m6989586621681274792 c6989586621681274795)) ((~>) a6989586621681274793 (m6989586621681274792 c6989586621681274795))
infixr 1 >=>@#@$$
data (>=>@#@$$$) (a6989586621681275225 :: (~>) a6989586621681274793 (m6989586621681274792 b6989586621681274794)) (a6989586621681275226 :: (~>) b6989586621681274794 (m6989586621681274792 c6989586621681274795)) :: (~>) a6989586621681274793 (m6989586621681274792 c6989586621681274795)
infixr 1 >=>@#@$$$
data (<=<@#@$) :: forall b6989586621681274789 m6989586621681274788 c6989586621681274790 a6989586621681274791. (~>) ((~>) b6989586621681274789 (m6989586621681274788 c6989586621681274790)) ((~>) ((~>) a6989586621681274791 (m6989586621681274788 b6989586621681274789)) ((~>) a6989586621681274791 (m6989586621681274788 c6989586621681274790)))
infixr 1 <=<@#@$
data (<=<@#@$$) (a6989586621681275216 :: (~>) b6989586621681274789 (m6989586621681274788 c6989586621681274790)) :: forall a6989586621681274791. (~>) ((~>) a6989586621681274791 (m6989586621681274788 b6989586621681274789)) ((~>) a6989586621681274791 (m6989586621681274788 c6989586621681274790))
infixr 1 <=<@#@$$
data (<=<@#@$$$) (a6989586621681275216 :: (~>) b6989586621681274789 (m6989586621681274788 c6989586621681274790)) (a6989586621681275217 :: (~>) a6989586621681274791 (m6989586621681274788 b6989586621681274789)) :: (~>) a6989586621681274791 (m6989586621681274788 c6989586621681274790)
infixr 1 <=<@#@$$$
data VoidSym0 :: forall f6989586621679740987 a6989586621679740988. (~>) (f6989586621679740987 a6989586621679740988) (f6989586621679740987 ())
type VoidSym1 (a6989586621679741054 :: f6989586621679740987 a6989586621679740988) = Void a6989586621679741054
data JoinSym0 :: forall m6989586621679570774 a6989586621679570775. (~>) (m6989586621679570774 (m6989586621679570774 a6989586621679570775)) (m6989586621679570774 a6989586621679570775)
type JoinSym1 (a6989586621679571170 :: m6989586621679570774 (m6989586621679570774 a6989586621679570775)) = Join a6989586621679571170
data MsumSym0 :: forall t6989586621680490429 m6989586621680490430 a6989586621680490431. (~>) (t6989586621680490429 (m6989586621680490430 a6989586621680490431)) (m6989586621680490430 a6989586621680490431)
type MsumSym1 (a6989586621680491023 :: t6989586621680490429 (m6989586621680490430 a6989586621680490431)) = Msum a6989586621680491023
data MfilterSym0 :: forall a6989586621681274759 m6989586621681274758. (~>) ((~>) a6989586621681274759 Bool) ((~>) (m6989586621681274758 a6989586621681274759) (m6989586621681274758 a6989586621681274759))
data MfilterSym1 (a6989586621681275078 :: (~>) a6989586621681274759 Bool) :: forall m6989586621681274758. (~>) (m6989586621681274758 a6989586621681274759) (m6989586621681274758 a6989586621681274759)
type MfilterSym2 (a6989586621681275078 :: (~>) a6989586621681274759 Bool) (a6989586621681275079 :: m6989586621681274758 a6989586621681274759) = Mfilter a6989586621681275078 a6989586621681275079
data FilterMSym0 :: forall a6989586621681274797 m6989586621681274796. (~>) ((~>) a6989586621681274797 (m6989586621681274796 Bool)) ((~>) [a6989586621681274797] (m6989586621681274796 [a6989586621681274797]))
data FilterMSym1 (a6989586621681275244 :: (~>) a6989586621681274797 (m6989586621681274796 Bool)) :: (~>) [a6989586621681274797] (m6989586621681274796 [a6989586621681274797])
type FilterMSym2 (a6989586621681275244 :: (~>) a6989586621681274797 (m6989586621681274796 Bool)) (a6989586621681275245 :: [a6989586621681274797]) = FilterM a6989586621681275244 a6989586621681275245
data MapAndUnzipMSym0 :: forall a6989586621681274785 m6989586621681274784 b6989586621681274786 c6989586621681274787. (~>) ((~>) a6989586621681274785 (m6989586621681274784 (b6989586621681274786, c6989586621681274787))) ((~>) [a6989586621681274785] (m6989586621681274784 ([b6989586621681274786], [c6989586621681274787])))
data MapAndUnzipMSym1 (a6989586621681275204 :: (~>) a6989586621681274785 (m6989586621681274784 (b6989586621681274786, c6989586621681274787))) :: (~>) [a6989586621681274785] (m6989586621681274784 ([b6989586621681274786], [c6989586621681274787]))
type MapAndUnzipMSym2 (a6989586621681275204 :: (~>) a6989586621681274785 (m6989586621681274784 (b6989586621681274786, c6989586621681274787))) (a6989586621681275205 :: [a6989586621681274785]) = MapAndUnzipM a6989586621681275204 a6989586621681275205
data ZipWithMSym0 :: forall a6989586621681274781 b6989586621681274782 m6989586621681274780 c6989586621681274783. (~>) ((~>) a6989586621681274781 ((~>) b6989586621681274782 (m6989586621681274780 c6989586621681274783))) ((~>) [a6989586621681274781] ((~>) [b6989586621681274782] (m6989586621681274780 [c6989586621681274783])))
data ZipWithMSym1 (a6989586621681275195 :: (~>) a6989586621681274781 ((~>) b6989586621681274782 (m6989586621681274780 c6989586621681274783))) :: (~>) [a6989586621681274781] ((~>) [b6989586621681274782] (m6989586621681274780 [c6989586621681274783]))
data ZipWithMSym2 (a6989586621681275195 :: (~>) a6989586621681274781 ((~>) b6989586621681274782 (m6989586621681274780 c6989586621681274783))) (a6989586621681275196 :: [a6989586621681274781]) :: (~>) [b6989586621681274782] (m6989586621681274780 [c6989586621681274783])
type ZipWithMSym3 (a6989586621681275195 :: (~>) a6989586621681274781 ((~>) b6989586621681274782 (m6989586621681274780 c6989586621681274783))) (a6989586621681275196 :: [a6989586621681274781]) (a6989586621681275197 :: [b6989586621681274782]) = ZipWithM a6989586621681275195 a6989586621681275196 a6989586621681275197
data ZipWithM_Sym0 :: forall a6989586621681274777 b6989586621681274778 m6989586621681274776 c6989586621681274779. (~>) ((~>) a6989586621681274777 ((~>) b6989586621681274778 (m6989586621681274776 c6989586621681274779))) ((~>) [a6989586621681274777] ((~>) [b6989586621681274778] (m6989586621681274776 ())))
data ZipWithM_Sym1 (a6989586621681275186 :: (~>) a6989586621681274777 ((~>) b6989586621681274778 (m6989586621681274776 c6989586621681274779))) :: (~>) [a6989586621681274777] ((~>) [b6989586621681274778] (m6989586621681274776 ()))
data ZipWithM_Sym2 (a6989586621681275186 :: (~>) a6989586621681274777 ((~>) b6989586621681274778 (m6989586621681274776 c6989586621681274779))) (a6989586621681275187 :: [a6989586621681274777]) :: (~>) [b6989586621681274778] (m6989586621681274776 ())
type ZipWithM_Sym3 (a6989586621681275186 :: (~>) a6989586621681274777 ((~>) b6989586621681274778 (m6989586621681274776 c6989586621681274779))) (a6989586621681275187 :: [a6989586621681274777]) (a6989586621681275188 :: [b6989586621681274778]) = ZipWithM_ a6989586621681275186 a6989586621681275187 a6989586621681275188
data FoldlMSym0 :: forall b6989586621680490459 a6989586621680490460 m6989586621680490458 t6989586621680490457. (~>) ((~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) ((~>) b6989586621680490459 ((~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459)))
data FoldlMSym1 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) :: forall t6989586621680490457. (~>) b6989586621680490459 ((~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459))
data FoldlMSym2 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) (a6989586621680491078 :: b6989586621680490459) :: forall t6989586621680490457. (~>) (t6989586621680490457 a6989586621680490460) (m6989586621680490458 b6989586621680490459)
type FoldlMSym3 (a6989586621680491077 :: (~>) b6989586621680490459 ((~>) a6989586621680490460 (m6989586621680490458 b6989586621680490459))) (a6989586621680491078 :: b6989586621680490459) (a6989586621680491079 :: t6989586621680490457 a6989586621680490460) = FoldlM a6989586621680491077 a6989586621680491078 a6989586621680491079
data ReplicateMSym0 :: forall m6989586621681274766 a6989586621681274767. (~>) Nat ((~>) (m6989586621681274766 a6989586621681274767) (m6989586621681274766 [a6989586621681274767]))
data ReplicateMSym1 (a6989586621681275143 :: Nat) :: forall m6989586621681274766 a6989586621681274767. (~>) (m6989586621681274766 a6989586621681274767) (m6989586621681274766 [a6989586621681274767])
type ReplicateMSym2 (a6989586621681275143 :: Nat) (a6989586621681275144 :: m6989586621681274766 a6989586621681274767) = ReplicateM a6989586621681275143 a6989586621681275144
data ReplicateM_Sym0 :: forall m6989586621681274764 a6989586621681274765. (~>) Nat ((~>) (m6989586621681274764 a6989586621681274765) (m6989586621681274764 ()))
data ReplicateM_Sym1 (a6989586621681275124 :: Nat) :: forall m6989586621681274764 a6989586621681274765. (~>) (m6989586621681274764 a6989586621681274765) (m6989586621681274764 ())
type ReplicateM_Sym2 (a6989586621681275124 :: Nat) (a6989586621681275125 :: m6989586621681274764 a6989586621681274765) = ReplicateM_ a6989586621681275124 a6989586621681275125
data GuardSym0 :: forall f6989586621679570741. (~>) Bool (f6989586621679570741 ())
type GuardSym1 (a6989586621679570907 :: Bool) = Guard a6989586621679570907
data WhenSym0 :: forall f6989586621679570770. (~>) Bool ((~>) (f6989586621679570770 ()) (f6989586621679570770 ()))
data WhenSym1 (a6989586621679571155 :: Bool) :: forall f6989586621679570770. (~>) (f6989586621679570770 ()) (f6989586621679570770 ())
type WhenSym2 (a6989586621679571155 :: Bool) (a6989586621679571156 :: f6989586621679570770 ()) = When a6989586621679571155 a6989586621679571156
data UnlessSym0 :: forall f6989586621681274763. (~>) Bool ((~>) (f6989586621681274763 ()) (f6989586621681274763 ()))
data UnlessSym1 (a6989586621681275115 :: Bool) :: forall f6989586621681274763. (~>) (f6989586621681274763 ()) (f6989586621681274763 ())
type UnlessSym2 (a6989586621681275115 :: Bool) (a6989586621681275116 :: f6989586621681274763 ()) = Unless a6989586621681275115 a6989586621681275116
data LiftMSym0 :: forall a16989586621679570768 r6989586621679570769 m6989586621679570767. (~>) ((~>) a16989586621679570768 r6989586621679570769) ((~>) (m6989586621679570767 a16989586621679570768) (m6989586621679570767 r6989586621679570769))
data LiftMSym1 (a6989586621679571142 :: (~>) a16989586621679570768 r6989586621679570769) :: forall m6989586621679570767. (~>) (m6989586621679570767 a16989586621679570768) (m6989586621679570767 r6989586621679570769)
type LiftMSym2 (a6989586621679571142 :: (~>) a16989586621679570768 r6989586621679570769) (a6989586621679571143 :: m6989586621679570767 a16989586621679570768) = LiftM a6989586621679571142 a6989586621679571143
data LiftM2Sym0 :: forall a16989586621679570764 a26989586621679570765 r6989586621679570766 m6989586621679570763. (~>) ((~>) a16989586621679570764 ((~>) a26989586621679570765 r6989586621679570766)) ((~>) (m6989586621679570763 a16989586621679570764) ((~>) (m6989586621679570763 a26989586621679570765) (m6989586621679570763 r6989586621679570766)))
data LiftM2Sym1 (a6989586621679571116 :: (~>) a16989586621679570764 ((~>) a26989586621679570765 r6989586621679570766)) :: forall m6989586621679570763. (~>) (m6989586621679570763 a16989586621679570764) ((~>) (m6989586621679570763 a26989586621679570765) (m6989586621679570763 r6989586621679570766))
data LiftM2Sym2 (a6989586621679571116 :: (~>) a16989586621679570764 ((~>) a26989586621679570765 r6989586621679570766)) (a6989586621679571117 :: m6989586621679570763 a16989586621679570764) :: (~>) (m6989586621679570763 a26989586621679570765) (m6989586621679570763 r6989586621679570766)
type LiftM2Sym3 (a6989586621679571116 :: (~>) a16989586621679570764 ((~>) a26989586621679570765 r6989586621679570766)) (a6989586621679571117 :: m6989586621679570763 a16989586621679570764) (a6989586621679571118 :: m6989586621679570763 a26989586621679570765) = LiftM2 a6989586621679571116 a6989586621679571117 a6989586621679571118
data LiftM3Sym0 :: forall a16989586621679570759 a26989586621679570760 a36989586621679570761 r6989586621679570762 m6989586621679570758. (~>) ((~>) a16989586621679570759 ((~>) a26989586621679570760 ((~>) a36989586621679570761 r6989586621679570762))) ((~>) (m6989586621679570758 a16989586621679570759) ((~>) (m6989586621679570758 a26989586621679570760) ((~>) (m6989586621679570758 a36989586621679570761) (m6989586621679570758 r6989586621679570762))))
data LiftM3Sym1 (a6989586621679571074 :: (~>) a16989586621679570759 ((~>) a26989586621679570760 ((~>) a36989586621679570761 r6989586621679570762))) :: forall m6989586621679570758. (~>) (m6989586621679570758 a16989586621679570759) ((~>) (m6989586621679570758 a26989586621679570760) ((~>) (m6989586621679570758 a36989586621679570761) (m6989586621679570758 r6989586621679570762)))
data LiftM3Sym2 (a6989586621679571074 :: (~>) a16989586621679570759 ((~>) a26989586621679570760 ((~>) a36989586621679570761 r6989586621679570762))) (a6989586621679571075 :: m6989586621679570758 a16989586621679570759) :: (~>) (m6989586621679570758 a26989586621679570760) ((~>) (m6989586621679570758 a36989586621679570761) (m6989586621679570758 r6989586621679570762))
data LiftM3Sym3 (a6989586621679571074 :: (~>) a16989586621679570759 ((~>) a26989586621679570760 ((~>) a36989586621679570761 r6989586621679570762))) (a6989586621679571075 :: m6989586621679570758 a16989586621679570759) (a6989586621679571076 :: m6989586621679570758 a26989586621679570760) :: (~>) (m6989586621679570758 a36989586621679570761) (m6989586621679570758 r6989586621679570762)
type LiftM3Sym4 (a6989586621679571074 :: (~>) a16989586621679570759 ((~>) a26989586621679570760 ((~>) a36989586621679570761 r6989586621679570762))) (a6989586621679571075 :: m6989586621679570758 a16989586621679570759) (a6989586621679571076 :: m6989586621679570758 a26989586621679570760) (a6989586621679571077 :: m6989586621679570758 a36989586621679570761) = LiftM3 a6989586621679571074 a6989586621679571075 a6989586621679571076 a6989586621679571077
data LiftM4Sym0 :: forall a16989586621679570753 a26989586621679570754 a36989586621679570755 a46989586621679570756 r6989586621679570757 m6989586621679570752. (~>) ((~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) ((~>) (m6989586621679570752 a16989586621679570753) ((~>) (m6989586621679570752 a26989586621679570754) ((~>) (m6989586621679570752 a36989586621679570755) ((~>) (m6989586621679570752 a46989586621679570756) (m6989586621679570752 r6989586621679570757)))))
data LiftM4Sym1 (a6989586621679571013 :: (~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) :: forall m6989586621679570752. (~>) (m6989586621679570752 a16989586621679570753) ((~>) (m6989586621679570752 a26989586621679570754) ((~>) (m6989586621679570752 a36989586621679570755) ((~>) (m6989586621679570752 a46989586621679570756) (m6989586621679570752 r6989586621679570757))))
data LiftM4Sym2 (a6989586621679571013 :: (~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) (a6989586621679571014 :: m6989586621679570752 a16989586621679570753) :: (~>) (m6989586621679570752 a26989586621679570754) ((~>) (m6989586621679570752 a36989586621679570755) ((~>) (m6989586621679570752 a46989586621679570756) (m6989586621679570752 r6989586621679570757)))
data LiftM4Sym3 (a6989586621679571013 :: (~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) (a6989586621679571014 :: m6989586621679570752 a16989586621679570753) (a6989586621679571015 :: m6989586621679570752 a26989586621679570754) :: (~>) (m6989586621679570752 a36989586621679570755) ((~>) (m6989586621679570752 a46989586621679570756) (m6989586621679570752 r6989586621679570757))
data LiftM4Sym4 (a6989586621679571013 :: (~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) (a6989586621679571014 :: m6989586621679570752 a16989586621679570753) (a6989586621679571015 :: m6989586621679570752 a26989586621679570754) (a6989586621679571016 :: m6989586621679570752 a36989586621679570755) :: (~>) (m6989586621679570752 a46989586621679570756) (m6989586621679570752 r6989586621679570757)
type LiftM4Sym5 (a6989586621679571013 :: (~>) a16989586621679570753 ((~>) a26989586621679570754 ((~>) a36989586621679570755 ((~>) a46989586621679570756 r6989586621679570757)))) (a6989586621679571014 :: m6989586621679570752 a16989586621679570753) (a6989586621679571015 :: m6989586621679570752 a26989586621679570754) (a6989586621679571016 :: m6989586621679570752 a36989586621679570755) (a6989586621679571017 :: m6989586621679570752 a46989586621679570756) = LiftM4 a6989586621679571013 a6989586621679571014 a6989586621679571015 a6989586621679571016 a6989586621679571017
data LiftM5Sym0 :: forall a16989586621679570746 a26989586621679570747 a36989586621679570748 a46989586621679570749 a56989586621679570750 r6989586621679570751 m6989586621679570745. (~>) ((~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) ((~>) (m6989586621679570745 a16989586621679570746) ((~>) (m6989586621679570745 a26989586621679570747) ((~>) (m6989586621679570745 a36989586621679570748) ((~>) (m6989586621679570745 a46989586621679570749) ((~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751))))))
data LiftM5Sym1 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) :: forall m6989586621679570745. (~>) (m6989586621679570745 a16989586621679570746) ((~>) (m6989586621679570745 a26989586621679570747) ((~>) (m6989586621679570745 a36989586621679570748) ((~>) (m6989586621679570745 a46989586621679570749) ((~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751)))))
data LiftM5Sym2 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) (a6989586621679570931 :: m6989586621679570745 a16989586621679570746) :: (~>) (m6989586621679570745 a26989586621679570747) ((~>) (m6989586621679570745 a36989586621679570748) ((~>) (m6989586621679570745 a46989586621679570749) ((~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751))))
data LiftM5Sym3 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) (a6989586621679570931 :: m6989586621679570745 a16989586621679570746) (a6989586621679570932 :: m6989586621679570745 a26989586621679570747) :: (~>) (m6989586621679570745 a36989586621679570748) ((~>) (m6989586621679570745 a46989586621679570749) ((~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751)))
data LiftM5Sym4 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) (a6989586621679570931 :: m6989586621679570745 a16989586621679570746) (a6989586621679570932 :: m6989586621679570745 a26989586621679570747) (a6989586621679570933 :: m6989586621679570745 a36989586621679570748) :: (~>) (m6989586621679570745 a46989586621679570749) ((~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751))
data LiftM5Sym5 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) (a6989586621679570931 :: m6989586621679570745 a16989586621679570746) (a6989586621679570932 :: m6989586621679570745 a26989586621679570747) (a6989586621679570933 :: m6989586621679570745 a36989586621679570748) (a6989586621679570934 :: m6989586621679570745 a46989586621679570749) :: (~>) (m6989586621679570745 a56989586621679570750) (m6989586621679570745 r6989586621679570751)
type LiftM5Sym6 (a6989586621679570930 :: (~>) a16989586621679570746 ((~>) a26989586621679570747 ((~>) a36989586621679570748 ((~>) a46989586621679570749 ((~>) a56989586621679570750 r6989586621679570751))))) (a6989586621679570931 :: m6989586621679570745 a16989586621679570746) (a6989586621679570932 :: m6989586621679570745 a26989586621679570747) (a6989586621679570933 :: m6989586621679570745 a36989586621679570748) (a6989586621679570934 :: m6989586621679570745 a46989586621679570749) (a6989586621679570935 :: m6989586621679570745 a56989586621679570750) = LiftM5 a6989586621679570930 a6989586621679570931 a6989586621679570932 a6989586621679570933 a6989586621679570934 a6989586621679570935
data ApSym0 :: forall m6989586621679570742 a6989586621679570743 b6989586621679570744. (~>) (m6989586621679570742 ((~>) a6989586621679570743 b6989586621679570744)) ((~>) (m6989586621679570742 a6989586621679570743) (m6989586621679570742 b6989586621679570744))
data ApSym1 (a6989586621679570909 :: m6989586621679570742 ((~>) a6989586621679570743 b6989586621679570744)) :: (~>) (m6989586621679570742 a6989586621679570743) (m6989586621679570742 b6989586621679570744)
type ApSym2 (a6989586621679570909 :: m6989586621679570742 ((~>) a6989586621679570743 b6989586621679570744)) (a6989586621679570910 :: m6989586621679570742 a6989586621679570743) = Ap a6989586621679570909 a6989586621679570910
data (<$!>@#@$) :: forall a6989586621681274761 b6989586621681274762 m6989586621681274760. (~>) ((~>) a6989586621681274761 b6989586621681274762) ((~>) (m6989586621681274760 a6989586621681274761) (m6989586621681274760 b6989586621681274762))
infixl 4 <$!>@#@$
data (<$!>@#@$$) (a6989586621681275098 :: (~>) a6989586621681274761 b6989586621681274762) :: forall m6989586621681274760. (~>) (m6989586621681274760 a6989586621681274761) (m6989586621681274760 b6989586621681274762)
infixl 4 <$!>@#@$$
type (<$!>@#@$$$) (a6989586621681275098 :: (~>) a6989586621681274761 b6989586621681274762) (a6989586621681275099 :: m6989586621681274760 a6989586621681274761) = (<$!>) a6989586621681275098 a6989586621681275099
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681275294Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Ord.Down
instance forall a6989586621679570849 b6989586621679570850 (a6989586621681275292 :: Data.Ord.Down a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681275294Sym1 a6989586621681275292)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681275272Sym0
instance Data.Singletons.Prelude.Monad.Internal.PMonad ((,) a)
instance forall a6989586621681274845 a6989586621679570849 b6989586621679570850 (a6989586621681275270 :: (a6989586621681274845, a6989586621679570849)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681275272Sym1 a6989586621681275270)
instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monad.Internal.SMonad ((,) a)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681275281Scrutinee_6989586621681274859Sym0
instance forall k1 k2 k3 (u6989586621681275278 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275281Scrutinee_6989586621681274859Sym1 u6989586621681275278)
instance forall k1 k2 k3 (a6989586621681275279 :: k1) (u6989586621681275278 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275281Scrutinee_6989586621681274859Sym2 a6989586621681275279 u6989586621681275278)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.FilterMSym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.FilterMSym0
instance forall a6989586621681274797 (m6989586621681274796 :: * -> *) (a6989586621681275244 :: a6989586621681274797 Data.Singletons.Internal.~> m6989586621681274796 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FilterMSym1 a6989586621681275244)
instance forall a (m :: * -> *) (d :: a Data.Singletons.Internal.~> m GHC.Types.Bool). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.FilterMSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.<=<@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SMonad m => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.<=<@#@$)
instance forall b6989586621681274789 (m6989586621681274788 :: * -> *) c6989586621681274790 a6989586621681274791 (a6989586621681275216 :: b6989586621681274789 Data.Singletons.Internal.~> m6989586621681274788 c6989586621681274790). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<=<@#@$$) a6989586621681275216)
instance forall b (m :: * -> *) c a (d :: b Data.Singletons.Internal.~> m c). (Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Monad.<=<@#@$$) d)
instance forall b6989586621681274789 (m6989586621681274788 :: * -> *) c6989586621681274790 a6989586621681274791 (a6989586621681275217 :: b6989586621681274789 Data.Singletons.Internal.~> m6989586621681274788 c6989586621681274790) (a6989586621681275216 :: a6989586621681274791 Data.Singletons.Internal.~> m6989586621681274788 b6989586621681274789). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681275217 Data.Singletons.Prelude.Monad.<=<@#@$$$ a6989586621681275216)
instance forall b (m :: * -> *) c a (d1 :: b Data.Singletons.Internal.~> m c) (d2 :: a Data.Singletons.Internal.~> m b). (Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (d1 Data.Singletons.Prelude.Monad.<=<@#@$$$ d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.>=>@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SMonad m => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.>=>@#@$)
instance forall a6989586621681274793 (m6989586621681274792 :: * -> *) b6989586621681274794 c6989586621681274795 (a6989586621681275225 :: a6989586621681274793 Data.Singletons.Internal.~> m6989586621681274792 b6989586621681274794). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.>=>@#@$$) a6989586621681275225)
instance forall a (m :: * -> *) b c (d :: a Data.Singletons.Internal.~> m b). (Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Monad.>=>@#@$$) d)
instance forall a6989586621681274793 (m6989586621681274792 :: * -> *) b6989586621681274794 c6989586621681274795 (a6989586621681275226 :: a6989586621681274793 Data.Singletons.Internal.~> m6989586621681274792 b6989586621681274794) (a6989586621681275225 :: b6989586621681274794 Data.Singletons.Internal.~> m6989586621681274792 c6989586621681274795). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681275226 Data.Singletons.Prelude.Monad.>=>@#@$$$ a6989586621681275225)
instance forall a (m :: * -> *) b c (d1 :: a Data.Singletons.Internal.~> m b) (d2 :: b Data.Singletons.Internal.~> m c). (Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (d1 Data.Singletons.Prelude.Monad.>=>@#@$$$ d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.MapAndUnzipMSym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.MapAndUnzipMSym0
instance forall a6989586621681274785 (m6989586621681274784 :: * -> *) b6989586621681274786 c6989586621681274787 (a6989586621681275204 :: a6989586621681274785 Data.Singletons.Internal.~> m6989586621681274784 (b6989586621681274786, c6989586621681274787)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MapAndUnzipMSym1 a6989586621681275204)
instance forall a (m :: * -> *) b c (d :: a Data.Singletons.Internal.~> m (b, c)). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.MapAndUnzipMSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.ZipWithMSym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.ZipWithMSym0
instance forall a6989586621681274781 b6989586621681274782 (m6989586621681274780 :: * -> *) c6989586621681274783 (a6989586621681275195 :: a6989586621681274781 Data.Singletons.Internal.~> (b6989586621681274782 Data.Singletons.Internal.~> m6989586621681274780 c6989586621681274783)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym1 a6989586621681275195)
instance forall a b (m :: * -> *) c (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m c)). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ZipWithMSym1 d)
instance forall a6989586621681274781 b6989586621681274782 (m6989586621681274780 :: * -> *) c6989586621681274783 (a6989586621681275196 :: a6989586621681274781 Data.Singletons.Internal.~> (b6989586621681274782 Data.Singletons.Internal.~> m6989586621681274780 c6989586621681274783)) (a6989586621681275195 :: [a6989586621681274781]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym2 a6989586621681275196 a6989586621681275195)
instance forall a b (m :: * -> *) c (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m c)) (d2 :: [a]). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ZipWithMSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.ZipWithM_Sym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.ZipWithM_Sym0
instance forall a6989586621681274777 b6989586621681274778 (m6989586621681274776 :: * -> *) c6989586621681274779 (a6989586621681275186 :: a6989586621681274777 Data.Singletons.Internal.~> (b6989586621681274778 Data.Singletons.Internal.~> m6989586621681274776 c6989586621681274779)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym1 a6989586621681275186)
instance forall a b (m :: * -> *) c (d :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m c)). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ZipWithM_Sym1 d)
instance forall a6989586621681274777 b6989586621681274778 (m6989586621681274776 :: * -> *) c6989586621681274779 (a6989586621681275187 :: a6989586621681274777 Data.Singletons.Internal.~> (b6989586621681274778 Data.Singletons.Internal.~> m6989586621681274776 c6989586621681274779)) (a6989586621681275186 :: [a6989586621681274777]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym2 a6989586621681275187 a6989586621681275186)
instance forall a b (m :: * -> *) c (d1 :: a Data.Singletons.Internal.~> (b Data.Singletons.Internal.~> m c)) (d2 :: [a]). (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ZipWithM_Sym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.FoldMSym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.FoldMSym0
instance forall b6989586621681274774 a6989586621681274775 (m6989586621681274773 :: * -> *) (t6989586621681274772 :: * -> *) (a6989586621681275177 :: b6989586621681274774 Data.Singletons.Internal.~> (a6989586621681274775 Data.Singletons.Internal.~> m6989586621681274773 b6989586621681274774)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym1 a6989586621681275177)
instance forall b a (m :: * -> *) (t :: * -> *) (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.FoldMSym1 d)
instance forall b6989586621681274774 a6989586621681274775 (m6989586621681274773 :: * -> *) (t6989586621681274772 :: * -> *) (a6989586621681275178 :: b6989586621681274774 Data.Singletons.Internal.~> (a6989586621681274775 Data.Singletons.Internal.~> m6989586621681274773 b6989586621681274774)) (a6989586621681275177 :: b6989586621681274774). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym2 a6989586621681275178 a6989586621681275177)
instance forall b a (m :: * -> *) (t :: * -> *) (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.FoldMSym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.FoldM_Sym0
instance (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.FoldM_Sym0
instance forall b6989586621681274770 a6989586621681274771 (m6989586621681274769 :: * -> *) (t6989586621681274768 :: * -> *) (a6989586621681275162 :: b6989586621681274770 Data.Singletons.Internal.~> (a6989586621681274771 Data.Singletons.Internal.~> m6989586621681274769 b6989586621681274770)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym1 a6989586621681275162)
instance forall b a (m :: * -> *) (t :: * -> *) (d :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.FoldM_Sym1 d)
instance forall b6989586621681274770 a6989586621681274771 (m6989586621681274769 :: * -> *) (t6989586621681274768 :: * -> *) (a6989586621681275163 :: b6989586621681274770 Data.Singletons.Internal.~> (a6989586621681274771 Data.Singletons.Internal.~> m6989586621681274769 b6989586621681274770)) (a6989586621681275162 :: b6989586621681274770). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym2 a6989586621681275163 a6989586621681275162)
instance forall b a (m :: * -> *) (t :: * -> *) (d1 :: b Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> m b)) (d2 :: b). (Data.Singletons.Prelude.Foldable.SFoldable t, Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d1, Data.Singletons.Internal.SingI d2) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.FoldM_Sym2 d1 d2)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.ReplicateMSym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.ReplicateMSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ReplicateMSym1 a6989586621681275143)
instance (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ReplicateMSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.ReplicateM_Sym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.ReplicateM_Sym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ReplicateM_Sym1 a6989586621681275124)
instance (Data.Singletons.Prelude.Monad.Internal.SApplicative m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.ReplicateM_Sym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.UnlessSym0
instance Data.Singletons.Prelude.Monad.Internal.SApplicative f => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.UnlessSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.UnlessSym1 a6989586621681275115)
instance (Data.Singletons.Prelude.Monad.Internal.SApplicative f, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.UnlessSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.<$!>@#@$)
instance Data.Singletons.Prelude.Monad.Internal.SMonad m => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.<$!>@#@$)
instance forall a6989586621681274761 b6989586621681274762 (m6989586621681274760 :: * -> *) (a6989586621681275098 :: a6989586621681274761 Data.Singletons.Internal.~> b6989586621681274762). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<$!>@#@$$) a6989586621681275098)
instance forall a b (m :: * -> *) (d :: a Data.Singletons.Internal.~> b). (Data.Singletons.Prelude.Monad.Internal.SMonad m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI ((Data.Singletons.Prelude.Monad.<$!>@#@$$) d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.MfilterSym0
instance Data.Singletons.Prelude.Monad.Internal.SMonadPlus m => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monad.MfilterSym0
instance forall a6989586621681274759 (m6989586621681274758 :: * -> *) (a6989586621681275078 :: a6989586621681274759 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MfilterSym1 a6989586621681275078)
instance forall a (m :: * -> *) (d :: a Data.Singletons.Internal.~> GHC.Types.Bool). (Data.Singletons.Prelude.Monad.Internal.SMonadPlus m, Data.Singletons.Internal.SingI d) => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Monad.MfilterSym1 d)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681275252Sym0
instance forall k2 (f6989586621679570824 :: * -> *) k3 (p6989586621681275250 :: k2 Data.Singletons.Internal.~> f6989586621679570824 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275252Sym1 p6989586621681275250)
instance forall k2 (f6989586621679570824 :: * -> *) k3 (a_69895866216812752486989586621681275251 :: k2 Data.Singletons.Internal.~> f6989586621679570824 GHC.Types.Bool) (p6989586621681275250 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275252Sym2 a_69895866216812752486989586621681275251 p6989586621681275250)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681275255Sym0
instance forall k1 k2 k3 (x6989586621681275254 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275255Sym1 x6989586621681275254)
instance forall k1 k2 k3 (p6989586621681275250 :: k1) (x6989586621681275254 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275255Sym2 p6989586621681275250 x6989586621681275254)
instance forall k1 k2 k3 (a_69895866216812752486989586621681275251 :: k1) (p6989586621681275250 :: k2) (x6989586621681275254 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275255Sym3 a_69895866216812752486989586621681275251 p6989586621681275250 x6989586621681275254)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681275236Sym0
instance forall k1 (m6989586621679570848 :: * -> *) a6989586621679570849 b6989586621679570850 k (f6989586621681275233 :: k1 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275236Sym1 f6989586621681275233)
instance forall k1 (m6989586621679570848 :: * -> *) a6989586621679570849 b6989586621679570850 k (g6989586621681275234 :: k1 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849) (f6989586621681275233 :: a6989586621679570849 Data.Singletons.Internal.~> m6989586621679570848 b6989586621679570850). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275236Sym2 g6989586621681275234 f6989586621681275233)
instance forall k1 (m6989586621679570848 :: * -> *) a6989586621679570849 b6989586621679570850 k (a_69895866216812752316989586621681275235 :: k1 Data.Singletons.Internal.~> m6989586621679570848 a6989586621679570849) (g6989586621681275234 :: a6989586621679570849 Data.Singletons.Internal.~> m6989586621679570848 b6989586621679570850) (f6989586621681275233 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275236Sym3 a_69895866216812752316989586621681275235 g6989586621681275234 f6989586621681275233)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681275149LoopSym0
instance forall k (m :: * -> *) a (m6989586621681274766 :: * -> *) a6989586621681274767 (cnt06989586621681275147 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275149LoopSym1 cnt06989586621681275147)
instance forall k (m :: * -> *) a (m6989586621681274766 :: * -> *) a6989586621681274767 (f6989586621681275148 :: k) (cnt06989586621681275147 :: m a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275149LoopSym2 f6989586621681275148 cnt06989586621681275147)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681275130LoopSym0
instance forall k (m :: * -> *) a6989586621679570831 (m6989586621681274764 :: * -> *) (cnt06989586621681275128 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275130LoopSym1 cnt06989586621681275128)
instance forall k (m :: * -> *) a6989586621679570831 (m6989586621681274764 :: * -> *) (f6989586621681275129 :: k) (cnt06989586621681275128 :: m a6989586621679570831). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275130LoopSym2 f6989586621681275129 cnt06989586621681275128)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681275104Sym0
instance forall k2 k3 k (m6989586621679570848 :: * -> *) (f6989586621681275102 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275104Sym1 f6989586621681275102)
instance forall k2 k3 k (m6989586621679570848 :: * -> *) (m6989586621681275103 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681275102 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275104Sym2 m6989586621681275103 f6989586621681275102)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681275107ZSym0
instance forall k1 k2 k3 (x6989586621681275106 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275107ZSym1 x6989586621681275106)
instance forall k1 k2 k3 (f6989586621681275102 :: k1) (x6989586621681275106 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275107ZSym2 f6989586621681275102 x6989586621681275106)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681275084Sym0
instance forall k1 k (m6989586621679570848 :: * -> *) (p6989586621681275082 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275084Sym1 p6989586621681275082)
instance forall k1 k (m6989586621679570848 :: * -> *) (ma6989586621681275083 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621681275082 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681275084Sym2 ma6989586621681275083 p6989586621681275082)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681275087Scrutinee_6989586621681274857Sym0
instance forall k1 k2 k3 (a6989586621681275086 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275087Scrutinee_6989586621681274857Sym1 a6989586621681275086)
instance forall k1 k2 k3 (p6989586621681275082 :: k1) (a6989586621681275086 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681275087Scrutinee_6989586621681274857Sym2 p6989586621681275082 a6989586621681275086)
instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Ord.Down
-- | This module exports the basic definitions to use singletons. For
-- routine use, consider importing Prelude, which exports
-- constructors for singletons based on types in the Prelude.
--
-- You may also want to read the original papers presenting this library,
-- available at
-- http://cs.brynmawr.edu/~rae/papers/2012/singletons/paper.pdf
-- and
-- http://cs.brynmawr.edu/~rae/papers/2014/promotion/promotion.pdf.
module Data.Singletons
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
newtype SLambda (f :: k1 ~> k2)
SLambda :: (forall t. Sing t -> Sing (f @@ t)) -> SLambda (f :: k1 ~> k2)
[applySing] :: SLambda (f :: k1 ~> k2) -> forall t. Sing t -> Sing (f @@ t)
-- | An infix synonym for applySing
(@@) :: forall k1 k2 (f :: k1 ~> k2) (t :: k1). Sing f -> Sing t -> Sing (f @@ t)
infixl 9 @@
-- | A SingI constraint is essentially an implicitly-passed
-- singleton. If you need to satisfy this constraint with an explicit
-- singleton, please see withSingI or the Sing pattern
-- synonym.
class SingI a
-- | Produce the singleton explicitly. You will likely need the
-- ScopedTypeVariables extension to use this method the way you
-- want.
sing :: SingI a => Sing a
-- | The SingKind class is a kind class. It classifies all
-- kinds for which singletons are defined. The class supports converting
-- between a singleton type and the base (unrefined) type which it is
-- built from.
--
-- For a SingKind instance to be well behaved, it should obey the
-- following laws:
--
--
-- toSing . fromSing ≡ SomeSing
-- (\x -> withSomeSing x fromSing) ≡ id
--
--
-- The final law can also be expressed in terms of the FromSing
-- pattern synonym:
--
--
-- (\(FromSing sing) -> FromSing sing) ≡ id
--
class SingKind k where {
-- | Get a base type from the promoted kind. For example, Demote
-- Bool will be the type Bool. Rarely, the type and kind do
-- not match. For example, Demote Nat is Natural.
type family Demote k = (r :: Type) | r -> k;
}
-- | Convert a singleton to its unrefined version.
fromSing :: SingKind k => Sing (a :: k) -> Demote k
-- | Convert an unrefined type to an existentially-quantified singleton
-- type.
toSing :: SingKind k => Demote k -> SomeSing k
-- | Convenient synonym to refer to the kind of a type variable: type
-- KindOf (a :: k) = k
type KindOf (a :: k) = k
-- | Force GHC to unify the kinds of a and b. Note that
-- SameKind a b is different from KindOf a ~ KindOf b
-- in that the former makes the kinds unify immediately, whereas the
-- latter is a proposition that GHC considers as possibly false.
type SameKind (a :: k) (b :: k) = (() :: Constraint)
-- | A SingInstance wraps up a SingI instance for explicit
-- handling.
data SingInstance (a :: k)
[SingInstance] :: SingI a => SingInstance a
-- | An existentially-quantified singleton. This type is useful when
-- you want a singleton type, but there is no way of knowing, at
-- compile-time, what the type index will be. To make use of this type,
-- you will generally have to use a pattern-match:
--
--
-- foo :: Bool -> ...
-- foo b = case toSing b of
-- SomeSing sb -> {- fancy dependently-typed code with sb -}
--
--
-- An example like the one above may be easier to write using
-- withSomeSing.
data SomeSing k
[SomeSing] :: Sing (a :: k) -> SomeSing k
-- | Get an implicit singleton (a SingI instance) from an explicit
-- one.
singInstance :: forall k (a :: k). Sing a -> SingInstance a
-- | An explicitly bidirectional pattern synonym for implicit singletons.
--
-- As an expression: Constructs a singleton Sing a given
-- a implicit singleton constraint SingI a.
--
-- As a pattern: Matches on an explicit Sing a witness
-- bringing an implicit SingI a constraint into scope.
pattern Sing :: forall k (a :: k). () => SingI a => Sing a
-- | Convenience function for creating a context with an implicit singleton
-- available.
withSingI :: Sing n -> (SingI n => r) -> r
-- | Convert a normal datatype (like Bool) to a singleton for that
-- datatype, passing it into a continuation.
withSomeSing :: forall k r. SingKind k => Demote k -> (forall (a :: k). Sing a -> r) -> r
-- | An explicitly bidirectional pattern synonym for going between a
-- singleton and the corresponding demoted term.
--
-- As an expression: this takes a singleton to its demoted (base)
-- type.
--
--
-- >>> :t FromSing \@Bool
-- FromSing \@Bool :: Sing a -> Bool
--
-- >>> FromSing SFalse
-- False
--
--
-- As a pattern: It extracts a singleton from its demoted (base)
-- type.
--
--
-- singAnd :: Bool -> Bool -> SomeSing Bool
-- singAnd (FromSing singBool1) (FromSing singBool2) =
-- SomeSing (singBool1 %&& singBool2)
--
--
-- instead of writing it with withSomeSing:
--
--
-- singAnd bool1 bool2 =
-- withSomeSing bool1 $ singBool1 ->
-- withSomeSing bool2 $ singBool2 ->
-- SomeSing (singBool1 %&& singBool2)
--
pattern FromSing :: SingKind k => forall (a :: k). Sing a -> Demote k
-- | Allows creation of a singleton when a proxy is at hand.
singByProxy :: SingI a => proxy a -> Sing a
-- | A convenience function that takes a type as input and demotes it to
-- its value-level counterpart as output. This uses SingKind and
-- SingI behind the scenes, so demote = fromSing
-- sing.
--
-- This function is intended to be used with TypeApplications.
-- For example:
--
--
-- >>> demote @True
-- True
--
--
--
-- >>> demote @(Nothing :: Maybe Ordering)
-- Nothing
--
demote :: forall a. (SingKind (KindOf a), SingI a) => Demote (KindOf a)
-- | Allows creation of a singleton when a proxy# is at hand.
singByProxy# :: SingI a => Proxy# a -> Sing a
-- | A convenience function useful when we need to name a singleton value
-- multiple times. Without this function, each use of sing could
-- potentially refer to a different singleton, and one has to use type
-- signatures (often with ScopedTypeVariables) to ensure that
-- they are the same.
withSing :: SingI a => (Sing a -> b) -> b
-- | A convenience function that names a singleton satisfying a certain
-- property. If the singleton does not satisfy the property, then the
-- function returns Nothing. The property is expressed in terms of
-- the underlying representation of the singleton.
singThat :: forall k (a :: k). (SingKind k, SingI a) => (Demote k -> Bool) -> Maybe (Sing a)
-- | A newtype around Sing.
--
-- Since Sing is a type family, it cannot be used directly in type
-- class instances. As one example, one cannot write a catch-all
-- instance SDecide k => TestEquality
-- (Sing k). On the other hand, WrappedSing is a
-- perfectly ordinary data type, which means that it is quite possible to
-- define an instance SDecide k => TestEquality
-- (WrappedSing k).
newtype WrappedSing :: forall k. k -> Type
[WrapSing] :: forall k (a :: k). {unwrapSing :: Sing a} -> WrappedSing a
-- | The singleton for WrappedSings. Informally, this is the
-- singleton type for other singletons.
newtype SWrappedSing :: forall k (a :: k). WrappedSing a -> Type
[SWrapSing] :: forall k (a :: k) (ws :: WrappedSing a). {sUnwrapSing :: Sing a} -> SWrappedSing ws
type family UnwrapSing (ws :: WrappedSing a) :: Sing a
-- | Representation of the kind of a type-level function. The difference
-- between term-level arrows and this type-level arrow is that at the
-- term level applications can be unsaturated, whereas at the type level
-- all applications have to be fully saturated.
data TyFun :: Type -> Type -> Type
-- | Something of kind `a ~> b` is a defunctionalized type function that
-- is not necessarily generative or injective.
type a ~> b = TyFun a b -> Type
infixr 0 ~>
-- | Wrapper for converting the normal type-level arrow into a
-- ~>. For example, given:
--
--
-- data Nat = Zero | Succ Nat
-- type family Map (a :: a ~> b) (a :: [a]) :: [b]
-- Map f '[] = '[]
-- Map f (x ': xs) = Apply f x ': Map f xs
--
--
-- We can write:
--
--
-- Map (TyCon1 Succ) [Zero, Succ Zero]
--
type TyCon1 = (TyCon :: (k1 -> k2) -> (k1 ~> k2))
-- | Similar to TyCon1, but for two-parameter type constructors.
type TyCon2 = (TyCon :: (k1 -> k2 -> k3) -> (k1 ~> k2 ~> k3))
type TyCon3 = (TyCon :: (k1 -> k2 -> k3 -> k4) -> (k1 ~> k2 ~> k3 ~> k4))
type TyCon4 = (TyCon :: (k1 -> k2 -> k3 -> k4 -> k5) -> (k1 ~> k2 ~> k3 ~> k4 ~> k5))
type TyCon5 = (TyCon :: (k1 -> k2 -> k3 -> k4 -> k5 -> k6) -> (k1 ~> k2 ~> k3 ~> k4 ~> k5 ~> k6))
type TyCon6 = (TyCon :: (k1 -> k2 -> k3 -> k4 -> k5 -> k6 -> k7) -> (k1 ~> k2 ~> k3 ~> k4 ~> k5 ~> k6 ~> k7))
type TyCon7 = (TyCon :: (k1 -> k2 -> k3 -> k4 -> k5 -> k6 -> k7 -> k8) -> (k1 ~> k2 ~> k3 ~> k4 ~> k5 ~> k6 ~> k7 ~> k8))
type TyCon8 = (TyCon :: (k1 -> k2 -> k3 -> k4 -> k5 -> k6 -> k7 -> k8 -> k9) -> (k1 ~> k2 ~> k3 ~> k4 ~> k5 ~> k6 ~> k7 ~> k8 ~> k9))
-- | Workhorse for the TyCon1, etc., types. This can be used
-- directly in place of any of the TyConN types, but it will
-- work only with monomorphic types. When GHC#14645 is fixed, this
-- should fully supersede the TyConN types.
data family TyCon :: (k1 -> k2) -> unmatchable_fun
-- | Type level function application
type family Apply (f :: k1 ~> k2) (x :: k1) :: k2
-- | An infix synonym for Apply
type a @@ b = Apply a b
infixl 9 @@
-- | Use this function when passing a function on singletons as a
-- higher-order function. You will need visible type application to get
-- this to work. For example:
--
--
-- falses = sMap (singFun1 @NotSym0 sNot)
-- (STrue `SCons` STrue `SCons` SNil)
--
--
-- There are a family of singFun... functions, keyed by the
-- number of parameters of the function.
singFun1 :: forall f. SingFunction1 f -> Sing f
singFun2 :: forall f. SingFunction2 f -> Sing f
singFun3 :: forall f. SingFunction3 f -> Sing f
singFun4 :: forall f. SingFunction4 f -> Sing f
singFun5 :: forall f. SingFunction5 f -> Sing f
singFun6 :: forall f. SingFunction6 f -> Sing f
singFun7 :: forall f. SingFunction7 f -> Sing f
singFun8 :: forall f. SingFunction8 f -> Sing f
-- | This is the inverse of singFun1, and likewise for the other
-- unSingFun... functions.
unSingFun1 :: forall f. Sing f -> SingFunction1 f
unSingFun2 :: forall f. Sing f -> SingFunction2 f
unSingFun3 :: forall f. Sing f -> SingFunction3 f
unSingFun4 :: forall f. Sing f -> SingFunction4 f
unSingFun5 :: forall f. Sing f -> SingFunction5 f
unSingFun6 :: forall f. Sing f -> SingFunction6 f
unSingFun7 :: forall f. Sing f -> SingFunction7 f
unSingFun8 :: forall f. Sing f -> SingFunction8 f
pattern SLambda2 :: forall f. SingFunction2 f -> Sing f
pattern SLambda3 :: forall f. SingFunction3 f -> Sing f
pattern SLambda4 :: forall f. SingFunction4 f -> Sing f
pattern SLambda5 :: forall f. SingFunction5 f -> Sing f
pattern SLambda6 :: forall f. SingFunction6 f -> Sing f
pattern SLambda7 :: forall f. SingFunction7 f -> Sing f
pattern SLambda8 :: forall f. SingFunction8 f -> Sing f
type SingFunction1 f = forall t. Sing t -> Sing (f @@ t)
type SingFunction2 f = forall t. Sing t -> SingFunction1 (f @@ t)
type SingFunction3 f = forall t. Sing t -> SingFunction2 (f @@ t)
type SingFunction4 f = forall t. Sing t -> SingFunction3 (f @@ t)
type SingFunction5 f = forall t. Sing t -> SingFunction4 (f @@ t)
type SingFunction6 f = forall t. Sing t -> SingFunction5 (f @@ t)
type SingFunction7 f = forall t. Sing t -> SingFunction6 (f @@ t)
type SingFunction8 f = forall t. Sing t -> SingFunction7 (f @@ t)
-- | 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)
data DemoteSym0 :: (~>) Type Type
type DemoteSym1 (k6989586621679027542 :: Type) = Demote k6989586621679027542
data SameKindSym0 a6989586621679027548
data SameKindSym1 (a6989586621679027548 :: k6989586621679027547) b6989586621679027549
type SameKindSym2 (a6989586621679027548 :: k6989586621679027547) (b6989586621679027549 :: k6989586621679027547) = SameKind a6989586621679027548 b6989586621679027549
data KindOfSym0 a6989586621679027551
type KindOfSym1 (a6989586621679027551 :: k6989586621679027550) = KindOf a6989586621679027551
data (~>@#@$) a6989586621679025621
infixr 0 ~>@#@$
data (~>@#@$$) (a6989586621679025621 :: Type) b6989586621679025622
infixr 0 ~>@#@$$
type (~>@#@$$$) (a6989586621679025621 :: Type) (b6989586621679025622 :: Type) = (~>) a6989586621679025621 b6989586621679025622
data ApplySym0 :: forall k16989586621679025617 k26989586621679025618. (~>) ((~>) k16989586621679025617 k26989586621679025618) ((~>) k16989586621679025617 k26989586621679025618)
data ApplySym1 (f6989586621679025619 :: (~>) k16989586621679025617 k26989586621679025618) :: (~>) k16989586621679025617 k26989586621679025618
type ApplySym2 (f6989586621679025619 :: (~>) k16989586621679025617 k26989586621679025618) (x6989586621679025620 :: k16989586621679025617) = Apply f6989586621679025619 x6989586621679025620
data (@@@#@$) a6989586621679025615
infixl 9 @@@#@$
data (@@@#@$$) (a6989586621679025615 :: (~>) k16989586621679032495 k6989586621679032494) b6989586621679025616
infixl 9 @@@#@$$
type (@@@#@$$$) (a6989586621679025615 :: (~>) k16989586621679032495 k6989586621679032494) (b6989586621679025616 :: k16989586621679032495) = (@@) a6989586621679025615 b6989586621679025616
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.@@@#@$)
instance forall k16989586621679032495 k6989586621679032494 (a6989586621679025615 :: k16989586621679032495 Data.Singletons.Internal.~> k6989586621679032494). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.@@@#@$$) a6989586621679025615)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.ApplySym0
instance forall k16989586621679025617 k26989586621679025618 (f6989586621679025619 :: k16989586621679025617 Data.Singletons.Internal.~> k26989586621679025618). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.ApplySym1 f6989586621679025619)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.~>@#@$)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.~>@#@$$) a6989586621679025621)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.KindOfSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.SameKindSym0
instance forall k6989586621679027547 (a6989586621679027548 :: k6989586621679027547). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.SameKindSym1 a6989586621679027548)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.DemoteSym0
instance forall k k_last (f :: k -> k_last). (forall (a :: k). Data.Singletons.Internal.SingI a => Data.Singletons.Internal.SingI (f a), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 f)
instance forall k1 k_last k2 (f :: k2 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2) => Data.Singletons.Internal.SingI (f a1 a2), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon2 f)
instance forall k1 k_last k2 k3 (f :: k2 -> k3 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3) => Data.Singletons.Internal.SingI (f a1 a2 a3), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon3 f)
instance forall k1 k_last k2 k3 k4 (f :: k2 -> k3 -> k4 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k4) (a4 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3, Data.Singletons.Internal.SingI a4) => Data.Singletons.Internal.SingI (f a1 a2 a3 a4), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon4 f)
instance forall k1 k_last k2 k3 k4 k5 (f :: k2 -> k3 -> k4 -> k5 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k4) (a4 :: k5) (a5 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3, Data.Singletons.Internal.SingI a4, Data.Singletons.Internal.SingI a5) => Data.Singletons.Internal.SingI (f a1 a2 a3 a4 a5), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon5 f)
instance forall k1 k_last k2 k3 k4 k5 k6 (f :: k2 -> k3 -> k4 -> k5 -> k6 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k4) (a4 :: k5) (a5 :: k6) (a6 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3, Data.Singletons.Internal.SingI a4, Data.Singletons.Internal.SingI a5, Data.Singletons.Internal.SingI a6) => Data.Singletons.Internal.SingI (f a1 a2 a3 a4 a5 a6), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon6 f)
instance forall k1 k_last k2 k3 k4 k5 k6 k7 (f :: k2 -> k3 -> k4 -> k5 -> k6 -> k7 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k4) (a4 :: k5) (a5 :: k6) (a6 :: k7) (a7 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3, Data.Singletons.Internal.SingI a4, Data.Singletons.Internal.SingI a5, Data.Singletons.Internal.SingI a6, Data.Singletons.Internal.SingI a7) => Data.Singletons.Internal.SingI (f a1 a2 a3 a4 a5 a6 a7), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon7 f)
instance forall k1 k_last k2 k3 k4 k5 k6 k7 k8 (f :: k2 -> k3 -> k4 -> k5 -> k6 -> k7 -> k8 -> k1 -> k_last). (forall (a1 :: k2) (a2 :: k3) (a3 :: k4) (a4 :: k5) (a5 :: k6) (a6 :: k7) (a7 :: k8) (a8 :: k1). (Data.Singletons.Internal.SingI a1, Data.Singletons.Internal.SingI a2, Data.Singletons.Internal.SingI a3, Data.Singletons.Internal.SingI a4, Data.Singletons.Internal.SingI a5, Data.Singletons.Internal.SingI a6, Data.Singletons.Internal.SingI a7, Data.Singletons.Internal.SingI a8) => Data.Singletons.Internal.SingI (f a1 a2 a3 a4 a5 a6 a7 a8), Data.Singletons.Internal.ApplyTyCon GHC.Types.~ Data.Singletons.Internal.ApplyTyConAux1) => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon8 f)
instance Data.Singletons.Prelude.Eq.SEq k => GHC.Classes.Eq (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Ord.SOrd k => GHC.Classes.Ord (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Enum.SBounded k => GHC.Enum.Bounded (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Enum.SEnum k => GHC.Enum.Enum (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Num.SNum k => GHC.Num.Num (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.ShowSing.ShowSing k => GHC.Show.Show (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup k => GHC.Base.Semigroup (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.Monoid.SMonoid k => GHC.Base.Monoid (Data.Singletons.Internal.SomeSing k)
instance Data.Singletons.Prelude.IsString.SIsString k => Data.String.IsString (Data.Singletons.Internal.SomeSing k)
-- | This module contains everything you need to derive your own singletons
-- via Template Haskell.
--
-- TURN ON -XScopedTypeVariables IN YOUR MODULE IF YOU WANT THIS
-- TO WORK.
module Data.Singletons.TH
-- | Make promoted and singleton versions of all declarations given,
-- retaining the original declarations. See
-- https://github.com/goldfirere/singletons/blob/master/README.md
-- for further explanation.
singletons :: DsMonad q => q [Dec] -> q [Dec]
-- | Make promoted and singleton versions of all declarations given,
-- discarding the original declarations. Note that a singleton based on a
-- datatype needs the original datatype, so this will fail if it sees any
-- datatype declarations. Classes, instances, and functions are all fine.
singletonsOnly :: DsMonad q => q [Dec] -> q [Dec]
-- | Generate singleton definitions from a type that is already defined.
-- For example, the singletons package itself uses
--
--
-- $(genSingletons [''Bool, ''Maybe, ''Either, ''[]])
--
--
-- to generate singletons for Prelude types.
genSingletons :: DsMonad q => [Name] -> q [Dec]
-- | Promote every declaration given to the type level, retaining the
-- originals.
promote :: DsMonad q => q [Dec] -> q [Dec]
-- | Promote each declaration, discarding the originals. Note that a
-- promoted datatype uses the same definition as an original datatype, so
-- this will not work with datatypes. Classes, instances, and functions
-- are all fine.
promoteOnly :: DsMonad q => q [Dec] -> q [Dec]
genDefunSymbols :: DsMonad q => [Name] -> q [Dec]
-- | Generate promoted definitions from a type that is already defined.
-- This is generally only useful with classes.
genPromotions :: DsMonad q => [Name] -> q [Dec]
-- | Produce instances for (==) (type-level equality) from the
-- given types
promoteEqInstances :: DsMonad q => [Name] -> q [Dec]
-- | Produce an instance for (==) (type-level equality) from the
-- given type
promoteEqInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SEq and type-level (==) for each
-- type in the list
singEqInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SEq and type-level (==) for the
-- given type
singEqInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SEq (only -- no instance for
-- (==), which SEq generally relies on) for each type
-- in the list
singEqInstancesOnly :: DsMonad q => [Name] -> q [Dec]
-- | Create instances of SEq (only -- no instance for
-- (==), which SEq generally relies on) for the given
-- type
singEqInstanceOnly :: DsMonad q => Name -> q [Dec]
-- | Create instances of SDecide, TestEquality, and
-- TestCoercion for each type in the list.
singDecideInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SDecide, TestEquality, and
-- TestCoercion for the given type.
singDecideInstance :: DsMonad q => Name -> q [Dec]
-- | Produce instances for POrd from the given types
promoteOrdInstances :: DsMonad q => [Name] -> q [Dec]
-- | Produce an instance for POrd from the given type
promoteOrdInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SOrd for the given types
singOrdInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SOrd for the given type
singOrdInstance :: DsMonad q => Name -> q [Dec]
-- | Produce instances for PBounded from the given types
promoteBoundedInstances :: DsMonad q => [Name] -> q [Dec]
-- | Produce an instance for PBounded from the given type
promoteBoundedInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SBounded for the given types
singBoundedInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SBounded for the given type
singBoundedInstance :: DsMonad q => Name -> q [Dec]
-- | Produce instances for PEnum from the given types
promoteEnumInstances :: DsMonad q => [Name] -> q [Dec]
-- | Produce an instance for PEnum from the given type
promoteEnumInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SEnum for the given types
singEnumInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SEnum for the given type
singEnumInstance :: DsMonad q => Name -> q [Dec]
-- | Produce instances for PShow from the given types
promoteShowInstances :: DsMonad q => [Name] -> q [Dec]
-- | Produce an instance for PShow from the given type
promoteShowInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of SShow for the given types
--
-- (Not to be confused with showSingInstances.)
singShowInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of SShow for the given type
--
-- (Not to be confused with showShowInstance.)
singShowInstance :: DsMonad q => Name -> q [Dec]
-- | Create instances of Show for the given singleton types
--
-- (Not to be confused with singShowInstances.)
showSingInstances :: DsMonad q => [Name] -> q [Dec]
-- | Create instance of Show for the given singleton type
--
-- (Not to be confused with singShowInstance.)
showSingInstance :: DsMonad q => Name -> q [Dec]
-- | Create an instance for SingI TyCon{N}, where
-- N is the positive number provided as an argument.
--
-- Note that the generated code requires the use of the
-- QuantifiedConstraints language extension.
singITyConInstances :: DsMonad q => [Int] -> q [Dec]
-- | Create an instance for SingI TyCon{N}, where
-- N is the positive number provided as an argument.
--
-- Note that the generated code requires the use of the
-- QuantifiedConstraints language extension.
singITyConInstance :: DsMonad q => Int -> q [Dec]
-- | The function cases generates a case expression where each
-- right-hand side is identical. This may be useful if the type-checker
-- requires knowledge of which constructor is used to satisfy equality or
-- type-class constraints, but where each constructor is treated the
-- same.
cases :: DsMonad q => Name -> q Exp -> q Exp -> q Exp
-- | The function sCases generates a case expression where each
-- right-hand side is identical. This may be useful if the type-checker
-- requires knowledge of which constructor is used to satisfy equality or
-- type-class constraints, but where each constructor is treated the
-- same. For sCases, unlike cases, the scrutinee is a
-- singleton. But make sure to pass in the name of the original
-- datatype, preferring ''Maybe over ''SMaybe.
sCases :: DsMonad q => Name -> q Exp -> q Exp -> q Exp
data SBool :: Bool -> Type
[SFalse] :: SBool 'False
[STrue] :: SBool 'True
data STuple0 :: () -> Type
[STuple0] :: STuple0 '()
data STuple2 :: forall a_11 b_12. (a_11, b_12) -> Type
[STuple2] :: forall a_11 b_12 (n_a1hsO :: a_11) (n_a1hsP :: b_12). () => Sing (n_a1hsO :: a_11) -> Sing (n_a1hsP :: b_12) -> STuple2 '(n_a1hsO, n_a1hsP)
data STuple3 :: forall a_11 b_12 c_13. (a_11, b_12, c_13) -> Type
[STuple3] :: forall a_11 b_12 c_13 (n_a1htl :: a_11) (n_a1htm :: b_12) (n_a1htn :: c_13). () => Sing (n_a1htl :: a_11) -> Sing (n_a1htm :: b_12) -> Sing (n_a1htn :: c_13) -> STuple3 '(n_a1htl, n_a1htm, n_a1htn)
data STuple4 :: forall a_11 b_12 c_13 d_14. (a_11, b_12, c_13, d_14) -> Type
[STuple4] :: forall a_11 b_12 c_13 d_14 (n_a1hu8 :: a_11) (n_a1hu9 :: b_12) (n_a1hua :: c_13) (n_a1hub :: d_14). () => Sing (n_a1hu8 :: a_11) -> Sing (n_a1hu9 :: b_12) -> Sing (n_a1hua :: c_13) -> Sing (n_a1hub :: d_14) -> STuple4 '(n_a1hu8, n_a1hu9, n_a1hua, n_a1hub)
data STuple5 :: forall a_11 b_12 c_13 d_14 e_15. (a_11, b_12, c_13, d_14, e_15) -> Type
[STuple5] :: forall a_11 b_12 c_13 d_14 e_15 (n_a1hvd :: a_11) (n_a1hve :: b_12) (n_a1hvf :: c_13) (n_a1hvg :: d_14) (n_a1hvh :: e_15). () => Sing (n_a1hvd :: a_11) -> Sing (n_a1hve :: b_12) -> Sing (n_a1hvf :: c_13) -> Sing (n_a1hvg :: d_14) -> Sing (n_a1hvh :: e_15) -> STuple5 '(n_a1hvd, n_a1hve, n_a1hvf, n_a1hvg, n_a1hvh)
data STuple6 :: forall a_11 b_12 c_13 d_14 e_15 f_16. (a_11, b_12, c_13, d_14, e_15, f_16) -> Type
[STuple6] :: forall a_11 b_12 c_13 d_14 e_15 f_16 (n_a1hwC :: a_11) (n_a1hwD :: b_12) (n_a1hwE :: c_13) (n_a1hwF :: d_14) (n_a1hwG :: e_15) (n_a1hwH :: f_16). () => Sing (n_a1hwC :: a_11) -> Sing (n_a1hwD :: b_12) -> Sing (n_a1hwE :: c_13) -> Sing (n_a1hwF :: d_14) -> Sing (n_a1hwG :: e_15) -> Sing (n_a1hwH :: f_16) -> STuple6 '(n_a1hwC, n_a1hwD, n_a1hwE, n_a1hwF, n_a1hwG, n_a1hwH)
data STuple7 :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17. (a_11, b_12, c_13, d_14, e_15, f_16, g_17) -> Type
[STuple7] :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17 (n_a1hyn :: a_11) (n_a1hyo :: b_12) (n_a1hyp :: c_13) (n_a1hyq :: d_14) (n_a1hyr :: e_15) (n_a1hys :: f_16) (n_a1hyt :: g_17). () => Sing (n_a1hyn :: a_11) -> Sing (n_a1hyo :: b_12) -> Sing (n_a1hyp :: c_13) -> Sing (n_a1hyq :: d_14) -> Sing (n_a1hyr :: e_15) -> Sing (n_a1hys :: f_16) -> Sing (n_a1hyt :: g_17) -> STuple7 '(n_a1hyn, n_a1hyo, n_a1hyp, n_a1hyq, n_a1hyr, n_a1hys, n_a1hyt)
data SOrdering :: Ordering -> Type
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
-- | The promoted analogue of Eq. If you supply no definition for
-- (==), then it defaults to a use of DefaultEq.
class PEq a where {
type family (==) (x :: a) (y :: a) :: Bool;
type family (/=) (x :: a) (y :: a) :: Bool;
type (x :: a) == (y :: a) = x `DefaultEq` y;
type (x :: a) /= (y :: a) = Not (x == y);
}
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 :: 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
(%&&) :: Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
-- | The singleton analogue of Eq. Unlike the definition for
-- Eq, it is required that instances define a body for
-- (%==). You may also supply a body for (%/=).
class SEq k
-- | Boolean equality on singletons
(%==) :: forall (a :: k) (b :: k). SEq k => Sing a -> Sing b -> Sing (a == b)
-- | Boolean disequality on singletons
(%/=) :: forall (a :: k) (b :: k). SEq k => Sing a -> Sing b -> Sing (a /= b)
-- | Boolean disequality on singletons
(%/=) :: forall (a :: k) (b :: k). (SEq k, (a /= b) ~ Not (a == b)) => Sing a -> Sing b -> Sing (a /= b)
infix 4 %==
infix 4 %/=
class POrd (a_a1BVU :: Type) where {
type family Compare (arg_a1BXl :: a_a1BVU) (arg_a1BXm :: a_a1BVU) :: Ordering;
type family (<) (arg_a1BXp :: a_a1BVU) (arg_a1BXq :: a_a1BVU) :: Bool;
type family (<=) (arg_a1BXt :: a_a1BVU) (arg_a1BXu :: a_a1BVU) :: Bool;
type family (>) (arg_a1BXx :: a_a1BVU) (arg_a1BXy :: a_a1BVU) :: Bool;
type family (>=) (arg_a1BXB :: a_a1BVU) (arg_a1BXC :: a_a1BVU) :: Bool;
type family Max (arg_a1BXF :: a_a1BVU) (arg_a1BXG :: a_a1BVU) :: a_a1BVU;
type family Min (arg_a1BXJ :: a_a1BVU) (arg_a1BXK :: a_a1BVU) :: a_a1BVU;
type Compare a_a1BXN a_a1BXO = Apply (Apply Compare_6989586621679394057Sym0 a_a1BXN) a_a1BXO;
type (<) a_a1BYb a_a1BYc = Apply (Apply TFHelper_6989586621679394081Sym0 a_a1BYb) a_a1BYc;
type (<=) a_a1BYt a_a1BYu = Apply (Apply TFHelper_6989586621679394099Sym0 a_a1BYt) a_a1BYu;
type (>) a_a1BYL a_a1BYM = Apply (Apply TFHelper_6989586621679394117Sym0 a_a1BYL) a_a1BYM;
type (>=) a_a1BZ3 a_a1BZ4 = Apply (Apply TFHelper_6989586621679394135Sym0 a_a1BZ3) a_a1BZ4;
type Max a_a1BZl a_a1BZm = Apply (Apply Max_6989586621679394153Sym0 a_a1BZl) a_a1BZm;
type Min a_a1BZD a_a1BZE = Apply (Apply Min_6989586621679394171Sym0 a_a1BZD) a_a1BZE;
}
infix 4 >=
infix 4 >
infix 4 <=
infix 4 <
class SEq a_a1BVU => SOrd a_a1BVU
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering) ~ Apply (Apply Compare_6989586621679394057Sym0 t_a1C04) t_a1C05) => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool) ~ Apply (Apply TFHelper_6989586621679394081Sym0 t_a1C08) t_a1C09) => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool) ~ Apply (Apply TFHelper_6989586621679394099Sym0 t_a1C0c) t_a1C0d) => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool) ~ Apply (Apply TFHelper_6989586621679394117Sym0 t_a1C0g) t_a1C0h) => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool) ~ Apply (Apply TFHelper_6989586621679394135Sym0 t_a1C0k) t_a1C0l) => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU) ~ Apply (Apply Max_6989586621679394153Sym0 t_a1C0o) t_a1C0p) => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU) ~ Apply (Apply Min_6989586621679394171Sym0 t_a1C0s) t_a1C0t) => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
infix 4 %<=
infix 4 %>=
infix 4 %>
infix 4 %<
type family ThenCmp (a_a1EEb :: Ordering) (a_a1EEc :: Ordering) :: Ordering
sThenCmp :: forall (t_a1EEg :: Ordering) (t_a1EEh :: Ordering). Sing t_a1EEg -> Sing t_a1EEh -> Sing (Apply (Apply ThenCmpSym0 t_a1EEg) t_a1EEh :: Ordering)
-- | Members of the SDecide "kind" class support decidable equality.
-- Instances of this class are generated alongside singleton definitions
-- for datatypes that derive an Eq instance.
class SDecide k
-- | Compute a proof or disproof of equality, given two singletons.
(%~) :: forall (a :: k) (b :: k). SDecide k => Sing a -> Sing b -> Decision (a :~: b)
infix 4 %~
-- | 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.
data (a :: k) :~: (b :: k)
[Refl] :: forall k (a :: k). a :~: a
infix 4 :~:
-- | Uninhabited data type
data Void
-- | Because we can never create a value of type Void, a function
-- that type-checks at a -> Void shows that objects of type
-- a can never exist. Thus, we say that a is
-- Refuted
type Refuted a = (a -> Void)
-- | A Decision about a type a is either a proof of
-- existence or a proof that a cannot exist.
data Decision a
-- | Witness for a
Proved :: a -> Decision a
-- | Proof that no a exists
Disproved :: Refuted a -> Decision a
class PBounded (a_a39XM :: Type) where {
type family MinBound :: a_a39XM;
type family MaxBound :: a_a39XM;
}
class SBounded a_a39XM
sMinBound :: SBounded a_a39XM => Sing (MinBoundSym0 :: a_a39XM)
sMaxBound :: SBounded a_a39XM => Sing (MaxBoundSym0 :: a_a39XM)
class PEnum (a_a3aZB :: Type) where {
type family ToEnum (arg_a3b4f :: Nat) :: a_a3aZB;
type family FromEnum (arg_a3b4h :: a_a3aZB) :: Nat;
type Succ a_a3b4t = Apply Succ_6989586621679767338Sym0 a_a3b4t;
type Pred a_a3b4I = Apply Pred_6989586621679767353Sym0 a_a3b4I;
type EnumFromTo a_a3b4R a_a3b4S = Apply (Apply EnumFromTo_6989586621679767363Sym0 a_a3b4R) a_a3b4S;
type EnumFromThenTo a_a3b53 a_a3b54 a_a3b55 = Apply (Apply (Apply EnumFromThenTo_6989586621679767376Sym0 a_a3b53) a_a3b54) a_a3b55;
}
class SEnum a_a3aZB
sToEnum :: forall (t_a3b7d :: Nat). SEnum a_a3aZB => Sing t_a3b7d -> Sing (Apply ToEnumSym0 t_a3b7d :: a_a3aZB)
sFromEnum :: forall (t_a3b7f :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7f -> Sing (Apply FromEnumSym0 t_a3b7f :: Nat)
class PShow (a_a5of3 :: Type) where {
type family ShowsPrec (arg_a5om7 :: Nat) (arg_a5om8 :: a_a5of3) (arg_a5om9 :: Symbol) :: Symbol;
type family Show_ (arg_a5omd :: a_a5of3) :: Symbol;
type family ShowList (arg_a5omf :: [a_a5of3]) (arg_a5omg :: Symbol) :: Symbol;
type ShowsPrec a_a5omj a_a5omk a_a5oml = Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 a_a5omj) a_a5omk) a_a5oml;
type Show_ a_a5omz = Apply Show__6989586621680295088Sym0 a_a5omz;
type ShowList a_a5omG a_a5omH = Apply (Apply ShowList_6989586621680295096Sym0 a_a5omG) a_a5omH;
}
class SShow a_a5of3
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). SShow a_a5of3 => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). SShow a_a5of3 => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). SShow a_a5of3 => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). (SShow a_a5of3, (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 t_a5oqg) t_a5oqh) t_a5oqi) => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). (SShow a_a5of3, (Apply Show_Sym0 t_a5oqm :: Symbol) ~ Apply Show__6989586621680295088Sym0 t_a5oqm) => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). (SShow a_a5of3, (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol) ~ Apply (Apply ShowList_6989586621680295096Sym0 t_a5oqo) t_a5oqp) => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
type family ShowString (a_a5olp :: Symbol) (a_a5olq :: Symbol) :: Symbol
sShowString :: forall (t_a5opD :: Symbol) (t_a5opE :: Symbol). Sing t_a5opD -> Sing t_a5opE -> Sing (Apply (Apply ShowStringSym0 t_a5opD) t_a5opE :: Symbol)
type family ShowParen (a_a5ol7 :: Bool) (a_a5ol8 :: (~>) Symbol Symbol) (a_a5ol9 :: Symbol) :: Symbol
sShowParen :: forall (t_a5opx :: Bool) (t_a5opy :: (~>) Symbol Symbol) (t_a5opz :: Symbol). Sing t_a5opx -> Sing t_a5opy -> Sing t_a5opz -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5opx) t_a5opy) t_a5opz :: Symbol)
type family ShowSpace (a_a5okY :: Symbol) :: Symbol
sShowSpace :: forall (t_a5opv :: Symbol). Sing t_a5opv -> Sing (Apply ShowSpaceSym0 t_a5opv :: Symbol)
type family ShowChar (a_a5olz :: Symbol) (a_a5olA :: Symbol) :: Symbol
sShowChar :: forall (t_a5opH :: Symbol) (t_a5opI :: Symbol). Sing t_a5opH -> Sing t_a5opI -> Sing (Apply (Apply ShowCharSym0 t_a5opH) t_a5opI :: Symbol)
type family ShowCommaSpace (a_a5okT :: Symbol) :: Symbol
sShowCommaSpace :: forall (t_a5opt :: Symbol). Sing t_a5opt -> Sing (Apply ShowCommaSpaceSym0 t_a5opt :: Symbol)
class PFunctor (f_a2lWP :: Type -> Type) where {
type family Fmap (arg_a2m39 :: (~>) a_a2lWQ b_a2lWR) (arg_a2m3a :: f_a2lWP a_a2lWQ) :: f_a2lWP b_a2lWR;
type family (<$) (arg_a2m3d :: a_a2lWS) (arg_a2m3e :: f_a2lWP b_a2lWT) :: f_a2lWP a_a2lWS;
type (<$) a_a2m3h a_a2m3i = Apply (Apply TFHelper_6989586621679571221Sym0 a_a2m3h) a_a2m3i;
}
infixl 4 <$
class SFunctor (f_a2lWP :: Type -> Type)
sFmap :: forall a_a2lWQ b_a2lWR (t_a2m7r :: (~>) a_a2lWQ b_a2lWR) (t_a2m7s :: f_a2lWP a_a2lWQ). SFunctor f_a2lWP => Sing t_a2m7r -> Sing t_a2m7s -> Sing (Apply (Apply FmapSym0 t_a2m7r) t_a2m7s :: f_a2lWP b_a2lWR)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). SFunctor f_a2lWP => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). (SFunctor f_a2lWP, (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS) ~ Apply (Apply TFHelper_6989586621679571221Sym0 t_a2m7v) t_a2m7w) => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
infixl 4 %<$
class PFoldable (t_a6dcq :: Type -> Type) where {
type family Fold (arg_a6dmp :: t_a6dcq m_a6dcr) :: m_a6dcr;
type family FoldMap (arg_a6dmr :: (~>) a_a6dct m_a6dcs) (arg_a6dms :: t_a6dcq a_a6dct) :: m_a6dcs;
type family Foldr (arg_a6dmv :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (arg_a6dmw :: b_a6dcv) (arg_a6dmx :: t_a6dcq a_a6dcu) :: b_a6dcv;
type family Foldr' (arg_a6dmB :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (arg_a6dmC :: b_a6dcx) (arg_a6dmD :: t_a6dcq a_a6dcw) :: b_a6dcx;
type family Foldl (arg_a6dmH :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (arg_a6dmI :: b_a6dcy) (arg_a6dmJ :: t_a6dcq a_a6dcz) :: b_a6dcy;
type family Foldl' (arg_a6dmN :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (arg_a6dmO :: b_a6dcA) (arg_a6dmP :: t_a6dcq a_a6dcB) :: b_a6dcA;
type family Foldr1 (arg_a6dmT :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (arg_a6dmU :: t_a6dcq a_a6dcC) :: a_a6dcC;
type family Foldl1 (arg_a6dmX :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (arg_a6dmY :: t_a6dcq a_a6dcD) :: a_a6dcD;
type family ToList (arg_a6dn1 :: t_a6dcq a_a6dcE) :: [a_a6dcE];
type family Null (arg_a6dn3 :: t_a6dcq a_a6dcF) :: Bool;
type family Length (arg_a6dn5 :: t_a6dcq a_a6dcG) :: Nat;
type family Elem (arg_a6dn7 :: a_a6dcH) (arg_a6dn8 :: t_a6dcq a_a6dcH) :: Bool;
type family Maximum (arg_a6dnb :: t_a6dcq a_a6dcI) :: a_a6dcI;
type family Minimum (arg_a6dnd :: t_a6dcq a_a6dcJ) :: a_a6dcJ;
type family Sum (arg_a6dnf :: t_a6dcq a_a6dcK) :: a_a6dcK;
type family Product (arg_a6dnh :: t_a6dcq a_a6dcL) :: a_a6dcL;
type Fold a_a6dnj = Apply Fold_6989586621680491178Sym0 a_a6dnj;
type FoldMap a_a6dns a_a6dnt = Apply (Apply FoldMap_6989586621680491188Sym0 a_a6dns) a_a6dnt;
type Foldr a_a6dnG a_a6dnH a_a6dnI = Apply (Apply (Apply Foldr_6989586621680491203Sym0 a_a6dnG) a_a6dnH) a_a6dnI;
type Foldr' a_a6do5 a_a6do6 a_a6do7 = Apply (Apply (Apply Foldr'_6989586621680491228Sym0 a_a6do5) a_a6do6) a_a6do7;
type Foldl a_a6doz a_a6doA a_a6doB = Apply (Apply (Apply Foldl_6989586621680491258Sym0 a_a6doz) a_a6doA) a_a6doB;
type Foldl' a_a6doY a_a6doZ a_a6dp0 = Apply (Apply (Apply Foldl'_6989586621680491283Sym0 a_a6doY) a_a6doZ) a_a6dp0;
type Foldr1 a_a6dps a_a6dpt = Apply (Apply Foldr1_6989586621680491312Sym0 a_a6dps) a_a6dpt;
type Foldl1 a_a6dpR a_a6dpS = Apply (Apply Foldl1_6989586621680491337Sym0 a_a6dpR) a_a6dpS;
type ToList a_a6dqg = Apply ToList_6989586621680491361Sym0 a_a6dqg;
type Null a_a6dqp = Apply Null_6989586621680491370Sym0 a_a6dqp;
type Length a_a6dqK = Apply Length_6989586621680491391Sym0 a_a6dqK;
type Elem a_a6dr6 a_a6dr7 = Apply (Apply Elem_6989586621680491414Sym0 a_a6dr6) a_a6dr7;
type Maximum a_a6drm = Apply Maximum_6989586621680491429Sym0 a_a6drm;
type Minimum a_a6drz = Apply Minimum_6989586621680491442Sym0 a_a6drz;
type Sum a_a6drM = Apply Sum_6989586621680491455Sym0 a_a6drM;
type Product a_a6drZ = Apply Product_6989586621680491468Sym0 a_a6drZ;
}
class SFoldable (t_a6dcq :: Type -> Type)
sFold :: forall m_a6dcr (t_a6dIh :: t_a6dcq m_a6dcr). (SFoldable t_a6dcq, SMonoid m_a6dcr) => Sing t_a6dIh -> Sing (Apply FoldSym0 t_a6dIh :: m_a6dcr)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). SFoldable t_a6dcq => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldr' :: forall a_a6dcw b_a6dcx (t_a6dIt :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (t_a6dIu :: b_a6dcx) (t_a6dIv :: t_a6dcq a_a6dcw). SFoldable t_a6dcq => Sing t_a6dIt -> Sing t_a6dIu -> Sing t_a6dIv -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). SFoldable t_a6dcq => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldl' :: forall b_a6dcA a_a6dcB (t_a6dIF :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (t_a6dIG :: b_a6dcA) (t_a6dIH :: t_a6dcq a_a6dcB). SFoldable t_a6dcq => Sing t_a6dIF -> Sing t_a6dIG -> Sing t_a6dIH -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). SFoldable t_a6dcq => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). SFoldable t_a6dcq => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sToList :: forall a_a6dcE (t_a6dIT :: t_a6dcq a_a6dcE). SFoldable t_a6dcq => Sing t_a6dIT -> Sing (Apply ToListSym0 t_a6dIT :: [a_a6dcE])
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). SFoldable t_a6dcq => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
sLength :: forall a_a6dcG (t_a6dIX :: t_a6dcq a_a6dcG). SFoldable t_a6dcq => Sing t_a6dIX -> Sing (Apply LengthSym0 t_a6dIX :: Nat)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
sFold :: forall m_a6dcr (t_a6dIh :: t_a6dcq m_a6dcr). (SFoldable t_a6dcq, (Apply FoldSym0 t_a6dIh :: m_a6dcr) ~ Apply Fold_6989586621680491178Sym0 t_a6dIh, SMonoid m_a6dcr) => Sing t_a6dIh -> Sing (Apply FoldSym0 t_a6dIh :: m_a6dcr)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs) ~ Apply (Apply FoldMap_6989586621680491188Sym0 t_a6dIj) t_a6dIk, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv) ~ Apply (Apply (Apply Foldr_6989586621680491203Sym0 t_a6dIn) t_a6dIo) t_a6dIp) => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldr' :: forall a_a6dcw b_a6dcx (t_a6dIt :: (~>) a_a6dcw ((~>) b_a6dcx b_a6dcx)) (t_a6dIu :: b_a6dcx) (t_a6dIv :: t_a6dcq a_a6dcw). (SFoldable t_a6dcq, (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx) ~ Apply (Apply (Apply Foldr'_6989586621680491228Sym0 t_a6dIt) t_a6dIu) t_a6dIv) => Sing t_a6dIt -> Sing t_a6dIu -> Sing t_a6dIv -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a6dIt) t_a6dIu) t_a6dIv :: b_a6dcx)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy) ~ Apply (Apply (Apply Foldl_6989586621680491258Sym0 t_a6dIz) t_a6dIA) t_a6dIB) => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldl' :: forall b_a6dcA a_a6dcB (t_a6dIF :: (~>) b_a6dcA ((~>) a_a6dcB b_a6dcA)) (t_a6dIG :: b_a6dcA) (t_a6dIH :: t_a6dcq a_a6dcB). (SFoldable t_a6dcq, (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA) ~ Apply (Apply (Apply Foldl'_6989586621680491283Sym0 t_a6dIF) t_a6dIG) t_a6dIH) => Sing t_a6dIF -> Sing t_a6dIG -> Sing t_a6dIH -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a6dIF) t_a6dIG) t_a6dIH :: b_a6dcA)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). (SFoldable t_a6dcq, (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC) ~ Apply (Apply Foldr1_6989586621680491312Sym0 t_a6dIL) t_a6dIM) => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). (SFoldable t_a6dcq, (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD) ~ Apply (Apply Foldl1_6989586621680491337Sym0 t_a6dIP) t_a6dIQ) => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sToList :: forall a_a6dcE (t_a6dIT :: t_a6dcq a_a6dcE). (SFoldable t_a6dcq, (Apply ToListSym0 t_a6dIT :: [a_a6dcE]) ~ Apply ToList_6989586621680491361Sym0 t_a6dIT) => Sing t_a6dIT -> Sing (Apply ToListSym0 t_a6dIT :: [a_a6dcE])
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). (SFoldable t_a6dcq, (Apply NullSym0 t_a6dIV :: Bool) ~ Apply Null_6989586621680491370Sym0 t_a6dIV) => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
sLength :: forall a_a6dcG (t_a6dIX :: t_a6dcq a_a6dcG). (SFoldable t_a6dcq, (Apply LengthSym0 t_a6dIX :: Nat) ~ Apply Length_6989586621680491391Sym0 t_a6dIX) => Sing t_a6dIX -> Sing (Apply LengthSym0 t_a6dIX :: Nat)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool) ~ Apply (Apply Elem_6989586621680491414Sym0 t_a6dIZ) t_a6dJ0, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI) ~ Apply Maximum_6989586621680491429Sym0 t_a6dJ3, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ) ~ Apply Minimum_6989586621680491442Sym0 t_a6dJ5, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, (Apply SumSym0 t_a6dJ7 :: a_a6dcK) ~ Apply Sum_6989586621680491455Sym0 t_a6dJ7, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, (Apply ProductSym0 t_a6dJ9 :: a_a6dcL) ~ Apply Product_6989586621680491468Sym0 t_a6dJ9, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
class PMonoid (a_a5GtH :: Type) where {
type family Mempty :: a_a5GtH;
type family Mappend (arg_a5GvW :: a_a5GtH) (arg_a5GvX :: a_a5GtH) :: a_a5GtH;
type family Mconcat (arg_a5Gw0 :: [a_a5GtH]) :: a_a5GtH;
type Mappend a_a5Gw2 a_a5Gw3 = Apply (Apply Mappend_6989586621680364868Sym0 a_a5Gw2) a_a5Gw3;
type Mconcat a_a5Gwi = Apply Mconcat_6989586621680364883Sym0 a_a5Gwi;
}
class SSemigroup a_a5GtH => SMonoid a_a5GtH
sMempty :: SMonoid a_a5GtH => Sing (MemptySym0 :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). SMonoid a_a5GtH => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). SMonoid a_a5GtH => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). (SMonoid a_a5GtH, (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH) ~ Apply (Apply Mappend_6989586621680364868Sym0 t_a5Gxg) t_a5Gxh) => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). (SMonoid a_a5GtH, (Apply MconcatSym0 t_a5Gxk :: a_a5GtH) ~ Apply Mconcat_6989586621680364883Sym0 t_a5Gxk) => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
class PTraversable (t_a7vnf :: Type -> Type) where {
type family Traverse (arg_a7vnr :: (~>) a_a7vnh (f_a7vng b_a7vni)) (arg_a7vns :: t_a7vnf a_a7vnh) :: f_a7vng (t_a7vnf b_a7vni);
type family SequenceA (arg_a7vnv :: t_a7vnf (f_a7vnj a_a7vnk)) :: f_a7vnj (t_a7vnf a_a7vnk);
type family MapM (arg_a7vnx :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (arg_a7vny :: t_a7vnf a_a7vnm) :: m_a7vnl (t_a7vnf b_a7vnn);
type family Sequence (arg_a7vnB :: t_a7vnf (m_a7vno a_a7vnp)) :: m_a7vno (t_a7vnf a_a7vnp);
type Traverse a_a7vnD a_a7vnE = Apply (Apply Traverse_6989586621680798719Sym0 a_a7vnD) a_a7vnE;
type SequenceA a_a7vnR = Apply SequenceA_6989586621680798732Sym0 a_a7vnR;
type MapM a_a7vo0 a_a7vo1 = Apply (Apply MapM_6989586621680798742Sym0 a_a7vo0) a_a7vo1;
type Sequence a_a7vog = Apply Sequence_6989586621680798757Sym0 a_a7vog;
}
class (SFunctor t_a7vnf, SFoldable t_a7vnf) => STraversable (t_a7vnf :: Type -> Type)
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni)) ~ Apply (Apply Traverse_6989586621680798719Sym0 t_a7vop) t_a7voq, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk)) ~ Apply SequenceA_6989586621680798732Sym0 t_a7vot, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn)) ~ Apply (Apply MapM_6989586621680798742Sym0 t_a7vov) t_a7vow, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp)) ~ Apply Sequence_6989586621680798757Sym0 t_a7voz, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
class PApplicative (f_a2lWU :: Type -> Type) where {
type family Pure (arg_a2m3x :: a_a2lWV) :: f_a2lWU a_a2lWV;
type family (<*>) (arg_a2m3z :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (arg_a2m3A :: f_a2lWU a_a2lWW) :: f_a2lWU b_a2lWX;
type family LiftA2 (arg_a2m3D :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (arg_a2m3E :: f_a2lWU a_a2lWY) (arg_a2m3F :: f_a2lWU b_a2lWZ) :: f_a2lWU c_a2lX0;
type family (*>) (arg_a2m3J :: f_a2lWU a_a2lX1) (arg_a2m3K :: f_a2lWU b_a2lX2) :: f_a2lWU b_a2lX2;
type family (<*) (arg_a2m3N :: f_a2lWU a_a2lX3) (arg_a2m3O :: f_a2lWU b_a2lX4) :: f_a2lWU a_a2lX3;
type (<*>) a_a2m3R a_a2m3S = Apply (Apply TFHelper_6989586621679571257Sym0 a_a2m3R) a_a2m3S;
type LiftA2 a_a2m47 a_a2m48 a_a2m49 = Apply (Apply (Apply LiftA2_6989586621679571274Sym0 a_a2m47) a_a2m48) a_a2m49;
type (*>) a_a2m4q a_a2m4r = Apply (Apply TFHelper_6989586621679571292Sym0 a_a2m4q) a_a2m4r;
type (<*) a_a2m4C a_a2m4D = Apply (Apply TFHelper_6989586621679571304Sym0 a_a2m4C) a_a2m4D;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f_a2lWU => SApplicative (f_a2lWU :: Type -> Type)
sPure :: forall a_a2lWV (t_a2m7B :: a_a2lWV). SApplicative f_a2lWU => Sing t_a2m7B -> Sing (Apply PureSym0 t_a2m7B :: f_a2lWU a_a2lWV)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). SApplicative f_a2lWU => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
sLiftA2 :: forall a_a2lWY b_a2lWZ c_a2lX0 (t_a2m7H :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (t_a2m7I :: f_a2lWU a_a2lWY) (t_a2m7J :: f_a2lWU b_a2lWZ). SApplicative f_a2lWU => Sing t_a2m7H -> Sing t_a2m7I -> Sing t_a2m7J -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). SApplicative f_a2lWU => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). SApplicative f_a2lWU => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). (SApplicative f_a2lWU, (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX) ~ Apply (Apply TFHelper_6989586621679571257Sym0 t_a2m7D) t_a2m7E) => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
sLiftA2 :: forall a_a2lWY b_a2lWZ c_a2lX0 (t_a2m7H :: (~>) a_a2lWY ((~>) b_a2lWZ c_a2lX0)) (t_a2m7I :: f_a2lWU a_a2lWY) (t_a2m7J :: f_a2lWU b_a2lWZ). (SApplicative f_a2lWU, (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0) ~ Apply (Apply (Apply LiftA2_6989586621679571274Sym0 t_a2m7H) t_a2m7I) t_a2m7J) => Sing t_a2m7H -> Sing t_a2m7I -> Sing t_a2m7J -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2m7H) t_a2m7I) t_a2m7J :: f_a2lWU c_a2lX0)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). (SApplicative f_a2lWU, (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2) ~ Apply (Apply TFHelper_6989586621679571292Sym0 t_a2m7N) t_a2m7O) => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). (SApplicative f_a2lWU, (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3) ~ Apply (Apply TFHelper_6989586621679571304Sym0 t_a2m7R) t_a2m7S) => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
type family (.) (a_a2fo7 :: (~>) b_a2flh c_a2fli) (a_a2fo8 :: (~>) a_a2flj b_a2flh) (a_a2fo9 :: a_a2flj) :: c_a2fli
infixr 9 .
(%.) :: forall b_a2flh c_a2fli a_a2flj (t_a2fpy :: (~>) b_a2flh c_a2fli) (t_a2fpz :: (~>) a_a2flj b_a2flh) (t_a2fpA :: a_a2flj). Sing t_a2fpy -> Sing t_a2fpz -> Sing t_a2fpA -> Sing (Apply (Apply (Apply (.@#@$) t_a2fpy) t_a2fpz) t_a2fpA :: c_a2fli)
infixr 9 %.
-- | An existentially-quantified singleton. This type is useful when
-- you want a singleton type, but there is no way of knowing, at
-- compile-time, what the type index will be. To make use of this type,
-- you will generally have to use a pattern-match:
--
--
-- foo :: Bool -> ...
-- foo b = case toSing b of
-- SomeSing sb -> {- fancy dependently-typed code with sb -}
--
--
-- An example like the one above may be easier to write using
-- withSomeSing.
data SomeSing k
[SomeSing] :: Sing (a :: k) -> SomeSing k
-- | The promotion of error. This version is more poly-kinded for
-- easier use.
type family Error (str :: k0) :: k
-- | The singleton for error
sError :: HasCallStack => Sing (str :: Symbol) -> a
data ErrorSym0 :: forall k06989586621679485796 k6989586621679485797. (~>) k06989586621679485796 k6989586621679485797
type ErrorSym1 (str6989586621679485798 :: k06989586621679485796) = Error str6989586621679485798
-- | The promotion of undefined.
type family Undefined :: k
-- | The singleton for undefined.
sUndefined :: HasCallStack => a
type UndefinedSym0 = Undefined
type TrueSym0 = 'True
type FalseSym0 = 'False
data (==@#@$) :: forall a6989586621679379997. (~>) a6989586621679379997 ((~>) a6989586621679379997 Bool)
infix 4 ==@#@$
data (==@#@$$) (x6989586621679379998 :: a6989586621679379997) :: (~>) a6989586621679379997 Bool
infix 4 ==@#@$$
type (==@#@$$$) (x6989586621679379998 :: a6989586621679379997) (y6989586621679379999 :: a6989586621679379997) = (==) x6989586621679379998 y6989586621679379999
data (>@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 >@#@$
data (>@#@$$) (arg6989586621679394039 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 >@#@$$
type (>@#@$$$) (arg6989586621679394039 :: a6989586621679393938) (arg6989586621679394040 :: a6989586621679393938) = (>) arg6989586621679394039 arg6989586621679394040
type LTSym0 = 'LT
type EQSym0 = 'EQ
type GTSym0 = 'GT
type Tuple0Sym0 = '()
data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type))
data Tuple2Sym1 (t6989586621679315250 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type)
type Tuple2Sym2 (t6989586621679315250 :: a3530822107858468865) (t6989586621679315251 :: b3530822107858468866) = '(t6989586621679315250, t6989586621679315251)
data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)))
data Tuple3Sym1 (t6989586621679315281 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type))
data Tuple3Sym2 (t6989586621679315281 :: a3530822107858468865 :: Type) (t6989586621679315282 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)
type Tuple3Sym3 (t6989586621679315281 :: a3530822107858468865) (t6989586621679315282 :: b3530822107858468866) (t6989586621679315283 :: c3530822107858468867) = '(t6989586621679315281, t6989586621679315282, t6989586621679315283)
data Tuple4Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))))
data Tuple4Sym1 (t6989586621679315328 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)))
data Tuple4Sym2 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))
data Tuple4Sym3 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) (t6989586621679315330 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)
type Tuple4Sym4 (t6989586621679315328 :: a3530822107858468865) (t6989586621679315329 :: b3530822107858468866) (t6989586621679315330 :: c3530822107858468867) (t6989586621679315331 :: d3530822107858468868) = '(t6989586621679315328, t6989586621679315329, t6989586621679315330, t6989586621679315331)
data Tuple5Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))))
data Tuple5Sym1 (t6989586621679315393 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))))
data Tuple5Sym2 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))
data Tuple5Sym3 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))
data Tuple5Sym4 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) (t6989586621679315396 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)
type Tuple5Sym5 (t6989586621679315393 :: a3530822107858468865) (t6989586621679315394 :: b3530822107858468866) (t6989586621679315395 :: c3530822107858468867) (t6989586621679315396 :: d3530822107858468868) (t6989586621679315397 :: e3530822107858468869) = '(t6989586621679315393, t6989586621679315394, t6989586621679315395, t6989586621679315396, t6989586621679315397)
data Tuple6Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))))
data Tuple6Sym1 (t6989586621679315478 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))))
data Tuple6Sym2 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))
data Tuple6Sym3 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))
data Tuple6Sym4 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))
data Tuple6Sym5 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) (t6989586621679315482 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)
type Tuple6Sym6 (t6989586621679315478 :: a3530822107858468865) (t6989586621679315479 :: b3530822107858468866) (t6989586621679315480 :: c3530822107858468867) (t6989586621679315481 :: d3530822107858468868) (t6989586621679315482 :: e3530822107858468869) (t6989586621679315483 :: f3530822107858468870) = '(t6989586621679315478, t6989586621679315479, t6989586621679315480, t6989586621679315481, t6989586621679315482, t6989586621679315483)
data Tuple7Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))))
data Tuple7Sym1 (t6989586621679315585 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))))
data Tuple7Sym2 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))
data Tuple7Sym3 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))
data Tuple7Sym4 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))
data Tuple7Sym5 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))
data Tuple7Sym6 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) (t6989586621679315590 :: f3530822107858468870 :: Type) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)
type Tuple7Sym7 (t6989586621679315585 :: a3530822107858468865) (t6989586621679315586 :: b3530822107858468866) (t6989586621679315587 :: c3530822107858468867) (t6989586621679315588 :: d3530822107858468868) (t6989586621679315589 :: e3530822107858468869) (t6989586621679315590 :: f3530822107858468870) (t6989586621679315591 :: g3530822107858468871) = '(t6989586621679315585, t6989586621679315586, t6989586621679315587, t6989586621679315588, t6989586621679315589, t6989586621679315590, t6989586621679315591)
data CompareSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Ordering)
data CompareSym1 (arg6989586621679394027 :: a6989586621679393938) :: (~>) a6989586621679393938 Ordering
type CompareSym2 (arg6989586621679394027 :: a6989586621679393938) (arg6989586621679394028 :: a6989586621679393938) = Compare arg6989586621679394027 arg6989586621679394028
data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering)
data ThenCmpSym1 (a6989586621679404371 :: Ordering) :: (~>) Ordering Ordering
type ThenCmpSym2 (a6989586621679404371 :: Ordering) (a6989586621679404372 :: Ordering) = ThenCmp a6989586621679404371 a6989586621679404372
data FoldlSym0 :: forall b6989586621680490510 a6989586621680490511 t6989586621680490502. (~>) ((~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) ((~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510))
data FoldlSym1 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) :: forall t6989586621680490502. (~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510)
data FoldlSym2 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510
type FoldlSym3 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) (arg6989586621680491141 :: t6989586621680490502 a6989586621680490511) = Foldl arg6989586621680491139 arg6989586621680491140 arg6989586621680491141
type MinBoundSym0 = MinBound
type MaxBoundSym0 = MaxBound
data ShowsPrecSym0 :: forall a6989586621680294621. (~>) Nat ((~>) a6989586621680294621 ((~>) Symbol Symbol))
data ShowsPrecSym1 (arg6989586621680295059 :: Nat) :: forall a6989586621680294621. (~>) a6989586621680294621 ((~>) Symbol Symbol)
data ShowsPrecSym2 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) :: (~>) Symbol Symbol
type ShowsPrecSym3 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) (arg6989586621680295061 :: Symbol) = ShowsPrec arg6989586621680295059 arg6989586621680295060 arg6989586621680295061
data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowStringSym1 (a6989586621680295015 :: Symbol) :: (~>) Symbol Symbol
type ShowStringSym2 (a6989586621680295015 :: Symbol) (a6989586621680295016 :: Symbol) = ShowString a6989586621680295015 a6989586621680295016
data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol))
data ShowParenSym1 (a6989586621680294997 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)
data ShowParenSym2 (a6989586621680294997 :: Bool) (a6989586621680294998 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol
data ShowSpaceSym0 :: (~>) Symbol Symbol
type ShowSpaceSym1 (a6989586621680294988 :: Symbol) = ShowSpace a6989586621680294988
data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowCharSym1 (a6989586621680295025 :: Symbol) :: (~>) Symbol Symbol
type ShowCharSym2 (a6989586621680295025 :: Symbol) (a6989586621680295026 :: Symbol) = ShowChar a6989586621680295025 a6989586621680295026
data ShowCommaSpaceSym0 :: (~>) Symbol Symbol
type ShowCommaSpaceSym1 (a6989586621680294983 :: Symbol) = ShowCommaSpace a6989586621680294983
data FmapSym0 :: forall a6989586621679570820 b6989586621679570821 f6989586621679570819. (~>) ((~>) a6989586621679570820 b6989586621679570821) ((~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821))
data FmapSym1 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) :: forall f6989586621679570819. (~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821)
type FmapSym2 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) (arg6989586621679571212 :: f6989586621679570819 a6989586621679570820) = Fmap arg6989586621679571211 arg6989586621679571212
data (<$@#@$) :: forall a6989586621679570822 f6989586621679570819 b6989586621679570823. (~>) a6989586621679570822 ((~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822))
infixl 4 <$@#@$
data (<$@#@$$) (arg6989586621679571215 :: a6989586621679570822) :: forall f6989586621679570819 b6989586621679570823. (~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822)
infixl 4 <$@#@$$
type (<$@#@$$$) (arg6989586621679571215 :: a6989586621679570822) (arg6989586621679571216 :: f6989586621679570819 b6989586621679570823) = (<$) arg6989586621679571215 arg6989586621679571216
data FoldMapSym0 :: forall a6989586621680490505 m6989586621680490504 t6989586621680490502. (~>) ((~>) a6989586621680490505 m6989586621680490504) ((~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504)
data FoldMapSym1 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504
type FoldMapSym2 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) (arg6989586621680491124 :: t6989586621680490502 a6989586621680490505) = FoldMap arg6989586621680491123 arg6989586621680491124
type MemptySym0 = Mempty
data MappendSym0 :: forall a6989586621680364721. (~>) a6989586621680364721 ((~>) a6989586621680364721 a6989586621680364721)
data MappendSym1 (arg6989586621680364860 :: a6989586621680364721) :: (~>) a6989586621680364721 a6989586621680364721
type MappendSym2 (arg6989586621680364860 :: a6989586621680364721) (arg6989586621680364861 :: a6989586621680364721) = Mappend arg6989586621680364860 arg6989586621680364861
data FoldrSym0 :: forall a6989586621680490506 b6989586621680490507 t6989586621680490502. (~>) ((~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) ((~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507))
data FoldrSym1 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) :: forall t6989586621680490502. (~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507)
data FoldrSym2 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507
type FoldrSym3 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) (arg6989586621680491129 :: t6989586621680490502 a6989586621680490506) = Foldr arg6989586621680491127 arg6989586621680491128 arg6989586621680491129
data TraverseSym0 :: forall a6989586621680798695 f6989586621680798694 b6989586621680798696 t6989586621680798693. (~>) ((~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) ((~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696)))
data TraverseSym1 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696))
type TraverseSym2 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) (arg6989586621680798706 :: t6989586621680798693 a6989586621680798695) = Traverse arg6989586621680798705 arg6989586621680798706
data PureSym0 :: forall a6989586621679570825 f6989586621679570824. (~>) a6989586621679570825 (f6989586621679570824 a6989586621679570825)
type PureSym1 (arg6989586621679571235 :: a6989586621679570825) = Pure arg6989586621679571235
data (<*>@#@$) :: forall f6989586621679570824 a6989586621679570826 b6989586621679570827. (~>) (f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) ((~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827))
infixl 4 <*>@#@$
data (<*>@#@$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) :: (~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827)
infixl 4 <*>@#@$$
type (<*>@#@$$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) (arg6989586621679571238 :: f6989586621679570824 a6989586621679570826) = (<*>) arg6989586621679571237 arg6989586621679571238
data LiftA2Sym0 :: forall a6989586621679570828 b6989586621679570829 c6989586621679570830 f6989586621679570824. (~>) ((~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) ((~>) (f6989586621679570824 a6989586621679570828) ((~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830)))
data LiftA2Sym1 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) :: forall f6989586621679570824. (~>) (f6989586621679570824 a6989586621679570828) ((~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830))
data LiftA2Sym2 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) (arg6989586621679571242 :: f6989586621679570824 a6989586621679570828) :: (~>) (f6989586621679570824 b6989586621679570829) (f6989586621679570824 c6989586621679570830)
type LiftA2Sym3 (arg6989586621679571241 :: (~>) a6989586621679570828 ((~>) b6989586621679570829 c6989586621679570830)) (arg6989586621679571242 :: f6989586621679570824 a6989586621679570828) (arg6989586621679571243 :: f6989586621679570824 b6989586621679570829) = LiftA2 arg6989586621679571241 arg6989586621679571242 arg6989586621679571243
data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428))
infixr 9 .@#@$
data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)
infixr 9 .@#@$$
data (.@#@$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428
infixr 9 .@#@$$$
type (.@#@$$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) (a6989586621679545605 :: a6989586621679545429) = (.) a6989586621679545603 a6989586621679545604 a6989586621679545605
data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [a3530822107858468865 :: Type])
infixr 5 :@#@$
data (:@#@$$) (t6989586621679315156 :: a3530822107858468865 :: Type) :: (~>) [a3530822107858468865] [a3530822107858468865 :: Type]
infixr 5 :@#@$$
type (:@#@$$$) (t6989586621679315156 :: a3530822107858468865) (t6989586621679315157 :: [a3530822107858468865]) = '(:) t6989586621679315156 t6989586621679315157
-- | This class (which users should never see) is to be instantiated in
-- order to use an otherwise-unused data constructor, such as the
-- "kind-inference" data constructor for defunctionalization symbols.
class SuppressUnusedWarnings (t :: k)
suppressUnusedWarnings :: SuppressUnusedWarnings t => ()
-- | 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.TypeError at the
-- same time, as many of the definitons in the latter deliberately clash
-- with the former.
module Data.Singletons.TypeError
-- | A drop-in replacement for TypeError. This also exists at the
-- value-level as typeError.
type family TypeError (a :: PErrorMessage) :: b
-- | 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 :: HasCallStack => Sing err -> Sing (TypeError err)
-- | 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
-- | The singleton kind-indexed type family.
type family Sing :: k -> Type
data SErrorMessage :: PErrorMessage -> Type
[SText] :: Sing t -> SErrorMessage ('Text t)
[SShowType] :: Sing ty -> SErrorMessage ('ShowType ty)
[:%<>:] :: Sing e1 -> Sing e2 -> SErrorMessage (e1 :<>: e2)
[:%$$:] :: 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 :: forall (s6989586621681331131 :: Type). (~>) s6989586621681331131 (ErrorMessage' (s6989586621681331131 :: Type))
type TextSym1 (t6989586621681331875 :: s6989586621681331131) = 'Text t6989586621681331875
data ShowTypeSym0 :: forall t6989586621681331132 (s6989586621681331131 :: Type). (~>) t6989586621681331132 (ErrorMessage' (s6989586621681331131 :: Type))
type ShowTypeSym1 (t6989586621681331877 :: t6989586621681331132) = 'ShowType t6989586621681331877
data (:<>:@#@$) :: forall (s6989586621681331131 :: Type). (~>) (ErrorMessage' s6989586621681331131) ((~>) (ErrorMessage' s6989586621681331131) (ErrorMessage' (s6989586621681331131 :: Type)))
infixl 6 :<>:@#@$
data (:<>:@#@$$) (t6989586621681331879 :: ErrorMessage' (s6989586621681331131 :: Type)) :: (~>) (ErrorMessage' s6989586621681331131) (ErrorMessage' (s6989586621681331131 :: Type))
infixl 6 :<>:@#@$$
type (:<>:@#@$$$) (t6989586621681331879 :: ErrorMessage' s6989586621681331131) (t6989586621681331880 :: ErrorMessage' s6989586621681331131) = '(:<>:) t6989586621681331879 t6989586621681331880
data (:$$:@#@$) :: forall (s6989586621681331131 :: Type). (~>) (ErrorMessage' s6989586621681331131) ((~>) (ErrorMessage' s6989586621681331131) (ErrorMessage' (s6989586621681331131 :: Type)))
infixl 5 :$$:@#@$
data (:$$:@#@$$) (t6989586621681331883 :: ErrorMessage' (s6989586621681331131 :: Type)) :: (~>) (ErrorMessage' s6989586621681331131) (ErrorMessage' (s6989586621681331131 :: Type))
infixl 5 :$$:@#@$$
type (:$$:@#@$$$) (t6989586621681331883 :: ErrorMessage' s6989586621681331131) (t6989586621681331884 :: ErrorMessage' s6989586621681331131) = '(:$$:) t6989586621681331883 t6989586621681331884
data TypeErrorSym0 :: forall b6989586621681331115. (~>) PErrorMessage b6989586621681331115
type TypeErrorSym1 (a6989586621681331116 :: PErrorMessage) = TypeError a6989586621681331116
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeError.TypeErrorSym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeError.TypeErrorSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeError.:$$:@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.TypeError.:$$:@#@$)
instance forall s6989586621681331131 (t6989586621681331883 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681331131). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:$$:@#@$$) t6989586621681331883)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI ((Data.Singletons.TypeError.:$$:@#@$$) x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeError.:<>:@#@$)
instance Data.Singletons.Internal.SingI (Data.Singletons.TypeError.:<>:@#@$)
instance forall s6989586621681331131 (t6989586621681331879 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681331131). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:<>:@#@$$) t6989586621681331879)
instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI ((Data.Singletons.TypeError.:<>:@#@$$) x)
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeError.ShowTypeSym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeError.ShowTypeSym0
instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeError.TextSym0
instance Data.Singletons.Internal.SingI Data.Singletons.TypeError.TextSym0
instance Data.Singletons.Internal.SingKind Data.Singletons.TypeError.PErrorMessage
instance Data.Singletons.Internal.SingI t => Data.Singletons.Internal.SingI ('Data.Singletons.TypeError.Text t)
instance forall t (ty :: t). Data.Singletons.Internal.SingI ty => Data.Singletons.Internal.SingI ('Data.Singletons.TypeError.ShowType ty)
instance (Data.Singletons.Internal.SingI e1, Data.Singletons.Internal.SingI e2) => Data.Singletons.Internal.SingI (e1 'Data.Singletons.TypeError.:<>: e2)
instance (Data.Singletons.Internal.SingI e1, Data.Singletons.Internal.SingI e2) => Data.Singletons.Internal.SingI (e1 'Data.Singletons.TypeError.:$$: e2)
-- | 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 Data.Singletons.Prelude
data SBool :: Bool -> Type
[SFalse] :: SBool 'False
[STrue] :: SBool 'True
data SList :: forall a_11. [a_11] -> Type
[SNil] :: SList '[]
[SCons] :: forall a_11 (n_a1hri :: a_11) (n_a1hrj :: [a_11]). () => Sing (n_a1hri :: a_11) -> Sing (n_a1hrj :: [a_11]) -> SList ('(:) n_a1hri n_a1hrj)
infixr 5 `SCons`
data SMaybe :: forall a_11. Maybe a_11 -> Type
[SNothing] :: SMaybe 'Nothing
[SJust] :: forall a_11 (n_a1hqT :: a_11). () => Sing (n_a1hqT :: a_11) -> SMaybe ('Just n_a1hqT)
data SEither :: forall a_alRF b_alRG. Either a_alRF b_alRG -> Type
[SLeft] :: forall a_alRF (n_a1hs0 :: a_alRF). () => Sing (n_a1hs0 :: a_alRF) -> SEither ('Left n_a1hs0)
[SRight] :: forall b_alRG (n_a1hs2 :: b_alRG). () => Sing (n_a1hs2 :: b_alRG) -> SEither ('Right n_a1hs2)
data SOrdering :: Ordering -> Type
[SLT] :: SOrdering 'LT
[SEQ] :: SOrdering 'EQ
[SGT] :: SOrdering 'GT
data STuple0 :: () -> Type
[STuple0] :: STuple0 '()
data STuple2 :: forall a_11 b_12. (a_11, b_12) -> Type
[STuple2] :: forall a_11 b_12 (n_a1hsO :: a_11) (n_a1hsP :: b_12). () => Sing (n_a1hsO :: a_11) -> Sing (n_a1hsP :: b_12) -> STuple2 '(n_a1hsO, n_a1hsP)
data STuple3 :: forall a_11 b_12 c_13. (a_11, b_12, c_13) -> Type
[STuple3] :: forall a_11 b_12 c_13 (n_a1htl :: a_11) (n_a1htm :: b_12) (n_a1htn :: c_13). () => Sing (n_a1htl :: a_11) -> Sing (n_a1htm :: b_12) -> Sing (n_a1htn :: c_13) -> STuple3 '(n_a1htl, n_a1htm, n_a1htn)
data STuple4 :: forall a_11 b_12 c_13 d_14. (a_11, b_12, c_13, d_14) -> Type
[STuple4] :: forall a_11 b_12 c_13 d_14 (n_a1hu8 :: a_11) (n_a1hu9 :: b_12) (n_a1hua :: c_13) (n_a1hub :: d_14). () => Sing (n_a1hu8 :: a_11) -> Sing (n_a1hu9 :: b_12) -> Sing (n_a1hua :: c_13) -> Sing (n_a1hub :: d_14) -> STuple4 '(n_a1hu8, n_a1hu9, n_a1hua, n_a1hub)
data STuple5 :: forall a_11 b_12 c_13 d_14 e_15. (a_11, b_12, c_13, d_14, e_15) -> Type
[STuple5] :: forall a_11 b_12 c_13 d_14 e_15 (n_a1hvd :: a_11) (n_a1hve :: b_12) (n_a1hvf :: c_13) (n_a1hvg :: d_14) (n_a1hvh :: e_15). () => Sing (n_a1hvd :: a_11) -> Sing (n_a1hve :: b_12) -> Sing (n_a1hvf :: c_13) -> Sing (n_a1hvg :: d_14) -> Sing (n_a1hvh :: e_15) -> STuple5 '(n_a1hvd, n_a1hve, n_a1hvf, n_a1hvg, n_a1hvh)
data STuple6 :: forall a_11 b_12 c_13 d_14 e_15 f_16. (a_11, b_12, c_13, d_14, e_15, f_16) -> Type
[STuple6] :: forall a_11 b_12 c_13 d_14 e_15 f_16 (n_a1hwC :: a_11) (n_a1hwD :: b_12) (n_a1hwE :: c_13) (n_a1hwF :: d_14) (n_a1hwG :: e_15) (n_a1hwH :: f_16). () => Sing (n_a1hwC :: a_11) -> Sing (n_a1hwD :: b_12) -> Sing (n_a1hwE :: c_13) -> Sing (n_a1hwF :: d_14) -> Sing (n_a1hwG :: e_15) -> Sing (n_a1hwH :: f_16) -> STuple6 '(n_a1hwC, n_a1hwD, n_a1hwE, n_a1hwF, n_a1hwG, n_a1hwH)
data STuple7 :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17. (a_11, b_12, c_13, d_14, e_15, f_16, g_17) -> Type
[STuple7] :: forall a_11 b_12 c_13 d_14 e_15 f_16 g_17 (n_a1hyn :: a_11) (n_a1hyo :: b_12) (n_a1hyp :: c_13) (n_a1hyq :: d_14) (n_a1hyr :: e_15) (n_a1hys :: f_16) (n_a1hyt :: g_17). () => Sing (n_a1hyn :: a_11) -> Sing (n_a1hyo :: b_12) -> Sing (n_a1hyp :: c_13) -> Sing (n_a1hyq :: d_14) -> Sing (n_a1hyr :: e_15) -> Sing (n_a1hys :: f_16) -> Sing (n_a1hyt :: g_17) -> STuple7 '(n_a1hyn, n_a1hyo, n_a1hyp, n_a1hyq, n_a1hyr, n_a1hys, n_a1hyt)
-- | 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 :: Sing a -> Sing b -> Sing c -> Sing (If a b c)
-- | Type-level "not". An injective type family since 4.10.0.0.
type family Not (a :: Bool) = (res :: Bool) | res -> a
-- | Negation of a singleton
sNot :: 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
(%&&) :: Sing a -> Sing b -> Sing (a && b)
infixr 3 %&&
-- | Disjunction of singletons
(%||) :: Sing a -> Sing b -> Sing (a || b)
infixr 2 %||
type family Otherwise :: Bool
sOtherwise :: Sing (OtherwiseSym0 :: Bool)
-- | The promotion of error. This version is more poly-kinded for
-- easier use.
type family Error (str :: k0) :: k
-- | The singleton for error
sError :: HasCallStack => Sing (str :: Symbol) -> a
-- | The promotion of errorWithoutStackTrace. This version is more
-- poly-kinded for easier use.
type family ErrorWithoutStackTrace (str :: k0) :: k
-- | The singleton for errorWithoutStackTrace.
sErrorWithoutStackTrace :: Sing (str :: Symbol) -> a
-- | The promotion of undefined.
type family Undefined :: k
-- | The singleton for undefined.
sUndefined :: HasCallStack => a
class POrd (a_a1BVU :: Type) where {
type family Compare (arg_a1BXl :: a_a1BVU) (arg_a1BXm :: a_a1BVU) :: Ordering;
type family (<) (arg_a1BXp :: a_a1BVU) (arg_a1BXq :: a_a1BVU) :: Bool;
type family (<=) (arg_a1BXt :: a_a1BVU) (arg_a1BXu :: a_a1BVU) :: Bool;
type family (>) (arg_a1BXx :: a_a1BVU) (arg_a1BXy :: a_a1BVU) :: Bool;
type family (>=) (arg_a1BXB :: a_a1BVU) (arg_a1BXC :: a_a1BVU) :: Bool;
type family Max (arg_a1BXF :: a_a1BVU) (arg_a1BXG :: a_a1BVU) :: a_a1BVU;
type family Min (arg_a1BXJ :: a_a1BVU) (arg_a1BXK :: a_a1BVU) :: a_a1BVU;
type Compare a_a1BXN a_a1BXO = Apply (Apply Compare_6989586621679394057Sym0 a_a1BXN) a_a1BXO;
type (<) a_a1BYb a_a1BYc = Apply (Apply TFHelper_6989586621679394081Sym0 a_a1BYb) a_a1BYc;
type (<=) a_a1BYt a_a1BYu = Apply (Apply TFHelper_6989586621679394099Sym0 a_a1BYt) a_a1BYu;
type (>) a_a1BYL a_a1BYM = Apply (Apply TFHelper_6989586621679394117Sym0 a_a1BYL) a_a1BYM;
type (>=) a_a1BZ3 a_a1BZ4 = Apply (Apply TFHelper_6989586621679394135Sym0 a_a1BZ3) a_a1BZ4;
type Max a_a1BZl a_a1BZm = Apply (Apply Max_6989586621679394153Sym0 a_a1BZl) a_a1BZm;
type Min a_a1BZD a_a1BZE = Apply (Apply Min_6989586621679394171Sym0 a_a1BZD) a_a1BZE;
}
infix 4 >=
infix 4 >
infix 4 <=
infix 4 <
class SEq a_a1BVU => SOrd a_a1BVU
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). SOrd a_a1BVU => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
sCompare :: forall (t_a1C04 :: a_a1BVU) (t_a1C05 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering) ~ Apply (Apply Compare_6989586621679394057Sym0 t_a1C04) t_a1C05) => Sing t_a1C04 -> Sing t_a1C05 -> Sing (Apply (Apply CompareSym0 t_a1C04) t_a1C05 :: Ordering)
(%<) :: forall (t_a1C08 :: a_a1BVU) (t_a1C09 :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool) ~ Apply (Apply TFHelper_6989586621679394081Sym0 t_a1C08) t_a1C09) => Sing t_a1C08 -> Sing t_a1C09 -> Sing (Apply (Apply (<@#@$) t_a1C08) t_a1C09 :: Bool)
(%<=) :: forall (t_a1C0c :: a_a1BVU) (t_a1C0d :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool) ~ Apply (Apply TFHelper_6989586621679394099Sym0 t_a1C0c) t_a1C0d) => Sing t_a1C0c -> Sing t_a1C0d -> Sing (Apply (Apply (<=@#@$) t_a1C0c) t_a1C0d :: Bool)
(%>) :: forall (t_a1C0g :: a_a1BVU) (t_a1C0h :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool) ~ Apply (Apply TFHelper_6989586621679394117Sym0 t_a1C0g) t_a1C0h) => Sing t_a1C0g -> Sing t_a1C0h -> Sing (Apply (Apply (>@#@$) t_a1C0g) t_a1C0h :: Bool)
(%>=) :: forall (t_a1C0k :: a_a1BVU) (t_a1C0l :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool) ~ Apply (Apply TFHelper_6989586621679394135Sym0 t_a1C0k) t_a1C0l) => Sing t_a1C0k -> Sing t_a1C0l -> Sing (Apply (Apply (>=@#@$) t_a1C0k) t_a1C0l :: Bool)
sMax :: forall (t_a1C0o :: a_a1BVU) (t_a1C0p :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU) ~ Apply (Apply Max_6989586621679394153Sym0 t_a1C0o) t_a1C0p) => Sing t_a1C0o -> Sing t_a1C0p -> Sing (Apply (Apply MaxSym0 t_a1C0o) t_a1C0p :: a_a1BVU)
sMin :: forall (t_a1C0s :: a_a1BVU) (t_a1C0t :: a_a1BVU). (SOrd a_a1BVU, (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU) ~ Apply (Apply Min_6989586621679394171Sym0 t_a1C0s) t_a1C0t) => Sing t_a1C0s -> Sing t_a1C0t -> Sing (Apply (Apply MinSym0 t_a1C0s) t_a1C0t :: a_a1BVU)
infix 4 %<=
infix 4 %>=
infix 4 %>
infix 4 %<
class SBounded a_a39XM
sMinBound :: SBounded a_a39XM => Sing (MinBoundSym0 :: a_a39XM)
sMaxBound :: SBounded a_a39XM => Sing (MaxBoundSym0 :: a_a39XM)
class PBounded (a_a39XM :: Type) where {
type family MinBound :: a_a39XM;
type family MaxBound :: a_a39XM;
}
type MaxBoundSym0 = MaxBound
type MinBoundSym0 = MinBound
class SEnum a_a3aZB
sToEnum :: forall (t_a3b7d :: Nat). SEnum a_a3aZB => Sing t_a3b7d -> Sing (Apply ToEnumSym0 t_a3b7d :: a_a3aZB)
sFromEnum :: forall (t_a3b7f :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7f -> Sing (Apply FromEnumSym0 t_a3b7f :: Nat)
sEnumFromTo :: forall (t_a3b7h :: a_a3aZB) (t_a3b7i :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7h -> Sing t_a3b7i -> Sing (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB])
sEnumFromThenTo :: forall (t_a3b7l :: a_a3aZB) (t_a3b7m :: a_a3aZB) (t_a3b7n :: a_a3aZB). SEnum a_a3aZB => Sing t_a3b7l -> Sing t_a3b7m -> Sing t_a3b7n -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB])
sEnumFromTo :: forall (t_a3b7h :: a_a3aZB) (t_a3b7i :: a_a3aZB). (SEnum a_a3aZB, (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB]) ~ Apply (Apply EnumFromTo_6989586621679767363Sym0 t_a3b7h) t_a3b7i) => Sing t_a3b7h -> Sing t_a3b7i -> Sing (Apply (Apply EnumFromToSym0 t_a3b7h) t_a3b7i :: [a_a3aZB])
sEnumFromThenTo :: forall (t_a3b7l :: a_a3aZB) (t_a3b7m :: a_a3aZB) (t_a3b7n :: a_a3aZB). (SEnum a_a3aZB, (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679767376Sym0 t_a3b7l) t_a3b7m) t_a3b7n) => Sing t_a3b7l -> Sing t_a3b7m -> Sing t_a3b7n -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a3b7l) t_a3b7m) t_a3b7n :: [a_a3aZB])
class PEnum (a_a3aZB :: Type) where {
type family ToEnum (arg_a3b4f :: Nat) :: a_a3aZB;
type family FromEnum (arg_a3b4h :: a_a3aZB) :: Nat;
type family EnumFromTo (arg_a3b4j :: a_a3aZB) (arg_a3b4k :: a_a3aZB) :: [a_a3aZB];
type family EnumFromThenTo (arg_a3b4n :: a_a3aZB) (arg_a3b4o :: a_a3aZB) (arg_a3b4p :: a_a3aZB) :: [a_a3aZB];
type Succ a_a3b4t = Apply Succ_6989586621679767338Sym0 a_a3b4t;
type Pred a_a3b4I = Apply Pred_6989586621679767353Sym0 a_a3b4I;
type EnumFromTo a_a3b4R a_a3b4S = Apply (Apply EnumFromTo_6989586621679767363Sym0 a_a3b4R) a_a3b4S;
type EnumFromThenTo a_a3b53 a_a3b54 a_a3b55 = Apply (Apply (Apply EnumFromThenTo_6989586621679767376Sym0 a_a3b53) a_a3b54) a_a3b55;
}
data EnumFromThenToSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 ((~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035]))
data EnumFromThenToSym1 (arg6989586621679767331 :: a6989586621679767035) :: (~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035])
data EnumFromThenToSym2 (arg6989586621679767331 :: a6989586621679767035) (arg6989586621679767332 :: a6989586621679767035) :: (~>) a6989586621679767035 [a6989586621679767035]
type EnumFromThenToSym3 (arg6989586621679767331 :: a6989586621679767035) (arg6989586621679767332 :: a6989586621679767035) (arg6989586621679767333 :: a6989586621679767035) = EnumFromThenTo arg6989586621679767331 arg6989586621679767332 arg6989586621679767333
data EnumFromToSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 ((~>) a6989586621679767035 [a6989586621679767035])
data EnumFromToSym1 (arg6989586621679767327 :: a6989586621679767035) :: (~>) a6989586621679767035 [a6989586621679767035]
type EnumFromToSym2 (arg6989586621679767327 :: a6989586621679767035) (arg6989586621679767328 :: a6989586621679767035) = EnumFromTo arg6989586621679767327 arg6989586621679767328
data FromEnumSym0 :: forall a6989586621679767035. (~>) a6989586621679767035 Nat
type FromEnumSym1 (arg6989586621679767325 :: a6989586621679767035) = FromEnum arg6989586621679767325
data ToEnumSym0 :: forall a6989586621679767035. (~>) Nat a6989586621679767035
type ToEnumSym1 (arg6989586621679767323 :: Nat) = ToEnum arg6989586621679767323
-- | Exponentiation of type-level naturals.
type family (a :: Nat) ^ (b :: Nat) :: Nat
infixr 8 ^
-- | The singleton analogue of (^) for Nats.
(%^) :: Sing a -> Sing b -> Sing (a ^ b)
infixr 8 %^
class PShow (a_a5of3 :: Type) where {
type family ShowsPrec (arg_a5om7 :: Nat) (arg_a5om8 :: a_a5of3) (arg_a5om9 :: Symbol) :: Symbol;
type family Show_ (arg_a5omd :: a_a5of3) :: Symbol;
type family ShowList (arg_a5omf :: [a_a5of3]) (arg_a5omg :: Symbol) :: Symbol;
type ShowsPrec a_a5omj a_a5omk a_a5oml = Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 a_a5omj) a_a5omk) a_a5oml;
type Show_ a_a5omz = Apply Show__6989586621680295088Sym0 a_a5omz;
type ShowList a_a5omG a_a5omH = Apply (Apply ShowList_6989586621680295096Sym0 a_a5omG) a_a5omH;
}
class SShow a_a5of3
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). SShow a_a5of3 => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). SShow a_a5of3 => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). SShow a_a5of3 => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
sShowsPrec :: forall (t_a5oqg :: Nat) (t_a5oqh :: a_a5of3) (t_a5oqi :: Symbol). (SShow a_a5of3, (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680295074Sym0 t_a5oqg) t_a5oqh) t_a5oqi) => Sing t_a5oqg -> Sing t_a5oqh -> Sing t_a5oqi -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5oqg) t_a5oqh) t_a5oqi :: Symbol)
sShow_ :: forall (t_a5oqm :: a_a5of3). (SShow a_a5of3, (Apply Show_Sym0 t_a5oqm :: Symbol) ~ Apply Show__6989586621680295088Sym0 t_a5oqm) => Sing t_a5oqm -> Sing (Apply Show_Sym0 t_a5oqm :: Symbol)
sShowList :: forall (t_a5oqo :: [a_a5of3]) (t_a5oqp :: Symbol). (SShow a_a5of3, (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol) ~ Apply (Apply ShowList_6989586621680295096Sym0 t_a5oqo) t_a5oqp) => Sing t_a5oqo -> Sing t_a5oqp -> Sing (Apply (Apply ShowListSym0 t_a5oqo) t_a5oqp :: Symbol)
-- | The shows functions return a function that prepends the
-- output String to an existing String. This allows
-- constant-time concatenation of results using function composition.
type ShowS = String -> String
-- | GHC currently has no notion of type-level Chars, so we fake
-- them with single-character Symbols.
type SChar = Symbol
type family Shows (a_a5olZ :: a_a5oeO) (a_a5om0 :: Symbol) :: Symbol
sShows :: forall a_a5oeO (t_a5opR :: a_a5oeO) (t_a5opS :: Symbol). SShow a_a5oeO => Sing t_a5opR -> Sing t_a5opS -> Sing (Apply (Apply ShowsSym0 t_a5opR) t_a5opS :: Symbol)
type family ShowChar (a_a5olz :: Symbol) (a_a5olA :: Symbol) :: Symbol
sShowChar :: forall (t_a5opH :: Symbol) (t_a5opI :: Symbol). Sing t_a5opH -> Sing t_a5opI -> Sing (Apply (Apply ShowCharSym0 t_a5opH) t_a5opI :: Symbol)
type family ShowString (a_a5olp :: Symbol) (a_a5olq :: Symbol) :: Symbol
sShowString :: forall (t_a5opD :: Symbol) (t_a5opE :: Symbol). Sing t_a5opD -> Sing t_a5opE -> Sing (Apply (Apply ShowStringSym0 t_a5opD) t_a5opE :: Symbol)
type family ShowParen (a_a5ol7 :: Bool) (a_a5ol8 :: (~>) Symbol Symbol) (a_a5ol9 :: Symbol) :: Symbol
sShowParen :: forall (t_a5opx :: Bool) (t_a5opy :: (~>) Symbol Symbol) (t_a5opz :: Symbol). Sing t_a5opx -> Sing t_a5opy -> Sing t_a5opz -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5opx) t_a5opy) t_a5opz :: Symbol)
class PSemigroup (a_a3u8k :: Type) where {
type family (<>) (arg_a3uc7 :: a_a3u8k) (arg_a3uc8 :: a_a3u8k) :: a_a3u8k;
type Sconcat a_a3ucd = Apply Sconcat_6989586621679840854Sym0 a_a3ucd;
}
infixr 6 <>
class SSemigroup a_a3u8k
(%<>) :: forall (t_a3ufW :: a_a3u8k) (t_a3ufX :: a_a3u8k). SSemigroup a_a3u8k => Sing t_a3ufW -> Sing t_a3ufX -> Sing (Apply (Apply (<>@#@$) t_a3ufW) t_a3ufX :: a_a3u8k)
infixr 6 %<>
class PMonoid (a_a5GtH :: Type) where {
type family Mempty :: a_a5GtH;
type family Mappend (arg_a5GvW :: a_a5GtH) (arg_a5GvX :: a_a5GtH) :: a_a5GtH;
type family Mconcat (arg_a5Gw0 :: [a_a5GtH]) :: a_a5GtH;
type Mappend a_a5Gw2 a_a5Gw3 = Apply (Apply Mappend_6989586621680364868Sym0 a_a5Gw2) a_a5Gw3;
type Mconcat a_a5Gwi = Apply Mconcat_6989586621680364883Sym0 a_a5Gwi;
}
class SSemigroup a_a5GtH => SMonoid a_a5GtH
sMempty :: SMonoid a_a5GtH => Sing (MemptySym0 :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). SMonoid a_a5GtH => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). SMonoid a_a5GtH => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
sMappend :: forall (t_a5Gxg :: a_a5GtH) (t_a5Gxh :: a_a5GtH). (SMonoid a_a5GtH, (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH) ~ Apply (Apply Mappend_6989586621680364868Sym0 t_a5Gxg) t_a5Gxh) => Sing t_a5Gxg -> Sing t_a5Gxh -> Sing (Apply (Apply MappendSym0 t_a5Gxg) t_a5Gxh :: a_a5GtH)
sMconcat :: forall (t_a5Gxk :: [a_a5GtH]). (SMonoid a_a5GtH, (Apply MconcatSym0 t_a5Gxk :: a_a5GtH) ~ Apply Mconcat_6989586621680364883Sym0 t_a5Gxk) => Sing t_a5Gxk -> Sing (Apply MconcatSym0 t_a5Gxk :: a_a5GtH)
class PFunctor (f_a2lWP :: Type -> Type) where {
type family Fmap (arg_a2m39 :: (~>) a_a2lWQ b_a2lWR) (arg_a2m3a :: f_a2lWP a_a2lWQ) :: f_a2lWP b_a2lWR;
type family (<$) (arg_a2m3d :: a_a2lWS) (arg_a2m3e :: f_a2lWP b_a2lWT) :: f_a2lWP a_a2lWS;
type (<$) a_a2m3h a_a2m3i = Apply (Apply TFHelper_6989586621679571221Sym0 a_a2m3h) a_a2m3i;
}
infixl 4 <$
class SFunctor (f_a2lWP :: Type -> Type)
sFmap :: forall a_a2lWQ b_a2lWR (t_a2m7r :: (~>) a_a2lWQ b_a2lWR) (t_a2m7s :: f_a2lWP a_a2lWQ). SFunctor f_a2lWP => Sing t_a2m7r -> Sing t_a2m7s -> Sing (Apply (Apply FmapSym0 t_a2m7r) t_a2m7s :: f_a2lWP b_a2lWR)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). SFunctor f_a2lWP => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
(%<$) :: forall a_a2lWS b_a2lWT (t_a2m7v :: a_a2lWS) (t_a2m7w :: f_a2lWP b_a2lWT). (SFunctor f_a2lWP, (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS) ~ Apply (Apply TFHelper_6989586621679571221Sym0 t_a2m7v) t_a2m7w) => Sing t_a2m7v -> Sing t_a2m7w -> Sing (Apply (Apply (<$@#@$) t_a2m7v) t_a2m7w :: f_a2lWP a_a2lWS)
infixl 4 %<$
type family (<$>) (a_a34eV :: (~>) a_a34dC b_a34dD) (a_a34eW :: f_a34dB a_a34dC) :: f_a34dB b_a34dD
infixl 4 <$>
(%<$>) :: forall a_a34dC b_a34dD f_a34dB (t_a34gu :: (~>) a_a34dC b_a34dD) (t_a34gv :: f_a34dB a_a34dC). SFunctor f_a34dB => Sing t_a34gu -> Sing t_a34gv -> Sing (Apply (Apply (<$>@#@$) t_a34gu) t_a34gv :: f_a34dB b_a34dD)
infixl 4 %<$>
class PApplicative (f_a2lWU :: Type -> Type) where {
type family Pure (arg_a2m3x :: a_a2lWV) :: f_a2lWU a_a2lWV;
type family (<*>) (arg_a2m3z :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (arg_a2m3A :: f_a2lWU a_a2lWW) :: f_a2lWU b_a2lWX;
type family (*>) (arg_a2m3J :: f_a2lWU a_a2lX1) (arg_a2m3K :: f_a2lWU b_a2lX2) :: f_a2lWU b_a2lX2;
type family (<*) (arg_a2m3N :: f_a2lWU a_a2lX3) (arg_a2m3O :: f_a2lWU b_a2lX4) :: f_a2lWU a_a2lX3;
type (<*>) a_a2m3R a_a2m3S = Apply (Apply TFHelper_6989586621679571257Sym0 a_a2m3R) a_a2m3S;
type LiftA2 a_a2m47 a_a2m48 a_a2m49 = Apply (Apply (Apply LiftA2_6989586621679571274Sym0 a_a2m47) a_a2m48) a_a2m49;
type (*>) a_a2m4q a_a2m4r = Apply (Apply TFHelper_6989586621679571292Sym0 a_a2m4q) a_a2m4r;
type (<*) a_a2m4C a_a2m4D = Apply (Apply TFHelper_6989586621679571304Sym0 a_a2m4C) a_a2m4D;
}
infixl 4 <*>
infixl 4 *>
infixl 4 <*
class SFunctor f_a2lWU => SApplicative (f_a2lWU :: Type -> Type)
sPure :: forall a_a2lWV (t_a2m7B :: a_a2lWV). SApplicative f_a2lWU => Sing t_a2m7B -> Sing (Apply PureSym0 t_a2m7B :: f_a2lWU a_a2lWV)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). SApplicative f_a2lWU => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). SApplicative f_a2lWU => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). SApplicative f_a2lWU => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
(%<*>) :: forall a_a2lWW b_a2lWX (t_a2m7D :: f_a2lWU ((~>) a_a2lWW b_a2lWX)) (t_a2m7E :: f_a2lWU a_a2lWW). (SApplicative f_a2lWU, (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX) ~ Apply (Apply TFHelper_6989586621679571257Sym0 t_a2m7D) t_a2m7E) => Sing t_a2m7D -> Sing t_a2m7E -> Sing (Apply (Apply (<*>@#@$) t_a2m7D) t_a2m7E :: f_a2lWU b_a2lWX)
(%*>) :: forall a_a2lX1 b_a2lX2 (t_a2m7N :: f_a2lWU a_a2lX1) (t_a2m7O :: f_a2lWU b_a2lX2). (SApplicative f_a2lWU, (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2) ~ Apply (Apply TFHelper_6989586621679571292Sym0 t_a2m7N) t_a2m7O) => Sing t_a2m7N -> Sing t_a2m7O -> Sing (Apply (Apply (*>@#@$) t_a2m7N) t_a2m7O :: f_a2lWU b_a2lX2)
(%<*) :: forall a_a2lX3 b_a2lX4 (t_a2m7R :: f_a2lWU a_a2lX3) (t_a2m7S :: f_a2lWU b_a2lX4). (SApplicative f_a2lWU, (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3) ~ Apply (Apply TFHelper_6989586621679571304Sym0 t_a2m7R) t_a2m7S) => Sing t_a2m7R -> Sing t_a2m7S -> Sing (Apply (Apply (<*@#@$) t_a2m7R) t_a2m7S :: f_a2lWU a_a2lX3)
infixl 4 %<*>
infixl 4 %*>
infixl 4 %<*
class PMonad (m_a2lXi :: Type -> Type) where {
type family (>>=) (arg_a2m4S :: m_a2lXi a_a2lXj) (arg_a2m4T :: (~>) a_a2lXj (m_a2lXi b_a2lXk)) :: m_a2lXi b_a2lXk;
type family (>>) (arg_a2m4W :: m_a2lXi a_a2lXl) (arg_a2m4X :: m_a2lXi b_a2lXm) :: m_a2lXi b_a2lXm;
type family Return (arg_a2m50 :: a_a2lXn) :: m_a2lXi a_a2lXn;
type (>>) a_a2m52 a_a2m53 = Apply (Apply TFHelper_6989586621679571330Sym0 a_a2m52) a_a2m53;
type Return a_a2m5o = Apply Return_6989586621679571351Sym0 a_a2m5o;
}
infixl 1 >>=
infixl 1 >>
class SApplicative m_a2lXi => SMonad (m_a2lXi :: Type -> Type)
(%>>=) :: forall a_a2lXj b_a2lXk (t_a2m82 :: m_a2lXi a_a2lXj) (t_a2m83 :: (~>) a_a2lXj (m_a2lXi b_a2lXk)). SMonad m_a2lXi => Sing t_a2m82 -> Sing t_a2m83 -> Sing (Apply (Apply (>>=@#@$) t_a2m82) t_a2m83 :: m_a2lXi b_a2lXk)
(%>>) :: forall a_a2lXl b_a2lXm (t_a2m86 :: m_a2lXi a_a2lXl) (t_a2m87 :: m_a2lXi b_a2lXm). SMonad m_a2lXi => Sing t_a2m86 -> Sing t_a2m87 -> Sing (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm)
sReturn :: forall a_a2lXn (t_a2m8a :: a_a2lXn). SMonad m_a2lXi => Sing t_a2m8a -> Sing (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn)
(%>>) :: forall a_a2lXl b_a2lXm (t_a2m86 :: m_a2lXi a_a2lXl) (t_a2m87 :: m_a2lXi b_a2lXm). (SMonad m_a2lXi, (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm) ~ Apply (Apply TFHelper_6989586621679571330Sym0 t_a2m86) t_a2m87) => Sing t_a2m86 -> Sing t_a2m87 -> Sing (Apply (Apply (>>@#@$) t_a2m86) t_a2m87 :: m_a2lXi b_a2lXm)
sReturn :: forall a_a2lXn (t_a2m8a :: a_a2lXn). (SMonad m_a2lXi, (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn) ~ Apply Return_6989586621679571351Sym0 t_a2m8a) => Sing t_a2m8a -> Sing (Apply ReturnSym0 t_a2m8a :: m_a2lXi a_a2lXn)
infixl 1 %>>=
infixl 1 %>>
class PMonadFail (m_a33FZ :: Type -> Type) where {
type family Fail (arg_a33Gj :: [Char]) :: m_a33FZ a_a33G0;
}
class SMonad m_a33FZ => SMonadFail (m_a33FZ :: Type -> Type)
sFail :: forall a_a33G0 (t_a33Gx :: [Char]). SMonadFail m_a33FZ => Sing t_a33Gx -> Sing (Apply FailSym0 t_a33Gx :: m_a33FZ a_a33G0)
type family MapM_ (a_a6dlh :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (a_a6dli :: t_a6dbv a_a6dbx) :: m_a6dbw ()
sMapM_ :: forall a_a6dbx m_a6dbw b_a6dby t_a6dbv (t_a6dHe :: (~>) a_a6dbx (m_a6dbw b_a6dby)) (t_a6dHf :: t_a6dbv a_a6dbx). (SFoldable t_a6dbv, SMonad m_a6dbw) => Sing t_a6dHe -> Sing t_a6dHf -> Sing (Apply (Apply MapM_Sym0 t_a6dHe) t_a6dHf :: m_a6dbw ())
type family Sequence_ (a_a6dkZ :: t_a6dbl (m_a6dbm a_a6dbn)) :: m_a6dbm ()
sSequence_ :: forall t_a6dbl m_a6dbm a_a6dbn (t_a6dH6 :: t_a6dbl (m_a6dbm a_a6dbn)). (SFoldable t_a6dbl, SMonad m_a6dbm) => Sing t_a6dH6 -> Sing (Apply Sequence_Sym0 t_a6dH6 :: m_a6dbm ())
type family (=<<) (a_a2m2o :: (~>) a_a2lW4 (m_a2lW3 b_a2lW5)) (a_a2m2p :: m_a2lW3 a_a2lW4) :: m_a2lW3 b_a2lW5
infixr 1 =<<
(%=<<) :: forall a_a2lW4 m_a2lW3 b_a2lW5 (t_a2m6L :: (~>) a_a2lW4 (m_a2lW3 b_a2lW5)) (t_a2m6M :: m_a2lW3 a_a2lW4). SMonad m_a2lW3 => Sing t_a2m6L -> Sing t_a2m6M -> Sing (Apply (Apply (=<<@#@$) t_a2m6L) t_a2m6M :: m_a2lW3 b_a2lW5)
infixr 1 %=<<
class PFoldable (t_a6dcq :: Type -> Type) where {
type family FoldMap (arg_a6dmr :: (~>) a_a6dct m_a6dcs) (arg_a6dms :: t_a6dcq a_a6dct) :: m_a6dcs;
type family Foldr (arg_a6dmv :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (arg_a6dmw :: b_a6dcv) (arg_a6dmx :: t_a6dcq a_a6dcu) :: b_a6dcv;
type family Foldl (arg_a6dmH :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (arg_a6dmI :: b_a6dcy) (arg_a6dmJ :: t_a6dcq a_a6dcz) :: b_a6dcy;
type family Foldr1 (arg_a6dmT :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (arg_a6dmU :: t_a6dcq a_a6dcC) :: a_a6dcC;
type family Foldl1 (arg_a6dmX :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (arg_a6dmY :: t_a6dcq a_a6dcD) :: a_a6dcD;
type family Elem (arg_a6dn7 :: a_a6dcH) (arg_a6dn8 :: t_a6dcq a_a6dcH) :: Bool;
type family Maximum (arg_a6dnb :: t_a6dcq a_a6dcI) :: a_a6dcI;
type family Minimum (arg_a6dnd :: t_a6dcq a_a6dcJ) :: a_a6dcJ;
type family Sum (arg_a6dnf :: t_a6dcq a_a6dcK) :: a_a6dcK;
type family Product (arg_a6dnh :: t_a6dcq a_a6dcL) :: a_a6dcL;
type Fold a_a6dnj = Apply Fold_6989586621680491178Sym0 a_a6dnj;
type FoldMap a_a6dns a_a6dnt = Apply (Apply FoldMap_6989586621680491188Sym0 a_a6dns) a_a6dnt;
type Foldr a_a6dnG a_a6dnH a_a6dnI = Apply (Apply (Apply Foldr_6989586621680491203Sym0 a_a6dnG) a_a6dnH) a_a6dnI;
type Foldr' a_a6do5 a_a6do6 a_a6do7 = Apply (Apply (Apply Foldr'_6989586621680491228Sym0 a_a6do5) a_a6do6) a_a6do7;
type Foldl a_a6doz a_a6doA a_a6doB = Apply (Apply (Apply Foldl_6989586621680491258Sym0 a_a6doz) a_a6doA) a_a6doB;
type Foldl' a_a6doY a_a6doZ a_a6dp0 = Apply (Apply (Apply Foldl'_6989586621680491283Sym0 a_a6doY) a_a6doZ) a_a6dp0;
type Foldr1 a_a6dps a_a6dpt = Apply (Apply Foldr1_6989586621680491312Sym0 a_a6dps) a_a6dpt;
type Foldl1 a_a6dpR a_a6dpS = Apply (Apply Foldl1_6989586621680491337Sym0 a_a6dpR) a_a6dpS;
type ToList a_a6dqg = Apply ToList_6989586621680491361Sym0 a_a6dqg;
type Null a_a6dqp = Apply Null_6989586621680491370Sym0 a_a6dqp;
type Length a_a6dqK = Apply Length_6989586621680491391Sym0 a_a6dqK;
type Elem a_a6dr6 a_a6dr7 = Apply (Apply Elem_6989586621680491414Sym0 a_a6dr6) a_a6dr7;
type Maximum a_a6drm = Apply Maximum_6989586621680491429Sym0 a_a6drm;
type Minimum a_a6drz = Apply Minimum_6989586621680491442Sym0 a_a6drz;
type Sum a_a6drM = Apply Sum_6989586621680491455Sym0 a_a6drM;
type Product a_a6drZ = Apply Product_6989586621680491468Sym0 a_a6drZ;
}
class SFoldable (t_a6dcq :: Type -> Type)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). SFoldable t_a6dcq => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). SFoldable t_a6dcq => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). SFoldable t_a6dcq => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). SFoldable t_a6dcq => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
sFoldMap :: forall a_a6dct m_a6dcs (t_a6dIj :: (~>) a_a6dct m_a6dcs) (t_a6dIk :: t_a6dcq a_a6dct). (SFoldable t_a6dcq, (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs) ~ Apply (Apply FoldMap_6989586621680491188Sym0 t_a6dIj) t_a6dIk, SMonoid m_a6dcs) => Sing t_a6dIj -> Sing t_a6dIk -> Sing (Apply (Apply FoldMapSym0 t_a6dIj) t_a6dIk :: m_a6dcs)
sFoldr :: forall a_a6dcu b_a6dcv (t_a6dIn :: (~>) a_a6dcu ((~>) b_a6dcv b_a6dcv)) (t_a6dIo :: b_a6dcv) (t_a6dIp :: t_a6dcq a_a6dcu). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv) ~ Apply (Apply (Apply Foldr_6989586621680491203Sym0 t_a6dIn) t_a6dIo) t_a6dIp) => Sing t_a6dIn -> Sing t_a6dIo -> Sing t_a6dIp -> Sing (Apply (Apply (Apply FoldrSym0 t_a6dIn) t_a6dIo) t_a6dIp :: b_a6dcv)
sFoldl :: forall b_a6dcy a_a6dcz (t_a6dIz :: (~>) b_a6dcy ((~>) a_a6dcz b_a6dcy)) (t_a6dIA :: b_a6dcy) (t_a6dIB :: t_a6dcq a_a6dcz). (SFoldable t_a6dcq, (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy) ~ Apply (Apply (Apply Foldl_6989586621680491258Sym0 t_a6dIz) t_a6dIA) t_a6dIB) => Sing t_a6dIz -> Sing t_a6dIA -> Sing t_a6dIB -> Sing (Apply (Apply (Apply FoldlSym0 t_a6dIz) t_a6dIA) t_a6dIB :: b_a6dcy)
sFoldr1 :: forall a_a6dcC (t_a6dIL :: (~>) a_a6dcC ((~>) a_a6dcC a_a6dcC)) (t_a6dIM :: t_a6dcq a_a6dcC). (SFoldable t_a6dcq, (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC) ~ Apply (Apply Foldr1_6989586621680491312Sym0 t_a6dIL) t_a6dIM) => Sing t_a6dIL -> Sing t_a6dIM -> Sing (Apply (Apply Foldr1Sym0 t_a6dIL) t_a6dIM :: a_a6dcC)
sFoldl1 :: forall a_a6dcD (t_a6dIP :: (~>) a_a6dcD ((~>) a_a6dcD a_a6dcD)) (t_a6dIQ :: t_a6dcq a_a6dcD). (SFoldable t_a6dcq, (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD) ~ Apply (Apply Foldl1_6989586621680491337Sym0 t_a6dIP) t_a6dIQ) => Sing t_a6dIP -> Sing t_a6dIQ -> Sing (Apply (Apply Foldl1Sym0 t_a6dIP) t_a6dIQ :: a_a6dcD)
sElem :: forall a_a6dcH (t_a6dIZ :: a_a6dcH) (t_a6dJ0 :: t_a6dcq a_a6dcH). (SFoldable t_a6dcq, (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool) ~ Apply (Apply Elem_6989586621680491414Sym0 t_a6dIZ) t_a6dJ0, SEq a_a6dcH) => Sing t_a6dIZ -> Sing t_a6dJ0 -> Sing (Apply (Apply ElemSym0 t_a6dIZ) t_a6dJ0 :: Bool)
sMaximum :: forall a_a6dcI (t_a6dJ3 :: t_a6dcq a_a6dcI). (SFoldable t_a6dcq, (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI) ~ Apply Maximum_6989586621680491429Sym0 t_a6dJ3, SOrd a_a6dcI) => Sing t_a6dJ3 -> Sing (Apply MaximumSym0 t_a6dJ3 :: a_a6dcI)
sMinimum :: forall a_a6dcJ (t_a6dJ5 :: t_a6dcq a_a6dcJ). (SFoldable t_a6dcq, (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ) ~ Apply Minimum_6989586621680491442Sym0 t_a6dJ5, SOrd a_a6dcJ) => Sing t_a6dJ5 -> Sing (Apply MinimumSym0 t_a6dJ5 :: a_a6dcJ)
sSum :: forall a_a6dcK (t_a6dJ7 :: t_a6dcq a_a6dcK). (SFoldable t_a6dcq, (Apply SumSym0 t_a6dJ7 :: a_a6dcK) ~ Apply Sum_6989586621680491455Sym0 t_a6dJ7, SNum a_a6dcK) => Sing t_a6dJ7 -> Sing (Apply SumSym0 t_a6dJ7 :: a_a6dcK)
sProduct :: forall a_a6dcL (t_a6dJ9 :: t_a6dcq a_a6dcL). (SFoldable t_a6dcq, (Apply ProductSym0 t_a6dJ9 :: a_a6dcL) ~ Apply Product_6989586621680491468Sym0 t_a6dJ9, SNum a_a6dcL) => Sing t_a6dJ9 -> Sing (Apply ProductSym0 t_a6dJ9 :: a_a6dcL)
class PTraversable (t_a7vnf :: Type -> Type) where {
type family Traverse (arg_a7vnr :: (~>) a_a7vnh (f_a7vng b_a7vni)) (arg_a7vns :: t_a7vnf a_a7vnh) :: f_a7vng (t_a7vnf b_a7vni);
type family SequenceA (arg_a7vnv :: t_a7vnf (f_a7vnj a_a7vnk)) :: f_a7vnj (t_a7vnf a_a7vnk);
type family MapM (arg_a7vnx :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (arg_a7vny :: t_a7vnf a_a7vnm) :: m_a7vnl (t_a7vnf b_a7vnn);
type family Sequence (arg_a7vnB :: t_a7vnf (m_a7vno a_a7vnp)) :: m_a7vno (t_a7vnf a_a7vnp);
type Traverse a_a7vnD a_a7vnE = Apply (Apply Traverse_6989586621680798719Sym0 a_a7vnD) a_a7vnE;
type SequenceA a_a7vnR = Apply SequenceA_6989586621680798732Sym0 a_a7vnR;
type MapM a_a7vo0 a_a7vo1 = Apply (Apply MapM_6989586621680798742Sym0 a_a7vo0) a_a7vo1;
type Sequence a_a7vog = Apply Sequence_6989586621680798757Sym0 a_a7vog;
}
class (SFunctor t_a7vnf, SFoldable t_a7vnf) => STraversable (t_a7vnf :: Type -> Type)
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
sTraverse :: forall a_a7vnh f_a7vng b_a7vni (t_a7vop :: (~>) a_a7vnh (f_a7vng b_a7vni)) (t_a7voq :: t_a7vnf a_a7vnh). (STraversable t_a7vnf, (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni)) ~ Apply (Apply Traverse_6989586621680798719Sym0 t_a7vop) t_a7voq, SApplicative f_a7vng) => Sing t_a7vop -> Sing t_a7voq -> Sing (Apply (Apply TraverseSym0 t_a7vop) t_a7voq :: f_a7vng (t_a7vnf b_a7vni))
sSequenceA :: forall f_a7vnj a_a7vnk (t_a7vot :: t_a7vnf (f_a7vnj a_a7vnk)). (STraversable t_a7vnf, (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk)) ~ Apply SequenceA_6989586621680798732Sym0 t_a7vot, SApplicative f_a7vnj) => Sing t_a7vot -> Sing (Apply SequenceASym0 t_a7vot :: f_a7vnj (t_a7vnf a_a7vnk))
sMapM :: forall a_a7vnm m_a7vnl b_a7vnn (t_a7vov :: (~>) a_a7vnm (m_a7vnl b_a7vnn)) (t_a7vow :: t_a7vnf a_a7vnm). (STraversable t_a7vnf, (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn)) ~ Apply (Apply MapM_6989586621680798742Sym0 t_a7vov) t_a7vow, SMonad m_a7vnl) => Sing t_a7vov -> Sing t_a7vow -> Sing (Apply (Apply MapMSym0 t_a7vov) t_a7vow :: m_a7vnl (t_a7vnf b_a7vnn))
sSequence :: forall m_a7vno a_a7vnp (t_a7voz :: t_a7vnf (m_a7vno a_a7vnp)). (STraversable t_a7vnf, (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp)) ~ Apply Sequence_6989586621680798757Sym0 t_a7voz, SMonad m_a7vno) => Sing t_a7voz -> Sing (Apply SequenceSym0 t_a7voz :: m_a7vno (t_a7vnf a_a7vnp))
type family Id (a_a2fov :: a_a2flm) :: a_a2flm
sId :: forall a_a2flm (t_a2fpI :: a_a2flm). Sing t_a2fpI -> Sing (Apply IdSym0 t_a2fpI :: a_a2flm)
type family Const (a_a2foq :: a_a2flk) (a_a2for :: b_a2fll) :: a_a2flk
sConst :: forall a_a2flk b_a2fll (t_a2fpE :: a_a2flk) (t_a2fpF :: b_a2fll). Sing t_a2fpE -> Sing t_a2fpF -> Sing (Apply (Apply ConstSym0 t_a2fpE) t_a2fpF :: a_a2flk)
type family (.) (a_a2fo7 :: (~>) b_a2flh c_a2fli) (a_a2fo8 :: (~>) a_a2flj b_a2flh) (a_a2fo9 :: a_a2flj) :: c_a2fli
infixr 9 .
(%.) :: forall b_a2flh c_a2fli a_a2flj (t_a2fpy :: (~>) b_a2flh c_a2fli) (t_a2fpz :: (~>) a_a2flj b_a2flh) (t_a2fpA :: a_a2flj). Sing t_a2fpy -> Sing t_a2fpz -> Sing t_a2fpA -> Sing (Apply (Apply (Apply (.@#@$) t_a2fpy) t_a2fpz) t_a2fpA :: c_a2fli)
infixr 9 %.
type family ($) (a_a2fnI :: (~>) a_a2flb b_a2flc) (a_a2fnJ :: a_a2flb) :: b_a2flc
infixr 0 $
(%$) :: forall a_a2flb b_a2flc (t_a2fpk :: (~>) a_a2flb b_a2flc) (t_a2fpl :: a_a2flb). Sing t_a2fpk -> Sing t_a2fpl -> Sing (Apply (Apply ($@#@$) t_a2fpk) t_a2fpl :: b_a2flc)
infixr 0 %$
type family ($!) (a_a2fnz :: (~>) a_a2fl9 b_a2fla) (a_a2fnA :: a_a2fl9) :: b_a2fla
infixr 0 $!
(%$!) :: forall a_a2fl9 b_a2fla (t_a2fpg :: (~>) a_a2fl9 b_a2fla) (t_a2fph :: a_a2fl9). Sing t_a2fpg -> Sing t_a2fph -> Sing (Apply (Apply ($!@#@$) t_a2fpg) t_a2fph :: b_a2fla)
infixr 0 %$!
type family Flip (a_a2fnY :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (a_a2fnZ :: b_a2flf) (a_a2fo0 :: a_a2fle) :: c_a2flg
sFlip :: forall a_a2fle b_a2flf c_a2flg (t_a2fps :: (~>) a_a2fle ((~>) b_a2flf c_a2flg)) (t_a2fpt :: b_a2flf) (t_a2fpu :: a_a2fle). Sing t_a2fps -> Sing t_a2fpt -> Sing t_a2fpu -> Sing (Apply (Apply (Apply FlipSym0 t_a2fps) t_a2fpt) t_a2fpu :: c_a2flg)
type family AsTypeOf (a_a2fnS :: a_a2fld) (a_a2fnT :: a_a2fld) :: a_a2fld
sAsTypeOf :: forall a_a2fld (t_a2fpo :: a_a2fld) (t_a2fpp :: a_a2fld). Sing t_a2fpo -> Sing t_a2fpp -> Sing (Apply (Apply AsTypeOfSym0 t_a2fpo) t_a2fpp :: a_a2fld)
type family Seq (a_a2fn4 :: a_a2fl6) (a_a2fn5 :: b_a2fl7) :: b_a2fl7
infixr 0 `Seq`
sSeq :: forall a_a2fl6 b_a2fl7 (t_a2fp6 :: a_a2fl6) (t_a2fp7 :: b_a2fl7). Sing t_a2fp6 -> Sing t_a2fp7 -> Sing (Apply (Apply SeqSym0 t_a2fp6) t_a2fp7 :: b_a2fl7)
infixr 0 `sSeq`
type family Map (a_a2foG :: (~>) a_a2flo b_a2flp) (a_a2foH :: [a_a2flo]) :: [b_a2flp]
sMap :: forall a_a2flo b_a2flp (t_a2fpO :: (~>) a_a2flo b_a2flp) (t_a2fpP :: [a_a2flo]). Sing t_a2fpO -> Sing t_a2fpP -> Sing (Apply (Apply MapSym0 t_a2fpO) t_a2fpP :: [b_a2flp])
type family (++) (a_a2foy :: [a_a2fln]) (a_a2foz :: [a_a2fln]) :: [a_a2fln]
infixr 5 ++
(%++) :: forall a_a2fln (t_a2fpK :: [a_a2fln]) (t_a2fpL :: [a_a2fln]). Sing t_a2fpK -> Sing t_a2fpL -> Sing (Apply (Apply (++@#@$) t_a2fpK) t_a2fpL :: [a_a2fln])
infixr 5 %++
type family Filter (a_a442I :: (~>) a_a42Rf Bool) (a_a442J :: [a_a42Rf]) :: [a_a42Rf]
sFilter :: forall a_a42Rf (t_a44j7 :: (~>) a_a42Rf Bool) (t_a44j8 :: [a_a42Rf]). Sing t_a44j7 -> Sing t_a44j8 -> Sing (Apply (Apply FilterSym0 t_a44j7) t_a44j8 :: [a_a42Rf])
type family Head (a_a44gW :: [a_a42SH]) :: a_a42SH
sHead :: forall a_a42SH (t_a44mr :: [a_a42SH]). Sing t_a44mr -> Sing (Apply HeadSym0 t_a44mr :: a_a42SH)
type family Last (a_a44gR :: [a_a42SG]) :: a_a42SG
sLast :: forall a_a42SG (t_a44mp :: [a_a42SG]). Sing t_a44mp -> Sing (Apply LastSym0 t_a44mp :: a_a42SG)
type family Tail (a_a44gO :: [a_a42SF]) :: [a_a42SF]
sTail :: forall a_a42SF (t_a44mn :: [a_a42SF]). Sing t_a44mn -> Sing (Apply TailSym0 t_a44mn :: [a_a42SF])
type family Init (a_a44gA :: [a_a42SE]) :: [a_a42SE]
sInit :: forall a_a42SE (t_a44ml :: [a_a42SE]). Sing t_a44ml -> Sing (Apply InitSym0 t_a44ml :: [a_a42SE])
type family Null (arg_a6dn3 :: t_a6dcq a_a6dcF) :: Bool
sNull :: forall a_a6dcF (t_a6dIV :: t_a6dcq a_a6dcF). SFoldable t_a6dcq => Sing t_a6dIV -> Sing (Apply NullSym0 t_a6dIV :: Bool)
type family Reverse (a_a44gl :: [a_a42SC]) :: [a_a42SC]
sReverse :: forall a_a42SC (t_a44mh :: [a_a42SC]). Sing t_a44mh -> Sing (Apply ReverseSym0 t_a44mh :: [a_a42SC])
type family And (a_a6dkc :: t_a6db9 Bool) :: Bool
sAnd :: forall t_a6db9 (t_a6dGU :: t_a6db9 Bool). SFoldable t_a6db9 => Sing t_a6dGU -> Sing (Apply AndSym0 t_a6dGU :: Bool)
type family Or (a_a6dk3 :: t_a6db8 Bool) :: Bool
sOr :: forall t_a6db8 (t_a6dGS :: t_a6db8 Bool). SFoldable t_a6db8 => Sing t_a6dGS -> Sing (Apply OrSym0 t_a6dGS :: Bool)
type family Any (a_a6djQ :: (~>) a_a6db7 Bool) (a_a6djR :: t_a6db6 a_a6db7) :: Bool
sAny :: forall a_a6db7 t_a6db6 (t_a6dGO :: (~>) a_a6db7 Bool) (t_a6dGP :: t_a6db6 a_a6db7). SFoldable t_a6db6 => Sing t_a6dGO -> Sing t_a6dGP -> Sing (Apply (Apply AnySym0 t_a6dGO) t_a6dGP :: Bool)
type family All (a_a6djD :: (~>) a_a6db5 Bool) (a_a6djE :: t_a6db4 a_a6db5) :: Bool
sAll :: forall a_a6db5 t_a6db4 (t_a6dGK :: (~>) a_a6db5 Bool) (t_a6dGL :: t_a6db4 a_a6db5). SFoldable t_a6db4 => Sing t_a6dGK -> Sing t_a6dGL -> Sing (Apply (Apply AllSym0 t_a6dGK) t_a6dGL :: Bool)
type family Concat (a_a6dkB :: t_a6dbd [a_a6dbe]) :: [a_a6dbe]
sConcat :: forall t_a6dbd a_a6dbe (t_a6dH0 :: t_a6dbd [a_a6dbe]). SFoldable t_a6dbd => Sing t_a6dH0 -> Sing (Apply ConcatSym0 t_a6dH0 :: [a_a6dbe])
type family ConcatMap (a_a6dkl :: (~>) a_a6dbb [b_a6dbc]) (a_a6dkm :: t_a6dba a_a6dbb) :: [b_a6dbc]
sConcatMap :: forall a_a6dbb b_a6dbc t_a6dba (t_a6dGW :: (~>) a_a6dbb [b_a6dbc]) (t_a6dGX :: t_a6dba a_a6dbb). SFoldable t_a6dba => Sing t_a6dGW -> Sing t_a6dGX -> Sing (Apply (Apply ConcatMapSym0 t_a6dGW) t_a6dGX :: [b_a6dbc])
type family Scanl (a_a44cu :: (~>) b_a42Sk ((~>) a_a42Sl b_a42Sk)) (a_a44cv :: b_a42Sk) (a_a44cw :: [a_a42Sl]) :: [b_a42Sk]
sScanl :: forall b_a42Sk a_a42Sl (t_a44lj :: (~>) b_a42Sk ((~>) a_a42Sl b_a42Sk)) (t_a44lk :: b_a42Sk) (t_a44ll :: [a_a42Sl]). Sing t_a44lj -> Sing t_a44lk -> Sing t_a44ll -> Sing (Apply (Apply (Apply ScanlSym0 t_a44lj) t_a44lk) t_a44ll :: [b_a42Sk])
type family Scanl1 (a_a44cn :: (~>) a_a42Sj ((~>) a_a42Sj a_a42Sj)) (a_a44co :: [a_a42Sj]) :: [a_a42Sj]
sScanl1 :: forall a_a42Sj (t_a44lf :: (~>) a_a42Sj ((~>) a_a42Sj a_a42Sj)) (t_a44lg :: [a_a42Sj]). Sing t_a44lf -> Sing t_a44lg -> Sing (Apply (Apply Scanl1Sym0 t_a44lf) t_a44lg :: [a_a42Sj])
type family Scanr (a_a44c2 :: (~>) a_a42Sh ((~>) b_a42Si b_a42Si)) (a_a44c3 :: b_a42Si) (a_a44c4 :: [a_a42Sh]) :: [b_a42Si]
sScanr :: forall a_a42Sh b_a42Si (t_a44l9 :: (~>) a_a42Sh ((~>) b_a42Si b_a42Si)) (t_a44la :: b_a42Si) (t_a44lb :: [a_a42Sh]). Sing t_a44l9 -> Sing t_a44la -> Sing t_a44lb -> Sing (Apply (Apply (Apply ScanrSym0 t_a44l9) t_a44la) t_a44lb :: [b_a42Si])
type family Scanr1 (a_a44bE :: (~>) a_a42Sg ((~>) a_a42Sg a_a42Sg)) (a_a44bF :: [a_a42Sg]) :: [a_a42Sg]
sScanr1 :: forall a_a42Sg (t_a44l5 :: (~>) a_a42Sg ((~>) a_a42Sg a_a42Sg)) (t_a44l6 :: [a_a42Sg]). Sing t_a44l5 -> Sing t_a44l6 -> Sing (Apply (Apply Scanr1Sym0 t_a44l5) t_a44l6 :: [a_a42Sg])
type family Replicate (a_a43VX :: Nat) (a_a43VY :: a_a42QM) :: [a_a42QM]
sReplicate :: forall a_a42QM (t_a44ht :: Nat) (t_a44hu :: a_a42QM). Sing t_a44ht -> Sing t_a44hu -> Sing (Apply (Apply ReplicateSym0 t_a44ht) t_a44hu :: [a_a42QM])
type family Take (a_a43Yy :: Nat) (a_a43Yz :: [a_a42R2]) :: [a_a42R2]
sTake :: forall a_a42R2 (t_a44if :: Nat) (t_a44ig :: [a_a42R2]). Sing t_a44if -> Sing t_a44ig -> Sing (Apply (Apply TakeSym0 t_a44if) t_a44ig :: [a_a42R2])
type family Drop (a_a43Yk :: Nat) (a_a43Yl :: [a_a42R1]) :: [a_a42R1]
sDrop :: forall a_a42R1 (t_a44ib :: Nat) (t_a44ic :: [a_a42R1]). Sing t_a44ib -> Sing t_a44ic -> Sing (Apply (Apply DropSym0 t_a44ib) t_a44ic :: [a_a42R1])
type family SplitAt (a_a43Ye :: Nat) (a_a43Yf :: [a_a42R0]) :: ([a_a42R0], [a_a42R0])
sSplitAt :: forall a_a42R0 (t_a44i7 :: Nat) (t_a44i8 :: [a_a42R0]). Sing t_a44i7 -> Sing t_a44i8 -> Sing (Apply (Apply SplitAtSym0 t_a44i7) t_a44i8 :: ([a_a42R0], [a_a42R0]))
type family TakeWhile (a_a440S :: (~>) a_a42R7 Bool) (a_a440T :: [a_a42R7]) :: [a_a42R7]
sTakeWhile :: forall a_a42R7 (t_a44iz :: (~>) a_a42R7 Bool) (t_a44iA :: [a_a42R7]). Sing t_a44iz -> Sing t_a44iA -> Sing (Apply (Apply TakeWhileSym0 t_a44iz) t_a44iA :: [a_a42R7])
type family Span (a_a43Zt :: (~>) a_a42R4 Bool) (a_a43Zu :: [a_a42R4]) :: ([a_a42R4], [a_a42R4])
sSpan :: forall a_a42R4 (t_a44in :: (~>) a_a42R4 Bool) (t_a44io :: [a_a42R4]). Sing t_a44in -> Sing t_a44io -> Sing (Apply (Apply SpanSym0 t_a44in) t_a44io :: ([a_a42R4], [a_a42R4]))
type family Break (a_a43YM :: (~>) a_a42R3 Bool) (a_a43YN :: [a_a42R3]) :: ([a_a42R3], [a_a42R3])
sBreak :: forall a_a42R3 (t_a44ij :: (~>) a_a42R3 Bool) (t_a44ik :: [a_a42R3]). Sing t_a44ij -> Sing t_a44ik -> Sing (Apply (Apply BreakSym0 t_a44ij) t_a44ik :: ([a_a42R3], [a_a42R3]))
type family NotElem (a_a6diH :: a_a6daZ) (a_a6diI :: t_a6daY a_a6daZ) :: Bool
sNotElem :: forall a_a6daZ t_a6daY (t_a6dGy :: a_a6daZ) (t_a6dGz :: t_a6daY a_a6daZ). (SFoldable t_a6daY, SEq a_a6daZ) => Sing t_a6dGy -> Sing t_a6dGz -> Sing (Apply (Apply NotElemSym0 t_a6dGy) t_a6dGz :: Bool)
type family Lookup (a_a43X0 :: a_a42QS) (a_a43X1 :: [(a_a42QS, b_a42QT)]) :: Maybe b_a42QT
sLookup :: forall a_a42QS b_a42QT (t_a44hN :: a_a42QS) (t_a44hO :: [(a_a42QS, b_a42QT)]). SEq a_a42QS => Sing t_a44hN -> Sing t_a44hO -> Sing (Apply (Apply LookupSym0 t_a44hN) t_a44hO :: Maybe b_a42QT)
type family Zip (a_a448r :: [a_a42RZ]) (a_a448s :: [b_a42S0]) :: [(a_a42RZ, b_a42S0)]
sZip :: forall a_a42RZ b_a42S0 (t_a44kn :: [a_a42RZ]) (t_a44ko :: [b_a42S0]). Sing t_a44kn -> Sing t_a44ko -> Sing (Apply (Apply ZipSym0 t_a44kn) t_a44ko :: [(a_a42RZ, b_a42S0)])
type family Zip3 (a_a448f :: [a_a42RW]) (a_a448g :: [b_a42RX]) (a_a448h :: [c_a42RY]) :: [(a_a42RW, b_a42RX, c_a42RY)]
sZip3 :: forall a_a42RW b_a42RX c_a42RY (t_a44kh :: [a_a42RW]) (t_a44ki :: [b_a42RX]) (t_a44kj :: [c_a42RY]). Sing t_a44kh -> Sing t_a44ki -> Sing t_a44kj -> Sing (Apply (Apply (Apply Zip3Sym0 t_a44kh) t_a44ki) t_a44kj :: [(a_a42RW, b_a42RX, c_a42RY)])
type family ZipWith (a_a4484 :: (~>) a_a42RT ((~>) b_a42RU c_a42RV)) (a_a4485 :: [a_a42RT]) (a_a4486 :: [b_a42RU]) :: [c_a42RV]
sZipWith :: forall a_a42RT b_a42RU c_a42RV (t_a44kb :: (~>) a_a42RT ((~>) b_a42RU c_a42RV)) (t_a44kc :: [a_a42RT]) (t_a44kd :: [b_a42RU]). Sing t_a44kb -> Sing t_a44kc -> Sing t_a44kd -> Sing (Apply (Apply (Apply ZipWithSym0 t_a44kb) t_a44kc) t_a44kd :: [c_a42RV])
type family ZipWith3 (a_a447P :: (~>) a_a42RP ((~>) b_a42RQ ((~>) c_a42RR d_a42RS))) (a_a447Q :: [a_a42RP]) (a_a447R :: [b_a42RQ]) (a_a447S :: [c_a42RR]) :: [d_a42RS]
sZipWith3 :: forall a_a42RP b_a42RQ c_a42RR d_a42RS (t_a44k3 :: (~>) a_a42RP ((~>) b_a42RQ ((~>) c_a42RR d_a42RS))) (t_a44k4 :: [a_a42RP]) (t_a44k5 :: [b_a42RQ]) (t_a44k6 :: [c_a42RR]). Sing t_a44k3 -> Sing t_a44k4 -> Sing t_a44k5 -> Sing t_a44k6 -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a44k3) t_a44k4) t_a44k5) t_a44k6 :: [d_a42RS])
type family Unzip (a_a447w :: [(a_a42RN, b_a42RO)]) :: ([a_a42RN], [b_a42RO])
sUnzip :: forall a_a42RN b_a42RO (t_a44k1 :: [(a_a42RN, b_a42RO)]). Sing t_a44k1 -> Sing (Apply UnzipSym0 t_a44k1 :: ([a_a42RN], [b_a42RO]))
type family Unzip3 (a_a447b :: [(a_a42RK, b_a42RL, c_a42RM)]) :: ([a_a42RK], [b_a42RL], [c_a42RM])
sUnzip3 :: forall a_a42RK b_a42RL c_a42RM (t_a44jZ :: [(a_a42RK, b_a42RL, c_a42RM)]). Sing t_a44jZ -> Sing (Apply Unzip3Sym0 t_a44jZ :: ([a_a42RK], [b_a42RL], [c_a42RM]))
type family Unlines (a_a445r :: [Symbol]) :: Symbol
sUnlines :: forall (t_a44jP :: [Symbol]). Sing t_a44jP -> Sing (Apply UnlinesSym0 t_a44jP :: Symbol)
type family Unwords (a_a445g :: [Symbol]) :: Symbol
sUnwords :: forall (t_a44jN :: [Symbol]). Sing t_a44jN -> Sing (Apply UnwordsSym0 t_a44jN :: Symbol)
type family Maybe_ (a_a27oD :: b_a27ol) (a_a27oE :: (~>) a_a27om b_a27ol) (a_a27oF :: Maybe a_a27om) :: b_a27ol
sMaybe_ :: forall b_a27ol a_a27om (t_a27oM :: b_a27ol) (t_a27oN :: (~>) a_a27om b_a27ol) (t_a27oO :: Maybe a_a27om). Sing t_a27oM -> Sing t_a27oN -> Sing t_a27oO -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a27oM) t_a27oN) t_a27oO :: b_a27ol)
type family Either_ (a_a67ST :: (~>) a_a67Sj c_a67Sk) (a_a67SU :: (~>) b_a67Sl c_a67Sk) (a_a67SV :: Either a_a67Sj b_a67Sl) :: c_a67Sk
sEither_ :: forall a_a67Sj c_a67Sk b_a67Sl (t_a67T3 :: (~>) a_a67Sj c_a67Sk) (t_a67T4 :: (~>) b_a67Sl c_a67Sk) (t_a67T5 :: Either a_a67Sj b_a67Sl). Sing t_a67T3 -> Sing t_a67T4 -> Sing t_a67T5 -> Sing (Apply (Apply (Apply Either_Sym0 t_a67T3) t_a67T4) t_a67T5 :: c_a67Sk)
type family Fst (a_a1vOx :: (a_a1vMT, b_a1vMU)) :: a_a1vMT
sFst :: forall a_a1vMT b_a1vMU (t_a1vOO :: (a_a1vMT, b_a1vMU)). Sing t_a1vOO -> Sing (Apply FstSym0 t_a1vOO :: a_a1vMT)
type family Snd (a_a1vOu :: (a_a1vMR, b_a1vMS)) :: b_a1vMS
sSnd :: forall a_a1vMR b_a1vMS (t_a1vOM :: (a_a1vMR, b_a1vMS)). Sing t_a1vOM -> Sing (Apply SndSym0 t_a1vOM :: b_a1vMS)
type family Curry (a_a1vOl :: (~>) (a_a1vMO, b_a1vMP) c_a1vMQ) (a_a1vOm :: a_a1vMO) (a_a1vOn :: b_a1vMP) :: c_a1vMQ
sCurry :: forall a_a1vMO b_a1vMP c_a1vMQ (t_a1vOG :: (~>) (a_a1vMO, b_a1vMP) c_a1vMQ) (t_a1vOH :: a_a1vMO) (t_a1vOI :: b_a1vMP). Sing t_a1vOG -> Sing t_a1vOH -> Sing t_a1vOI -> Sing (Apply (Apply (Apply CurrySym0 t_a1vOG) t_a1vOH) t_a1vOI :: c_a1vMQ)
type family Uncurry (a_a1vOf :: (~>) a_a1vML ((~>) b_a1vMM c_a1vMN)) (a_a1vOg :: (a_a1vML, b_a1vMM)) :: c_a1vMN
sUncurry :: forall a_a1vML b_a1vMM c_a1vMN (t_a1vOC :: (~>) a_a1vML ((~>) b_a1vMM c_a1vMN)) (t_a1vOD :: (a_a1vML, b_a1vMM)). Sing t_a1vOC -> Sing t_a1vOD -> Sing (Apply (Apply UncurrySym0 t_a1vOC) t_a1vOD :: c_a1vMN)
-- | (Kind) This is the kind of type-level symbols. Declared here because
-- class IP needs it
data Symbol
either_ :: (a_a67Sj -> c_a67Sk) -> (b_a67Sl -> c_a67Sk) -> Either a_a67Sj b_a67Sl -> c_a67Sk
maybe_ :: b_a27ol -> (a_a27om -> b_a27ol) -> Maybe a_a27om -> b_a27ol
bool_ :: a_a1xeH -> a_a1xeH -> Bool -> a_a1xeH
-- | 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 FalseSym0 = 'False
type TrueSym0 = 'True
data NotSym0 :: (~>) Bool Bool
type NotSym1 (a6989586621679377177 :: Bool) = Not a6989586621679377177
data (&&@#@$) :: (~>) Bool ((~>) Bool Bool)
infixr 3 &&@#@$
data (&&@#@$$) (a6989586621679376645 :: Bool) :: (~>) Bool Bool
infixr 3 &&@#@$$
type (&&@#@$$$) (a6989586621679376645 :: Bool) (b6989586621679376646 :: Bool) = (&&) a6989586621679376645 b6989586621679376646
data (||@#@$) :: (~>) Bool ((~>) Bool Bool)
infixr 2 ||@#@$
data (||@#@$$) (a6989586621679376883 :: Bool) :: (~>) Bool Bool
infixr 2 ||@#@$$
type (||@#@$$$) (a6989586621679376883 :: Bool) (b6989586621679376884 :: Bool) = (||) a6989586621679376883 b6989586621679376884
type OtherwiseSym0 = Otherwise
type NothingSym0 = 'Nothing
data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type))
type JustSym1 (t6989586621679315133 :: a3530822107858468865) = 'Just t6989586621679315133
data Maybe_Sym0 :: forall b6989586621679514865 a6989586621679514866. (~>) b6989586621679514865 ((~>) ((~>) a6989586621679514866 b6989586621679514865) ((~>) (Maybe a6989586621679514866) b6989586621679514865))
data Maybe_Sym1 (a6989586621679514883 :: b6989586621679514865) :: forall a6989586621679514866. (~>) ((~>) a6989586621679514866 b6989586621679514865) ((~>) (Maybe a6989586621679514866) b6989586621679514865)
data Maybe_Sym2 (a6989586621679514883 :: b6989586621679514865) (a6989586621679514884 :: (~>) a6989586621679514866 b6989586621679514865) :: (~>) (Maybe a6989586621679514866) b6989586621679514865
type Maybe_Sym3 (a6989586621679514883 :: b6989586621679514865) (a6989586621679514884 :: (~>) a6989586621679514866 b6989586621679514865) (a6989586621679514885 :: Maybe a6989586621679514866) = Maybe_ a6989586621679514883 a6989586621679514884 a6989586621679514885
data LeftSym0 :: forall (a6989586621679093843 :: Type) (b6989586621679093844 :: Type). (~>) a6989586621679093843 (Either (a6989586621679093843 :: Type) (b6989586621679093844 :: Type))
type LeftSym1 (t6989586621679315200 :: a6989586621679093843) = 'Left t6989586621679315200
data RightSym0 :: forall (b6989586621679093844 :: Type) (a6989586621679093843 :: Type). (~>) b6989586621679093844 (Either (a6989586621679093843 :: Type) (b6989586621679093844 :: Type))
type RightSym1 (t6989586621679315202 :: b6989586621679093844) = 'Right t6989586621679315202
data Either_Sym0 :: forall a6989586621680470035 c6989586621680470036 b6989586621680470037. (~>) ((~>) a6989586621680470035 c6989586621680470036) ((~>) ((~>) b6989586621680470037 c6989586621680470036) ((~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036))
data Either_Sym1 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) :: forall b6989586621680470037. (~>) ((~>) b6989586621680470037 c6989586621680470036) ((~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036)
data Either_Sym2 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) (a6989586621680470072 :: (~>) b6989586621680470037 c6989586621680470036) :: (~>) (Either a6989586621680470035 b6989586621680470037) c6989586621680470036
type Either_Sym3 (a6989586621680470071 :: (~>) a6989586621680470035 c6989586621680470036) (a6989586621680470072 :: (~>) b6989586621680470037 c6989586621680470036) (a6989586621680470073 :: Either a6989586621680470035 b6989586621680470037) = Either_ a6989586621680470071 a6989586621680470072 a6989586621680470073
type Tuple0Sym0 = '()
data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type))
data Tuple2Sym1 (t6989586621679315250 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 (a3530822107858468865 :: Type, b3530822107858468866 :: Type)
type Tuple2Sym2 (t6989586621679315250 :: a3530822107858468865) (t6989586621679315251 :: b3530822107858468866) = '(t6989586621679315250, t6989586621679315251)
data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)))
data Tuple3Sym1 (t6989586621679315281 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type))
data Tuple3Sym2 (t6989586621679315281 :: a3530822107858468865 :: Type) (t6989586621679315282 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type)
type Tuple3Sym3 (t6989586621679315281 :: a3530822107858468865) (t6989586621679315282 :: b3530822107858468866) (t6989586621679315283 :: c3530822107858468867) = '(t6989586621679315281, t6989586621679315282, t6989586621679315283)
data Tuple4Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))))
data Tuple4Sym1 (t6989586621679315328 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)))
data Tuple4Sym2 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type))
data Tuple4Sym3 (t6989586621679315328 :: a3530822107858468865 :: Type) (t6989586621679315329 :: b3530822107858468866 :: Type) (t6989586621679315330 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type)
type Tuple4Sym4 (t6989586621679315328 :: a3530822107858468865) (t6989586621679315329 :: b3530822107858468866) (t6989586621679315330 :: c3530822107858468867) (t6989586621679315331 :: d3530822107858468868) = '(t6989586621679315328, t6989586621679315329, t6989586621679315330, t6989586621679315331)
data Tuple5Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))))
data Tuple5Sym1 (t6989586621679315393 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))))
data Tuple5Sym2 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)))
data Tuple5Sym3 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type))
data Tuple5Sym4 (t6989586621679315393 :: a3530822107858468865 :: Type) (t6989586621679315394 :: b3530822107858468866 :: Type) (t6989586621679315395 :: c3530822107858468867 :: Type) (t6989586621679315396 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type)
type Tuple5Sym5 (t6989586621679315393 :: a3530822107858468865) (t6989586621679315394 :: b3530822107858468866) (t6989586621679315395 :: c3530822107858468867) (t6989586621679315396 :: d3530822107858468868) (t6989586621679315397 :: e3530822107858468869) = '(t6989586621679315393, t6989586621679315394, t6989586621679315395, t6989586621679315396, t6989586621679315397)
data Tuple6Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))))
data Tuple6Sym1 (t6989586621679315478 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))))
data Tuple6Sym2 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))))
data Tuple6Sym3 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)))
data Tuple6Sym4 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type))
data Tuple6Sym5 (t6989586621679315478 :: a3530822107858468865 :: Type) (t6989586621679315479 :: b3530822107858468866 :: Type) (t6989586621679315480 :: c3530822107858468867 :: Type) (t6989586621679315481 :: d3530822107858468868 :: Type) (t6989586621679315482 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type)
type Tuple6Sym6 (t6989586621679315478 :: a3530822107858468865) (t6989586621679315479 :: b3530822107858468866) (t6989586621679315480 :: c3530822107858468867) (t6989586621679315481 :: d3530822107858468868) (t6989586621679315482 :: e3530822107858468869) (t6989586621679315483 :: f3530822107858468870) = '(t6989586621679315478, t6989586621679315479, t6989586621679315480, t6989586621679315481, t6989586621679315482, t6989586621679315483)
data Tuple7Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))))
data Tuple7Sym1 (t6989586621679315585 :: a3530822107858468865 :: Type) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))))
data Tuple7Sym2 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))))
data Tuple7Sym3 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))))
data Tuple7Sym4 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)))
data Tuple7Sym5 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) :: forall (f3530822107858468870 :: Type) (g3530822107858468871 :: Type). (~>) f3530822107858468870 ((~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type))
data Tuple7Sym6 (t6989586621679315585 :: a3530822107858468865 :: Type) (t6989586621679315586 :: b3530822107858468866 :: Type) (t6989586621679315587 :: c3530822107858468867 :: Type) (t6989586621679315588 :: d3530822107858468868 :: Type) (t6989586621679315589 :: e3530822107858468869 :: Type) (t6989586621679315590 :: f3530822107858468870 :: Type) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 (a3530822107858468865 :: Type, b3530822107858468866 :: Type, c3530822107858468867 :: Type, d3530822107858468868 :: Type, e3530822107858468869 :: Type, f3530822107858468870 :: Type, g3530822107858468871 :: Type)
type Tuple7Sym7 (t6989586621679315585 :: a3530822107858468865) (t6989586621679315586 :: b3530822107858468866) (t6989586621679315587 :: c3530822107858468867) (t6989586621679315588 :: d3530822107858468868) (t6989586621679315589 :: e3530822107858468869) (t6989586621679315590 :: f3530822107858468870) (t6989586621679315591 :: g3530822107858468871) = '(t6989586621679315585, t6989586621679315586, t6989586621679315587, t6989586621679315588, t6989586621679315589, t6989586621679315590, t6989586621679315591)
data FstSym0 :: forall a6989586621679370315 b6989586621679370316. (~>) (a6989586621679370315, b6989586621679370316) a6989586621679370315
type FstSym1 (a6989586621679370417 :: (a6989586621679370315, b6989586621679370316)) = Fst a6989586621679370417
data SndSym0 :: forall a6989586621679370313 b6989586621679370314. (~>) (a6989586621679370313, b6989586621679370314) b6989586621679370314
type SndSym1 (a6989586621679370414 :: (a6989586621679370313, b6989586621679370314)) = Snd a6989586621679370414
data CurrySym0 :: forall a6989586621679370310 b6989586621679370311 c6989586621679370312. (~>) ((~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) ((~>) a6989586621679370310 ((~>) b6989586621679370311 c6989586621679370312))
data CurrySym1 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) :: (~>) a6989586621679370310 ((~>) b6989586621679370311 c6989586621679370312)
data CurrySym2 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) (a6989586621679370406 :: a6989586621679370310) :: (~>) b6989586621679370311 c6989586621679370312
type CurrySym3 (a6989586621679370405 :: (~>) (a6989586621679370310, b6989586621679370311) c6989586621679370312) (a6989586621679370406 :: a6989586621679370310) (a6989586621679370407 :: b6989586621679370311) = Curry a6989586621679370405 a6989586621679370406 a6989586621679370407
data UncurrySym0 :: forall a6989586621679370307 b6989586621679370308 c6989586621679370309. (~>) ((~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) ((~>) (a6989586621679370307, b6989586621679370308) c6989586621679370309)
data UncurrySym1 (a6989586621679370399 :: (~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) :: (~>) (a6989586621679370307, b6989586621679370308) c6989586621679370309
type UncurrySym2 (a6989586621679370399 :: (~>) a6989586621679370307 ((~>) b6989586621679370308 c6989586621679370309)) (a6989586621679370400 :: (a6989586621679370307, b6989586621679370308)) = Uncurry a6989586621679370399 a6989586621679370400
data ErrorSym0 :: forall k06989586621679485796 k6989586621679485797. (~>) k06989586621679485796 k6989586621679485797
type ErrorSym1 (str6989586621679485798 :: k06989586621679485796) = Error str6989586621679485798
data ErrorWithoutStackTraceSym0 :: forall k06989586621679486886 k6989586621679486887. (~>) k06989586621679486886 k6989586621679486887
type ErrorWithoutStackTraceSym1 (str6989586621679486888 :: k06989586621679486886) = ErrorWithoutStackTrace str6989586621679486888
type UndefinedSym0 = Undefined
type LTSym0 = 'LT
type EQSym0 = 'EQ
type GTSym0 = 'GT
data CompareSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Ordering)
data CompareSym1 (arg6989586621679394027 :: a6989586621679393938) :: (~>) a6989586621679393938 Ordering
type CompareSym2 (arg6989586621679394027 :: a6989586621679393938) (arg6989586621679394028 :: a6989586621679393938) = Compare arg6989586621679394027 arg6989586621679394028
data (<@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 <@#@$
data (<@#@$$) (arg6989586621679394031 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 <@#@$$
type (<@#@$$$) (arg6989586621679394031 :: a6989586621679393938) (arg6989586621679394032 :: a6989586621679393938) = (<) arg6989586621679394031 arg6989586621679394032
data (<=@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 <=@#@$
data (<=@#@$$) (arg6989586621679394035 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 <=@#@$$
type (<=@#@$$$) (arg6989586621679394035 :: a6989586621679393938) (arg6989586621679394036 :: a6989586621679393938) = (<=) arg6989586621679394035 arg6989586621679394036
data (>@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 >@#@$
data (>@#@$$) (arg6989586621679394039 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 >@#@$$
type (>@#@$$$) (arg6989586621679394039 :: a6989586621679393938) (arg6989586621679394040 :: a6989586621679393938) = (>) arg6989586621679394039 arg6989586621679394040
data (>=@#@$) :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 Bool)
infix 4 >=@#@$
data (>=@#@$$) (arg6989586621679394043 :: a6989586621679393938) :: (~>) a6989586621679393938 Bool
infix 4 >=@#@$$
type (>=@#@$$$) (arg6989586621679394043 :: a6989586621679393938) (arg6989586621679394044 :: a6989586621679393938) = (>=) arg6989586621679394043 arg6989586621679394044
data MaxSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 a6989586621679393938)
data MaxSym1 (arg6989586621679394047 :: a6989586621679393938) :: (~>) a6989586621679393938 a6989586621679393938
type MaxSym2 (arg6989586621679394047 :: a6989586621679393938) (arg6989586621679394048 :: a6989586621679393938) = Max arg6989586621679394047 arg6989586621679394048
data MinSym0 :: forall a6989586621679393938. (~>) a6989586621679393938 ((~>) a6989586621679393938 a6989586621679393938)
data MinSym1 (arg6989586621679394051 :: a6989586621679393938) :: (~>) a6989586621679393938 a6989586621679393938
type MinSym2 (arg6989586621679394051 :: a6989586621679393938) (arg6989586621679394052 :: a6989586621679393938) = Min arg6989586621679394051 arg6989586621679394052
data (^@#@$) :: (~>) Nat ((~>) Nat Nat)
infixr 8 ^@#@$
data (^@#@$$) (a3530822107858468865 :: Nat) :: (~>) Nat Nat
infixr 8 ^@#@$$
type (^@#@$$$) (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = (^) a3530822107858468865 b3530822107858468866
data ShowsPrecSym0 :: forall a6989586621680294621. (~>) Nat ((~>) a6989586621680294621 ((~>) Symbol Symbol))
data ShowsPrecSym1 (arg6989586621680295059 :: Nat) :: forall a6989586621680294621. (~>) a6989586621680294621 ((~>) Symbol Symbol)
data ShowsPrecSym2 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) :: (~>) Symbol Symbol
type ShowsPrecSym3 (arg6989586621680295059 :: Nat) (arg6989586621680295060 :: a6989586621680294621) (arg6989586621680295061 :: Symbol) = ShowsPrec arg6989586621680295059 arg6989586621680295060 arg6989586621680295061
data Show_Sym0 :: forall a6989586621680294621. (~>) a6989586621680294621 Symbol
type Show_Sym1 (arg6989586621680295065 :: a6989586621680294621) = Show_ arg6989586621680295065
data ShowListSym0 :: forall a6989586621680294621. (~>) [a6989586621680294621] ((~>) Symbol Symbol)
data ShowListSym1 (arg6989586621680295067 :: [a6989586621680294621]) :: (~>) Symbol Symbol
type ShowListSym2 (arg6989586621680295067 :: [a6989586621680294621]) (arg6989586621680295068 :: Symbol) = ShowList arg6989586621680295067 arg6989586621680295068
data ShowsSym0 :: forall a6989586621680294606. (~>) a6989586621680294606 ((~>) Symbol Symbol)
data ShowsSym1 (a6989586621680295051 :: a6989586621680294606) :: (~>) Symbol Symbol
type ShowsSym2 (a6989586621680295051 :: a6989586621680294606) (a6989586621680295052 :: Symbol) = Shows a6989586621680295051 a6989586621680295052
data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowCharSym1 (a6989586621680295025 :: Symbol) :: (~>) Symbol Symbol
type ShowCharSym2 (a6989586621680295025 :: Symbol) (a6989586621680295026 :: Symbol) = ShowChar a6989586621680295025 a6989586621680295026
data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol)
data ShowStringSym1 (a6989586621680295015 :: Symbol) :: (~>) Symbol Symbol
type ShowStringSym2 (a6989586621680295015 :: Symbol) (a6989586621680295016 :: Symbol) = ShowString a6989586621680295015 a6989586621680295016
data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol))
data ShowParenSym1 (a6989586621680294997 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)
data ShowParenSym2 (a6989586621680294997 :: Bool) (a6989586621680294998 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol
data (<>@#@$) :: forall a6989586621679840612. (~>) a6989586621679840612 ((~>) a6989586621679840612 a6989586621679840612)
infixr 6 <>@#@$
data (<>@#@$$) (arg6989586621679840847 :: a6989586621679840612) :: (~>) a6989586621679840612 a6989586621679840612
infixr 6 <>@#@$$
type (<>@#@$$$) (arg6989586621679840847 :: a6989586621679840612) (arg6989586621679840848 :: a6989586621679840612) = (<>) arg6989586621679840847 arg6989586621679840848
type MemptySym0 = Mempty
data MappendSym0 :: forall a6989586621680364721. (~>) a6989586621680364721 ((~>) a6989586621680364721 a6989586621680364721)
data MappendSym1 (arg6989586621680364860 :: a6989586621680364721) :: (~>) a6989586621680364721 a6989586621680364721
type MappendSym2 (arg6989586621680364860 :: a6989586621680364721) (arg6989586621680364861 :: a6989586621680364721) = Mappend arg6989586621680364860 arg6989586621680364861
data MconcatSym0 :: forall a6989586621680364721. (~>) [a6989586621680364721] a6989586621680364721
type MconcatSym1 (arg6989586621680364864 :: [a6989586621680364721]) = Mconcat arg6989586621680364864
data FmapSym0 :: forall a6989586621679570820 b6989586621679570821 f6989586621679570819. (~>) ((~>) a6989586621679570820 b6989586621679570821) ((~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821))
data FmapSym1 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) :: forall f6989586621679570819. (~>) (f6989586621679570819 a6989586621679570820) (f6989586621679570819 b6989586621679570821)
type FmapSym2 (arg6989586621679571211 :: (~>) a6989586621679570820 b6989586621679570821) (arg6989586621679571212 :: f6989586621679570819 a6989586621679570820) = Fmap arg6989586621679571211 arg6989586621679571212
data (<$@#@$) :: forall a6989586621679570822 f6989586621679570819 b6989586621679570823. (~>) a6989586621679570822 ((~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822))
infixl 4 <$@#@$
data (<$@#@$$) (arg6989586621679571215 :: a6989586621679570822) :: forall f6989586621679570819 b6989586621679570823. (~>) (f6989586621679570819 b6989586621679570823) (f6989586621679570819 a6989586621679570822)
infixl 4 <$@#@$$
type (<$@#@$$$) (arg6989586621679571215 :: a6989586621679570822) (arg6989586621679571216 :: f6989586621679570819 b6989586621679570823) = (<$) arg6989586621679571215 arg6989586621679571216
data (<$>@#@$) :: forall a6989586621679740996 b6989586621679740997 f6989586621679740995. (~>) ((~>) a6989586621679740996 b6989586621679740997) ((~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997))
infixl 4 <$>@#@$
data (<$>@#@$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) :: forall f6989586621679740995. (~>) (f6989586621679740995 a6989586621679740996) (f6989586621679740995 b6989586621679740997)
infixl 4 <$>@#@$$
type (<$>@#@$$$) (a6989586621679741077 :: (~>) a6989586621679740996 b6989586621679740997) (a6989586621679741078 :: f6989586621679740995 a6989586621679740996) = (<$>) a6989586621679741077 a6989586621679741078
data PureSym0 :: forall a6989586621679570825 f6989586621679570824. (~>) a6989586621679570825 (f6989586621679570824 a6989586621679570825)
type PureSym1 (arg6989586621679571235 :: a6989586621679570825) = Pure arg6989586621679571235
data (<*>@#@$) :: forall f6989586621679570824 a6989586621679570826 b6989586621679570827. (~>) (f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) ((~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827))
infixl 4 <*>@#@$
data (<*>@#@$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) :: (~>) (f6989586621679570824 a6989586621679570826) (f6989586621679570824 b6989586621679570827)
infixl 4 <*>@#@$$
type (<*>@#@$$$) (arg6989586621679571237 :: f6989586621679570824 ((~>) a6989586621679570826 b6989586621679570827)) (arg6989586621679571238 :: f6989586621679570824 a6989586621679570826) = (<*>) arg6989586621679571237 arg6989586621679571238
data (*>@#@$) :: forall f6989586621679570824 a6989586621679570831 b6989586621679570832. (~>) (f6989586621679570824 a6989586621679570831) ((~>) (f6989586621679570824 b6989586621679570832) (f6989586621679570824 b6989586621679570832))
infixl 4 *>@#@$
data (*>@#@$$) (arg6989586621679571247 :: f6989586621679570824 a6989586621679570831) :: forall b6989586621679570832. (~>) (f6989586621679570824 b6989586621679570832) (f6989586621679570824 b6989586621679570832)
infixl 4 *>@#@$$
type (*>@#@$$$) (arg6989586621679571247 :: f6989586621679570824 a6989586621679570831) (arg6989586621679571248 :: f6989586621679570824 b6989586621679570832) = (*>) arg6989586621679571247 arg6989586621679571248
data (<*@#@$) :: forall f6989586621679570824 a6989586621679570833 b6989586621679570834. (~>) (f6989586621679570824 a6989586621679570833) ((~>) (f6989586621679570824 b6989586621679570834) (f6989586621679570824 a6989586621679570833))
infixl 4 <*@#@$
data (<*@#@$$) (arg6989586621679571251 :: f6989586621679570824 a6989586621679570833) :: forall b6989586621679570834. (~>) (f6989586621679570824 b6989586621679570834) (f6989586621679570824 a6989586621679570833)
infixl 4 <*@#@$$
type (<*@#@$$$) (arg6989586621679571251 :: f6989586621679570824 a6989586621679570833) (arg6989586621679571252 :: f6989586621679570824 b6989586621679570834) = (<*) arg6989586621679571251 arg6989586621679571252
data (>>=@#@$) :: forall m6989586621679570848 a6989586621679570849 b6989586621679570850. (~>) (m6989586621679570848 a6989586621679570849) ((~>) ((~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) (m6989586621679570848 b6989586621679570850))
infixl 1 >>=@#@$
data (>>=@#@$$) (arg6989586621679571318 :: m6989586621679570848 a6989586621679570849) :: forall b6989586621679570850. (~>) ((~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) (m6989586621679570848 b6989586621679570850)
infixl 1 >>=@#@$$
type (>>=@#@$$$) (arg6989586621679571318 :: m6989586621679570848 a6989586621679570849) (arg6989586621679571319 :: (~>) a6989586621679570849 (m6989586621679570848 b6989586621679570850)) = (>>=) arg6989586621679571318 arg6989586621679571319
data (>>@#@$) :: forall m6989586621679570848 a6989586621679570851 b6989586621679570852. (~>) (m6989586621679570848 a6989586621679570851) ((~>) (m6989586621679570848 b6989586621679570852) (m6989586621679570848 b6989586621679570852))
infixl 1 >>@#@$
data (>>@#@$$) (arg6989586621679571322 :: m6989586621679570848 a6989586621679570851) :: forall b6989586621679570852. (~>) (m6989586621679570848 b6989586621679570852) (m6989586621679570848 b6989586621679570852)
infixl 1 >>@#@$$
type (>>@#@$$$) (arg6989586621679571322 :: m6989586621679570848 a6989586621679570851) (arg6989586621679571323 :: m6989586621679570848 b6989586621679570852) = (>>) arg6989586621679571322 arg6989586621679571323
data ReturnSym0 :: forall a6989586621679570853 m6989586621679570848. (~>) a6989586621679570853 (m6989586621679570848 a6989586621679570853)
type ReturnSym1 (arg6989586621679571326 :: a6989586621679570853) = Return arg6989586621679571326
data FailSym0 :: forall m6989586621679738911 a6989586621679738912. (~>) [Char] (m6989586621679738911 a6989586621679738912)
type FailSym1 (arg6989586621679738931 :: [Char]) = Fail arg6989586621679738931
data MapM_Sym0 :: forall a6989586621680490447 m6989586621680490446 b6989586621680490448 t6989586621680490445. (~>) ((~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) ((~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ()))
data MapM_Sym1 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) :: forall t6989586621680490445. (~>) (t6989586621680490445 a6989586621680490447) (m6989586621680490446 ())
type MapM_Sym2 (a6989586621680491051 :: (~>) a6989586621680490447 (m6989586621680490446 b6989586621680490448)) (a6989586621680491052 :: t6989586621680490445 a6989586621680490447) = MapM_ a6989586621680491051 a6989586621680491052
data Sequence_Sym0 :: forall t6989586621680490435 m6989586621680490436 a6989586621680490437. (~>) (t6989586621680490435 (m6989586621680490436 a6989586621680490437)) (m6989586621680490436 ())
type Sequence_Sym1 (a6989586621680491033 :: t6989586621680490435 (m6989586621680490436 a6989586621680490437)) = Sequence_ a6989586621680491033
data (=<<@#@$) :: forall a6989586621679570772 m6989586621679570771 b6989586621679570773. (~>) ((~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) ((~>) (m6989586621679570771 a6989586621679570772) (m6989586621679570771 b6989586621679570773))
infixr 1 =<<@#@$
data (=<<@#@$$) (a6989586621679571164 :: (~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) :: (~>) (m6989586621679570771 a6989586621679570772) (m6989586621679570771 b6989586621679570773)
infixr 1 =<<@#@$$
type (=<<@#@$$$) (a6989586621679571164 :: (~>) a6989586621679570772 (m6989586621679570771 b6989586621679570773)) (a6989586621679571165 :: m6989586621679570771 a6989586621679570772) = (=<<) a6989586621679571164 a6989586621679571165
data ElemSym0 :: forall a6989586621680490519 t6989586621680490502. (~>) a6989586621680490519 ((~>) (t6989586621680490502 a6989586621680490519) Bool)
data ElemSym1 (arg6989586621680491165 :: a6989586621680490519) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490519) Bool
type ElemSym2 (arg6989586621680491165 :: a6989586621680490519) (arg6989586621680491166 :: t6989586621680490502 a6989586621680490519) = Elem arg6989586621680491165 arg6989586621680491166
data FoldMapSym0 :: forall a6989586621680490505 m6989586621680490504 t6989586621680490502. (~>) ((~>) a6989586621680490505 m6989586621680490504) ((~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504)
data FoldMapSym1 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490505) m6989586621680490504
type FoldMapSym2 (arg6989586621680491123 :: (~>) a6989586621680490505 m6989586621680490504) (arg6989586621680491124 :: t6989586621680490502 a6989586621680490505) = FoldMap arg6989586621680491123 arg6989586621680491124
data FoldrSym0 :: forall a6989586621680490506 b6989586621680490507 t6989586621680490502. (~>) ((~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) ((~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507))
data FoldrSym1 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) :: forall t6989586621680490502. (~>) b6989586621680490507 ((~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507)
data FoldrSym2 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490506) b6989586621680490507
type FoldrSym3 (arg6989586621680491127 :: (~>) a6989586621680490506 ((~>) b6989586621680490507 b6989586621680490507)) (arg6989586621680491128 :: b6989586621680490507) (arg6989586621680491129 :: t6989586621680490502 a6989586621680490506) = Foldr arg6989586621680491127 arg6989586621680491128 arg6989586621680491129
data FoldlSym0 :: forall b6989586621680490510 a6989586621680490511 t6989586621680490502. (~>) ((~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) ((~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510))
data FoldlSym1 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) :: forall t6989586621680490502. (~>) b6989586621680490510 ((~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510)
data FoldlSym2 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490511) b6989586621680490510
type FoldlSym3 (arg6989586621680491139 :: (~>) b6989586621680490510 ((~>) a6989586621680490511 b6989586621680490510)) (arg6989586621680491140 :: b6989586621680490510) (arg6989586621680491141 :: t6989586621680490502 a6989586621680490511) = Foldl arg6989586621680491139 arg6989586621680491140 arg6989586621680491141
data Foldr1Sym0 :: forall a6989586621680490514 t6989586621680490502. (~>) ((~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) ((~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514)
data Foldr1Sym1 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490514) a6989586621680490514
type Foldr1Sym2 (arg6989586621680491151 :: (~>) a6989586621680490514 ((~>) a6989586621680490514 a6989586621680490514)) (arg6989586621680491152 :: t6989586621680490502 a6989586621680490514) = Foldr1 arg6989586621680491151 arg6989586621680491152
data Foldl1Sym0 :: forall a6989586621680490515 t6989586621680490502. (~>) ((~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) ((~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515)
data Foldl1Sym1 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) :: forall t6989586621680490502. (~>) (t6989586621680490502 a6989586621680490515) a6989586621680490515
type Foldl1Sym2 (arg6989586621680491155 :: (~>) a6989586621680490515 ((~>) a6989586621680490515 a6989586621680490515)) (arg6989586621680491156 :: t6989586621680490502 a6989586621680490515) = Foldl1 arg6989586621680491155 arg6989586621680491156
data MaximumSym0 :: forall t6989586621680490502 a6989586621680490520. (~>) (t6989586621680490502 a6989586621680490520) a6989586621680490520
type MaximumSym1 (arg6989586621680491169 :: t6989586621680490502 a6989586621680490520) = Maximum arg6989586621680491169
data MinimumSym0 :: forall t6989586621680490502 a6989586621680490521. (~>) (t6989586621680490502 a6989586621680490521) a6989586621680490521
type MinimumSym1 (arg6989586621680491171 :: t6989586621680490502 a6989586621680490521) = Minimum arg6989586621680491171
data SumSym0 :: forall t6989586621680490502 a6989586621680490522. (~>) (t6989586621680490502 a6989586621680490522) a6989586621680490522
type SumSym1 (arg6989586621680491173 :: t6989586621680490502 a6989586621680490522) = Sum arg6989586621680491173
data ProductSym0 :: forall t6989586621680490502 a6989586621680490523. (~>) (t6989586621680490502 a6989586621680490523) a6989586621680490523
type ProductSym1 (arg6989586621680491175 :: t6989586621680490502 a6989586621680490523) = Product arg6989586621680491175
data TraverseSym0 :: forall a6989586621680798695 f6989586621680798694 b6989586621680798696 t6989586621680798693. (~>) ((~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) ((~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696)))
data TraverseSym1 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798695) (f6989586621680798694 (t6989586621680798693 b6989586621680798696))
type TraverseSym2 (arg6989586621680798705 :: (~>) a6989586621680798695 (f6989586621680798694 b6989586621680798696)) (arg6989586621680798706 :: t6989586621680798693 a6989586621680798695) = Traverse arg6989586621680798705 arg6989586621680798706
data SequenceASym0 :: forall t6989586621680798693 f6989586621680798697 a6989586621680798698. (~>) (t6989586621680798693 (f6989586621680798697 a6989586621680798698)) (f6989586621680798697 (t6989586621680798693 a6989586621680798698))
type SequenceASym1 (arg6989586621680798709 :: t6989586621680798693 (f6989586621680798697 a6989586621680798698)) = SequenceA arg6989586621680798709
data MapMSym0 :: forall a6989586621680798700 m6989586621680798699 b6989586621680798701 t6989586621680798693. (~>) ((~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) ((~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701)))
data MapMSym1 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) :: forall t6989586621680798693. (~>) (t6989586621680798693 a6989586621680798700) (m6989586621680798699 (t6989586621680798693 b6989586621680798701))
type MapMSym2 (arg6989586621680798711 :: (~>) a6989586621680798700 (m6989586621680798699 b6989586621680798701)) (arg6989586621680798712 :: t6989586621680798693 a6989586621680798700) = MapM arg6989586621680798711 arg6989586621680798712
data SequenceSym0 :: forall t6989586621680798693 m6989586621680798702 a6989586621680798703. (~>) (t6989586621680798693 (m6989586621680798702 a6989586621680798703)) (m6989586621680798702 (t6989586621680798693 a6989586621680798703))
type SequenceSym1 (arg6989586621680798715 :: t6989586621680798693 (m6989586621680798702 a6989586621680798703)) = Sequence arg6989586621680798715
data IdSym0 :: forall a6989586621679545432. (~>) a6989586621679545432 a6989586621679545432
type IdSym1 (a6989586621679545627 :: a6989586621679545432) = Id a6989586621679545627
data ConstSym0 :: forall a6989586621679545430 b6989586621679545431. (~>) a6989586621679545430 ((~>) b6989586621679545431 a6989586621679545430)
data ConstSym1 (a6989586621679545622 :: a6989586621679545430) :: forall b6989586621679545431. (~>) b6989586621679545431 a6989586621679545430
type ConstSym2 (a6989586621679545622 :: a6989586621679545430) (a6989586621679545623 :: b6989586621679545431) = Const a6989586621679545622 a6989586621679545623
data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428))
infixr 9 .@#@$
data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)
infixr 9 .@#@$$
data (.@#@$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428
infixr 9 .@#@$$$
data ($@#@$) :: forall a6989586621679545421 b6989586621679545422. (~>) ((~>) a6989586621679545421 b6989586621679545422) ((~>) a6989586621679545421 b6989586621679545422)
infixr 0 $@#@$
data ($@#@$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) :: (~>) a6989586621679545421 b6989586621679545422
infixr 0 $@#@$$
type ($@#@$$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) (a6989586621679545579 :: a6989586621679545421) = ($) a6989586621679545578 a6989586621679545579
data ($!@#@$) :: forall a6989586621679545419 b6989586621679545420. (~>) ((~>) a6989586621679545419 b6989586621679545420) ((~>) a6989586621679545419 b6989586621679545420)
infixr 0 $!@#@$
data ($!@#@$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) :: (~>) a6989586621679545419 b6989586621679545420
infixr 0 $!@#@$$
type ($!@#@$$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) (a6989586621679545570 :: a6989586621679545419) = ($!) a6989586621679545569 a6989586621679545570
data FlipSym0 :: forall a6989586621679545424 b6989586621679545425 c6989586621679545426. (~>) ((~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) ((~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426))
data FlipSym1 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) :: (~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426)
data FlipSym2 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) :: (~>) a6989586621679545424 c6989586621679545426
data AsTypeOfSym0 :: forall a6989586621679545423. (~>) a6989586621679545423 ((~>) a6989586621679545423 a6989586621679545423)
data AsTypeOfSym1 (a6989586621679545588 :: a6989586621679545423) :: (~>) a6989586621679545423 a6989586621679545423
type AsTypeOfSym2 (a6989586621679545588 :: a6989586621679545423) (a6989586621679545589 :: a6989586621679545423) = AsTypeOf a6989586621679545588 a6989586621679545589
data SeqSym0 :: forall a6989586621679545416 b6989586621679545417. (~>) a6989586621679545416 ((~>) b6989586621679545417 b6989586621679545417)
infixr 0 `SeqSym0`
data SeqSym1 (a6989586621679545538 :: a6989586621679545416) :: forall b6989586621679545417. (~>) b6989586621679545417 b6989586621679545417
infixr 0 `SeqSym1`
type SeqSym2 (a6989586621679545538 :: a6989586621679545416) (a6989586621679545539 :: b6989586621679545417) = Seq a6989586621679545538 a6989586621679545539
data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [a3530822107858468865 :: Type])
infixr 5 :@#@$
data (:@#@$$) (t6989586621679315156 :: a3530822107858468865 :: Type) :: (~>) [a3530822107858468865] [a3530822107858468865 :: Type]
infixr 5 :@#@$$
type (:@#@$$$) (t6989586621679315156 :: a3530822107858468865) (t6989586621679315157 :: [a3530822107858468865]) = '(:) t6989586621679315156 t6989586621679315157
type NilSym0 = '[]
data MapSym0 :: forall a6989586621679545434 b6989586621679545435. (~>) ((~>) a6989586621679545434 b6989586621679545435) ((~>) [a6989586621679545434] [b6989586621679545435])
data MapSym1 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) :: (~>) [a6989586621679545434] [b6989586621679545435]
type MapSym2 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) (a6989586621679545639 :: [a6989586621679545434]) = Map a6989586621679545638 a6989586621679545639
data ReverseSym0 :: forall a6989586621679974178. (~>) [a6989586621679974178] [a6989586621679974178]
type ReverseSym1 (a6989586621679979493 :: [a6989586621679974178]) = Reverse a6989586621679979493
data (++@#@$$) (a6989586621679545630 :: [a6989586621679545433]) :: (~>) [a6989586621679545433] [a6989586621679545433]
infixr 5 ++@#@$$
data (++@#@$) :: forall a6989586621679545433. (~>) [a6989586621679545433] ((~>) [a6989586621679545433] [a6989586621679545433])
infixr 5 ++@#@$
data FilterSym0 :: forall a6989586621679974093. (~>) ((~>) a6989586621679974093 Bool) ((~>) [a6989586621679974093] [a6989586621679974093])
data FilterSym1 (a6989586621679978648 :: (~>) a6989586621679974093 Bool) :: (~>) [a6989586621679974093] [a6989586621679974093]
type FilterSym2 (a6989586621679978648 :: (~>) a6989586621679974093 Bool) (a6989586621679978649 :: [a6989586621679974093]) = Filter a6989586621679978648 a6989586621679978649
data HeadSym0 :: forall a6989586621679974183. (~>) [a6989586621679974183] a6989586621679974183
type HeadSym1 (a6989586621679979530 :: [a6989586621679974183]) = Head a6989586621679979530
data LastSym0 :: forall a6989586621679974182. (~>) [a6989586621679974182] a6989586621679974182
type LastSym1 (a6989586621679979525 :: [a6989586621679974182]) = Last a6989586621679979525
data TailSym0 :: forall a6989586621679974181. (~>) [a6989586621679974181] [a6989586621679974181]
type TailSym1 (a6989586621679979522 :: [a6989586621679974181]) = Tail a6989586621679979522
data InitSym0 :: forall a6989586621679974180. (~>) [a6989586621679974180] [a6989586621679974180]
type InitSym1 (a6989586621679979508 :: [a6989586621679974180]) = Init a6989586621679979508
data NullSym0 :: forall t6989586621680490502 a6989586621680490517. (~>) (t6989586621680490502 a6989586621680490517) Bool
type NullSym1 (arg6989586621680491161 :: t6989586621680490502 a6989586621680490517) = Null arg6989586621680491161
data ConcatSym0 :: forall t6989586621680490427 a6989586621680490428. (~>) (t6989586621680490427 [a6989586621680490428]) [a6989586621680490428]
type ConcatSym1 (a6989586621680491009 :: t6989586621680490427 [a6989586621680490428]) = Concat a6989586621680491009
data ConcatMapSym0 :: forall a6989586621680490425 b6989586621680490426 t6989586621680490424. (~>) ((~>) a6989586621680490425 [b6989586621680490426]) ((~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426])
data ConcatMapSym1 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) :: forall t6989586621680490424. (~>) (t6989586621680490424 a6989586621680490425) [b6989586621680490426]
type ConcatMapSym2 (a6989586621680490993 :: (~>) a6989586621680490425 [b6989586621680490426]) (a6989586621680490994 :: t6989586621680490424 a6989586621680490425) = ConcatMap a6989586621680490993 a6989586621680490994
data AndSym0 :: forall t6989586621680490423. (~>) (t6989586621680490423 Bool) Bool
type AndSym1 (a6989586621680490984 :: t6989586621680490423 Bool) = And a6989586621680490984
data OrSym0 :: forall t6989586621680490422. (~>) (t6989586621680490422 Bool) Bool
type OrSym1 (a6989586621680490975 :: t6989586621680490422 Bool) = Or a6989586621680490975
data AnySym0 :: forall a6989586621680490421 t6989586621680490420. (~>) ((~>) a6989586621680490421 Bool) ((~>) (t6989586621680490420 a6989586621680490421) Bool)
data AnySym1 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) :: forall t6989586621680490420. (~>) (t6989586621680490420 a6989586621680490421) Bool
type AnySym2 (a6989586621680490962 :: (~>) a6989586621680490421 Bool) (a6989586621680490963 :: t6989586621680490420 a6989586621680490421) = Any a6989586621680490962 a6989586621680490963
data AllSym0 :: forall a6989586621680490419 t6989586621680490418. (~>) ((~>) a6989586621680490419 Bool) ((~>) (t6989586621680490418 a6989586621680490419) Bool)
data AllSym1 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) :: forall t6989586621680490418. (~>) (t6989586621680490418 a6989586621680490419) Bool
type AllSym2 (a6989586621680490949 :: (~>) a6989586621680490419 Bool) (a6989586621680490950 :: t6989586621680490418 a6989586621680490419) = All a6989586621680490949 a6989586621680490950
data ScanlSym0 :: forall b6989586621679974160 a6989586621679974161. (~>) ((~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) ((~>) b6989586621679974160 ((~>) [a6989586621679974161] [b6989586621679974160]))
data ScanlSym1 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) :: (~>) b6989586621679974160 ((~>) [a6989586621679974161] [b6989586621679974160])
data ScanlSym2 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) (a6989586621679979255 :: b6989586621679974160) :: (~>) [a6989586621679974161] [b6989586621679974160]
type ScanlSym3 (a6989586621679979254 :: (~>) b6989586621679974160 ((~>) a6989586621679974161 b6989586621679974160)) (a6989586621679979255 :: b6989586621679974160) (a6989586621679979256 :: [a6989586621679974161]) = Scanl a6989586621679979254 a6989586621679979255 a6989586621679979256
data Scanl1Sym0 :: forall a6989586621679974159. (~>) ((~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) ((~>) [a6989586621679974159] [a6989586621679974159])
data Scanl1Sym1 (a6989586621679979247 :: (~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) :: (~>) [a6989586621679974159] [a6989586621679974159]
type Scanl1Sym2 (a6989586621679979247 :: (~>) a6989586621679974159 ((~>) a6989586621679974159 a6989586621679974159)) (a6989586621679979248 :: [a6989586621679974159]) = Scanl1 a6989586621679979247 a6989586621679979248
data ScanrSym0 :: forall a6989586621679974157 b6989586621679974158. (~>) ((~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) ((~>) b6989586621679974158 ((~>) [a6989586621679974157] [b6989586621679974158]))
data ScanrSym1 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) :: (~>) b6989586621679974158 ((~>) [a6989586621679974157] [b6989586621679974158])
data ScanrSym2 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) (a6989586621679979227 :: b6989586621679974158) :: (~>) [a6989586621679974157] [b6989586621679974158]
type ScanrSym3 (a6989586621679979226 :: (~>) a6989586621679974157 ((~>) b6989586621679974158 b6989586621679974158)) (a6989586621679979227 :: b6989586621679974158) (a6989586621679979228 :: [a6989586621679974157]) = Scanr a6989586621679979226 a6989586621679979227 a6989586621679979228
data Scanr1Sym0 :: forall a6989586621679974156. (~>) ((~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) ((~>) [a6989586621679974156] [a6989586621679974156])
data Scanr1Sym1 (a6989586621679979202 :: (~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) :: (~>) [a6989586621679974156] [a6989586621679974156]
type Scanr1Sym2 (a6989586621679979202 :: (~>) a6989586621679974156 ((~>) a6989586621679974156 a6989586621679974156)) (a6989586621679979203 :: [a6989586621679974156]) = Scanr1 a6989586621679979202 a6989586621679979203
data ReplicateSym0 :: forall a6989586621679974064. (~>) Nat ((~>) a6989586621679974064 [a6989586621679974064])
data ReplicateSym1 (a6989586621679978229 :: Nat) :: forall a6989586621679974064. (~>) a6989586621679974064 [a6989586621679974064]
type ReplicateSym2 (a6989586621679978229 :: Nat) (a6989586621679978230 :: a6989586621679974064) = Replicate a6989586621679978229 a6989586621679978230
data TakeSym0 :: forall a6989586621679974080. (~>) Nat ((~>) [a6989586621679974080] [a6989586621679974080])
data TakeSym1 (a6989586621679978390 :: Nat) :: forall a6989586621679974080. (~>) [a6989586621679974080] [a6989586621679974080]
type TakeSym2 (a6989586621679978390 :: Nat) (a6989586621679978391 :: [a6989586621679974080]) = Take a6989586621679978390 a6989586621679978391
data DropSym0 :: forall a6989586621679974079. (~>) Nat ((~>) [a6989586621679974079] [a6989586621679974079])
data DropSym1 (a6989586621679978376 :: Nat) :: forall a6989586621679974079. (~>) [a6989586621679974079] [a6989586621679974079]
type DropSym2 (a6989586621679978376 :: Nat) (a6989586621679978377 :: [a6989586621679974079]) = Drop a6989586621679978376 a6989586621679978377
data SplitAtSym0 :: forall a6989586621679974078. (~>) Nat ((~>) [a6989586621679974078] ([a6989586621679974078], [a6989586621679974078]))
data SplitAtSym1 (a6989586621679978370 :: Nat) :: forall a6989586621679974078. (~>) [a6989586621679974078] ([a6989586621679974078], [a6989586621679974078])
type SplitAtSym2 (a6989586621679978370 :: Nat) (a6989586621679978371 :: [a6989586621679974078]) = SplitAt a6989586621679978370 a6989586621679978371
data TakeWhileSym0 :: forall a6989586621679974085. (~>) ((~>) a6989586621679974085 Bool) ((~>) [a6989586621679974085] [a6989586621679974085])
data TakeWhileSym1 (a6989586621679978534 :: (~>) a6989586621679974085 Bool) :: (~>) [a6989586621679974085] [a6989586621679974085]
type TakeWhileSym2 (a6989586621679978534 :: (~>) a6989586621679974085 Bool) (a6989586621679978535 :: [a6989586621679974085]) = TakeWhile a6989586621679978534 a6989586621679978535
data DropWhileSym0 :: forall a6989586621679974084. (~>) ((~>) a6989586621679974084 Bool) ((~>) [a6989586621679974084] [a6989586621679974084])
data DropWhileSym1 (a6989586621679978516 :: (~>) a6989586621679974084 Bool) :: (~>) [a6989586621679974084] [a6989586621679974084]
type DropWhileSym2 (a6989586621679978516 :: (~>) a6989586621679974084 Bool) (a6989586621679978517 :: [a6989586621679974084]) = DropWhile a6989586621679978516 a6989586621679978517
data DropWhileEndSym0 :: forall a6989586621679974083. (~>) ((~>) a6989586621679974083 Bool) ((~>) [a6989586621679974083] [a6989586621679974083])
data DropWhileEndSym1 (a6989586621679978490 :: (~>) a6989586621679974083 Bool) :: (~>) [a6989586621679974083] [a6989586621679974083]
type DropWhileEndSym2 (a6989586621679978490 :: (~>) a6989586621679974083 Bool) (a6989586621679978491 :: [a6989586621679974083]) = DropWhileEnd a6989586621679978490 a6989586621679978491
data SpanSym0 :: forall a6989586621679974082. (~>) ((~>) a6989586621679974082 Bool) ((~>) [a6989586621679974082] ([a6989586621679974082], [a6989586621679974082]))
data SpanSym1 (a6989586621679978447 :: (~>) a6989586621679974082 Bool) :: (~>) [a6989586621679974082] ([a6989586621679974082], [a6989586621679974082])
type SpanSym2 (a6989586621679978447 :: (~>) a6989586621679974082 Bool) (a6989586621679978448 :: [a6989586621679974082]) = Span a6989586621679978447 a6989586621679978448
data BreakSym0 :: forall a6989586621679974081. (~>) ((~>) a6989586621679974081 Bool) ((~>) [a6989586621679974081] ([a6989586621679974081], [a6989586621679974081]))
data BreakSym1 (a6989586621679978404 :: (~>) a6989586621679974081 Bool) :: (~>) [a6989586621679974081] ([a6989586621679974081], [a6989586621679974081])
type BreakSym2 (a6989586621679978404 :: (~>) a6989586621679974081 Bool) (a6989586621679978405 :: [a6989586621679974081]) = Break a6989586621679978404 a6989586621679978405
data NotElemSym0 :: forall a6989586621680490413 t6989586621680490412. (~>) a6989586621680490413 ((~>) (t6989586621680490412 a6989586621680490413) Bool)
data NotElemSym1 (a6989586621680490891 :: a6989586621680490413) :: forall t6989586621680490412. (~>) (t6989586621680490412 a6989586621680490413) Bool
type NotElemSym2 (a6989586621680490891 :: a6989586621680490413) (a6989586621680490892 :: t6989586621680490412 a6989586621680490413) = NotElem a6989586621680490891 a6989586621680490892
data ZipSym0 :: forall a6989586621679974139 b6989586621679974140. (~>) [a6989586621679974139] ((~>) [b6989586621679974140] [(a6989586621679974139, b6989586621679974140)])
data ZipSym1 (a6989586621679979003 :: [a6989586621679974139]) :: forall b6989586621679974140. (~>) [b6989586621679974140] [(a6989586621679974139, b6989586621679974140)]
type ZipSym2 (a6989586621679979003 :: [a6989586621679974139]) (a6989586621679979004 :: [b6989586621679974140]) = Zip a6989586621679979003 a6989586621679979004
data Zip3Sym0 :: forall a6989586621679974136 b6989586621679974137 c6989586621679974138. (~>) [a6989586621679974136] ((~>) [b6989586621679974137] ((~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)]))
data Zip3Sym1 (a6989586621679978991 :: [a6989586621679974136]) :: forall b6989586621679974137 c6989586621679974138. (~>) [b6989586621679974137] ((~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)])
data Zip3Sym2 (a6989586621679978991 :: [a6989586621679974136]) (a6989586621679978992 :: [b6989586621679974137]) :: forall c6989586621679974138. (~>) [c6989586621679974138] [(a6989586621679974136, b6989586621679974137, c6989586621679974138)]
type Zip3Sym3 (a6989586621679978991 :: [a6989586621679974136]) (a6989586621679978992 :: [b6989586621679974137]) (a6989586621679978993 :: [c6989586621679974138]) = Zip3 a6989586621679978991 a6989586621679978992 a6989586621679978993
data ZipWithSym0 :: forall a6989586621679974133 b6989586621679974134 c6989586621679974135. (~>) ((~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) ((~>) [a6989586621679974133] ((~>) [b6989586621679974134] [c6989586621679974135]))
data ZipWithSym1 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) :: (~>) [a6989586621679974133] ((~>) [b6989586621679974134] [c6989586621679974135])
data ZipWithSym2 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) (a6989586621679978981 :: [a6989586621679974133]) :: (~>) [b6989586621679974134] [c6989586621679974135]
type ZipWithSym3 (a6989586621679978980 :: (~>) a6989586621679974133 ((~>) b6989586621679974134 c6989586621679974135)) (a6989586621679978981 :: [a6989586621679974133]) (a6989586621679978982 :: [b6989586621679974134]) = ZipWith a6989586621679978980 a6989586621679978981 a6989586621679978982
data ZipWith3Sym0 :: forall a6989586621679974129 b6989586621679974130 c6989586621679974131 d6989586621679974132. (~>) ((~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) ((~>) [a6989586621679974129] ((~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132])))
data ZipWith3Sym1 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) :: (~>) [a6989586621679974129] ((~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132]))
data ZipWith3Sym2 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) (a6989586621679978966 :: [a6989586621679974129]) :: (~>) [b6989586621679974130] ((~>) [c6989586621679974131] [d6989586621679974132])
data ZipWith3Sym3 (a6989586621679978965 :: (~>) a6989586621679974129 ((~>) b6989586621679974130 ((~>) c6989586621679974131 d6989586621679974132))) (a6989586621679978966 :: [a6989586621679974129]) (a6989586621679978967 :: [b6989586621679974130]) :: (~>) [c6989586621679974131] [d6989586621679974132]
data UnzipSym0 :: forall a6989586621679974127 b6989586621679974128. (~>) [(a6989586621679974127, b6989586621679974128)] ([a6989586621679974127], [b6989586621679974128])
type UnzipSym1 (a6989586621679978946 :: [(a6989586621679974127, b6989586621679974128)]) = Unzip a6989586621679978946
data UnlinesSym0 :: (~>) [Symbol] Symbol
type UnlinesSym1 (a6989586621679978817 :: [Symbol]) = Unlines a6989586621679978817
data UnwordsSym0 :: (~>) [Symbol] Symbol
type UnwordsSym1 (a6989586621679978806 :: [Symbol]) = Unwords a6989586621679978806
-- | 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!
module Data.Singletons.CustomStar
-- | Produce a representation and singleton for the collection of types
-- given.
--
-- A datatype Rep is created, with one constructor per type in
-- the declared universe. When this type is promoted by the singletons
-- library, the constructors become full types in *, not just
-- promoted data constructors.
--
-- For example,
--
--
-- $(singletonStar [''Nat, ''Bool, ''Maybe])
--
--
-- generates the following:
--
--
-- data Rep = Nat | Bool | Maybe Rep deriving (Eq, Ord, Read, Show)
--
--
-- and its singleton. However, because Rep is promoted to
-- *, the singleton is perhaps slightly unexpected:
--
--
-- data SRep (a :: *) where
-- SNat :: Sing Nat
-- SBool :: Sing Bool
-- SMaybe :: Sing a -> Sing (Maybe a)
-- type instance Sing = SRep
--
--
-- The unexpected part is that Nat, Bool, and
-- Maybe above are the real Nat, Bool, and
-- Maybe, not just promoted data constructors.
--
-- Please note that this function is very experimental. Use at
-- your own risk.
singletonStar :: DsMonad q => [Name] -> q [Dec]