-- 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.5.1 -- | 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) :: forall k. () => k -> k -> Type [Refl] :: forall k (a :: k) (b :: 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 instance Data.Singletons.Decide.SDecide k => Data.Type.Equality.TestEquality Data.Singletons.Internal.Sing instance Data.Singletons.Decide.SDecide k => Data.Type.Coercion.TestCoercion Data.Singletons.Internal.Sing 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 data family. data family Sing :: k -> Type type SVoid = (Sing :: Void -> Type) type family Absurd (a_a1pZt :: Void) :: a_a1pZq sAbsurd :: forall a_a1pZq (t_a1pZz :: Void). Sing t_a1pZz -> Sing (Apply AbsurdSym0 t_a1pZz :: a_a1pZq) data AbsurdSym0 :: forall a6989586621679348028. (~>) Void a6989586621679348028 type AbsurdSym1 (a6989586621679348031 :: Void) = Absurd a6989586621679348031 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 data family. data family Sing :: k -> Type type STuple0 = (Sing :: () -> Type) type STuple2 = (Sing :: (a_11, b_12) -> Type) type STuple3 = (Sing :: (a_11, b_12, c_13) -> Type) type STuple4 = (Sing :: (a_11, b_12, c_13, d_14) -> Type) type STuple5 = (Sing :: (a_11, b_12, c_13, d_14, e_15) -> Type) type STuple6 = (Sing :: (a_11, b_12, c_13, d_14, e_15, f_16) -> Type) type STuple7 = (Sing :: (a_11, b_12, c_13, d_14, e_15, f_16, g_17) -> Type) type family Fst (a_a1qed :: (a_a1qcF, b_a1qcG)) :: a_a1qcF sFst :: forall a_a1qcF b_a1qcG (t_a1qew :: (a_a1qcF, b_a1qcG)). Sing t_a1qew -> Sing (Apply FstSym0 t_a1qew :: a_a1qcF) type family Snd (a_a1qea :: (a_a1qcD, b_a1qcE)) :: b_a1qcE sSnd :: forall a_a1qcD b_a1qcE (t_a1qeu :: (a_a1qcD, b_a1qcE)). Sing t_a1qeu -> Sing (Apply SndSym0 t_a1qeu :: b_a1qcE) type family Curry (a_a1qe1 :: (~>) (a_a1qcA, b_a1qcB) c_a1qcC) (a_a1qe2 :: a_a1qcA) (a_a1qe3 :: b_a1qcB) :: c_a1qcC sCurry :: forall a_a1qcA b_a1qcB c_a1qcC (t_a1qeo :: (~>) (a_a1qcA, b_a1qcB) c_a1qcC) (t_a1qep :: a_a1qcA) (t_a1qeq :: b_a1qcB). Sing t_a1qeo -> Sing t_a1qep -> Sing t_a1qeq -> Sing (Apply (Apply (Apply CurrySym0 t_a1qeo) t_a1qep) t_a1qeq :: c_a1qcC) type family Uncurry (a_a1qeg :: (~>) a_a1qcx ((~>) b_a1qcy c_a1qcz)) (a_a1qeh :: (a_a1qcx, b_a1qcy)) :: c_a1qcz sUncurry :: forall a_a1qcx b_a1qcy c_a1qcz (t_a1qey :: (~>) a_a1qcx ((~>) b_a1qcy c_a1qcz)) (t_a1qez :: (a_a1qcx, b_a1qcy)). Sing t_a1qey -> Sing t_a1qez -> Sing (Apply (Apply UncurrySym0 t_a1qey) t_a1qez :: c_a1qcz) type family Swap (a_a1qdX :: (a_a1qcv, b_a1qcw)) :: (b_a1qcw, a_a1qcv) sSwap :: forall a_a1qcv b_a1qcw (t_a1qem :: (a_a1qcv, b_a1qcw)). Sing t_a1qem -> Sing (Apply SwapSym0 t_a1qem :: (b_a1qcw, a_a1qcv)) type Tuple0Sym0 = '() data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type))) data Tuple2Sym1 (t6989586621679291753 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679291753 :: a3530822107858468865) (t6989586621679291754 :: b3530822107858468866) = '(t6989586621679291753, t6989586621679291754) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679291784 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679291784 :: (a3530822107858468865 :: Type)) (t6989586621679291785 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679291784 :: a3530822107858468865) (t6989586621679291785 :: b3530822107858468866) (t6989586621679291786 :: c3530822107858468867) = '(t6989586621679291784, t6989586621679291785, t6989586621679291786) 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 (t6989586621679291831 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) (t6989586621679291833 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679291831 :: a3530822107858468865) (t6989586621679291832 :: b3530822107858468866) (t6989586621679291833 :: c3530822107858468867) (t6989586621679291834 :: d3530822107858468868) = '(t6989586621679291831, t6989586621679291832, t6989586621679291833, t6989586621679291834) 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 (t6989586621679291896 :: (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 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) (t6989586621679291899 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679291896 :: a3530822107858468865) (t6989586621679291897 :: b3530822107858468866) (t6989586621679291898 :: c3530822107858468867) (t6989586621679291899 :: d3530822107858468868) (t6989586621679291900 :: e3530822107858468869) = '(t6989586621679291896, t6989586621679291897, t6989586621679291898, t6989586621679291899, t6989586621679291900) 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 (t6989586621679291981 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) (t6989586621679291985 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679291981 :: a3530822107858468865) (t6989586621679291982 :: b3530822107858468866) (t6989586621679291983 :: c3530822107858468867) (t6989586621679291984 :: d3530822107858468868) (t6989586621679291985 :: e3530822107858468869) (t6989586621679291986 :: f3530822107858468870) = '(t6989586621679291981, t6989586621679291982, t6989586621679291983, t6989586621679291984, t6989586621679291985, t6989586621679291986) 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 (t6989586621679292088 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (e3530822107858468869 :: Type)) (t6989586621679292093 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679292088 :: a3530822107858468865) (t6989586621679292089 :: b3530822107858468866) (t6989586621679292090 :: c3530822107858468867) (t6989586621679292091 :: d3530822107858468868) (t6989586621679292092 :: e3530822107858468869) (t6989586621679292093 :: f3530822107858468870) (t6989586621679292094 :: g3530822107858468871) = '(t6989586621679292088, t6989586621679292089, t6989586621679292090, t6989586621679292091, t6989586621679292092, t6989586621679292093, t6989586621679292094) data FstSym0 :: forall a6989586621679348849 b6989586621679348850. (~>) (a6989586621679348849, b6989586621679348850) a6989586621679348849 type FstSym1 (a6989586621679348945 :: (a6989586621679348849, b6989586621679348850)) = Fst a6989586621679348945 data SndSym0 :: forall a6989586621679348847 b6989586621679348848. (~>) (a6989586621679348847, b6989586621679348848) b6989586621679348848 type SndSym1 (a6989586621679348942 :: (a6989586621679348847, b6989586621679348848)) = Snd a6989586621679348942 data CurrySym0 :: forall a6989586621679348844 b6989586621679348845 c6989586621679348846. (~>) ((~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) ((~>) a6989586621679348844 ((~>) b6989586621679348845 c6989586621679348846)) data CurrySym1 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) :: (~>) a6989586621679348844 ((~>) b6989586621679348845 c6989586621679348846) data CurrySym2 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) (a6989586621679348934 :: a6989586621679348844) :: (~>) b6989586621679348845 c6989586621679348846 type CurrySym3 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) (a6989586621679348934 :: a6989586621679348844) (a6989586621679348935 :: b6989586621679348845) = Curry a6989586621679348933 a6989586621679348934 a6989586621679348935 data UncurrySym0 :: forall a6989586621679348841 b6989586621679348842 c6989586621679348843. (~>) ((~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) ((~>) (a6989586621679348841, b6989586621679348842) c6989586621679348843) data UncurrySym1 (a6989586621679348948 :: (~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) :: (~>) (a6989586621679348841, b6989586621679348842) c6989586621679348843 type UncurrySym2 (a6989586621679348948 :: (~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) (a6989586621679348949 :: (a6989586621679348841, b6989586621679348842)) = Uncurry a6989586621679348948 a6989586621679348949 data SwapSym0 :: forall a6989586621679348839 b6989586621679348840. (~>) (a6989586621679348839, b6989586621679348840) (b6989586621679348840, a6989586621679348839) type SwapSym1 (a6989586621679348929 :: (a6989586621679348839, b6989586621679348840)) = Swap a6989586621679348929 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.UncurrySym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.UncurrySym0 instance forall a6989586621679348841 b6989586621679348842 c6989586621679348843 (a6989586621679348948 :: a6989586621679348841 Data.Singletons.Internal.~> (b6989586621679348842 Data.Singletons.Internal.~> c6989586621679348843)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.UncurrySym1 a6989586621679348948) 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 a6989586621679348844 b6989586621679348845 c6989586621679348846 (a6989586621679348933 :: (a6989586621679348844, b6989586621679348845) Data.Singletons.Internal.~> c6989586621679348846). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym1 a6989586621679348933) 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 a6989586621679348844 b6989586621679348845 c6989586621679348846 (a6989586621679348934 :: (a6989586621679348844, b6989586621679348845) Data.Singletons.Internal.~> c6989586621679348846) (a6989586621679348933 :: a6989586621679348844). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym2 a6989586621679348934 a6989586621679348933) 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 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 Σ (s :: Type) (t :: s ~> Type) = Sigma s t -- | Project the first element out of a dependent pair. projSigma1 :: forall s t. SingKind s => Sigma s t -> Demote s -- | Project the second element out of a dependent pair. -- -- In an ideal setting, the type of projSigma2 would be closer to: -- --
--   projSigma2 :: Sing (sig :: Sigma s t) -> t @@ ProjSigma1 sig
--   
-- -- But promoting projSigma1 to a type family is not a simple task. -- Instead, we do the next-best thing, which is to use Church-style -- elimination. 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 data ΣSym0 s6989586621679353873 data ΣSym1 (s6989586621679353873 :: Type) t6989586621679353874 type ΣSym2 (s6989586621679353873 :: Type) (t6989586621679353874 :: (~>) s6989586621679353873 Type) = Σ s6989586621679353873 t6989586621679353874 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Sigma.ΣSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Sigma.ΣSym1 s2) -- | 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 data family. data family Sing :: k -> Type type SBool = (Sing :: Bool -> Type) -- | 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_a1rUg -> a_a1rUg -> Bool -> a_a1rUg type family Bool_ (a_a1rUm :: a_a1rUg) (a_a1rUn :: a_a1rUg) (a_a1rUo :: Bool) :: a_a1rUg sBool_ :: forall a_a1rUg (t_a1rUw :: a_a1rUg) (t_a1rUx :: a_a1rUg) (t_a1rUy :: Bool). Sing t_a1rUw -> Sing t_a1rUx -> Sing t_a1rUy -> Sing (Apply (Apply (Apply Bool_Sym0 t_a1rUw) t_a1rUx) t_a1rUy :: a_a1rUg) type family Otherwise :: Bool sOtherwise :: Sing (OtherwiseSym0 :: Bool) type TrueSym0 = 'True type FalseSym0 = 'False data NotSym0 :: (~>) Bool Bool type NotSym1 (a6989586621679356688 :: Bool) = Not a6989586621679356688 data (&&@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 3 &&@#@$ data (&&@#@$$) (a6989586621679356147 :: Bool) :: (~>) Bool Bool infixr 3 &&@#@$$ type (&&@#@$$$) (a6989586621679356147 :: Bool) (b6989586621679356148 :: Bool) = (&&) a6989586621679356147 b6989586621679356148 data (||@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 2 ||@#@$ data (||@#@$$) (a6989586621679356388 :: Bool) :: (~>) Bool Bool infixr 2 ||@#@$$ type (||@#@$$$) (a6989586621679356388 :: Bool) (b6989586621679356389 :: Bool) = (||) a6989586621679356388 b6989586621679356389 data Bool_Sym0 :: forall a6989586621679355396. (~>) a6989586621679355396 ((~>) a6989586621679355396 ((~>) Bool a6989586621679355396)) data Bool_Sym1 (a6989586621679355402 :: a6989586621679355396) :: (~>) a6989586621679355396 ((~>) Bool a6989586621679355396) data Bool_Sym2 (a6989586621679355402 :: a6989586621679355396) (a6989586621679355403 :: a6989586621679355396) :: (~>) Bool a6989586621679355396 type Bool_Sym3 (a6989586621679355402 :: a6989586621679355396) (a6989586621679355403 :: a6989586621679355396) (a6989586621679355404 :: Bool) = Bool_ a6989586621679355402 a6989586621679355403 a6989586621679355404 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.||@#@$$) a6989586621679356388) 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.&&@#@$$) a6989586621679356147) 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 a6989586621679355396 (a6989586621679355402 :: a6989586621679355396). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym1 a6989586621679355402) instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.Bool_Sym1 d) instance forall a6989586621679355396 (a6989586621679355403 :: a6989586621679355396) (a6989586621679355402 :: a6989586621679355396). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym2 a6989586621679355403 a6989586621679355402) 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 '(DTE.==)' type -- family from Data.Type.Equality in base, as '(DTE.==)' -- 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 -- '(DTE.==)'. type family DefaultEq (a :: k) (b :: k) :: Bool data (==@#@$) :: forall a6989586621679359331. (~>) a6989586621679359331 ((~>) a6989586621679359331 Bool) infix 4 ==@#@$ data (==@#@$$) (x6989586621679359332 :: a6989586621679359331) :: (~>) a6989586621679359331 Bool infix 4 ==@#@$$ type (==@#@$$$) (x6989586621679359332 :: a6989586621679359331) (y6989586621679359333 :: a6989586621679359331) = (==) x6989586621679359332 y6989586621679359333 data (/=@#@$) :: forall a6989586621679359331. (~>) a6989586621679359331 ((~>) a6989586621679359331 Bool) infix 4 /=@#@$ data (/=@#@$$) (x6989586621679359334 :: a6989586621679359331) :: (~>) a6989586621679359331 Bool infix 4 /=@#@$$ type (/=@#@$$$) (x6989586621679359334 :: a6989586621679359331) (y6989586621679359335 :: a6989586621679359331) = (/=) x6989586621679359334 y6989586621679359335 data DefaultEqSym0 :: forall k6989586621679359325. (~>) k6989586621679359325 ((~>) k6989586621679359325 Bool) data DefaultEqSym1 (a6989586621679359326 :: k6989586621679359325) :: (~>) k6989586621679359325 Bool type DefaultEqSym2 (a6989586621679359326 :: k6989586621679359325) (b6989586621679359327 :: k6989586621679359325) = DefaultEq a6989586621679359326 b6989586621679359327 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 k6989586621679359325 (a6989586621679359326 :: k6989586621679359325). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.DefaultEqSym1 a6989586621679359326) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq./=@#@$) instance forall a6989586621679359331 (x6989586621679359334 :: a6989586621679359331). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq./=@#@$$) x6989586621679359334) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.==@#@$) instance forall a6989586621679359331 (x6989586621679359332 :: a6989586621679359331). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq.==@#@$$) x6989586621679359332) -- | 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 data family. data 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.Show.Show (Data.Singletons.Internal.Sing a) instance GHC.Classes.Ord (Data.Singletons.Internal.Sing a) instance GHC.Classes.Eq (Data.Singletons.Internal.Sing a) 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 PEq a_a1wCM => POrd (a_a1wCM :: Type) where { type family Compare (arg_a1wEi :: a_a1wCM) (arg_a1wEj :: a_a1wCM) :: Ordering; type family (<) (arg_a1wEm :: a_a1wCM) (arg_a1wEn :: a_a1wCM) :: Bool; type family (<=) (arg_a1wEq :: a_a1wCM) (arg_a1wEr :: a_a1wCM) :: Bool; type family (>) (arg_a1wEu :: a_a1wCM) (arg_a1wEv :: a_a1wCM) :: Bool; type family (>=) (arg_a1wEy :: a_a1wCM) (arg_a1wEz :: a_a1wCM) :: Bool; type family Max (arg_a1wEC :: a_a1wCM) (arg_a1wED :: a_a1wCM) :: a_a1wCM; type family Min (arg_a1wEG :: a_a1wCM) (arg_a1wEH :: a_a1wCM) :: a_a1wCM; type Compare a_a1wF2 a_a1wF3 = Apply (Apply Compare_6989586621679373674Sym0 a_a1wF2) a_a1wF3; type (<) a_a1wFk a_a1wFl = Apply (Apply TFHelper_6989586621679373692Sym0 a_a1wFk) a_a1wFl; type (<=) a_a1wFC a_a1wFD = Apply (Apply TFHelper_6989586621679373710Sym0 a_a1wFC) a_a1wFD; type (>) a_a1wFU a_a1wFV = Apply (Apply TFHelper_6989586621679373728Sym0 a_a1wFU) a_a1wFV; type (>=) a_a1wGc a_a1wGd = Apply (Apply TFHelper_6989586621679373746Sym0 a_a1wGc) a_a1wGd; type Max a_a1wGu a_a1wGv = Apply (Apply Max_6989586621679373764Sym0 a_a1wGu) a_a1wGv; type Min a_a1wGM a_a1wGN = Apply (Apply Min_6989586621679373782Sym0 a_a1wGM) a_a1wGN; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1wCM => SOrd a_a1wCM sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) ~ Apply (Apply Compare_6989586621679373674Sym0 t_a1wH1) t_a1wH2) => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) ~ Apply (Apply TFHelper_6989586621679373692Sym0 t_a1wH5) t_a1wH6) => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) ~ Apply (Apply TFHelper_6989586621679373710Sym0 t_a1wH9) t_a1wHa) => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) ~ Apply (Apply TFHelper_6989586621679373728Sym0 t_a1wHd) t_a1wHe) => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) ~ Apply (Apply TFHelper_6989586621679373746Sym0 t_a1wHh) t_a1wHi) => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) ~ Apply (Apply Max_6989586621679373764Sym0 t_a1wHl) t_a1wHm) => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) ~ Apply (Apply Min_6989586621679373782Sym0 t_a1wHp) t_a1wHq) => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= type family Comparing (a_a1wE9 :: (~>) b_a1wCC a_a1wCB) (a_a1wEa :: b_a1wCC) (a_a1wEb :: b_a1wCC) :: Ordering sComparing :: forall a_a1wCB b_a1wCC (t_a1wGS :: (~>) b_a1wCC a_a1wCB) (t_a1wGT :: b_a1wCC) (t_a1wGU :: b_a1wCC). SOrd a_a1wCB => Sing t_a1wGS -> Sing t_a1wGT -> Sing t_a1wGU -> Sing (Apply (Apply (Apply ComparingSym0 t_a1wGS) t_a1wGT) t_a1wGU :: Ordering) thenCmp :: Ordering -> Ordering -> Ordering type family ThenCmp (a_a1zmd :: Ordering) (a_a1zme :: Ordering) :: Ordering sThenCmp :: forall (t_a1zmi :: Ordering) (t_a1zmj :: Ordering). Sing t_a1zmi -> Sing t_a1zmj -> Sing (Apply (Apply ThenCmpSym0 t_a1zmi) t_a1zmj :: Ordering) -- | The singleton kind-indexed data family. data family Sing :: k -> Type type SOrdering = (Sing :: Ordering -> Type) type SDown = (Sing :: Down a_ajRi -> Type) data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering) data ThenCmpSym1 (a6989586621679384037 :: Ordering) :: (~>) Ordering Ordering type ThenCmpSym2 (a6989586621679384037 :: Ordering) (a6989586621679384038 :: Ordering) = ThenCmp a6989586621679384037 a6989586621679384038 type LTSym0 = 'LT type EQSym0 = 'EQ type GTSym0 = 'GT data CompareSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Ordering) data CompareSym1 (arg6989586621679373626 :: a6989586621679373532) :: (~>) a6989586621679373532 Ordering type CompareSym2 (arg6989586621679373626 :: a6989586621679373532) (arg6989586621679373627 :: a6989586621679373532) = Compare arg6989586621679373626 arg6989586621679373627 data (<@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 <@#@$ data (<@#@$$) (arg6989586621679373630 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 <@#@$$ type (<@#@$$$) (arg6989586621679373630 :: a6989586621679373532) (arg6989586621679373631 :: a6989586621679373532) = (<) arg6989586621679373630 arg6989586621679373631 data (<=@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 <=@#@$ data (<=@#@$$) (arg6989586621679373634 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 <=@#@$$ type (<=@#@$$$) (arg6989586621679373634 :: a6989586621679373532) (arg6989586621679373635 :: a6989586621679373532) = (<=) arg6989586621679373634 arg6989586621679373635 data (>@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679373638 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679373638 :: a6989586621679373532) (arg6989586621679373639 :: a6989586621679373532) = (>) arg6989586621679373638 arg6989586621679373639 data (>=@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 >=@#@$ data (>=@#@$$) (arg6989586621679373642 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 >=@#@$$ type (>=@#@$$$) (arg6989586621679373642 :: a6989586621679373532) (arg6989586621679373643 :: a6989586621679373532) = (>=) arg6989586621679373642 arg6989586621679373643 data MaxSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 a6989586621679373532) data MaxSym1 (arg6989586621679373646 :: a6989586621679373532) :: (~>) a6989586621679373532 a6989586621679373532 type MaxSym2 (arg6989586621679373646 :: a6989586621679373532) (arg6989586621679373647 :: a6989586621679373532) = Max arg6989586621679373646 arg6989586621679373647 data MinSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 a6989586621679373532) data MinSym1 (arg6989586621679373650 :: a6989586621679373532) :: (~>) a6989586621679373532 a6989586621679373532 type MinSym2 (arg6989586621679373650 :: a6989586621679373532) (arg6989586621679373651 :: a6989586621679373532) = Min arg6989586621679373650 arg6989586621679373651 data ComparingSym0 :: forall a6989586621679373521 b6989586621679373522. (~>) ((~>) b6989586621679373522 a6989586621679373521) ((~>) b6989586621679373522 ((~>) b6989586621679373522 Ordering)) data ComparingSym1 (a6989586621679373617 :: (~>) b6989586621679373522 a6989586621679373521) :: (~>) b6989586621679373522 ((~>) b6989586621679373522 Ordering) data ComparingSym2 (a6989586621679373617 :: (~>) b6989586621679373522 a6989586621679373521) (a6989586621679373618 :: b6989586621679373522) :: (~>) b6989586621679373522 Ordering type ComparingSym3 (a6989586621679373617 :: (~>) b6989586621679373522 a6989586621679373521) (a6989586621679373618 :: b6989586621679373522) (a6989586621679373619 :: b6989586621679373522) = Comparing a6989586621679373617 a6989586621679373618 a6989586621679373619 data DownSym0 :: forall (a6989586621679086132 :: Type). (~>) a6989586621679086132 (Down (a6989586621679086132 :: Type)) type DownSym1 (t6989586621679382719 :: a6989586621679086132) = 'Down t6989586621679382719 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384954Sym0 instance Data.Singletons.Prelude.Ord.POrd () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384954Sym1 a6989586621679384952) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384944Sym0 instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384944Sym1 a6989586621679384942) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384934Sym0 instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384934Sym1 a6989586621679384932) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384922Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Functor.Identity.Identity a) instance forall a6989586621679081595 (a6989586621679384920 :: Data.Functor.Identity.Identity a6989586621679081595). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384922Sym1 a6989586621679384920) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384889Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f, g) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 g3530822107858468871 (a6989586621679384887 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870, g3530822107858468871)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384889Sym1 a6989586621679384887) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384804Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 (a6989586621679384802 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384804Sym1 a6989586621679384802) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384730Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 (a6989586621679384728 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384730Sym1 a6989586621679384728) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384667Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 (a6989586621679384665 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384667Sym1 a6989586621679384665) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384615Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 (a6989586621679384613 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384615Sym1 a6989586621679384613) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384574Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b) instance forall a3530822107858468865 b3530822107858468866 (a6989586621679384572 :: (a3530822107858468865, b3530822107858468866)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384574Sym1 a6989586621679384572) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384546Sym0 instance Data.Singletons.Prelude.Ord.POrd Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384546Sym1 a6989586621679384544) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384532Sym0 instance Data.Singletons.Prelude.Ord.POrd (GHC.Base.NonEmpty a) instance forall a6989586621679065577 (a6989586621679384530 :: GHC.Base.NonEmpty a6989586621679065577). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384532Sym1 a6989586621679384530) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384503Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Either.Either a b) instance forall a6989586621679082630 b6989586621679082631 (a6989586621679384501 :: Data.Either.Either a6989586621679082630 b6989586621679082631). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384503Sym1 a6989586621679384501) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384457Sym0 instance Data.Singletons.Prelude.Ord.POrd [a] instance forall a3530822107858468865 (a6989586621679384455 :: [a3530822107858468865]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384457Sym1 a6989586621679384455) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679384423Sym0 instance Data.Singletons.Prelude.Ord.POrd (GHC.Maybe.Maybe a) instance forall a3530822107858468865 (a6989586621679384421 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679384423Sym1 a6989586621679384421) 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 a6989586621679384037) 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_6989586621679383232Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Ord.Down a) instance forall a6989586621679383204 (a6989586621679383230 :: Data.Ord.Down a6989586621679383204). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679383232Sym1 a6989586621679383230) 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.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.DownSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Ord.DownSym0 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.Internal.TyCon1 'Data.Ord.Down) 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 b6989586621679373522 a6989586621679373521 (a6989586621679373617 :: b6989586621679373522 Data.Singletons.Internal.~> a6989586621679373521). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym1 a6989586621679373617) instance forall b6989586621679373522 a6989586621679373521 (a6989586621679373618 :: b6989586621679373522 Data.Singletons.Internal.~> a6989586621679373521) (a6989586621679373617 :: b6989586621679373522). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym2 a6989586621679373618 a6989586621679373617) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373684Scrutinee_6989586621679373554Sym0 instance forall k1 (x6989586621679373682 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373684Scrutinee_6989586621679373554Sym1 x6989586621679373682) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373702Scrutinee_6989586621679373556Sym0 instance forall k1 (x6989586621679373700 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373702Scrutinee_6989586621679373556Sym1 x6989586621679373700) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373720Scrutinee_6989586621679373558Sym0 instance forall k1 (x6989586621679373718 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373720Scrutinee_6989586621679373558Sym1 x6989586621679373718) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373738Scrutinee_6989586621679373560Sym0 instance forall k1 (x6989586621679373736 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373738Scrutinee_6989586621679373560Sym1 x6989586621679373736) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<@#@$) instance forall a6989586621679373532 (arg6989586621679373630 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<@#@$$) arg6989586621679373630) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373665Scrutinee_6989586621679373552Sym0 instance forall k1 (x6989586621679373658 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373665Scrutinee_6989586621679373552Sym1 x6989586621679373658) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373756Scrutinee_6989586621679373562Sym0 instance forall k1 (x6989586621679373754 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373756Scrutinee_6989586621679373562Sym1 x6989586621679373754) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373774Scrutinee_6989586621679373564Sym0 instance forall k1 (x6989586621679373772 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373774Scrutinee_6989586621679373564Sym1 x6989586621679373772) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>@#@$) instance forall a6989586621679373532 (arg6989586621679373638 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>@#@$$) arg6989586621679373638) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>=@#@$) instance forall a6989586621679373532 (arg6989586621679373642 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>=@#@$$) arg6989586621679373642) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MaxSym0 instance forall a6989586621679373532 (arg6989586621679373646 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MaxSym1 arg6989586621679373646) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MinSym0 instance forall a6989586621679373532 (arg6989586621679373650 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MinSym1 arg6989586621679373650) instance forall a6989586621679373532 (arg6989586621679373626 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.CompareSym1 arg6989586621679373626) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.CompareSym0 instance forall a6989586621679373532 (arg6989586621679373634 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<=@#@$$) arg6989586621679373634) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<=@#@$) instance forall a6989586621679373532 (a6989586621679373672 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679373674Sym1 a6989586621679373672) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679373674Sym0 instance forall a6989586621679373532 (a6989586621679373690 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679373692Sym1 a6989586621679373690) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679373692Sym0 instance forall a6989586621679373532 (a6989586621679373708 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679373710Sym1 a6989586621679373708) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679373710Sym0 instance forall a6989586621679373532 (a6989586621679373726 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679373728Sym1 a6989586621679373726) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679373728Sym0 instance forall a6989586621679373532 (a6989586621679373744 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679373746Sym1 a6989586621679373744) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679373746Sym0 instance forall a6989586621679373532 (a6989586621679373762 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Max_6989586621679373764Sym1 a6989586621679373762) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Max_6989586621679373764Sym0 instance forall a6989586621679373532 (a6989586621679373780 :: a6989586621679373532). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Min_6989586621679373782Sym1 a6989586621679373780) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Min_6989586621679373782Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679373660Scrutinee_6989586621679373550Sym0 instance forall k1 (x6989586621679373658 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679373660Scrutinee_6989586621679373550Sym1 x6989586621679373658) -- | 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: -- --
--   deriving instance ??? => Show (Sing (x :: [k]))
--   
-- -- 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. Thus, our final instance looks -- like: -- --
--   deriving instance (forall a. Show (Sing (a :: k))) => Show (Sing (x :: [k]))
--   
-- -- Because that quantified constraint is somewhat lengthy, we provide the -- ShowSing class synonym as a convenient shorthand. Thus, the -- above instance is equivalent to: -- --
--   deriving instance ShowSing k => Show (Sing (x :: [k]))
--   
-- -- When singling a derived Show instance, singletons will -- also derive 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: -- -- -- -- What a bargain! class (forall (z :: k). Show (Sing z)) => ShowSing k instance forall a (z :: GHC.Maybe.Maybe a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: [a]). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing [a]) => GHC.Show.Show (Data.Singletons.Internal.Sing 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.Internal.Sing z) instance forall a (z :: GHC.Base.NonEmpty a). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing [a]) => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a b (z :: (a, b)). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Show.Show (Data.Singletons.Internal.Sing 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.Internal.Sing 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.Internal.Sing 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.Internal.Sing 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.Internal.Sing 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.Internal.Sing z) instance forall a (z :: Data.Functor.Identity.Identity a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance GHC.Show.Show (Data.Singletons.Internal.Sing z) instance GHC.Show.Show (Data.Singletons.Internal.Sing z) instance GHC.Show.Show (Data.Singletons.Internal.Sing z) instance (forall (z :: k). GHC.Show.Show (Data.Singletons.Internal.Sing z)) => Data.Singletons.ShowSing.ShowSing k 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 data family. data family Sing :: k -> Type -- | Kind-restricted synonym for Sing for Nats type SNat (x :: Nat) = Sing x -- | Kind-restricted synonym for Sing for Symbols type SSymbol (x :: Symbol) = Sing x -- | 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 :: 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 :: KnownSymbol n => proxy n -> String -- | Exponentiation of type-level naturals. type family (^) (a :: Nat) (b :: Nat) :: Nat infixr 8 ^ -- | The singleton analogue of '(TN.^)' 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_a1XXe :: Nat) (a_a1XXf :: Nat) :: (Nat, Nat) sDivMod :: Sing x -> Sing y -> Sing (DivMod x y) type family Quot (a_a1XX8 :: Nat) (a_a1XX9 :: Nat) :: Nat infixl 7 `Quot` sQuot :: Sing x -> Sing y -> Sing (Quot x y) infixl 7 `sQuot` type family Rem (a_a1XWY :: Nat) (a_a1XWZ :: Nat) :: Nat infixl 7 `Rem` sRem :: Sing x -> Sing y -> Sing (Rem x y) infixl 7 `sRem` type family QuotRem (a_a1XXo :: Nat) (a_a1XXp :: Nat) :: (Nat, Nat) sQuotRem :: Sing x -> Sing y -> Sing (QuotRem x y) data ErrorSym0 :: forall k06989586621679458997 k6989586621679458996. (~>) k06989586621679458997 k6989586621679458996 type ErrorSym1 (str6989586621679458998 :: k06989586621679458997) = Error str6989586621679458998 data ErrorWithoutStackTraceSym0 :: forall k06989586621679460047 k6989586621679460046. (~>) k06989586621679460047 k6989586621679460046 type ErrorWithoutStackTraceSym1 (str6989586621679460048 :: k06989586621679460047) = ErrorWithoutStackTrace str6989586621679460048 type UndefinedSym0 = Undefined data KnownNatSym0 :: (~>) Nat Constraint type KnownNatSym1 (n6989586621679459252 :: Nat) = KnownNat n6989586621679459252 data KnownSymbolSym0 :: (~>) Symbol Constraint type KnownSymbolSym1 (n6989586621679459192 :: Symbol) = KnownSymbol n6989586621679459192 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 (a6989586621679478588 :: Nat) :: (~>) Nat (Nat, Nat) type DivModSym2 (a6989586621679478588 :: Nat) (a6989586621679478589 :: Nat) = DivMod a6989586621679478588 a6989586621679478589 data QuotSym0 :: (~>) Nat ((~>) Nat Nat) infixl 7 `QuotSym0` data QuotSym1 (a6989586621679478582 :: Nat) :: (~>) Nat Nat infixl 7 `QuotSym1` type QuotSym2 (a6989586621679478582 :: Nat) (a6989586621679478583 :: Nat) = Quot a6989586621679478582 a6989586621679478583 data RemSym0 :: (~>) Nat ((~>) Nat Nat) infixl 7 `RemSym0` data RemSym1 (a6989586621679478572 :: Nat) :: (~>) Nat Nat infixl 7 `RemSym1` type RemSym2 (a6989586621679478572 :: Nat) (a6989586621679478573 :: Nat) = Rem a6989586621679478572 a6989586621679478573 data QuotRemSym0 :: (~>) Nat ((~>) Nat (Nat, Nat)) data QuotRemSym1 (a6989586621679478598 :: Nat) :: (~>) Nat (Nat, Nat) type QuotRemSym2 (a6989586621679478598 :: Nat) (a6989586621679478599 :: Nat) = QuotRem a6989586621679478598 a6989586621679478599 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotRemSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotRemSym1 a6989586621679478598) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.DivModSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.DivModSym1 a6989586621679478588) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotSym1 a6989586621679478582) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.RemSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.RemSym1 a6989586621679478572) 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 data family. data family Sing :: k -> Type type SMaybe = (Sing :: Maybe a_11 -> Type) maybe_ :: b_a1ZGn -> (a_a1ZGo -> b_a1ZGn) -> Maybe a_a1ZGo -> b_a1ZGn type family Maybe_ (a_a1ZGF :: b_a1ZGn) (a_a1ZGG :: (~>) a_a1ZGo b_a1ZGn) (a_a1ZGH :: Maybe a_a1ZGo) :: b_a1ZGn sMaybe_ :: forall b_a1ZGn a_a1ZGo (t_a1ZGO :: b_a1ZGn) (t_a1ZGP :: (~>) a_a1ZGo b_a1ZGn) (t_a1ZGQ :: Maybe a_a1ZGo). Sing t_a1ZGO -> Sing t_a1ZGP -> Sing t_a1ZGQ -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a1ZGO) t_a1ZGP) t_a1ZGQ :: b_a1ZGn) type family IsJust (a_a206J :: Maybe a_a203r) :: Bool sIsJust :: forall a_a203r (t_a2073 :: Maybe a_a203r). Sing t_a2073 -> Sing (Apply IsJustSym0 t_a2073 :: Bool) type family IsNothing (a_a206H :: Maybe a_a203q) :: Bool sIsNothing :: forall a_a203q (t_a2071 :: Maybe a_a203q). Sing t_a2071 -> Sing (Apply IsNothingSym0 t_a2071 :: Bool) type family FromJust (a_a206E :: Maybe a_a203p) :: a_a203p sFromJust :: forall a_a203p (t_a206Z :: Maybe a_a203p). Sing t_a206Z -> Sing (Apply FromJustSym0 t_a206Z :: a_a203p) type family FromMaybe (a_a206u :: a_a203o) (a_a206v :: Maybe a_a203o) :: a_a203o sFromMaybe :: forall a_a203o (t_a206V :: a_a203o) (t_a206W :: Maybe a_a203o). Sing t_a206V -> Sing t_a206W -> Sing (Apply (Apply FromMaybeSym0 t_a206V) t_a206W :: a_a203o) type family ListToMaybe (a_a206o :: [a_a203m]) :: Maybe a_a203m sListToMaybe :: forall a_a203m (t_a206R :: [a_a203m]). Sing t_a206R -> Sing (Apply ListToMaybeSym0 t_a206R :: Maybe a_a203m) type family MaybeToList (a_a206r :: Maybe a_a203n) :: [a_a203n] sMaybeToList :: forall a_a203n (t_a206T :: Maybe a_a203n). Sing t_a206T -> Sing (Apply MaybeToListSym0 t_a206T :: [a_a203n]) type family CatMaybes (a_a206j :: [Maybe a_a203l]) :: [a_a203l] sCatMaybes :: forall a_a203l (t_a206P :: [Maybe a_a203l]). Sing t_a206P -> Sing (Apply CatMaybesSym0 t_a206P :: [a_a203l]) type family MapMaybe (a_a2060 :: (~>) a_a203j (Maybe b_a203k)) (a_a2061 :: [a_a203j]) :: [b_a203k] sMapMaybe :: forall a_a203j b_a203k (t_a206L :: (~>) a_a203j (Maybe b_a203k)) (t_a206M :: [a_a203j]). Sing t_a206L -> Sing t_a206M -> Sing (Apply (Apply MapMaybeSym0 t_a206L) t_a206M :: [b_a203k]) type NothingSym0 = 'Nothing data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type)) type JustSym1 (t6989586621679291637 :: a3530822107858468865) = 'Just t6989586621679291637 data Maybe_Sym0 :: forall a6989586621679485232 b6989586621679485231. (~>) b6989586621679485231 ((~>) ((~>) a6989586621679485232 b6989586621679485231) ((~>) (Maybe a6989586621679485232) b6989586621679485231)) data Maybe_Sym1 (a6989586621679485249 :: b6989586621679485231) :: forall a6989586621679485232. (~>) ((~>) a6989586621679485232 b6989586621679485231) ((~>) (Maybe a6989586621679485232) b6989586621679485231) data Maybe_Sym2 (a6989586621679485249 :: b6989586621679485231) (a6989586621679485250 :: (~>) a6989586621679485232 b6989586621679485231) :: (~>) (Maybe a6989586621679485232) b6989586621679485231 type Maybe_Sym3 (a6989586621679485249 :: b6989586621679485231) (a6989586621679485250 :: (~>) a6989586621679485232 b6989586621679485231) (a6989586621679485251 :: Maybe a6989586621679485232) = Maybe_ a6989586621679485249 a6989586621679485250 a6989586621679485251 data IsJustSym0 :: forall a6989586621679486661. (~>) (Maybe a6989586621679486661) Bool type IsJustSym1 (a6989586621679486865 :: Maybe a6989586621679486661) = IsJust a6989586621679486865 data IsNothingSym0 :: forall a6989586621679486660. (~>) (Maybe a6989586621679486660) Bool type IsNothingSym1 (a6989586621679486863 :: Maybe a6989586621679486660) = IsNothing a6989586621679486863 data FromJustSym0 :: forall a6989586621679486659. (~>) (Maybe a6989586621679486659) a6989586621679486659 type FromJustSym1 (a6989586621679486860 :: Maybe a6989586621679486659) = FromJust a6989586621679486860 data FromMaybeSym0 :: forall a6989586621679486658. (~>) a6989586621679486658 ((~>) (Maybe a6989586621679486658) a6989586621679486658) data FromMaybeSym1 (a6989586621679486850 :: a6989586621679486658) :: (~>) (Maybe a6989586621679486658) a6989586621679486658 type FromMaybeSym2 (a6989586621679486850 :: a6989586621679486658) (a6989586621679486851 :: Maybe a6989586621679486658) = FromMaybe a6989586621679486850 a6989586621679486851 data ListToMaybeSym0 :: forall a6989586621679486656. (~>) [a6989586621679486656] (Maybe a6989586621679486656) type ListToMaybeSym1 (a6989586621679486844 :: [a6989586621679486656]) = ListToMaybe a6989586621679486844 data MaybeToListSym0 :: forall a6989586621679486657. (~>) (Maybe a6989586621679486657) [a6989586621679486657] type MaybeToListSym1 (a6989586621679486847 :: Maybe a6989586621679486657) = MaybeToList a6989586621679486847 data CatMaybesSym0 :: forall a6989586621679486655. (~>) [Maybe a6989586621679486655] [a6989586621679486655] type CatMaybesSym1 (a6989586621679486839 :: [Maybe a6989586621679486655]) = CatMaybes a6989586621679486839 data MapMaybeSym0 :: forall a6989586621679486653 b6989586621679486654. (~>) ((~>) a6989586621679486653 (Maybe b6989586621679486654)) ((~>) [a6989586621679486653] [b6989586621679486654]) data MapMaybeSym1 (a6989586621679486820 :: (~>) a6989586621679486653 (Maybe b6989586621679486654)) :: (~>) [a6989586621679486653] [b6989586621679486654] type MapMaybeSym2 (a6989586621679486820 :: (~>) a6989586621679486653 (Maybe b6989586621679486654)) (a6989586621679486821 :: [a6989586621679486653]) = MapMaybe a6989586621679486820 a6989586621679486821 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 a6989586621679486658 (a6989586621679486850 :: a6989586621679486658). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.FromMaybeSym1 a6989586621679486850) 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.Let6989586621679486827RsSym0 instance forall k a6989586621679486653 k1 (f6989586621679486824 :: a6989586621679486653 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679486827RsSym1 f6989586621679486824) instance forall k a6989586621679486653 k1 (x6989586621679486825 :: a6989586621679486653 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1) (f6989586621679486824 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679486827RsSym2 x6989586621679486825 f6989586621679486824) instance forall a6989586621679486653 b6989586621679486654 (a6989586621679486820 :: a6989586621679486653 Data.Singletons.Internal.~> GHC.Maybe.Maybe b6989586621679486654). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.MapMaybeSym1 a6989586621679486820) 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.Let6989586621679486831Scrutinee_6989586621679486688Sym0 instance forall k1 k2 k3 (f6989586621679486824 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679486831Scrutinee_6989586621679486688Sym1 f6989586621679486824) instance forall k1 k2 k3 (x6989586621679486825 :: k2 Data.Singletons.Internal.~> k3) (f6989586621679486824 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679486831Scrutinee_6989586621679486688Sym2 x6989586621679486825 f6989586621679486824) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.Maybe_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.Maybe_Sym0 instance forall a6989586621679485232 b6989586621679485231 (a6989586621679485249 :: b6989586621679485231). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym1 a6989586621679485249) instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.Maybe_Sym1 d) instance forall a6989586621679485232 b6989586621679485231 (a6989586621679485250 :: b6989586621679485231) (a6989586621679485249 :: a6989586621679485232 Data.Singletons.Internal.~> b6989586621679485231). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym2 a6989586621679485250 a6989586621679485249) 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 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_a22Ik :: Type) where { type family (+) (arg_a22IE :: a_a22Ik) (arg_a22IF :: a_a22Ik) :: a_a22Ik; type family (-) (arg_a22II :: a_a22Ik) (arg_a22IJ :: a_a22Ik) :: a_a22Ik; type family (*) (arg_a22IM :: a_a22Ik) (arg_a22IN :: a_a22Ik) :: a_a22Ik; type family Negate (arg_a22IQ :: a_a22Ik) :: a_a22Ik; type family Abs (arg_a22IS :: a_a22Ik) :: a_a22Ik; type family Signum (arg_a22IU :: a_a22Ik) :: a_a22Ik; type family FromInteger (arg_a22IW :: Nat) :: a_a22Ik; type (-) a_a22J4 a_a22J5 = Apply (Apply TFHelper_6989586621679496932Sym0 a_a22J4) a_a22J5; type Negate a_a22Jd = Apply Negate_6989586621679496940Sym0 a_a22Jd; } infixl 6 + infixl 7 * infixl 6 - class SNum a_a22Ik (%+) :: forall (t_a22KC :: a_a22Ik) (t_a22KD :: a_a22Ik). SNum a_a22Ik => Sing t_a22KC -> Sing t_a22KD -> Sing (Apply (Apply (+@#@$) t_a22KC) t_a22KD :: a_a22Ik) (%-) :: forall (t_a22KG :: a_a22Ik) (t_a22KH :: a_a22Ik). SNum a_a22Ik => Sing t_a22KG -> Sing t_a22KH -> Sing (Apply (Apply (-@#@$) t_a22KG) t_a22KH :: a_a22Ik) (%*) :: forall (t_a22KK :: a_a22Ik) (t_a22KL :: a_a22Ik). SNum a_a22Ik => Sing t_a22KK -> Sing t_a22KL -> Sing (Apply (Apply (*@#@$) t_a22KK) t_a22KL :: a_a22Ik) sNegate :: forall (t_a22KO :: a_a22Ik). SNum a_a22Ik => Sing t_a22KO -> Sing (Apply NegateSym0 t_a22KO :: a_a22Ik) sAbs :: forall (t_a22KQ :: a_a22Ik). SNum a_a22Ik => Sing t_a22KQ -> Sing (Apply AbsSym0 t_a22KQ :: a_a22Ik) sSignum :: forall (t_a22KS :: a_a22Ik). SNum a_a22Ik => Sing t_a22KS -> Sing (Apply SignumSym0 t_a22KS :: a_a22Ik) sFromInteger :: forall (t_a22KU :: Nat). SNum a_a22Ik => Sing t_a22KU -> Sing (Apply FromIntegerSym0 t_a22KU :: a_a22Ik) (%-) :: forall (t_a22KG :: a_a22Ik) (t_a22KH :: a_a22Ik). (SNum a_a22Ik, (Apply (Apply (-@#@$) t_a22KG) t_a22KH :: a_a22Ik) ~ Apply (Apply TFHelper_6989586621679496932Sym0 t_a22KG) t_a22KH) => Sing t_a22KG -> Sing t_a22KH -> Sing (Apply (Apply (-@#@$) t_a22KG) t_a22KH :: a_a22Ik) sNegate :: forall (t_a22KO :: a_a22Ik). (SNum a_a22Ik, (Apply NegateSym0 t_a22KO :: a_a22Ik) ~ Apply Negate_6989586621679496940Sym0 t_a22KO) => Sing t_a22KO -> Sing (Apply NegateSym0 t_a22KO :: a_a22Ik) infixl 6 %+ infixl 6 %- infixl 7 %* type family Subtract (a_a248p :: a_a248l) (a_a248q :: a_a248l) :: a_a248l sSubtract :: forall a_a248l (t_a248v :: a_a248l) (t_a248w :: a_a248l). SNum a_a248l => Sing t_a248v -> Sing t_a248w -> Sing (Apply (Apply SubtractSym0 t_a248v) t_a248w :: a_a248l) data (+@#@$) :: forall a6989586621679496884. (~>) a6989586621679496884 ((~>) a6989586621679496884 a6989586621679496884) infixl 6 +@#@$ data (+@#@$$) (arg6989586621679496904 :: a6989586621679496884) :: (~>) a6989586621679496884 a6989586621679496884 infixl 6 +@#@$$ type (+@#@$$$) (arg6989586621679496904 :: a6989586621679496884) (arg6989586621679496905 :: a6989586621679496884) = (+) arg6989586621679496904 arg6989586621679496905 data (-@#@$) :: forall a6989586621679496884. (~>) a6989586621679496884 ((~>) a6989586621679496884 a6989586621679496884) infixl 6 -@#@$ data (-@#@$$) (arg6989586621679496908 :: a6989586621679496884) :: (~>) a6989586621679496884 a6989586621679496884 infixl 6 -@#@$$ type (-@#@$$$) (arg6989586621679496908 :: a6989586621679496884) (arg6989586621679496909 :: a6989586621679496884) = (-) arg6989586621679496908 arg6989586621679496909 data (*@#@$) :: forall a6989586621679496884. (~>) a6989586621679496884 ((~>) a6989586621679496884 a6989586621679496884) infixl 7 *@#@$ data (*@#@$$) (arg6989586621679496912 :: a6989586621679496884) :: (~>) a6989586621679496884 a6989586621679496884 infixl 7 *@#@$$ type (*@#@$$$) (arg6989586621679496912 :: a6989586621679496884) (arg6989586621679496913 :: a6989586621679496884) = (*) arg6989586621679496912 arg6989586621679496913 data NegateSym0 :: forall a6989586621679496884. (~>) a6989586621679496884 a6989586621679496884 type NegateSym1 (arg6989586621679496916 :: a6989586621679496884) = Negate arg6989586621679496916 data AbsSym0 :: forall a6989586621679496884. (~>) a6989586621679496884 a6989586621679496884 type AbsSym1 (arg6989586621679496918 :: a6989586621679496884) = Abs arg6989586621679496918 data SignumSym0 :: forall a6989586621679496884. (~>) a6989586621679496884 a6989586621679496884 type SignumSym1 (arg6989586621679496920 :: a6989586621679496884) = Signum arg6989586621679496920 data FromIntegerSym0 :: forall a6989586621679496884. (~>) Nat a6989586621679496884 type FromIntegerSym1 (arg6989586621679496922 :: Nat) = FromInteger arg6989586621679496922 data SubtractSym0 :: forall a6989586621679502341. (~>) a6989586621679502341 ((~>) a6989586621679502341 a6989586621679502341) data SubtractSym1 (a6989586621679502345 :: a6989586621679502341) :: (~>) a6989586621679502341 a6989586621679502341 type SubtractSym2 (a6989586621679502345 :: a6989586621679502341) (a6989586621679502346 :: a6989586621679502341) = Subtract a6989586621679502345 a6989586621679502346 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 a6989586621679502341 (a6989586621679502345 :: a6989586621679502341). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.SubtractSym1 a6989586621679502345) 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_6989586621679497023Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Ord.Down a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Signum_6989586621679497016Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Abs_6989586621679497009Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679497002Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679496994Sym0 instance forall a6989586621679496884 (a6989586621679496992 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679496994Sym1 a6989586621679496992) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679496982Sym0 instance forall a6989586621679496884 (a6989586621679496980 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679496982Sym1 a6989586621679496980) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679496970Sym0 instance forall a6989586621679496884 (a6989586621679496968 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679496970Sym1 a6989586621679496968) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.*@#@$) instance forall a6989586621679496884 (arg6989586621679496912 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.*@#@$$) arg6989586621679496912) 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 a6989586621679496884 (arg6989586621679496904 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.+@#@$$) arg6989586621679496904) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.+@#@$) instance forall a6989586621679496884 (arg6989586621679496908 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.-@#@$$) arg6989586621679496908) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.-@#@$) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.NegateSym0 instance forall a6989586621679496884 (a6989586621679496930 :: a6989586621679496884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679496932Sym1 a6989586621679496930) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679496932Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679496940Sym0 -- | 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_a26Eh :: (~>) a_a26AU ((~>) b_a26AV b_a26AV)) (a_a26Ei :: b_a26AV) (a_a26Ej :: [a_a26AU]) :: b_a26AV sFoldr :: forall a_a26AU b_a26AV (t_a26Fm :: (~>) a_a26AU ((~>) b_a26AV b_a26AV)) (t_a26Fn :: b_a26AV) (t_a26Fo :: [a_a26AU]). Sing t_a26Fm -> Sing t_a26Fn -> Sing t_a26Fo -> Sing (Apply (Apply (Apply FoldrSym0 t_a26Fm) t_a26Fn) t_a26Fo :: b_a26AV) type family Map (a_a26Ea :: (~>) a_a26AS b_a26AT) (a_a26Eb :: [a_a26AS]) :: [b_a26AT] sMap :: forall a_a26AS b_a26AT (t_a26Fi :: (~>) a_a26AS b_a26AT) (t_a26Fj :: [a_a26AS]). Sing t_a26Fi -> Sing t_a26Fj -> Sing (Apply (Apply MapSym0 t_a26Fi) t_a26Fj :: [b_a26AT]) type family (++) (a_a26E2 :: [a_a26AR]) (a_a26E3 :: [a_a26AR]) :: [a_a26AR] infixr 5 ++ (%++) :: forall a_a26AR (t_a26Fe :: [a_a26AR]) (t_a26Ff :: [a_a26AR]). Sing t_a26Fe -> Sing t_a26Ff -> Sing (Apply (Apply (++@#@$) t_a26Fe) t_a26Ff :: [a_a26AR]) infixr 5 %++ type family Otherwise :: Bool sOtherwise :: Sing (OtherwiseSym0 :: Bool) type family Id (a_a26DZ :: a_a26AQ) :: a_a26AQ sId :: forall a_a26AQ (t_a26Fc :: a_a26AQ). Sing t_a26Fc -> Sing (Apply IdSym0 t_a26Fc :: a_a26AQ) type family Const (a_a26DK :: a_a26AO) (a_a26DL :: b_a26AP) :: a_a26AO sConst :: forall a_a26AO b_a26AP (t_a26F4 :: a_a26AO) (t_a26F5 :: b_a26AP). Sing t_a26F4 -> Sing t_a26F5 -> Sing (Apply (Apply ConstSym0 t_a26F4) t_a26F5 :: a_a26AO) type family (:.) (a_a26Dr :: (~>) b_a26AL c_a26AM) (a_a26Ds :: (~>) a_a26AN b_a26AL) (a_a26Dt :: a_a26AN) :: c_a26AM infixr 9 :. (%.) :: forall b_a26AL c_a26AM a_a26AN (t_a26EY :: (~>) b_a26AL c_a26AM) (t_a26EZ :: (~>) a_a26AN b_a26AL) (t_a26F0 :: a_a26AN). Sing t_a26EY -> Sing t_a26EZ -> Sing t_a26F0 -> Sing (Apply (Apply (Apply (.@#@$) t_a26EY) t_a26EZ) t_a26F0 :: c_a26AM) infixr 9 %. type family ($) (a_a26Dc :: (~>) a_a26AF b_a26AG) (a_a26Dd :: a_a26AF) :: b_a26AG infixr 0 $ type family ($!) (a_a26D3 :: (~>) a_a26AD b_a26AE) (a_a26D4 :: a_a26AD) :: b_a26AE infixr 0 $! (%$) :: forall a_a26AF b_a26AG (t_a26EO :: (~>) a_a26AF b_a26AG) (t_a26EP :: a_a26AF). Sing t_a26EO -> Sing t_a26EP -> Sing (Apply (Apply ($@#@$) t_a26EO) t_a26EP :: b_a26AG) infixr 0 %$ (%$!) :: forall a_a26AD b_a26AE (t_a26EK :: (~>) a_a26AD b_a26AE) (t_a26EL :: a_a26AD). Sing t_a26EK -> Sing t_a26EL -> Sing (Apply (Apply ($!@#@$) t_a26EK) t_a26EL :: b_a26AE) infixr 0 %$! type family Until (a_a26CD :: (~>) a_a26AC Bool) (a_a26CE :: (~>) a_a26AC a_a26AC) (a_a26CF :: a_a26AC) :: a_a26AC sUntil :: forall a_a26AC (t_a26EE :: (~>) a_a26AC Bool) (t_a26EF :: (~>) a_a26AC a_a26AC) (t_a26EG :: a_a26AC). Sing t_a26EE -> Sing t_a26EF -> Sing t_a26EG -> Sing (Apply (Apply (Apply UntilSym0 t_a26EE) t_a26EF) t_a26EG :: a_a26AC) type family Flip (a_a26Di :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (a_a26Dj :: b_a26AJ) (a_a26Dk :: a_a26AI) :: c_a26AK sFlip :: forall a_a26AI b_a26AJ c_a26AK (t_a26ES :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (t_a26ET :: b_a26AJ) (t_a26EU :: a_a26AI). Sing t_a26ES -> Sing t_a26ET -> Sing t_a26EU -> Sing (Apply (Apply (Apply FlipSym0 t_a26ES) t_a26ET) t_a26EU :: c_a26AK) type family AsTypeOf (a_a26DT :: a_a26AH) (a_a26DU :: a_a26AH) :: a_a26AH sAsTypeOf :: forall a_a26AH (t_a26F8 :: a_a26AH) (t_a26F9 :: a_a26AH). Sing t_a26F8 -> Sing t_a26F9 -> Sing (Apply (Apply AsTypeOfSym0 t_a26F8) t_a26F9 :: a_a26AH) type family Seq (a_a26Cy :: a_a26AA) (a_a26Cz :: b_a26AB) :: b_a26AB infixr 0 `Seq` sSeq :: forall a_a26AA b_a26AB (t_a26EA :: a_a26AA) (t_a26EB :: b_a26AB). Sing t_a26EA -> Sing t_a26EB -> Sing (Apply (Apply SeqSym0 t_a26EA) t_a26EB :: b_a26AB) infixr 0 `sSeq` data FoldrSym0 :: forall a6989586621679511800 b6989586621679511801. (~>) ((~>) a6989586621679511800 ((~>) b6989586621679511801 b6989586621679511801)) ((~>) b6989586621679511801 ((~>) [a6989586621679511800] b6989586621679511801)) data FoldrSym1 (a6989586621679512009 :: (~>) a6989586621679511800 ((~>) b6989586621679511801 b6989586621679511801)) :: (~>) b6989586621679511801 ((~>) [a6989586621679511800] b6989586621679511801) data FoldrSym2 (a6989586621679512009 :: (~>) a6989586621679511800 ((~>) b6989586621679511801 b6989586621679511801)) (a6989586621679512010 :: b6989586621679511801) :: (~>) [a6989586621679511800] b6989586621679511801 type FoldrSym3 (a6989586621679512009 :: (~>) a6989586621679511800 ((~>) b6989586621679511801 b6989586621679511801)) (a6989586621679512010 :: b6989586621679511801) (a6989586621679512011 :: [a6989586621679511800]) = Foldr a6989586621679512009 a6989586621679512010 a6989586621679512011 data MapSym0 :: forall a6989586621679511798 b6989586621679511799. (~>) ((~>) a6989586621679511798 b6989586621679511799) ((~>) [a6989586621679511798] [b6989586621679511799]) data MapSym1 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) :: (~>) [a6989586621679511798] [b6989586621679511799] type MapSym2 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) (a6989586621679512003 :: [a6989586621679511798]) = Map a6989586621679512002 a6989586621679512003 data (++@#@$) :: forall a6989586621679511797. (~>) [a6989586621679511797] ((~>) [a6989586621679511797] [a6989586621679511797]) infixr 5 ++@#@$ data (++@#@$$) (a6989586621679511994 :: [a6989586621679511797]) :: (~>) [a6989586621679511797] [a6989586621679511797] infixr 5 ++@#@$$ type (++@#@$$$) (a6989586621679511994 :: [a6989586621679511797]) (a6989586621679511995 :: [a6989586621679511797]) = (++) a6989586621679511994 a6989586621679511995 type OtherwiseSym0 = Otherwise data IdSym0 :: forall a6989586621679511796. (~>) a6989586621679511796 a6989586621679511796 type IdSym1 (a6989586621679511991 :: a6989586621679511796) = Id a6989586621679511991 data ConstSym0 :: forall a6989586621679511794 b6989586621679511795. (~>) a6989586621679511794 ((~>) b6989586621679511795 a6989586621679511794) data ConstSym1 (a6989586621679511976 :: a6989586621679511794) :: forall b6989586621679511795. (~>) b6989586621679511795 a6989586621679511794 type ConstSym2 (a6989586621679511976 :: a6989586621679511794) (a6989586621679511977 :: b6989586621679511795) = Const a6989586621679511976 a6989586621679511977 data (.@#@$) :: forall a6989586621679511793 b6989586621679511791 c6989586621679511792. (~>) ((~>) b6989586621679511791 c6989586621679511792) ((~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) :: forall a6989586621679511793. (~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) :: (~>) a6989586621679511793 c6989586621679511792 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) (a6989586621679511959 :: a6989586621679511793) = (:.) a6989586621679511957 a6989586621679511958 a6989586621679511959 data ($@#@$) :: forall a6989586621679511785 b6989586621679511786. (~>) ((~>) a6989586621679511785 b6989586621679511786) ((~>) a6989586621679511785 b6989586621679511786) infixr 0 $@#@$ data ($@#@$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) :: (~>) a6989586621679511785 b6989586621679511786 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) (a6989586621679511943 :: a6989586621679511785) = ($) a6989586621679511942 a6989586621679511943 data ($!@#@$) :: forall a6989586621679511783 b6989586621679511784. (~>) ((~>) a6989586621679511783 b6989586621679511784) ((~>) a6989586621679511783 b6989586621679511784) infixr 0 $!@#@$ data ($!@#@$$) (a6989586621679511933 :: (~>) a6989586621679511783 b6989586621679511784) :: (~>) a6989586621679511783 b6989586621679511784 infixr 0 $!@#@$$ type ($!@#@$$$) (a6989586621679511933 :: (~>) a6989586621679511783 b6989586621679511784) (a6989586621679511934 :: a6989586621679511783) = ($!) a6989586621679511933 a6989586621679511934 data UntilSym0 :: forall a6989586621679511782. (~>) ((~>) a6989586621679511782 Bool) ((~>) ((~>) a6989586621679511782 a6989586621679511782) ((~>) a6989586621679511782 a6989586621679511782)) data UntilSym1 (a6989586621679511907 :: (~>) a6989586621679511782 Bool) :: (~>) ((~>) a6989586621679511782 a6989586621679511782) ((~>) a6989586621679511782 a6989586621679511782) data UntilSym2 (a6989586621679511907 :: (~>) a6989586621679511782 Bool) (a6989586621679511908 :: (~>) a6989586621679511782 a6989586621679511782) :: (~>) a6989586621679511782 a6989586621679511782 type UntilSym3 (a6989586621679511907 :: (~>) a6989586621679511782 Bool) (a6989586621679511908 :: (~>) a6989586621679511782 a6989586621679511782) (a6989586621679511909 :: a6989586621679511782) = Until a6989586621679511907 a6989586621679511908 a6989586621679511909 data FlipSym0 :: forall a6989586621679511788 b6989586621679511789 c6989586621679511790. (~>) ((~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) ((~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790)) data FlipSym1 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) :: (~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790) data FlipSym2 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) (a6989586621679511949 :: b6989586621679511789) :: (~>) a6989586621679511788 c6989586621679511790 type FlipSym3 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) (a6989586621679511949 :: b6989586621679511789) (a6989586621679511950 :: a6989586621679511788) = Flip a6989586621679511948 a6989586621679511949 a6989586621679511950 data AsTypeOfSym0 :: forall a6989586621679511787. (~>) a6989586621679511787 ((~>) a6989586621679511787 a6989586621679511787) data AsTypeOfSym1 (a6989586621679511985 :: a6989586621679511787) :: (~>) a6989586621679511787 a6989586621679511787 type AsTypeOfSym2 (a6989586621679511985 :: a6989586621679511787) (a6989586621679511986 :: a6989586621679511787) = AsTypeOf a6989586621679511985 a6989586621679511986 data SeqSym0 :: forall a6989586621679511780 b6989586621679511781. (~>) a6989586621679511780 ((~>) b6989586621679511781 b6989586621679511781) infixr 0 `SeqSym0` data SeqSym1 (a6989586621679511902 :: a6989586621679511780) :: forall b6989586621679511781. (~>) b6989586621679511781 b6989586621679511781 infixr 0 `SeqSym1` type SeqSym2 (a6989586621679511902 :: a6989586621679511780) (a6989586621679511903 :: b6989586621679511781) = Seq a6989586621679511902 a6989586621679511903 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.FoldrSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.FoldrSym0 instance forall a6989586621679511800 b6989586621679511801 (a6989586621679512009 :: a6989586621679511800 Data.Singletons.Internal.~> (b6989586621679511801 Data.Singletons.Internal.~> b6989586621679511801)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym1 a6989586621679512009) 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 a6989586621679511800 b6989586621679511801 (a6989586621679512010 :: a6989586621679511800 Data.Singletons.Internal.~> (b6989586621679511801 Data.Singletons.Internal.~> b6989586621679511801)) (a6989586621679512009 :: b6989586621679511801). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym2 a6989586621679512010 a6989586621679512009) 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 a6989586621679511798 b6989586621679511799 (a6989586621679512002 :: a6989586621679511798 Data.Singletons.Internal.~> b6989586621679511799). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.MapSym1 a6989586621679512002) 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 a6989586621679511797 (a6989586621679511994 :: [a6989586621679511797]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.++@#@$$) a6989586621679511994) 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 a6989586621679511787 (a6989586621679511985 :: a6989586621679511787). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.AsTypeOfSym1 a6989586621679511985) 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 b6989586621679511795 a6989586621679511794 (a6989586621679511976 :: a6989586621679511794). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.ConstSym1 a6989586621679511976) 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 a6989586621679511793 b6989586621679511791 c6989586621679511792 (a6989586621679511957 :: b6989586621679511791 Data.Singletons.Internal.~> c6989586621679511792). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base..@#@$$) a6989586621679511957) 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 a6989586621679511793 b6989586621679511791 c6989586621679511792 (a6989586621679511958 :: b6989586621679511791 Data.Singletons.Internal.~> c6989586621679511792) (a6989586621679511957 :: a6989586621679511793 Data.Singletons.Internal.~> b6989586621679511791). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621679511958 Data.Singletons.Prelude.Base..@#@$$$ a6989586621679511957) 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 a6989586621679511788 b6989586621679511789 c6989586621679511790 (a6989586621679511948 :: a6989586621679511788 Data.Singletons.Internal.~> (b6989586621679511789 Data.Singletons.Internal.~> c6989586621679511790)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym1 a6989586621679511948) 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 a6989586621679511788 b6989586621679511789 c6989586621679511790 (a6989586621679511949 :: a6989586621679511788 Data.Singletons.Internal.~> (b6989586621679511789 Data.Singletons.Internal.~> c6989586621679511790)) (a6989586621679511948 :: b6989586621679511789). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym2 a6989586621679511949 a6989586621679511948) 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 a6989586621679511785 b6989586621679511786 (a6989586621679511942 :: a6989586621679511785 Data.Singletons.Internal.~> b6989586621679511786). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$@#@$$) a6989586621679511942) 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 a6989586621679511783 b6989586621679511784 (a6989586621679511933 :: a6989586621679511783 Data.Singletons.Internal.~> b6989586621679511784). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$!@#@$$) a6989586621679511933) 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 a6989586621679511782 (a6989586621679511907 :: a6989586621679511782 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym1 a6989586621679511907) 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 a6989586621679511782 (a6989586621679511908 :: a6989586621679511782 Data.Singletons.Internal.~> GHC.Types.Bool) (a6989586621679511907 :: a6989586621679511782 Data.Singletons.Internal.~> a6989586621679511782). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym2 a6989586621679511908 a6989586621679511907) 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 b6989586621679511781 a6989586621679511780 (a6989586621679511902 :: a6989586621679511780). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.SeqSym1 a6989586621679511902) 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.Let6989586621679512020GoSym0 instance forall k1 k2 k3 (k6989586621679512017 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679512020GoSym1 k6989586621679512017) instance forall k1 k2 k3 (z6989586621679512018 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (k6989586621679512017 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679512020GoSym2 z6989586621679512018 k6989586621679512017) instance forall k1 k2 k3 (a_69895866216795120156989586621679512019 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (z6989586621679512018 :: k3) (k6989586621679512017 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679512020GoSym3 a_69895866216795120156989586621679512019 z6989586621679512018 k6989586621679512017) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Lambda_6989586621679511968Sym0 instance forall k2 k3 k4 k5 (f6989586621679511965 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679511968Sym1 f6989586621679511965) instance forall k2 k3 k4 k5 (g6989586621679511966 :: k4 Data.Singletons.Internal.~> k5) (f6989586621679511965 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679511968Sym2 g6989586621679511966 f6989586621679511965) instance forall k2 k3 k4 k5 (a_69895866216795119636989586621679511967 :: k4 Data.Singletons.Internal.~> k5) (g6989586621679511966 :: k3 Data.Singletons.Internal.~> k4) (f6989586621679511965 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679511968Sym3 a_69895866216795119636989586621679511967 g6989586621679511966 f6989586621679511965) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679511939VxSym0 instance forall k1 k2 (f6989586621679511937 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511939VxSym1 f6989586621679511937) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679511918GoSym0 instance forall k1 k2 (p6989586621679511915 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511918GoSym1 p6989586621679511915) instance forall k1 k2 (f6989586621679511916 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621679511915 :: k2 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511918GoSym2 f6989586621679511916 p6989586621679511915) instance forall k1 k2 (a_69895866216795119136989586621679511917 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool) (f6989586621679511916 :: k2 Data.Singletons.Internal.~> k2) (p6989586621679511915 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511918GoSym3 a_69895866216795119136989586621679511917 f6989586621679511916 p6989586621679511915) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679511925Scrutinee_6989586621679511844Sym0 instance forall k1 k2 k3 k4 (p6989586621679511915 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511925Scrutinee_6989586621679511844Sym1 p6989586621679511915) instance forall k1 k2 k3 k4 (f6989586621679511916 :: k3 Data.Singletons.Internal.~> k4) (p6989586621679511915 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511925Scrutinee_6989586621679511844Sym2 f6989586621679511916 p6989586621679511915) instance forall k1 k2 k3 k4 (x6989586621679511924 :: k3 Data.Singletons.Internal.~> k4) (f6989586621679511916 :: k2) (p6989586621679511915 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679511925Scrutinee_6989586621679511844Sym3 x6989586621679511924 f6989586621679511916 p6989586621679511915) -- | Defines the promoted and singled versions of the Functor type -- class. module Data.Singletons.Prelude.Functor class PFunctor (f_a2cTV :: Type -> Type) where { type family Fmap (arg_a2d0h :: (~>) a_a2cTW b_a2cTX) (arg_a2d0i :: f_a2cTV a_a2cTW) :: f_a2cTV b_a2cTX; type family (<$) (arg_a2d0l :: a_a2cTY) (arg_a2d0m :: f_a2cTV b_a2cTZ) :: f_a2cTV a_a2cTY; type (<$) a_a2d0z a_a2d0A = Apply (Apply TFHelper_6989586621679536457Sym0 a_a2d0z) a_a2d0A; } infixl 4 <$ class SFunctor (f_a2cTV :: Type -> Type) sFmap :: forall a_a2cTW b_a2cTX (t_a2d4I :: (~>) a_a2cTW b_a2cTX) (t_a2d4J :: f_a2cTV a_a2cTW). SFunctor f_a2cTV => Sing t_a2d4I -> Sing t_a2d4J -> Sing (Apply (Apply FmapSym0 t_a2d4I) t_a2d4J :: f_a2cTV b_a2cTX) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). SFunctor f_a2cTV => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). (SFunctor f_a2cTV, (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) ~ Apply (Apply TFHelper_6989586621679536457Sym0 t_a2d4M) t_a2d4N) => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) infixl 4 %<$ type family ($>) (a_a2UYh :: f_a2UX2 a_a2UX3) (a_a2UYi :: b_a2UX4) :: f_a2UX2 b_a2UX4 infixl 4 $> (%$>) :: forall f_a2UX2 a_a2UX3 b_a2UX4 (t_a2UZY :: f_a2UX2 a_a2UX3) (t_a2UZZ :: b_a2UX4). SFunctor f_a2UX2 => Sing t_a2UZY -> Sing t_a2UZZ -> Sing (Apply (Apply ($>@#@$) t_a2UZY) t_a2UZZ :: f_a2UX2 b_a2UX4) infixl 4 %$> type family (<$>) (a_a2UYr :: (~>) a_a2UX9 b_a2UXa) (a_a2UYs :: f_a2UX8 a_a2UX9) :: f_a2UX8 b_a2UXa infixl 4 <$> (%<$>) :: forall f_a2UX8 a_a2UX9 b_a2UXa (t_a2V02 :: (~>) a_a2UX9 b_a2UXa) (t_a2V03 :: f_a2UX8 a_a2UX9). SFunctor f_a2UX8 => Sing t_a2V02 -> Sing t_a2V03 -> Sing (Apply (Apply (<$>@#@$) t_a2V02) t_a2V03 :: f_a2UX8 b_a2UXa) infixl 4 %<$> type family (<&>) (a_a2UYx :: f_a2UX5 a_a2UX6) (a_a2UYy :: (~>) a_a2UX6 b_a2UX7) :: f_a2UX5 b_a2UX7 infixl 1 <&> (%<&>) :: forall f_a2UX5 a_a2UX6 b_a2UX7 (t_a2V06 :: f_a2UX5 a_a2UX6) (t_a2V07 :: (~>) a_a2UX6 b_a2UX7). SFunctor f_a2UX5 => Sing t_a2V06 -> Sing t_a2V07 -> Sing (Apply (Apply (<&>@#@$) t_a2V06) t_a2V07 :: f_a2UX5 b_a2UX7) infixl 1 %<&> type family Void (a_a2UYa :: f_a2UX0 a_a2UX1) :: f_a2UX0 () sVoid :: forall f_a2UX0 a_a2UX1 (t_a2UZW :: f_a2UX0 a_a2UX1). SFunctor f_a2UX0 => Sing t_a2UZW -> Sing (Apply VoidSym0 t_a2UZW :: f_a2UX0 ()) data FmapSym0 :: forall a6989586621679536044 b6989586621679536045 f6989586621679536043. (~>) ((~>) a6989586621679536044 b6989586621679536045) ((~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045)) data FmapSym1 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) :: forall f6989586621679536043. (~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045) type FmapSym2 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) (arg6989586621679536438 :: f6989586621679536043 a6989586621679536044) = Fmap arg6989586621679536437 arg6989586621679536438 data (<$@#@$) :: forall a6989586621679536046 b6989586621679536047 f6989586621679536043. (~>) a6989586621679536046 ((~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679536441 :: a6989586621679536046) :: forall b6989586621679536047 f6989586621679536043. (~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679536441 :: a6989586621679536046) (arg6989586621679536442 :: f6989586621679536043 b6989586621679536047) = (<$) arg6989586621679536441 arg6989586621679536442 data ($>@#@$) :: forall a6989586621679705373 b6989586621679705374 f6989586621679705372. (~>) (f6989586621679705372 a6989586621679705373) ((~>) b6989586621679705374 (f6989586621679705372 b6989586621679705374)) infixl 4 $>@#@$ data ($>@#@$$) (a6989586621679705449 :: f6989586621679705372 a6989586621679705373) :: forall b6989586621679705374. (~>) b6989586621679705374 (f6989586621679705372 b6989586621679705374) infixl 4 $>@#@$$ type ($>@#@$$$) (a6989586621679705449 :: f6989586621679705372 a6989586621679705373) (a6989586621679705450 :: b6989586621679705374) = ($>) a6989586621679705449 a6989586621679705450 data (<$>@#@$) :: forall a6989586621679705379 b6989586621679705380 f6989586621679705378. (~>) ((~>) a6989586621679705379 b6989586621679705380) ((~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) :: forall f6989586621679705378. (~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) (a6989586621679705460 :: f6989586621679705378 a6989586621679705379) = (<$>) a6989586621679705459 a6989586621679705460 data (<&>@#@$) :: forall a6989586621679705376 b6989586621679705377 f6989586621679705375. (~>) (f6989586621679705375 a6989586621679705376) ((~>) ((~>) a6989586621679705376 b6989586621679705377) (f6989586621679705375 b6989586621679705377)) infixl 1 <&>@#@$ data (<&>@#@$$) (a6989586621679705465 :: f6989586621679705375 a6989586621679705376) :: forall b6989586621679705377. (~>) ((~>) a6989586621679705376 b6989586621679705377) (f6989586621679705375 b6989586621679705377) infixl 1 <&>@#@$$ type (<&>@#@$$$) (a6989586621679705465 :: f6989586621679705375 a6989586621679705376) (a6989586621679705466 :: (~>) a6989586621679705376 b6989586621679705377) = (<&>) a6989586621679705465 a6989586621679705466 data VoidSym0 :: forall a6989586621679705371 f6989586621679705370. (~>) (f6989586621679705370 a6989586621679705371) (f6989586621679705370 ()) type VoidSym1 (a6989586621679705442 :: f6989586621679705370 a6989586621679705371) = Void a6989586621679705442 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679705548Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Ord.Down instance forall b6989586621679536047 a6989586621679536046 (a6989586621679705546 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679705548Sym1 a6989586621679705546) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679705539Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Ord.Down instance forall k1 k2 k3 (_z_69895866216797054346989586621679705537 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705539Sym1 _z_69895866216797054346989586621679705537) instance forall k1 k2 k3 (a_69895866216797054406989586621679705538 :: k3) (_z_69895866216797054346989586621679705537 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705539Sym2 a_69895866216797054406989586621679705538 _z_69895866216797054346989586621679705537) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679705529Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621679705527 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679705529Sym1 a6989586621679705527) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679705517Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor ((,) a) instance forall a6989586621679705388 b6989586621679536047 a6989586621679536046 (a6989586621679705515 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679705517Sym1 a6989586621679705515) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679705507Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor ((,) a) instance forall k1 k2 k3 k4 (_z_69895866216797054126989586621679705496 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705507Sym1 _z_69895866216797054126989586621679705496) instance forall k1 k2 k3 k4 (a_69895866216797054246989586621679705497 :: k4) (_z_69895866216797054126989586621679705496 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705507Sym2 a_69895866216797054246989586621679705497 _z_69895866216797054126989586621679705496) instance forall k1 k2 k3 k4 (a_69895866216797054266989586621679705498 :: k4) (a_69895866216797054246989586621679705497 :: k3) (_z_69895866216797054126989586621679705496 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705507Sym3 a_69895866216797054266989586621679705498 a_69895866216797054246989586621679705497 _z_69895866216797054126989586621679705496) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679705499Sym0 instance forall k1 k2 k3 k4 (_z_69895866216797054126989586621679705496 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705499Sym1 _z_69895866216797054126989586621679705496) instance forall k1 k2 k3 k4 (a_69895866216797054246989586621679705497 :: k4) (_z_69895866216797054126989586621679705496 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705499Sym2 a_69895866216797054246989586621679705497 _z_69895866216797054126989586621679705496) instance forall k1 k2 k3 k4 (a_69895866216797054266989586621679705498 :: k4) (a_69895866216797054246989586621679705497 :: k3) (_z_69895866216797054126989586621679705496 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705499Sym3 a_69895866216797054266989586621679705498 a_69895866216797054246989586621679705497 _z_69895866216797054126989586621679705496) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679705488Sym0 instance forall a6989586621679705388 a6989586621679536044 b6989586621679536045 (a6989586621679705486 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679705488Sym1 a6989586621679705486) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679705478Sym0 instance forall k1 k2 k3 k4 (_f_69895866216797054106989586621679705475 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705478Sym1 _f_69895866216797054106989586621679705475) instance forall k1 k2 k3 k4 (a_69895866216797054166989586621679705476 :: k4) (_f_69895866216797054106989586621679705475 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705478Sym2 a_69895866216797054166989586621679705476 _f_69895866216797054106989586621679705475) instance forall k1 k2 k3 k4 (a_69895866216797054186989586621679705477 :: k4) (a_69895866216797054166989586621679705476 :: k3) (_f_69895866216797054106989586621679705475 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679705478Sym3 a_69895866216797054186989586621679705477 a_69895866216797054166989586621679705476 _f_69895866216797054106989586621679705475) 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 b6989586621679705377 (f6989586621679705375 :: * -> *) a6989586621679705376 (a6989586621679705465 :: f6989586621679705375 a6989586621679705376). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<&>@#@$$) a6989586621679705465) 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 (f6989586621679705378 :: * -> *) a6989586621679705379 b6989586621679705380 (a6989586621679705459 :: a6989586621679705379 Data.Singletons.Internal.~> b6989586621679705380). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<$>@#@$$) a6989586621679705459) 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 b6989586621679705374 (f6989586621679705372 :: * -> *) a6989586621679705373 (a6989586621679705449 :: f6989586621679705372 a6989586621679705373). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.$>@#@$$) a6989586621679705449) 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_a26DZ :: a_a26AQ) :: a_a26AQ sId :: forall a_a26AQ (t_a26Fc :: a_a26AQ). Sing t_a26Fc -> Sing (Apply IdSym0 t_a26Fc :: a_a26AQ) type family Const (a_a26DK :: a_a26AO) (a_a26DL :: b_a26AP) :: a_a26AO sConst :: forall a_a26AO b_a26AP (t_a26F4 :: a_a26AO) (t_a26F5 :: b_a26AP). Sing t_a26F4 -> Sing t_a26F5 -> Sing (Apply (Apply ConstSym0 t_a26F4) t_a26F5 :: a_a26AO) type family (:.) (a_a26Dr :: (~>) b_a26AL c_a26AM) (a_a26Ds :: (~>) a_a26AN b_a26AL) (a_a26Dt :: a_a26AN) :: c_a26AM infixr 9 :. (%.) :: forall b_a26AL c_a26AM a_a26AN (t_a26EY :: (~>) b_a26AL c_a26AM) (t_a26EZ :: (~>) a_a26AN b_a26AL) (t_a26F0 :: a_a26AN). Sing t_a26EY -> Sing t_a26EZ -> Sing t_a26F0 -> Sing (Apply (Apply (Apply (.@#@$) t_a26EY) t_a26EZ) t_a26F0 :: c_a26AM) infixr 9 %. type family Flip (a_a26Di :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (a_a26Dj :: b_a26AJ) (a_a26Dk :: a_a26AI) :: c_a26AK sFlip :: forall a_a26AI b_a26AJ c_a26AK (t_a26ES :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (t_a26ET :: b_a26AJ) (t_a26EU :: a_a26AI). Sing t_a26ES -> Sing t_a26ET -> Sing t_a26EU -> Sing (Apply (Apply (Apply FlipSym0 t_a26ES) t_a26ET) t_a26EU :: c_a26AK) type family ($) (a_a26Dc :: (~>) a_a26AF b_a26AG) (a_a26Dd :: a_a26AF) :: b_a26AG infixr 0 $ (%$) :: forall a_a26AF b_a26AG (t_a26EO :: (~>) a_a26AF b_a26AG) (t_a26EP :: a_a26AF). Sing t_a26EO -> Sing t_a26EP -> Sing (Apply (Apply ($@#@$) t_a26EO) t_a26EP :: b_a26AG) infixr 0 %$ type family (&) (a_a2YQn :: a_a2YQa) (a_a2YQo :: (~>) a_a2YQa b_a2YQb) :: b_a2YQb infixl 1 & (%&) :: forall a_a2YQa b_a2YQb (t_a2YQV :: a_a2YQa) (t_a2YQW :: (~>) a_a2YQa b_a2YQb). Sing t_a2YQV -> Sing t_a2YQW -> Sing (Apply (Apply (&@#@$) t_a2YQV) t_a2YQW :: b_a2YQb) infixl 1 %& type family On (a_a2YQt :: (~>) b_a2YQc ((~>) b_a2YQc c_a2YQd)) (a_a2YQu :: (~>) a_a2YQe b_a2YQc) (a_a2YQv :: a_a2YQe) (a_a2YQw :: a_a2YQe) :: c_a2YQd infixl 0 `On` sOn :: forall b_a2YQc c_a2YQd a_a2YQe (t_a2YQZ :: (~>) b_a2YQc ((~>) b_a2YQc c_a2YQd)) (t_a2YR0 :: (~>) a_a2YQe b_a2YQc) (t_a2YR1 :: a_a2YQe) (t_a2YR2 :: a_a2YQe). Sing t_a2YQZ -> Sing t_a2YR0 -> Sing t_a2YR1 -> Sing t_a2YR2 -> Sing (Apply (Apply (Apply (Apply OnSym0 t_a2YQZ) t_a2YR0) t_a2YR1) t_a2YR2 :: c_a2YQd) infixl 0 `sOn` data IdSym0 :: forall a6989586621679511796. (~>) a6989586621679511796 a6989586621679511796 type IdSym1 (a6989586621679511991 :: a6989586621679511796) = Id a6989586621679511991 data ConstSym0 :: forall a6989586621679511794 b6989586621679511795. (~>) a6989586621679511794 ((~>) b6989586621679511795 a6989586621679511794) data ConstSym1 (a6989586621679511976 :: a6989586621679511794) :: forall b6989586621679511795. (~>) b6989586621679511795 a6989586621679511794 type ConstSym2 (a6989586621679511976 :: a6989586621679511794) (a6989586621679511977 :: b6989586621679511795) = Const a6989586621679511976 a6989586621679511977 data (.@#@$) :: forall a6989586621679511793 b6989586621679511791 c6989586621679511792. (~>) ((~>) b6989586621679511791 c6989586621679511792) ((~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) :: forall a6989586621679511793. (~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) :: (~>) a6989586621679511793 c6989586621679511792 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) (a6989586621679511959 :: a6989586621679511793) = (:.) a6989586621679511957 a6989586621679511958 a6989586621679511959 data FlipSym0 :: forall a6989586621679511788 b6989586621679511789 c6989586621679511790. (~>) ((~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) ((~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790)) data FlipSym1 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) :: (~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790) data FlipSym2 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) (a6989586621679511949 :: b6989586621679511789) :: (~>) a6989586621679511788 c6989586621679511790 type FlipSym3 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) (a6989586621679511949 :: b6989586621679511789) (a6989586621679511950 :: a6989586621679511788) = Flip a6989586621679511948 a6989586621679511949 a6989586621679511950 data ($@#@$) :: forall a6989586621679511785 b6989586621679511786. (~>) ((~>) a6989586621679511785 b6989586621679511786) ((~>) a6989586621679511785 b6989586621679511786) infixr 0 $@#@$ data ($@#@$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) :: (~>) a6989586621679511785 b6989586621679511786 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) (a6989586621679511943 :: a6989586621679511785) = ($) a6989586621679511942 a6989586621679511943 data (&@#@$) :: forall a6989586621679720322 b6989586621679720323. (~>) a6989586621679720322 ((~>) ((~>) a6989586621679720322 b6989586621679720323) b6989586621679720323) infixl 1 &@#@$ data (&@#@$$) (a6989586621679720335 :: a6989586621679720322) :: forall b6989586621679720323. (~>) ((~>) a6989586621679720322 b6989586621679720323) b6989586621679720323 infixl 1 &@#@$$ type (&@#@$$$) (a6989586621679720335 :: a6989586621679720322) (a6989586621679720336 :: (~>) a6989586621679720322 b6989586621679720323) = (&) a6989586621679720335 a6989586621679720336 data OnSym0 :: forall a6989586621679720326 b6989586621679720324 c6989586621679720325. (~>) ((~>) b6989586621679720324 ((~>) b6989586621679720324 c6989586621679720325)) ((~>) ((~>) a6989586621679720326 b6989586621679720324) ((~>) a6989586621679720326 ((~>) a6989586621679720326 c6989586621679720325))) infixl 0 `OnSym0` data OnSym1 (a6989586621679720341 :: (~>) b6989586621679720324 ((~>) b6989586621679720324 c6989586621679720325)) :: forall a6989586621679720326. (~>) ((~>) a6989586621679720326 b6989586621679720324) ((~>) a6989586621679720326 ((~>) a6989586621679720326 c6989586621679720325)) infixl 0 `OnSym1` data OnSym2 (a6989586621679720341 :: (~>) b6989586621679720324 ((~>) b6989586621679720324 c6989586621679720325)) (a6989586621679720342 :: (~>) a6989586621679720326 b6989586621679720324) :: (~>) a6989586621679720326 ((~>) a6989586621679720326 c6989586621679720325) infixl 0 `OnSym2` data OnSym3 (a6989586621679720341 :: (~>) b6989586621679720324 ((~>) b6989586621679720324 c6989586621679720325)) (a6989586621679720342 :: (~>) a6989586621679720326 b6989586621679720324) (a6989586621679720343 :: a6989586621679720326) :: (~>) a6989586621679720326 c6989586621679720325 infixl 0 `OnSym3` type OnSym4 (a6989586621679720341 :: (~>) b6989586621679720324 ((~>) b6989586621679720324 c6989586621679720325)) (a6989586621679720342 :: (~>) a6989586621679720326 b6989586621679720324) (a6989586621679720343 :: a6989586621679720326) (a6989586621679720344 :: a6989586621679720326) = On a6989586621679720341 a6989586621679720342 a6989586621679720343 a6989586621679720344 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Function.OnSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Function.OnSym0 instance forall a6989586621679720326 b6989586621679720324 c6989586621679720325 (a6989586621679720341 :: b6989586621679720324 Data.Singletons.Internal.~> (b6989586621679720324 Data.Singletons.Internal.~> c6989586621679720325)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym1 a6989586621679720341) 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 a6989586621679720326 b6989586621679720324 c6989586621679720325 (a6989586621679720342 :: b6989586621679720324 Data.Singletons.Internal.~> (b6989586621679720324 Data.Singletons.Internal.~> c6989586621679720325)) (a6989586621679720341 :: a6989586621679720326 Data.Singletons.Internal.~> b6989586621679720324). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym2 a6989586621679720342 a6989586621679720341) 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 a6989586621679720326 b6989586621679720324 c6989586621679720325 (a6989586621679720343 :: b6989586621679720324 Data.Singletons.Internal.~> (b6989586621679720324 Data.Singletons.Internal.~> c6989586621679720325)) (a6989586621679720342 :: a6989586621679720326 Data.Singletons.Internal.~> b6989586621679720324) (a6989586621679720341 :: a6989586621679720326). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym3 a6989586621679720343 a6989586621679720342 a6989586621679720341) 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 b6989586621679720323 a6989586621679720322 (a6989586621679720335 :: a6989586621679720322). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Function.&@#@$$) a6989586621679720335) 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_6989586621679720357Sym0 instance forall k2 k3 k4 k5 k6 (ty6989586621679720353 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679720357Sym1 ty6989586621679720353) instance forall k2 k3 k4 k5 k6 (f6989586621679720354 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (ty6989586621679720353 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679720357Sym2 f6989586621679720354 ty6989586621679720353) instance forall k2 k3 k4 k5 k6 (a_69895866216797203496989586621679720355 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (f6989586621679720354 :: k4 Data.Singletons.Internal.~> k5) (ty6989586621679720353 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679720357Sym3 a_69895866216797203496989586621679720355 f6989586621679720354 ty6989586621679720353) instance forall k2 k3 k4 k5 k6 (a_69895866216797203516989586621679720356 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (a_69895866216797203496989586621679720355 :: k4 Data.Singletons.Internal.~> k5) (f6989586621679720354 :: k3) (ty6989586621679720353 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679720357Sym4 a_69895866216797203516989586621679720356 a_69895866216797203496989586621679720355 f6989586621679720354 ty6989586621679720353) instance forall k2 k3 k4 k5 k6 (t6989586621679720361 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (a_69895866216797203516989586621679720356 :: k4 Data.Singletons.Internal.~> k5) (a_69895866216797203496989586621679720355 :: k3) (f6989586621679720354 :: k2) (ty6989586621679720353 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679720357Sym5 t6989586621679720361 a_69895866216797203516989586621679720356 a_69895866216797203496989586621679720355 f6989586621679720354 ty6989586621679720353) -- | Defines the promoted and singleton version of Bounded, PBounded -- and SBounded module Data.Singletons.Prelude.Enum class PBounded (a_a30wc :: Type) where { type family MinBound :: a_a30wc; type family MaxBound :: a_a30wc; } class SBounded a_a30wc sMinBound :: SBounded a_a30wc => Sing (MinBoundSym0 :: a_a30wc) sMaxBound :: SBounded a_a30wc => Sing (MaxBoundSym0 :: a_a30wc) class PEnum (a_a31C6 :: Type) where { type family Succ (arg_a31GG :: a_a31C6) :: a_a31C6; type family Pred (arg_a31GI :: a_a31C6) :: a_a31C6; type family ToEnum (arg_a31GK :: Nat) :: a_a31C6; type family FromEnum (arg_a31GM :: a_a31C6) :: Nat; type family EnumFromTo (arg_a31GO :: a_a31C6) (arg_a31GP :: a_a31C6) :: [a_a31C6]; type family EnumFromThenTo (arg_a31GS :: a_a31C6) (arg_a31GT :: a_a31C6) (arg_a31GU :: a_a31C6) :: [a_a31C6]; type Succ a_a31H9 = Apply Succ_6989586621679731296Sym0 a_a31H9; type Pred a_a31Hi = Apply Pred_6989586621679731305Sym0 a_a31Hi; type EnumFromTo a_a31Hs a_a31Ht = Apply (Apply EnumFromTo_6989586621679731316Sym0 a_a31Hs) a_a31Ht; type EnumFromThenTo a_a31HH a_a31HI a_a31HJ = Apply (Apply (Apply EnumFromThenTo_6989586621679731332Sym0 a_a31HH) a_a31HI) a_a31HJ; } class SEnum a_a31C6 sSucc :: forall (t_a31JE :: a_a31C6). SEnum a_a31C6 => Sing t_a31JE -> Sing (Apply SuccSym0 t_a31JE :: a_a31C6) sPred :: forall (t_a31JG :: a_a31C6). SEnum a_a31C6 => Sing t_a31JG -> Sing (Apply PredSym0 t_a31JG :: a_a31C6) sToEnum :: forall (t_a31JI :: Nat). SEnum a_a31C6 => Sing t_a31JI -> Sing (Apply ToEnumSym0 t_a31JI :: a_a31C6) sFromEnum :: forall (t_a31JK :: a_a31C6). SEnum a_a31C6 => Sing t_a31JK -> Sing (Apply FromEnumSym0 t_a31JK :: Nat) sEnumFromTo :: forall (t_a31JM :: a_a31C6) (t_a31JN :: a_a31C6). SEnum a_a31C6 => Sing t_a31JM -> Sing t_a31JN -> Sing (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) sEnumFromThenTo :: forall (t_a31JQ :: a_a31C6) (t_a31JR :: a_a31C6) (t_a31JS :: a_a31C6). SEnum a_a31C6 => Sing t_a31JQ -> Sing t_a31JR -> Sing t_a31JS -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) sSucc :: forall (t_a31JE :: a_a31C6). (SEnum a_a31C6, (Apply SuccSym0 t_a31JE :: a_a31C6) ~ Apply Succ_6989586621679731296Sym0 t_a31JE) => Sing t_a31JE -> Sing (Apply SuccSym0 t_a31JE :: a_a31C6) sPred :: forall (t_a31JG :: a_a31C6). (SEnum a_a31C6, (Apply PredSym0 t_a31JG :: a_a31C6) ~ Apply Pred_6989586621679731305Sym0 t_a31JG) => Sing t_a31JG -> Sing (Apply PredSym0 t_a31JG :: a_a31C6) sEnumFromTo :: forall (t_a31JM :: a_a31C6) (t_a31JN :: a_a31C6). (SEnum a_a31C6, (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) ~ Apply (Apply EnumFromTo_6989586621679731316Sym0 t_a31JM) t_a31JN) => Sing t_a31JM -> Sing t_a31JN -> Sing (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) sEnumFromThenTo :: forall (t_a31JQ :: a_a31C6) (t_a31JR :: a_a31C6) (t_a31JS :: a_a31C6). (SEnum a_a31C6, (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679731332Sym0 t_a31JQ) t_a31JR) t_a31JS) => Sing t_a31JQ -> Sing t_a31JR -> Sing t_a31JS -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) type MinBoundSym0 = MinBound type MaxBoundSym0 = MaxBound data SuccSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 a6989586621679730982 type SuccSym1 (arg6989586621679731266 :: a6989586621679730982) = Succ arg6989586621679731266 data PredSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 a6989586621679730982 type PredSym1 (arg6989586621679731268 :: a6989586621679730982) = Pred arg6989586621679731268 data ToEnumSym0 :: forall a6989586621679730982. (~>) Nat a6989586621679730982 type ToEnumSym1 (arg6989586621679731270 :: Nat) = ToEnum arg6989586621679731270 data FromEnumSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 Nat type FromEnumSym1 (arg6989586621679731272 :: a6989586621679730982) = FromEnum arg6989586621679731272 data EnumFromToSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982]) data EnumFromToSym1 (arg6989586621679731274 :: a6989586621679730982) :: (~>) a6989586621679730982 [a6989586621679730982] type EnumFromToSym2 (arg6989586621679731274 :: a6989586621679730982) (arg6989586621679731275 :: a6989586621679730982) = EnumFromTo arg6989586621679731274 arg6989586621679731275 data EnumFromThenToSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 ((~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982])) data EnumFromThenToSym1 (arg6989586621679731278 :: a6989586621679730982) :: (~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982]) data EnumFromThenToSym2 (arg6989586621679731278 :: a6989586621679730982) (arg6989586621679731279 :: a6989586621679730982) :: (~>) a6989586621679730982 [a6989586621679730982] type EnumFromThenToSym3 (arg6989586621679731278 :: a6989586621679730982) (arg6989586621679731279 :: a6989586621679730982) (arg6989586621679731280 :: a6989586621679730982) = EnumFromThenTo arg6989586621679731278 arg6989586621679731279 arg6989586621679731280 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679754915Sym0 instance Data.Singletons.Prelude.Enum.PEnum () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679754909Sym0 instance Data.Singletons.Prelude.Enum.SEnum () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679754898Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679754892Sym0 instance Data.Singletons.Prelude.Enum.SEnum GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679754874Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679754868Sym0 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_6989586621679731399Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Nat instance forall a6989586621679730982 (a6989586621679731396 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679731399Sym1 a6989586621679731396) instance forall a6989586621679730982 (a6989586621679731397 :: a6989586621679730982) (a6989586621679731396 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679731399Sym2 a6989586621679731397 a6989586621679731396) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679731377Sym0 instance forall a6989586621679730982 (a6989586621679731375 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679731377Sym1 a6989586621679731375) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679731362Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679731355Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679731348Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679731341Sym0 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 a6989586621679730982 (arg6989586621679731274 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromToSym1 arg6989586621679731274) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromToSym0 instance forall a6989586621679730982 (arg6989586621679731279 :: a6989586621679730982) (arg6989586621679731278 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym2 arg6989586621679731279 arg6989586621679731278) instance forall a6989586621679730982 (arg6989586621679731278 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym1 arg6989586621679731278) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenToSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679731296Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679731305Sym0 instance forall a6989586621679730982 (a6989586621679731314 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679731316Sym1 a6989586621679731314) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679731316Sym0 instance forall a6989586621679730982 (a6989586621679731330 :: a6989586621679730982) (a6989586621679731329 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679731332Sym2 a6989586621679731330 a6989586621679731329) instance forall a6989586621679730982 (a6989586621679731329 :: a6989586621679730982). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679731332Sym1 a6989586621679731329) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679731332Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Lambda_6989586621679731289Sym0 instance forall k1 k2 (a_69895866216797312846989586621679731288 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Lambda_6989586621679731289Sym1 a_69895866216797312846989586621679731288) 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 a6989586621679731235) 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 a6989586621679731217) 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 a6989586621679731218 a6989586621679731217) 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 a6989586621679731160) 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 a6989586621679731161 a6989586621679731160) 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 a6989586621679731103) 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 a6989586621679731104 a6989586621679731103) 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.Let6989586621679731245GoSym0 instance forall k1 k2 k3 k4 (x06989586621679731243 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731245GoSym1 x06989586621679731243) instance forall k1 k2 k3 k4 (y6989586621679731244 :: k4) (x06989586621679731243 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731245GoSym2 y6989586621679731244 x06989586621679731243) instance forall k1 k2 k3 k4 (arg_69895866216797310156989586621679731239 :: k4) (y6989586621679731244 :: k3) (x06989586621679731243 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731245GoSym3 arg_69895866216797310156989586621679731239 y6989586621679731244 x06989586621679731243) instance forall k1 k2 k3 k4 (arg_69895866216797310176989586621679731240 :: k4) (arg_69895866216797310156989586621679731239 :: k3) (y6989586621679731244 :: k2) (x06989586621679731243 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731245GoSym4 arg_69895866216797310176989586621679731240 arg_69895866216797310156989586621679731239 y6989586621679731244 x06989586621679731243) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731253Scrutinee_6989586621679731019Sym0 instance forall k1 k2 k3 k4 (x06989586621679731243 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731253Scrutinee_6989586621679731019Sym1 x06989586621679731243) instance forall k1 k2 k3 k4 (y6989586621679731244 :: k4) (x06989586621679731243 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731253Scrutinee_6989586621679731019Sym2 y6989586621679731244 x06989586621679731243) instance forall k1 k2 k3 k4 (x6989586621679731252 :: k4) (y6989586621679731244 :: k3) (x06989586621679731243 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731253Scrutinee_6989586621679731019Sym3 x6989586621679731252 y6989586621679731244 x06989586621679731243) instance forall k1 k2 k3 k4 (arg_69895866216797310156989586621679731239 :: k4) (x6989586621679731252 :: k3) (y6989586621679731244 :: k3) (x06989586621679731243 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731253Scrutinee_6989586621679731019Sym4 arg_69895866216797310156989586621679731239 x6989586621679731252 y6989586621679731244 x06989586621679731243) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym0 instance forall k1 k2 k3 k4 (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym1 x16989586621679731171) instance forall k1 k2 k3 k4 (x26989586621679731172 :: k4) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym2 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (y6989586621679731173 :: k4) (x26989586621679731172 :: k4) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym3 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k4) (x26989586621679731172 :: k4) (x16989586621679731171 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym4 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (arg_69895866216797310296989586621679731167 :: k4) (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k4) (x26989586621679731172 :: k3) (x16989586621679731171 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym5 arg_69895866216797310296989586621679731167 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (arg_69895866216797310316989586621679731168 :: k4) (arg_69895866216797310296989586621679731167 :: k4) (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k3) (x26989586621679731172 :: k2) (x16989586621679731171 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Go_upSym6 arg_69895866216797310316989586621679731168 arg_69895866216797310296989586621679731167 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym0 instance forall k1 k2 k3 k4 (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym1 x16989586621679731171) instance forall k1 k2 k3 k4 (x26989586621679731172 :: k4) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym2 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (y6989586621679731173 :: k4) (x26989586621679731172 :: k4) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym3 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k4) (x26989586621679731172 :: k4) (x16989586621679731171 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym4 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 (arg_69895866216797310296989586621679731167 :: k4) (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k4) (x26989586621679731172 :: k3) (x16989586621679731171 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186Y'Sym5 arg_69895866216797310296989586621679731167 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym0 instance forall k1 k2 k3 k4 k5 (x16989586621679731171 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym1 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (x26989586621679731172 :: k5) (x16989586621679731171 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym2 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (y6989586621679731173 :: k5) (x26989586621679731172 :: k5) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym3 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310276989586621679731166 :: k5) (y6989586621679731173 :: k5) (x26989586621679731172 :: k4) (x16989586621679731171 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym4 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310296989586621679731167 :: k5) (arg_69895866216797310276989586621679731166 :: k5) (y6989586621679731173 :: k4) (x26989586621679731172 :: k3) (x16989586621679731171 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731186DeltaSym5 arg_69895866216797310296989586621679731167 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym0 instance forall k1 k2 k3 k4 k5 (x16989586621679731171 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym1 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (x26989586621679731172 :: k5) (x16989586621679731171 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym2 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (y6989586621679731173 :: k5) (x26989586621679731172 :: k4) (x16989586621679731171 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym3 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310276989586621679731166 :: k5) (y6989586621679731173 :: k4) (x26989586621679731172 :: k5) (x16989586621679731171 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym4 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310296989586621679731167 :: k5) (arg_69895866216797310276989586621679731166 :: k4) (y6989586621679731173 :: k5) (x26989586621679731172 :: k3) (x16989586621679731171 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731176Scrutinee_6989586621679731033Sym5 arg_69895866216797310296989586621679731167 arg_69895866216797310276989586621679731166 y6989586621679731173 x26989586621679731172 x16989586621679731171) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym0 instance forall k1 k2 k3 k4 (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym1 x16989586621679731114) instance forall k1 k2 k3 k4 (x26989586621679731115 :: k4) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym2 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (y6989586621679731116 :: k4) (x26989586621679731115 :: k4) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym3 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k4) (x26989586621679731115 :: k4) (x16989586621679731114 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym4 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (arg_69895866216797310396989586621679731110 :: k4) (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k4) (x26989586621679731115 :: k3) (x16989586621679731114 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym5 arg_69895866216797310396989586621679731110 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (arg_69895866216797310416989586621679731111 :: k4) (arg_69895866216797310396989586621679731110 :: k4) (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k3) (x26989586621679731115 :: k2) (x16989586621679731114 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Go_dnSym6 arg_69895866216797310416989586621679731111 arg_69895866216797310396989586621679731110 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym0 instance forall k1 k2 k3 k4 (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym1 x16989586621679731114) instance forall k1 k2 k3 k4 (x26989586621679731115 :: k4) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym2 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (y6989586621679731116 :: k4) (x26989586621679731115 :: k4) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym3 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k4) (x26989586621679731115 :: k4) (x16989586621679731114 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym4 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 (arg_69895866216797310396989586621679731110 :: k4) (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k4) (x26989586621679731115 :: k3) (x16989586621679731114 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129Y'Sym5 arg_69895866216797310396989586621679731110 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym0 instance forall k1 k2 k3 k4 k5 (x16989586621679731114 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym1 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (x26989586621679731115 :: k5) (x16989586621679731114 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym2 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (y6989586621679731116 :: k5) (x26989586621679731115 :: k5) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym3 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310376989586621679731109 :: k5) (y6989586621679731116 :: k5) (x26989586621679731115 :: k4) (x16989586621679731114 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym4 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310396989586621679731110 :: k5) (arg_69895866216797310376989586621679731109 :: k5) (y6989586621679731116 :: k4) (x26989586621679731115 :: k3) (x16989586621679731114 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731129DeltaSym5 arg_69895866216797310396989586621679731110 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym0 instance forall k1 k2 k3 k4 k5 (x16989586621679731114 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym1 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (x26989586621679731115 :: k5) (x16989586621679731114 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym2 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (y6989586621679731116 :: k5) (x26989586621679731115 :: k4) (x16989586621679731114 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym3 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310376989586621679731109 :: k5) (y6989586621679731116 :: k4) (x26989586621679731115 :: k5) (x16989586621679731114 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym4 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) instance forall k1 k2 k3 k4 k5 (arg_69895866216797310396989586621679731110 :: k5) (arg_69895866216797310376989586621679731109 :: k4) (y6989586621679731116 :: k5) (x26989586621679731115 :: k3) (x16989586621679731114 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679731119Scrutinee_6989586621679731043Sym5 arg_69895866216797310396989586621679731110 arg_69895866216797310376989586621679731109 y6989586621679731116 x26989586621679731115 x16989586621679731114) 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_a5chP :: Type) where { type family ShowsPrec (arg_a5cNh :: Nat) (arg_a5cNi :: a_a5chP) (arg_a5cNj :: Symbol) :: Symbol; type family Show_ (arg_a5cNn :: a_a5chP) :: Symbol; type family ShowList (arg_a5cNp :: [a_a5chP]) (arg_a5cNq :: Symbol) :: Symbol; type ShowsPrec a_a5cNB a_a5cNC a_a5cND = Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 a_a5cNB) a_a5cNC) a_a5cND; type Show_ a_a5cNM = Apply Show__6989586621680250647Sym0 a_a5cNM; type ShowList a_a5cNW a_a5cNX = Apply (Apply ShowList_6989586621680250658Sym0 a_a5cNW) a_a5cNX; } class SShow a_a5chP sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). SShow a_a5chP => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). SShow a_a5chP => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). SShow a_a5chP => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). (SShow a_a5chP, (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 t_a5cRq) t_a5cRr) t_a5cRs) => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). (SShow a_a5chP, (Apply Show_Sym0 t_a5cRw :: Symbol) ~ Apply Show__6989586621680250647Sym0 t_a5cRw) => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). (SShow a_a5chP, (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) ~ Apply (Apply ShowList_6989586621680250658Sym0 t_a5cRy) t_a5cRz) => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: 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_a5cN9 :: a_a5chA) (a_a5cNa :: Symbol) :: Symbol sShows :: forall a_a5chA (t_a5cR1 :: a_a5chA) (t_a5cR2 :: Symbol). SShow a_a5chA => Sing t_a5cR1 -> Sing t_a5cR2 -> Sing (Apply (Apply ShowsSym0 t_a5cR1) t_a5cR2 :: Symbol) type family ShowListWith (a_a5cMP :: (~>) a_a5chz ((~>) Symbol Symbol)) (a_a5cMQ :: [a_a5chz]) (a_a5cMR :: Symbol) :: Symbol sShowListWith :: forall a_a5chz (t_a5cQV :: (~>) a_a5chz ((~>) Symbol Symbol)) (t_a5cQW :: [a_a5chz]) (t_a5cQX :: Symbol). Sing t_a5cQV -> Sing t_a5cQW -> Sing t_a5cQX -> Sing (Apply (Apply (Apply ShowListWithSym0 t_a5cQV) t_a5cQW) t_a5cQX :: Symbol) type family ShowChar (a_a5cMd :: Symbol) (a_a5cMe :: Symbol) :: Symbol sShowChar :: forall (t_a5cQH :: Symbol) (t_a5cQI :: Symbol). Sing t_a5cQH -> Sing t_a5cQI -> Sing (Apply (Apply ShowCharSym0 t_a5cQH) t_a5cQI :: Symbol) type family ShowString (a_a5cLY :: Symbol) (a_a5cLZ :: Symbol) :: Symbol sShowString :: forall (t_a5cQB :: Symbol) (t_a5cQC :: Symbol). Sing t_a5cQB -> Sing t_a5cQC -> Sing (Apply (Apply ShowStringSym0 t_a5cQB) t_a5cQC :: Symbol) type family ShowParen (a_a5cMj :: Bool) (a_a5cMk :: (~>) Symbol Symbol) (a_a5cMl :: Symbol) :: Symbol sShowParen :: forall (t_a5cQL :: Bool) (t_a5cQM :: (~>) Symbol Symbol) (t_a5cQN :: Symbol). Sing t_a5cQL -> Sing t_a5cQM -> Sing t_a5cQN -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5cQL) t_a5cQM) t_a5cQN :: Symbol) type family ShowSpace (a_a5cLL :: Symbol) :: Symbol sShowSpace :: forall (t_a5cQz :: Symbol). Sing t_a5cQz -> Sing (Apply ShowSpaceSym0 t_a5cQz :: Symbol) type family ShowCommaSpace (a_a5cM6 :: Symbol) :: Symbol sShowCommaSpace :: forall (t_a5cQF :: Symbol). Sing t_a5cQF -> Sing (Apply ShowCommaSpaceSym0 t_a5cQF :: Symbol) type family AppPrec :: Nat sAppPrec :: Sing (AppPrecSym0 :: Nat) type family AppPrec1 :: Nat sAppPrec1 :: Sing (AppPrec1Sym0 :: Nat) data ShowsPrecSym0 :: forall a6989586621680248665. (~>) Nat ((~>) a6989586621680248665 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680250615 :: Nat) :: forall a6989586621680248665. (~>) a6989586621680248665 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) (arg6989586621680250617 :: Symbol) = ShowsPrec arg6989586621680250615 arg6989586621680250616 arg6989586621680250617 data Show_Sym0 :: forall a6989586621680248665. (~>) a6989586621680248665 Symbol type Show_Sym1 (arg6989586621680250621 :: a6989586621680248665) = Show_ arg6989586621680250621 data ShowListSym0 :: forall a6989586621680248665. (~>) [a6989586621680248665] ((~>) Symbol Symbol) data ShowListSym1 (arg6989586621680250623 :: [a6989586621680248665]) :: (~>) Symbol Symbol type ShowListSym2 (arg6989586621680250623 :: [a6989586621680248665]) (arg6989586621680250624 :: Symbol) = ShowList arg6989586621680250623 arg6989586621680250624 data ShowsSym0 :: forall a6989586621680248650. (~>) a6989586621680248650 ((~>) Symbol Symbol) data ShowsSym1 (a6989586621680250607 :: a6989586621680248650) :: (~>) Symbol Symbol type ShowsSym2 (a6989586621680250607 :: a6989586621680248650) (a6989586621680250608 :: Symbol) = Shows a6989586621680250607 a6989586621680250608 data ShowListWithSym0 :: forall a6989586621680248649. (~>) ((~>) a6989586621680248649 ((~>) Symbol Symbol)) ((~>) [a6989586621680248649] ((~>) Symbol Symbol)) data ShowListWithSym1 (a6989586621680250587 :: (~>) a6989586621680248649 ((~>) Symbol Symbol)) :: (~>) [a6989586621680248649] ((~>) Symbol Symbol) data ShowListWithSym2 (a6989586621680250587 :: (~>) a6989586621680248649 ((~>) Symbol Symbol)) (a6989586621680250588 :: [a6989586621680248649]) :: (~>) Symbol Symbol type ShowListWithSym3 (a6989586621680250587 :: (~>) a6989586621680248649 ((~>) Symbol Symbol)) (a6989586621680250588 :: [a6989586621680248649]) (a6989586621680250589 :: Symbol) = ShowListWith a6989586621680250587 a6989586621680250588 a6989586621680250589 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680250549 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680250549 :: Symbol) (a6989586621680250550 :: Symbol) = ShowChar a6989586621680250549 a6989586621680250550 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680250534 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680250534 :: Symbol) (a6989586621680250535 :: Symbol) = ShowString a6989586621680250534 a6989586621680250535 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680250555 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680250555 :: Bool) (a6989586621680250556 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data ShowSpaceSym0 :: (~>) Symbol Symbol type ShowSpaceSym1 (a6989586621680250521 :: Symbol) = ShowSpace a6989586621680250521 data ShowCommaSpaceSym0 :: (~>) Symbol Symbol type ShowCommaSpaceSym1 (a6989586621680250542 :: Symbol) = ShowCommaSpace a6989586621680250542 type AppPrecSym0 = AppPrec type AppPrec1Sym0 = AppPrec1 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268952Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268952Sym1 a6989586621680268949) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268952Sym2 a6989586621680268950 a6989586621680268949) instance Data.Singletons.Prelude.Show.SShow Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268924Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268924Sym1 a6989586621680268921) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268924Sym2 a6989586621680268922 a6989586621680268921) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268897Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268897Sym1 a6989586621680268894) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268897Sym2 a6989586621680268895 a6989586621680268894) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268871Sym0 instance Data.Singletons.Prelude.Show.PShow (GHC.Base.NonEmpty a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268871Sym1 a6989586621680268868) instance forall a6989586621679065577 (a6989586621680268869 :: GHC.Types.Nat) (a6989586621680268868 :: GHC.Base.NonEmpty a6989586621679065577). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268871Sym2 a6989586621680268869 a6989586621680268868) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268837Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Either.Either a b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268837Sym1 a6989586621680268834) instance forall a6989586621679082630 b6989586621679082631 (a6989586621680268835 :: GHC.Types.Nat) (a6989586621680268834 :: Data.Either.Either a6989586621679082630 b6989586621679082631). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268837Sym2 a6989586621680268835 a6989586621680268834) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268783Sym0 instance Data.Singletons.Prelude.Show.PShow (GHC.Maybe.Maybe a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268783Sym1 a6989586621680268780) instance forall a3530822107858468865 (a6989586621680268781 :: GHC.Types.Nat) (a6989586621680268780 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268783Sym2 a6989586621680268781 a6989586621680268780) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268746Sym0 instance Data.Singletons.Prelude.Show.PShow () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268746Sym1 a6989586621680268743) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680268746Sym2 a6989586621680268744 a6989586621680268743) 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 a6989586621680268134) 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_6989586621680250814Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f, g) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250814Sym1 a6989586621680250811) instance forall a6989586621680248732 b6989586621680248733 c6989586621680248734 d6989586621680248735 e6989586621680248736 f6989586621680248737 g6989586621680248738 (a6989586621680250812 :: GHC.Types.Nat) (a6989586621680250811 :: (a6989586621680248732, b6989586621680248733, c6989586621680248734, d6989586621680248735, e6989586621680248736, f6989586621680248737, g6989586621680248738)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250814Sym2 a6989586621680250812 a6989586621680250811) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250792Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250792Sym1 a6989586621680250789) instance forall a6989586621680248719 b6989586621680248720 c6989586621680248721 d6989586621680248722 e6989586621680248723 f6989586621680248724 (a6989586621680250790 :: GHC.Types.Nat) (a6989586621680250789 :: (a6989586621680248719, b6989586621680248720, c6989586621680248721, d6989586621680248722, e6989586621680248723, f6989586621680248724)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250792Sym2 a6989586621680250790 a6989586621680250789) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250771Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250771Sym1 a6989586621680250768) instance forall a6989586621680248708 b6989586621680248709 c6989586621680248710 d6989586621680248711 e6989586621680248712 (a6989586621680250769 :: GHC.Types.Nat) (a6989586621680250768 :: (a6989586621680248708, b6989586621680248709, c6989586621680248710, d6989586621680248711, e6989586621680248712)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250771Sym2 a6989586621680250769 a6989586621680250768) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250751Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250751Sym1 a6989586621680250748) instance forall a6989586621680248699 b6989586621680248700 c6989586621680248701 d6989586621680248702 (a6989586621680250749 :: GHC.Types.Nat) (a6989586621680250748 :: (a6989586621680248699, b6989586621680248700, c6989586621680248701, d6989586621680248702)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250751Sym2 a6989586621680250749 a6989586621680250748) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250732Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250732Sym1 a6989586621680250729) instance forall a6989586621680248692 b6989586621680248693 c6989586621680248694 (a6989586621680250730 :: GHC.Types.Nat) (a6989586621680250729 :: (a6989586621680248692, b6989586621680248693, c6989586621680248694)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250732Sym2 a6989586621680250730 a6989586621680250729) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250714Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250714Sym1 a6989586621680250711) instance forall a6989586621680248687 b6989586621680248688 (a6989586621680250712 :: GHC.Types.Nat) (a6989586621680250711 :: (a6989586621680248687, b6989586621680248688)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250714Sym2 a6989586621680250712 a6989586621680250711) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250697Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Symbol instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250697Sym1 a6989586621680250694) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250697Sym2 a6989586621680250695 a6989586621680250694) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250677Sym0 instance Data.Singletons.Prelude.Show.PShow [a] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250677Sym1 a6989586621680250674) instance forall a6989586621680248683 (a6989586621680250675 :: GHC.Types.Nat) (a6989586621680250674 :: [a6989586621680248683]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250677Sym2 a6989586621680250675 a6989586621680250674) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListSym0 instance forall a6989586621680248665 (arg6989586621680250623 :: [a6989586621680248665]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListSym1 arg6989586621680250623) instance forall a6989586621680248650 (a6989586621680250607 :: a6989586621680248650). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsSym1 a6989586621680250607) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsSym0 instance forall a6989586621680248665 (arg6989586621680250616 :: GHC.Types.Nat) (arg6989586621680250615 :: a6989586621680248665). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym2 arg6989586621680250616 arg6989586621680250615) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym1 arg6989586621680250615) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrecSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show_Sym0 instance forall a6989586621680248665 (a6989586621680250636 :: GHC.Types.Nat) (a6989586621680250635 :: a6989586621680248665). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250638Sym2 a6989586621680250636 a6989586621680250635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250638Sym1 a6989586621680250635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680250638Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show__6989586621680250647Sym0 instance forall a6989586621680248665 (a6989586621680250656 :: [a6989586621680248665]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowList_6989586621680250658Sym1 a6989586621680250656) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowList_6989586621680250658Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListWithSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowListWithSym0 instance forall a6989586621680248649 (a6989586621680250587 :: a6989586621680248649 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym1 a6989586621680250587) 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 a6989586621680248649 (a6989586621680250588 :: a6989586621680248649 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (a6989586621680250587 :: [a6989586621680248649]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym2 a6989586621680250588 a6989586621680250587) 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 a6989586621680250569) 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.ShowParenSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowParenSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowParenSym1 a6989586621680250555) 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 a6989586621680250556 a6989586621680250555) 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.Lambda_6989586621680250577Sym0 instance forall k1 a6989586621679511793 c6989586621679511792 k2 (ss6989586621680250575 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680250577Sym1 ss6989586621680250575) instance forall a6989586621679511793 c6989586621679511792 k1 k2 (a_69895866216802505736989586621680250576 :: k2) (ss6989586621680250575 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680250577Sym2 a_69895866216802505736989586621680250576 ss6989586621680250575) instance forall a6989586621679511793 c6989586621679511792 k1 k2 (t6989586621680250581 :: k2) (a_69895866216802505736989586621680250576 :: k1) (ss6989586621680250575 :: GHC.Types.Symbol Data.Singletons.Internal.~> c6989586621679511792). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680250577Sym3 t6989586621680250581 a_69895866216802505736989586621680250576 ss6989586621680250575) 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 a6989586621680250549) 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 a6989586621680250534) 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.Let6989586621680250598ShowlSym0 instance forall k1 k2 k3 (showx6989586621680250594 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680250598ShowlSym1 showx6989586621680250594) instance forall k1 k2 k3 (x6989586621680250595 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (showx6989586621680250594 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680250598ShowlSym2 x6989586621680250595 showx6989586621680250594) instance forall k1 k2 k3 (xs6989586621680250596 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (x6989586621680250595 :: k2) (showx6989586621680250594 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680250598ShowlSym3 xs6989586621680250596 x6989586621680250595 showx6989586621680250594) instance forall k1 k2 k3 (s6989586621680250597 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (xs6989586621680250596 :: k2) (x6989586621680250595 :: k1) (showx6989586621680250594 :: GHC.Types.Symbol). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680250598ShowlSym4 s6989586621680250597 xs6989586621680250596 x6989586621680250595 showx6989586621680250594) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Lambda_6989586621680250524Sym0 instance forall k (a_69895866216802505196989586621680250523 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680250524Sym1 a_69895866216802505196989586621680250523) -- | Defines the promoted version of Monoid, PMonoid, and the -- singleton version, SMonoid. module Data.Singletons.Prelude.Monoid class PSemigroup a_a5tZ0 => PMonoid (a_a5tZ0 :: Type) where { type family Mempty :: a_a5tZ0; type family Mappend (arg_a5u5d :: a_a5tZ0) (arg_a5u5e :: a_a5tZ0) :: a_a5tZ0; type family Mconcat (arg_a5u5h :: [a_a5tZ0]) :: a_a5tZ0; type Mappend a_a5u5t a_a5u5u = Apply (Apply Mappend_6989586621680317093Sym0 a_a5u5t) a_a5u5u; type Mconcat a_a5u5E = Apply Mconcat_6989586621680317103Sym0 a_a5u5E; } class SSemigroup a_a5tZ0 => SMonoid a_a5tZ0 sMempty :: SMonoid a_a5tZ0 => Sing (MemptySym0 :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). SMonoid a_a5tZ0 => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). SMonoid a_a5tZ0 => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). (SMonoid a_a5tZ0, (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) ~ Apply (Apply Mappend_6989586621680317093Sym0 t_a5u6y) t_a5u6z) => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). (SMonoid a_a5tZ0, (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) ~ Apply Mconcat_6989586621680317103Sym0 t_a5u6C) => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) -- | The singleton kind-indexed data family. data family Sing :: k -> Type type family GetDual (a_a3mec :: Dual a_aiFO) :: a_aiFO type family GetAll (a_a3meq :: All) :: Bool type family GetAny (a_a3meE :: Any) :: Bool type family GetSum (a_a3meV :: Sum a_aiFz) :: a_aiFz type family GetProduct (a_a3mfc :: Product a_aiFE) :: a_aiFE type family GetFirst (a_a5v06 :: First a_aiGh) :: Maybe a_aiGh type family GetLast (a_a5v0r :: Last a_aiGc) :: Maybe a_aiGc type SDual = (Sing :: Dual a_aiFO -> Type) type SAll = (Sing :: All -> Type) type SAny = (Sing :: Any -> Type) type SSum = (Sing :: Sum a_aiFz -> Type) type SProduct = (Sing :: Product a_aiFE -> Type) type SFirst = (Sing :: First a_aiGh -> Type) type SLast = (Sing :: Last a_aiGc -> Type) type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680316690. (~>) a6989586621680316690 ((~>) a6989586621680316690 a6989586621680316690) data MappendSym1 (arg6989586621680317075 :: a6989586621680316690) :: (~>) a6989586621680316690 a6989586621680316690 type MappendSym2 (arg6989586621680317075 :: a6989586621680316690) (arg6989586621680317076 :: a6989586621680316690) = Mappend arg6989586621680317075 arg6989586621680317076 data MconcatSym0 :: forall a6989586621680316690. (~>) [a6989586621680316690] a6989586621680316690 type MconcatSym1 (arg6989586621680317079 :: [a6989586621680316690]) = Mconcat arg6989586621680317079 data DualSym0 :: forall (a6989586621679081576 :: Type). (~>) a6989586621679081576 (Dual (a6989586621679081576 :: Type)) type DualSym1 (t6989586621679810227 :: a6989586621679081576) = 'Dual t6989586621679810227 data GetDualSym0 :: forall a6989586621679081576. (~>) (Dual a6989586621679081576) a6989586621679081576 type GetDualSym1 (a6989586621679810224 :: Dual a6989586621679081576) = GetDual a6989586621679810224 data AllSym0 :: (~>) Bool All type AllSym1 (t6989586621679810241 :: Bool) = 'All t6989586621679810241 data GetAllSym0 :: (~>) All Bool type GetAllSym1 (a6989586621679810238 :: All) = GetAll a6989586621679810238 data AnySym0 :: (~>) Bool Any type AnySym1 (t6989586621679810255 :: Bool) = 'Any t6989586621679810255 data GetAnySym0 :: (~>) Any Bool type GetAnySym1 (a6989586621679810252 :: Any) = GetAny a6989586621679810252 data SumSym0 :: forall (a6989586621679081561 :: Type). (~>) a6989586621679081561 (Sum (a6989586621679081561 :: Type)) type SumSym1 (t6989586621679810272 :: a6989586621679081561) = 'Sum t6989586621679810272 data GetSumSym0 :: forall a6989586621679081561. (~>) (Sum a6989586621679081561) a6989586621679081561 type GetSumSym1 (a6989586621679810269 :: Sum a6989586621679081561) = GetSum a6989586621679810269 data ProductSym0 :: forall (a6989586621679081566 :: Type). (~>) a6989586621679081566 (Product (a6989586621679081566 :: Type)) type ProductSym1 (t6989586621679810289 :: a6989586621679081566) = 'Product t6989586621679810289 data GetProductSym0 :: forall a6989586621679081566. (~>) (Product a6989586621679081566) a6989586621679081566 type GetProductSym1 (a6989586621679810286 :: Product a6989586621679081566) = GetProduct a6989586621679810286 data FirstSym0 :: forall (a6989586621679081605 :: Type). (~>) (Maybe a6989586621679081605) (First (a6989586621679081605 :: Type)) type FirstSym1 (t6989586621680320605 :: Maybe a6989586621679081605) = 'First t6989586621680320605 data GetFirstSym0 :: forall a6989586621679081605. (~>) (First a6989586621679081605) (Maybe a6989586621679081605) type GetFirstSym1 (a6989586621680320602 :: First a6989586621679081605) = GetFirst a6989586621680320602 data LastSym0 :: forall (a6989586621679081600 :: Type). (~>) (Maybe a6989586621679081600) (Last (a6989586621679081600 :: Type)) type LastSym1 (t6989586621680320626 :: Maybe a6989586621679081600) = 'Last t6989586621680320626 data GetLastSym0 :: forall a6989586621679081600. (~>) (Last a6989586621679081600) (Maybe a6989586621679081600) type GetLastSym1 (a6989586621680320623 :: Last a6989586621679081600) = GetLast a6989586621680320623 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326816Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.Last a) instance forall a6989586621680326494 (a6989586621680326814 :: Data.Monoid.Last a6989586621680326494). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326816Sym1 a6989586621680326814) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680326812BSym0 instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326802Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.Last instance forall b6989586621679536074 a6989586621679536073 (a6989586621680326800 :: Data.Monoid.Last a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326802Sym1 a6989586621680326800) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680326785Sym0 instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.Last instance forall k1 a k (a6989586621680326783 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680326785Sym1 a6989586621680326783) instance forall k1 a k (k6989586621680326784 :: k) (a6989586621680326783 :: k1 Data.Singletons.Internal.~> Data.Monoid.Last a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680326785Sym2 k6989586621680326784 a6989586621680326783) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680326788Scrutinee_6989586621680326505Sym0 instance forall k1 k2 k3 (a6989586621680326783 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680326788Scrutinee_6989586621680326505Sym1 a6989586621680326783) instance forall k1 k2 k3 (k6989586621680326784 :: k3) (a6989586621680326783 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680326788Scrutinee_6989586621680326505Sym2 k6989586621680326784 a6989586621680326783) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326775Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.Last instance forall b6989586621679536047 a6989586621679536046 (a6989586621680326773 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326775Sym1 a6989586621680326773) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680326763Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680326761 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680326763Sym1 a6989586621680326761) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326751Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.Last instance forall a6989586621679536050 b6989586621679536051 (a6989586621680326749 :: Data.Monoid.Last (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326751Sym1 a6989586621680326749) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680326740Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326728Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.First a) instance forall a6989586621680326484 (a6989586621680326726 :: Data.Monoid.First a6989586621680326484). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326728Sym1 a6989586621680326726) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680326724ASym0 instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326714Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.First instance forall b6989586621679536074 a6989586621679536073 (a6989586621680326712 :: Data.Monoid.First a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326714Sym1 a6989586621680326712) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680326697Sym0 instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.First instance forall k1 a k (a6989586621680326695 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680326697Sym1 a6989586621680326695) instance forall k1 a k (k6989586621680326696 :: k) (a6989586621680326695 :: k1 Data.Singletons.Internal.~> Data.Monoid.First a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680326697Sym2 k6989586621680326696 a6989586621680326695) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680326700Scrutinee_6989586621680326498Sym0 instance forall k1 k2 k3 (a6989586621680326695 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680326700Scrutinee_6989586621680326498Sym1 a6989586621680326695) instance forall k1 k2 k3 (k6989586621680326696 :: k3) (a6989586621680326695 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680326700Scrutinee_6989586621680326498Sym2 k6989586621680326696 a6989586621680326695) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326687Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.First instance forall b6989586621679536047 a6989586621679536046 (a6989586621680326685 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326687Sym1 a6989586621680326685) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680326675Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680326673 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680326675Sym1 a6989586621680326673) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326663Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.First instance forall a6989586621679536050 b6989586621679536051 (a6989586621680326661 :: Data.Monoid.First (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680326663Sym1 a6989586621680326661) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680326652Sym0 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_6989586621680323558Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680323558Sym1 a6989586621680323555) instance forall a6989586621679081600 (a6989586621680323556 :: GHC.Types.Nat) (a6989586621680323555 :: Data.Monoid.Last a6989586621679081600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680323558Sym2 a6989586621680323556 a6989586621680323555) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680323529Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680323529Sym1 a6989586621680323526) instance forall a6989586621679081605 (a6989586621680323527 :: GHC.Types.Nat) (a6989586621680323526 :: Data.Monoid.First a6989586621679081605). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680323529Sym2 a6989586621680323527 a6989586621680323526) 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_6989586621680322265Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.Last a) instance forall a6989586621679081600 (a6989586621680322263 :: Data.Monoid.Last a6989586621679081600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680322265Sym1 a6989586621680322263) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Compare_6989586621680322244Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.First a) instance forall a6989586621679081605 (a6989586621680322242 :: Data.Monoid.First a6989586621679081605). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680322244Sym1 a6989586621680322242) 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.Singletons.Decide.SDecide (Data.Monoid.Last a) 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.Internal.Sing z) instance forall a (z :: Data.Monoid.Last a). Data.Singletons.ShowSing.ShowSing (GHC.Maybe.Maybe a) => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.LastSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.LastSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.GetLastSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.FirstSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Monoid.FirstSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.GetFirstSym0 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.Internal.TyCon1 'Data.Monoid.First) 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.Internal.TyCon1 'Data.Monoid.Last) 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_6989586621680317141Sym0 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_6989586621680317126Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid [a] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MconcatSym0 instance forall a6989586621680316690 (arg6989586621680317075 :: a6989586621680316690). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.MappendSym1 arg6989586621680317075) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MappendSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mconcat_6989586621680317103Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mappend_6989586621680317093Sym0 instance forall a6989586621680316690 (a6989586621680317091 :: a6989586621680316690). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Mappend_6989586621680317093Sym1 a6989586621680317091) -- | 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 data family. data family Sing :: k -> Type type SEither = (Sing :: Either a_aiWO b_aiWP -> Type) either_ :: (a_a5Ut8 -> c_a5Ut9) -> (b_a5Uta -> c_a5Ut9) -> Either a_a5Ut8 b_a5Uta -> c_a5Ut9 type family Either_ (a_a5UtI :: (~>) a_a5Ut8 c_a5Ut9) (a_a5UtJ :: (~>) b_a5Uta c_a5Ut9) (a_a5UtK :: Either a_a5Ut8 b_a5Uta) :: c_a5Ut9 sEither_ :: forall a_a5Ut8 c_a5Ut9 b_a5Uta (t_a5UtS :: (~>) a_a5Ut8 c_a5Ut9) (t_a5UtT :: (~>) b_a5Uta c_a5Ut9) (t_a5UtU :: Either a_a5Ut8 b_a5Uta). Sing t_a5UtS -> Sing t_a5UtT -> Sing t_a5UtU -> Sing (Apply (Apply (Apply Either_Sym0 t_a5UtS) t_a5UtT) t_a5UtU :: c_a5Ut9) type family Lefts (a_a5UXg :: [Either a_a5UQY b_a5UQZ]) :: [a_a5UQY] sLefts :: forall a_a5UQY b_a5UQZ (t_a5UXt :: [Either a_a5UQY b_a5UQZ]). Sing t_a5UXt -> Sing (Apply LeftsSym0 t_a5UXt :: [a_a5UQY]) type family Rights (a_a5UXb :: [Either a_a5UQW b_a5UQX]) :: [b_a5UQX] sRights :: forall a_a5UQW b_a5UQX (t_a5UXr :: [Either a_a5UQW b_a5UQX]). Sing t_a5UXr -> Sing (Apply RightsSym0 t_a5UXr :: [b_a5UQX]) type family PartitionEithers (a_a5UWR :: [Either a_a5UQU b_a5UQV]) :: ([a_a5UQU], [b_a5UQV]) sPartitionEithers :: forall a_a5UQU b_a5UQV (t_a5UXp :: [Either a_a5UQU b_a5UQV]). Sing t_a5UXp -> Sing (Apply PartitionEithersSym0 t_a5UXp :: ([a_a5UQU], [b_a5UQV])) type family IsLeft (a_a5UWN :: Either a_a5UQS b_a5UQT) :: Bool sIsLeft :: forall a_a5UQS b_a5UQT (t_a5UXn :: Either a_a5UQS b_a5UQT). Sing t_a5UXn -> Sing (Apply IsLeftSym0 t_a5UXn :: Bool) type family IsRight (a_a5UWL :: Either a_a5UQQ b_a5UQR) :: Bool sIsRight :: forall a_a5UQQ b_a5UQR (t_a5UXl :: Either a_a5UQQ b_a5UQR). Sing t_a5UXl -> Sing (Apply IsRightSym0 t_a5UXl :: Bool) data LeftSym0 :: forall (a6989586621679082630 :: Type) (b6989586621679082631 :: Type). (~>) a6989586621679082630 (Either (a6989586621679082630 :: Type) (b6989586621679082631 :: Type)) type LeftSym1 (t6989586621679291704 :: a6989586621679082630) = 'Left t6989586621679291704 data RightSym0 :: forall (a6989586621679082630 :: Type) (b6989586621679082631 :: Type). (~>) b6989586621679082631 (Either (a6989586621679082630 :: Type) (b6989586621679082631 :: Type)) type RightSym1 (t6989586621679291706 :: b6989586621679082631) = 'Right t6989586621679291706 data Either_Sym0 :: forall a6989586621680418502 b6989586621680418504 c6989586621680418503. (~>) ((~>) a6989586621680418502 c6989586621680418503) ((~>) ((~>) b6989586621680418504 c6989586621680418503) ((~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503)) data Either_Sym1 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) :: forall b6989586621680418504. (~>) ((~>) b6989586621680418504 c6989586621680418503) ((~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503) data Either_Sym2 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) (a6989586621680418539 :: (~>) b6989586621680418504 c6989586621680418503) :: (~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503 type Either_Sym3 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) (a6989586621680418539 :: (~>) b6989586621680418504 c6989586621680418503) (a6989586621680418540 :: Either a6989586621680418502 b6989586621680418504) = Either_ a6989586621680418538 a6989586621680418539 a6989586621680418540 data LeftsSym0 :: forall a6989586621680419980 b6989586621680419981. (~>) [Either a6989586621680419980 b6989586621680419981] [a6989586621680419980] type LeftsSym1 (a6989586621680420370 :: [Either a6989586621680419980 b6989586621680419981]) = Lefts a6989586621680420370 data RightsSym0 :: forall a6989586621680419978 b6989586621680419979. (~>) [Either a6989586621680419978 b6989586621680419979] [b6989586621680419979] type RightsSym1 (a6989586621680420365 :: [Either a6989586621680419978 b6989586621680419979]) = Rights a6989586621680420365 data IsLeftSym0 :: forall a6989586621680419974 b6989586621680419975. (~>) (Either a6989586621680419974 b6989586621680419975) Bool type IsLeftSym1 (a6989586621680420341 :: Either a6989586621680419974 b6989586621680419975) = IsLeft a6989586621680420341 data IsRightSym0 :: forall a6989586621680419972 b6989586621680419973. (~>) (Either a6989586621680419972 b6989586621680419973) Bool type IsRightSym1 (a6989586621680420339 :: Either a6989586621680419972 b6989586621680419973) = IsRight a6989586621680420339 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.Let6989586621680420348LeftSym0 instance forall k2 k3 k (a_69895866216804203436989586621680420347 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680420348LeftSym1 a_69895866216804203436989586621680420347) instance forall k2 k3 k (a6989586621680420357 :: k) (a_69895866216804203436989586621680420347 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680420348LeftSym2 a6989586621680420357 a_69895866216804203436989586621680420347) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Let6989586621680420348RightSym0 instance forall k2 k3 k (a_69895866216804203436989586621680420347 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680420348RightSym1 a_69895866216804203436989586621680420347) instance forall k2 k3 k (a6989586621680420349 :: k) (a_69895866216804203436989586621680420347 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680420348RightSym2 a6989586621680420349 a_69895866216804203436989586621680420347) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Either_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.Either_Sym0 instance forall b6989586621680418504 a6989586621680418502 c6989586621680418503 (a6989586621680418538 :: a6989586621680418502 Data.Singletons.Internal.~> c6989586621680418503). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym1 a6989586621680418538) 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 b6989586621680418504 a6989586621680418502 c6989586621680418503 (a6989586621680418539 :: a6989586621680418502 Data.Singletons.Internal.~> c6989586621680418503) (a6989586621680418538 :: b6989586621680418504 Data.Singletons.Internal.~> c6989586621680418503). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym2 a6989586621680418539 a6989586621680418538) 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_a5ZG6 :: Type -> Type) where { type family Fold (arg_a5ZQ9 :: t_a5ZG6 m_a5ZG7) :: m_a5ZG7; type family FoldMap (arg_a5ZQb :: (~>) a_a5ZG9 m_a5ZG8) (arg_a5ZQc :: t_a5ZG6 a_a5ZG9) :: m_a5ZG8; type family Foldr (arg_a5ZQf :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (arg_a5ZQg :: b_a5ZGb) (arg_a5ZQh :: t_a5ZG6 a_a5ZGa) :: b_a5ZGb; type family Foldr' (arg_a5ZQl :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (arg_a5ZQm :: b_a5ZGd) (arg_a5ZQn :: t_a5ZG6 a_a5ZGc) :: b_a5ZGd; type family Foldl (arg_a5ZQr :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (arg_a5ZQs :: b_a5ZGe) (arg_a5ZQt :: t_a5ZG6 a_a5ZGf) :: b_a5ZGe; type family Foldl' (arg_a5ZQx :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (arg_a5ZQy :: b_a5ZGg) (arg_a5ZQz :: t_a5ZG6 a_a5ZGh) :: b_a5ZGg; type family Foldr1 (arg_a5ZQD :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (arg_a5ZQE :: t_a5ZG6 a_a5ZGi) :: a_a5ZGi; type family Foldl1 (arg_a5ZQH :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (arg_a5ZQI :: t_a5ZG6 a_a5ZGj) :: a_a5ZGj; type family ToList (arg_a5ZQL :: t_a5ZG6 a_a5ZGk) :: [a_a5ZGk]; type family Null (arg_a5ZQN :: t_a5ZG6 a_a5ZGl) :: Bool; type family Length (arg_a5ZQP :: t_a5ZG6 a_a5ZGm) :: Nat; type family Elem (arg_a5ZQR :: a_a5ZGn) (arg_a5ZQS :: t_a5ZG6 a_a5ZGn) :: Bool; type family Maximum (arg_a5ZQV :: t_a5ZG6 a_a5ZGo) :: a_a5ZGo; type family Minimum (arg_a5ZQX :: t_a5ZG6 a_a5ZGp) :: a_a5ZGp; type family Sum (arg_a5ZQZ :: t_a5ZG6 a_a5ZGq) :: a_a5ZGq; type family Product (arg_a5ZR1 :: t_a5ZG6 a_a5ZGr) :: a_a5ZGr; type Fold a_a5ZR8 = Apply Fold_6989586621680439211Sym0 a_a5ZR8; type FoldMap a_a5ZRk a_a5ZRl = Apply (Apply FoldMap_6989586621680439224Sym0 a_a5ZRk) a_a5ZRl; type Foldr a_a5ZRH a_a5ZRI a_a5ZRJ = Apply (Apply (Apply Foldr_6989586621680439248Sym0 a_a5ZRH) a_a5ZRI) a_a5ZRJ; type Foldr' a_a5ZSb a_a5ZSc a_a5ZSd = Apply (Apply (Apply Foldr'_6989586621680439278Sym0 a_a5ZSb) a_a5ZSc) a_a5ZSd; type Foldl a_a5ZSA a_a5ZSB a_a5ZSC = Apply (Apply (Apply Foldl_6989586621680439303Sym0 a_a5ZSA) a_a5ZSB) a_a5ZSC; type Foldl' a_a5ZT4 a_a5ZT5 a_a5ZT6 = Apply (Apply (Apply Foldl'_6989586621680439333Sym0 a_a5ZT4) a_a5ZT5) a_a5ZT6; type Foldr1 a_a5ZTv a_a5ZTw = Apply (Apply Foldr1_6989586621680439359Sym0 a_a5ZTv) a_a5ZTw; type Foldl1 a_a5ZTU a_a5ZTV = Apply (Apply Foldl1_6989586621680439384Sym0 a_a5ZTU) a_a5ZTV; type ToList a_a5ZU5 = Apply ToList_6989586621680439394Sym0 a_a5ZU5; type Null a_a5ZUq = Apply Null_6989586621680439415Sym0 a_a5ZUq; type Length a_a5ZUM = Apply Length_6989586621680439437Sym0 a_a5ZUM; type Elem a_a5ZV0 a_a5ZV1 = Apply (Apply Elem_6989586621680439452Sym0 a_a5ZV0) a_a5ZV1; type Maximum a_a5ZVf = Apply Maximum_6989586621680439466Sym0 a_a5ZVf; type Minimum a_a5ZVs = Apply Minimum_6989586621680439479Sym0 a_a5ZVs; type Sum a_a5ZVF = Apply Sum_6989586621680439492Sym0 a_a5ZVF; type Product a_a5ZVS = Apply Product_6989586621680439505Sym0 a_a5ZVS; } class SFoldable (t_a5ZG6 :: Type -> Type) sFold :: forall m_a5ZG7 (t_a60c0 :: t_a5ZG6 m_a5ZG7). (SFoldable t_a5ZG6, SMonoid m_a5ZG7) => Sing t_a60c0 -> Sing (Apply FoldSym0 t_a60c0 :: m_a5ZG7) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). SFoldable t_a5ZG6 => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldr' :: forall a_a5ZGc b_a5ZGd (t_a60cc :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (t_a60cd :: b_a5ZGd) (t_a60ce :: t_a5ZG6 a_a5ZGc). SFoldable t_a5ZG6 => Sing t_a60cc -> Sing t_a60cd -> Sing t_a60ce -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). SFoldable t_a5ZG6 => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldl' :: forall b_a5ZGg a_a5ZGh (t_a60co :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (t_a60cp :: b_a5ZGg) (t_a60cq :: t_a5ZG6 a_a5ZGh). SFoldable t_a5ZG6 => Sing t_a60co -> Sing t_a60cp -> Sing t_a60cq -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). SFoldable t_a5ZG6 => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). SFoldable t_a5ZG6 => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sToList :: forall a_a5ZGk (t_a60cC :: t_a5ZG6 a_a5ZGk). SFoldable t_a5ZG6 => Sing t_a60cC -> Sing (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). SFoldable t_a5ZG6 => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) sLength :: forall a_a5ZGm (t_a60cG :: t_a5ZG6 a_a5ZGm). SFoldable t_a5ZG6 => Sing t_a60cG -> Sing (Apply LengthSym0 t_a60cG :: Nat) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) sFold :: forall m_a5ZG7 (t_a60c0 :: t_a5ZG6 m_a5ZG7). (SFoldable t_a5ZG6, (Apply FoldSym0 t_a60c0 :: m_a5ZG7) ~ Apply Fold_6989586621680439211Sym0 t_a60c0, SMonoid m_a5ZG7) => Sing t_a60c0 -> Sing (Apply FoldSym0 t_a60c0 :: m_a5ZG7) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) ~ Apply (Apply FoldMap_6989586621680439224Sym0 t_a60c2) t_a60c3, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) ~ Apply (Apply (Apply Foldr_6989586621680439248Sym0 t_a60c6) t_a60c7) t_a60c8) => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldr' :: forall a_a5ZGc b_a5ZGd (t_a60cc :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (t_a60cd :: b_a5ZGd) (t_a60ce :: t_a5ZG6 a_a5ZGc). (SFoldable t_a5ZG6, (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) ~ Apply (Apply (Apply Foldr'_6989586621680439278Sym0 t_a60cc) t_a60cd) t_a60ce) => Sing t_a60cc -> Sing t_a60cd -> Sing t_a60ce -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) ~ Apply (Apply (Apply Foldl_6989586621680439303Sym0 t_a60ci) t_a60cj) t_a60ck) => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldl' :: forall b_a5ZGg a_a5ZGh (t_a60co :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (t_a60cp :: b_a5ZGg) (t_a60cq :: t_a5ZG6 a_a5ZGh). (SFoldable t_a5ZG6, (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) ~ Apply (Apply (Apply Foldl'_6989586621680439333Sym0 t_a60co) t_a60cp) t_a60cq) => Sing t_a60co -> Sing t_a60cp -> Sing t_a60cq -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). (SFoldable t_a5ZG6, (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) ~ Apply (Apply Foldr1_6989586621680439359Sym0 t_a60cu) t_a60cv) => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). (SFoldable t_a5ZG6, (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) ~ Apply (Apply Foldl1_6989586621680439384Sym0 t_a60cy) t_a60cz) => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sToList :: forall a_a5ZGk (t_a60cC :: t_a5ZG6 a_a5ZGk). (SFoldable t_a5ZG6, (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) ~ Apply ToList_6989586621680439394Sym0 t_a60cC) => Sing t_a60cC -> Sing (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). (SFoldable t_a5ZG6, (Apply NullSym0 t_a60cE :: Bool) ~ Apply Null_6989586621680439415Sym0 t_a60cE) => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) sLength :: forall a_a5ZGm (t_a60cG :: t_a5ZG6 a_a5ZGm). (SFoldable t_a5ZG6, (Apply LengthSym0 t_a60cG :: Nat) ~ Apply Length_6989586621680439437Sym0 t_a60cG) => Sing t_a60cG -> Sing (Apply LengthSym0 t_a60cG :: Nat) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) ~ Apply (Apply Elem_6989586621680439452Sym0 t_a60cI) t_a60cJ, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, (Apply MaximumSym0 t_a60cM :: a_a5ZGo) ~ Apply Maximum_6989586621680439466Sym0 t_a60cM, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, (Apply MinimumSym0 t_a60cO :: a_a5ZGp) ~ Apply Minimum_6989586621680439479Sym0 t_a60cO, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, (Apply SumSym0 t_a60cQ :: a_a5ZGq) ~ Apply Sum_6989586621680439492Sym0 t_a60cQ, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, (Apply ProductSym0 t_a60cS :: a_a5ZGr) ~ Apply Product_6989586621680439505Sym0 t_a60cS, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) type family FoldrM (a_a5ZPN :: (~>) a_a5ZFt ((~>) b_a5ZFu (m_a5ZFs b_a5ZFu))) (a_a5ZPO :: b_a5ZFu) (a_a5ZPP :: t_a5ZFr a_a5ZFt) :: m_a5ZFs b_a5ZFu sFoldrM :: forall t_a5ZFr m_a5ZFs a_a5ZFt b_a5ZFu (t_a60bf :: (~>) a_a5ZFt ((~>) b_a5ZFu (m_a5ZFs b_a5ZFu))) (t_a60bg :: b_a5ZFu) (t_a60bh :: t_a5ZFr a_a5ZFt). (SFoldable t_a5ZFr, SMonad m_a5ZFs) => Sing t_a60bf -> Sing t_a60bg -> Sing t_a60bh -> Sing (Apply (Apply (Apply FoldrMSym0 t_a60bf) t_a60bg) t_a60bh :: m_a5ZFs b_a5ZFu) type family FoldlM (a_a5ZPr :: (~>) b_a5ZFp ((~>) a_a5ZFq (m_a5ZFo b_a5ZFp))) (a_a5ZPs :: b_a5ZFp) (a_a5ZPt :: t_a5ZFn a_a5ZFq) :: m_a5ZFo b_a5ZFp sFoldlM :: forall t_a5ZFn m_a5ZFo b_a5ZFp a_a5ZFq (t_a60b9 :: (~>) b_a5ZFp ((~>) a_a5ZFq (m_a5ZFo b_a5ZFp))) (t_a60ba :: b_a5ZFp) (t_a60bb :: t_a5ZFn a_a5ZFq). (SFoldable t_a5ZFn, SMonad m_a5ZFo) => Sing t_a60b9 -> Sing t_a60ba -> Sing t_a60bb -> Sing (Apply (Apply (Apply FoldlMSym0 t_a60b9) t_a60ba) t_a60bb :: m_a5ZFo b_a5ZFp) type family Traverse_ (a_a5ZP9 :: (~>) a_a5ZFl (f_a5ZFk b_a5ZFm)) (a_a5ZPa :: t_a5ZFj a_a5ZFl) :: f_a5ZFk () sTraverse_ :: forall t_a5ZFj f_a5ZFk a_a5ZFl b_a5ZFm (t_a60b1 :: (~>) a_a5ZFl (f_a5ZFk b_a5ZFm)) (t_a60b2 :: t_a5ZFj a_a5ZFl). (SFoldable t_a5ZFj, SApplicative f_a5ZFk) => Sing t_a60b1 -> Sing t_a60b2 -> Sing (Apply (Apply Traverse_Sym0 t_a60b1) t_a60b2 :: f_a5ZFk ()) type family For_ (a_a5ZPl :: t_a5ZFf a_a5ZFh) (a_a5ZPm :: (~>) a_a5ZFh (f_a5ZFg b_a5ZFi)) :: f_a5ZFg () sFor_ :: forall t_a5ZFf f_a5ZFg a_a5ZFh b_a5ZFi (t_a60b5 :: t_a5ZFf a_a5ZFh) (t_a60b6 :: (~>) a_a5ZFh (f_a5ZFg b_a5ZFi)). (SFoldable t_a5ZFf, SApplicative f_a5ZFg) => Sing t_a60b5 -> Sing t_a60b6 -> Sing (Apply (Apply For_Sym0 t_a60b5) t_a60b6 :: f_a5ZFg ()) type family SequenceA_ (a_a5ZOO :: t_a5ZF4 (f_a5ZF5 a_a5ZF6)) :: f_a5ZF5 () sSequenceA_ :: forall t_a5ZF4 f_a5ZF5 a_a5ZF6 (t_a60aR :: t_a5ZF4 (f_a5ZF5 a_a5ZF6)). (SFoldable t_a5ZF4, SApplicative f_a5ZF5) => Sing t_a60aR -> Sing (Apply SequenceA_Sym0 t_a60aR :: f_a5ZF5 ()) type family Asum (a_a5ZOz :: t_a5ZEY (f_a5ZEZ a_a5ZF0)) :: f_a5ZEZ a_a5ZF0 sAsum :: forall t_a5ZEY f_a5ZEZ a_a5ZF0 (t_a60aL :: t_a5ZEY (f_a5ZEZ a_a5ZF0)). (SFoldable t_a5ZEY, SAlternative f_a5ZEZ) => Sing t_a60aL -> Sing (Apply AsumSym0 t_a60aL :: f_a5ZEZ a_a5ZF0) type family MapM_ (a_a5ZOR :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (a_a5ZOS :: t_a5ZFb a_a5ZFd) :: m_a5ZFc () sMapM_ :: forall t_a5ZFb m_a5ZFc a_a5ZFd b_a5ZFe (t_a60aT :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (t_a60aU :: t_a5ZFb a_a5ZFd). (SFoldable t_a5ZFb, SMonad m_a5ZFc) => Sing t_a60aT -> Sing t_a60aU -> Sing (Apply (Apply MapM_Sym0 t_a60aT) t_a60aU :: m_a5ZFc ()) type family ForM_ (a_a5ZP3 :: t_a5ZF7 a_a5ZF9) (a_a5ZP4 :: (~>) a_a5ZF9 (m_a5ZF8 b_a5ZFa)) :: m_a5ZF8 () sForM_ :: forall t_a5ZF7 m_a5ZF8 a_a5ZF9 b_a5ZFa (t_a60aX :: t_a5ZF7 a_a5ZF9) (t_a60aY :: (~>) a_a5ZF9 (m_a5ZF8 b_a5ZFa)). (SFoldable t_a5ZF7, SMonad m_a5ZF8) => Sing t_a60aX -> Sing t_a60aY -> Sing (Apply (Apply ForM_Sym0 t_a60aX) t_a60aY :: m_a5ZF8 ()) type family Sequence_ (a_a5ZOJ :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)) :: m_a5ZF2 () sSequence_ :: forall t_a5ZF1 m_a5ZF2 a_a5ZF3 (t_a60aP :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)). (SFoldable t_a5ZF1, SMonad m_a5ZF2) => Sing t_a60aP -> Sing (Apply Sequence_Sym0 t_a60aP :: m_a5ZF2 ()) type family Msum (a_a5ZOE :: t_a5ZEV (m_a5ZEW a_a5ZEX)) :: m_a5ZEW a_a5ZEX sMsum :: forall t_a5ZEV m_a5ZEW a_a5ZEX (t_a60aN :: t_a5ZEV (m_a5ZEW a_a5ZEX)). (SFoldable t_a5ZEV, SMonadPlus m_a5ZEW) => Sing t_a60aN -> Sing (Apply MsumSym0 t_a60aN :: m_a5ZEW a_a5ZEX) type family Concat (a_a5ZOl :: t_a5ZET [a_a5ZEU]) :: [a_a5ZEU] sConcat :: forall t_a5ZET a_a5ZEU (t_a60aJ :: t_a5ZET [a_a5ZEU]). SFoldable t_a5ZET => Sing t_a60aJ -> Sing (Apply ConcatSym0 t_a60aJ :: [a_a5ZEU]) type family ConcatMap (a_a5ZO5 :: (~>) a_a5ZER [b_a5ZES]) (a_a5ZO6 :: t_a5ZEQ a_a5ZER) :: [b_a5ZES] sConcatMap :: forall t_a5ZEQ a_a5ZER b_a5ZES (t_a60aF :: (~>) a_a5ZER [b_a5ZES]) (t_a60aG :: t_a5ZEQ a_a5ZER). SFoldable t_a5ZEQ => Sing t_a60aF -> Sing t_a60aG -> Sing (Apply (Apply ConcatMapSym0 t_a60aF) t_a60aG :: [b_a5ZES]) type family And (a_a5ZNW :: t_a5ZEP Bool) :: Bool sAnd :: forall t_a5ZEP (t_a60aD :: t_a5ZEP Bool). SFoldable t_a5ZEP => Sing t_a60aD -> Sing (Apply AndSym0 t_a60aD :: Bool) type family Or (a_a5ZNN :: t_a5ZEO Bool) :: Bool sOr :: forall t_a5ZEO (t_a60aB :: t_a5ZEO Bool). SFoldable t_a5ZEO => Sing t_a60aB -> Sing (Apply OrSym0 t_a60aB :: Bool) type family Any (a_a5ZNA :: (~>) a_a5ZEN Bool) (a_a5ZNB :: t_a5ZEM a_a5ZEN) :: Bool sAny :: forall t_a5ZEM a_a5ZEN (t_a60ax :: (~>) a_a5ZEN Bool) (t_a60ay :: t_a5ZEM a_a5ZEN). SFoldable t_a5ZEM => Sing t_a60ax -> Sing t_a60ay -> Sing (Apply (Apply AnySym0 t_a60ax) t_a60ay :: Bool) type family All (a_a5ZNn :: (~>) a_a5ZEL Bool) (a_a5ZNo :: t_a5ZEK a_a5ZEL) :: Bool sAll :: forall t_a5ZEK a_a5ZEL (t_a60at :: (~>) a_a5ZEL Bool) (t_a60au :: t_a5ZEK a_a5ZEL). SFoldable t_a5ZEK => Sing t_a60at -> Sing t_a60au -> Sing (Apply (Apply AllSym0 t_a60at) t_a60au :: Bool) type family MaximumBy (a_a5ZMY :: (~>) a_a5ZEJ ((~>) a_a5ZEJ Ordering)) (a_a5ZMZ :: t_a5ZEI a_a5ZEJ) :: a_a5ZEJ sMaximumBy :: forall t_a5ZEI a_a5ZEJ (t_a60ap :: (~>) a_a5ZEJ ((~>) a_a5ZEJ Ordering)) (t_a60aq :: t_a5ZEI a_a5ZEJ). SFoldable t_a5ZEI => Sing t_a60ap -> Sing t_a60aq -> Sing (Apply (Apply MaximumBySym0 t_a60ap) t_a60aq :: a_a5ZEJ) type family MinimumBy (a_a5ZMz :: (~>) a_a5ZEH ((~>) a_a5ZEH Ordering)) (a_a5ZMA :: t_a5ZEG a_a5ZEH) :: a_a5ZEH sMinimumBy :: forall t_a5ZEG a_a5ZEH (t_a60al :: (~>) a_a5ZEH ((~>) a_a5ZEH Ordering)) (t_a60am :: t_a5ZEG a_a5ZEH). SFoldable t_a5ZEG => Sing t_a60al -> Sing t_a60am -> Sing (Apply (Apply MinimumBySym0 t_a60al) t_a60am :: a_a5ZEH) type family NotElem (a_a5ZMr :: a_a5ZEF) (a_a5ZMs :: t_a5ZEE a_a5ZEF) :: Bool sNotElem :: forall t_a5ZEE a_a5ZEF (t_a60ah :: a_a5ZEF) (t_a60ai :: t_a5ZEE a_a5ZEF). (SFoldable t_a5ZEE, SEq a_a5ZEF) => Sing t_a60ah -> Sing t_a60ai -> Sing (Apply (Apply NotElemSym0 t_a60ah) t_a60ai :: Bool) type family Find (a_a5ZM0 :: (~>) a_a5ZED Bool) (a_a5ZM1 :: t_a5ZEC a_a5ZED) :: Maybe a_a5ZED sFind :: forall t_a5ZEC a_a5ZED (t_a60ad :: (~>) a_a5ZED Bool) (t_a60ae :: t_a5ZEC a_a5ZED). SFoldable t_a5ZEC => Sing t_a60ad -> Sing t_a60ae -> Sing (Apply (Apply FindSym0 t_a60ad) t_a60ae :: Maybe a_a5ZED) data FoldSym0 :: forall m6989586621680438527 t6989586621680438526. (~>) (t6989586621680438526 m6989586621680438527) m6989586621680438527 type FoldSym1 (arg6989586621680439149 :: t6989586621680438526 m6989586621680438527) = Fold arg6989586621680439149 data FoldMapSym0 :: forall a6989586621680438529 m6989586621680438528 t6989586621680438526. (~>) ((~>) a6989586621680438529 m6989586621680438528) ((~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528) data FoldMapSym1 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528 type FoldMapSym2 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) (arg6989586621680439152 :: t6989586621680438526 a6989586621680438529) = FoldMap arg6989586621680439151 arg6989586621680439152 data FoldrSym0 :: forall a6989586621680438530 b6989586621680438531 t6989586621680438526. (~>) ((~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) ((~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531)) data FoldrSym1 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) :: forall t6989586621680438526. (~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531) data FoldrSym2 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531 type FoldrSym3 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) (arg6989586621680439157 :: t6989586621680438526 a6989586621680438530) = Foldr arg6989586621680439155 arg6989586621680439156 arg6989586621680439157 data Foldr'Sym0 :: forall a6989586621680438532 b6989586621680438533 t6989586621680438526. (~>) ((~>) a6989586621680438532 ((~>) b6989586621680438533 b6989586621680438533)) ((~>) b6989586621680438533 ((~>) (t6989586621680438526 a6989586621680438532) b6989586621680438533)) data Foldr'Sym1 (arg6989586621680439161 :: (~>) a6989586621680438532 ((~>) b6989586621680438533 b6989586621680438533)) :: forall t6989586621680438526. (~>) b6989586621680438533 ((~>) (t6989586621680438526 a6989586621680438532) b6989586621680438533) data Foldr'Sym2 (arg6989586621680439161 :: (~>) a6989586621680438532 ((~>) b6989586621680438533 b6989586621680438533)) (arg6989586621680439162 :: b6989586621680438533) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438532) b6989586621680438533 type Foldr'Sym3 (arg6989586621680439161 :: (~>) a6989586621680438532 ((~>) b6989586621680438533 b6989586621680438533)) (arg6989586621680439162 :: b6989586621680438533) (arg6989586621680439163 :: t6989586621680438526 a6989586621680438532) = Foldr' arg6989586621680439161 arg6989586621680439162 arg6989586621680439163 data FoldlSym0 :: forall a6989586621680438535 b6989586621680438534 t6989586621680438526. (~>) ((~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) ((~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534)) data FoldlSym1 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) :: forall t6989586621680438526. (~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534) data FoldlSym2 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534 type FoldlSym3 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) (arg6989586621680439169 :: t6989586621680438526 a6989586621680438535) = Foldl arg6989586621680439167 arg6989586621680439168 arg6989586621680439169 data Foldl'Sym0 :: forall a6989586621680438537 b6989586621680438536 t6989586621680438526. (~>) ((~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) ((~>) b6989586621680438536 ((~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536)) data Foldl'Sym1 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) :: forall t6989586621680438526. (~>) b6989586621680438536 ((~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536) data Foldl'Sym2 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) (arg6989586621680439174 :: b6989586621680438536) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536 type Foldl'Sym3 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) (arg6989586621680439174 :: b6989586621680438536) (arg6989586621680439175 :: t6989586621680438526 a6989586621680438537) = Foldl' arg6989586621680439173 arg6989586621680439174 arg6989586621680439175 data Foldr1Sym0 :: forall a6989586621680438538 t6989586621680438526. (~>) ((~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) ((~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538) data Foldr1Sym1 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538 type Foldr1Sym2 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) (arg6989586621680439180 :: t6989586621680438526 a6989586621680438538) = Foldr1 arg6989586621680439179 arg6989586621680439180 data Foldl1Sym0 :: forall a6989586621680438539 t6989586621680438526. (~>) ((~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) ((~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539) data Foldl1Sym1 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539 type Foldl1Sym2 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) (arg6989586621680439184 :: t6989586621680438526 a6989586621680438539) = Foldl1 arg6989586621680439183 arg6989586621680439184 data ToListSym0 :: forall a6989586621680438540 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438540) [a6989586621680438540] type ToListSym1 (arg6989586621680439187 :: t6989586621680438526 a6989586621680438540) = ToList arg6989586621680439187 data NullSym0 :: forall a6989586621680438541 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438541) Bool type NullSym1 (arg6989586621680439189 :: t6989586621680438526 a6989586621680438541) = Null arg6989586621680439189 data LengthSym0 :: forall a6989586621680438542 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438542) Nat type LengthSym1 (arg6989586621680439191 :: t6989586621680438526 a6989586621680438542) = Length arg6989586621680439191 data ElemSym0 :: forall a6989586621680438543 t6989586621680438526. (~>) a6989586621680438543 ((~>) (t6989586621680438526 a6989586621680438543) Bool) data ElemSym1 (arg6989586621680439193 :: a6989586621680438543) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438543) Bool type ElemSym2 (arg6989586621680439193 :: a6989586621680438543) (arg6989586621680439194 :: t6989586621680438526 a6989586621680438543) = Elem arg6989586621680439193 arg6989586621680439194 data MaximumSym0 :: forall a6989586621680438544 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438544) a6989586621680438544 type MaximumSym1 (arg6989586621680439197 :: t6989586621680438526 a6989586621680438544) = Maximum arg6989586621680439197 data MinimumSym0 :: forall a6989586621680438545 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438545) a6989586621680438545 type MinimumSym1 (arg6989586621680439199 :: t6989586621680438526 a6989586621680438545) = Minimum arg6989586621680439199 data SumSym0 :: forall a6989586621680438546 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438546) a6989586621680438546 type SumSym1 (arg6989586621680439201 :: t6989586621680438526 a6989586621680438546) = Sum arg6989586621680439201 data ProductSym0 :: forall a6989586621680438547 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438547) a6989586621680438547 type ProductSym1 (arg6989586621680439203 :: t6989586621680438526 a6989586621680438547) = Product arg6989586621680439203 data FoldrMSym0 :: forall a6989586621680438487 b6989586621680438488 m6989586621680438486 t6989586621680438485. (~>) ((~>) a6989586621680438487 ((~>) b6989586621680438488 (m6989586621680438486 b6989586621680438488))) ((~>) b6989586621680438488 ((~>) (t6989586621680438485 a6989586621680438487) (m6989586621680438486 b6989586621680438488))) data FoldrMSym1 (a6989586621680439127 :: (~>) a6989586621680438487 ((~>) b6989586621680438488 (m6989586621680438486 b6989586621680438488))) :: forall t6989586621680438485. (~>) b6989586621680438488 ((~>) (t6989586621680438485 a6989586621680438487) (m6989586621680438486 b6989586621680438488)) data FoldrMSym2 (a6989586621680439127 :: (~>) a6989586621680438487 ((~>) b6989586621680438488 (m6989586621680438486 b6989586621680438488))) (a6989586621680439128 :: b6989586621680438488) :: forall t6989586621680438485. (~>) (t6989586621680438485 a6989586621680438487) (m6989586621680438486 b6989586621680438488) type FoldrMSym3 (a6989586621680439127 :: (~>) a6989586621680438487 ((~>) b6989586621680438488 (m6989586621680438486 b6989586621680438488))) (a6989586621680439128 :: b6989586621680438488) (a6989586621680439129 :: t6989586621680438485 a6989586621680438487) = FoldrM a6989586621680439127 a6989586621680439128 a6989586621680439129 data FoldlMSym0 :: forall a6989586621680438484 b6989586621680438483 m6989586621680438482 t6989586621680438481. (~>) ((~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) ((~>) b6989586621680438483 ((~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483))) data FoldlMSym1 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) :: forall t6989586621680438481. (~>) b6989586621680438483 ((~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483)) data FoldlMSym2 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) (a6989586621680439106 :: b6989586621680438483) :: forall t6989586621680438481. (~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483) type FoldlMSym3 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) (a6989586621680439106 :: b6989586621680438483) (a6989586621680439107 :: t6989586621680438481 a6989586621680438484) = FoldlM a6989586621680439105 a6989586621680439106 a6989586621680439107 data Traverse_Sym0 :: forall a6989586621680438479 b6989586621680438480 f6989586621680438478 t6989586621680438477. (~>) ((~>) a6989586621680438479 (f6989586621680438478 b6989586621680438480)) ((~>) (t6989586621680438477 a6989586621680438479) (f6989586621680438478 ())) data Traverse_Sym1 (a6989586621680439087 :: (~>) a6989586621680438479 (f6989586621680438478 b6989586621680438480)) :: forall t6989586621680438477. (~>) (t6989586621680438477 a6989586621680438479) (f6989586621680438478 ()) type Traverse_Sym2 (a6989586621680439087 :: (~>) a6989586621680438479 (f6989586621680438478 b6989586621680438480)) (a6989586621680439088 :: t6989586621680438477 a6989586621680438479) = Traverse_ a6989586621680439087 a6989586621680439088 data For_Sym0 :: forall a6989586621680438475 b6989586621680438476 f6989586621680438474 t6989586621680438473. (~>) (t6989586621680438473 a6989586621680438475) ((~>) ((~>) a6989586621680438475 (f6989586621680438474 b6989586621680438476)) (f6989586621680438474 ())) data For_Sym1 (a6989586621680439099 :: t6989586621680438473 a6989586621680438475) :: forall b6989586621680438476 f6989586621680438474. (~>) ((~>) a6989586621680438475 (f6989586621680438474 b6989586621680438476)) (f6989586621680438474 ()) type For_Sym2 (a6989586621680439099 :: t6989586621680438473 a6989586621680438475) (a6989586621680439100 :: (~>) a6989586621680438475 (f6989586621680438474 b6989586621680438476)) = For_ a6989586621680439099 a6989586621680439100 data SequenceA_Sym0 :: forall a6989586621680438464 f6989586621680438463 t6989586621680438462. (~>) (t6989586621680438462 (f6989586621680438463 a6989586621680438464)) (f6989586621680438463 ()) type SequenceA_Sym1 (a6989586621680439066 :: t6989586621680438462 (f6989586621680438463 a6989586621680438464)) = SequenceA_ a6989586621680439066 data AsumSym0 :: forall a6989586621680438458 f6989586621680438457 t6989586621680438456. (~>) (t6989586621680438456 (f6989586621680438457 a6989586621680438458)) (f6989586621680438457 a6989586621680438458) type AsumSym1 (a6989586621680439051 :: t6989586621680438456 (f6989586621680438457 a6989586621680438458)) = Asum a6989586621680439051 data MapM_Sym0 :: forall a6989586621680438471 b6989586621680438472 m6989586621680438470 t6989586621680438469. (~>) ((~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) ((~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ())) data MapM_Sym1 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) :: forall t6989586621680438469. (~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ()) type MapM_Sym2 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) (a6989586621680439070 :: t6989586621680438469 a6989586621680438471) = MapM_ a6989586621680439069 a6989586621680439070 data ForM_Sym0 :: forall a6989586621680438467 b6989586621680438468 m6989586621680438466 t6989586621680438465. (~>) (t6989586621680438465 a6989586621680438467) ((~>) ((~>) a6989586621680438467 (m6989586621680438466 b6989586621680438468)) (m6989586621680438466 ())) data ForM_Sym1 (a6989586621680439081 :: t6989586621680438465 a6989586621680438467) :: forall b6989586621680438468 m6989586621680438466. (~>) ((~>) a6989586621680438467 (m6989586621680438466 b6989586621680438468)) (m6989586621680438466 ()) type ForM_Sym2 (a6989586621680439081 :: t6989586621680438465 a6989586621680438467) (a6989586621680439082 :: (~>) a6989586621680438467 (m6989586621680438466 b6989586621680438468)) = ForM_ a6989586621680439081 a6989586621680439082 data Sequence_Sym0 :: forall a6989586621680438461 m6989586621680438460 t6989586621680438459. (~>) (t6989586621680438459 (m6989586621680438460 a6989586621680438461)) (m6989586621680438460 ()) type Sequence_Sym1 (a6989586621680439061 :: t6989586621680438459 (m6989586621680438460 a6989586621680438461)) = Sequence_ a6989586621680439061 data MsumSym0 :: forall a6989586621680438455 m6989586621680438454 t6989586621680438453. (~>) (t6989586621680438453 (m6989586621680438454 a6989586621680438455)) (m6989586621680438454 a6989586621680438455) type MsumSym1 (a6989586621680439056 :: t6989586621680438453 (m6989586621680438454 a6989586621680438455)) = Msum a6989586621680439056 data ConcatSym0 :: forall a6989586621680438452 t6989586621680438451. (~>) (t6989586621680438451 [a6989586621680438452]) [a6989586621680438452] type ConcatSym1 (a6989586621680439037 :: t6989586621680438451 [a6989586621680438452]) = Concat a6989586621680439037 data ConcatMapSym0 :: forall a6989586621680438449 b6989586621680438450 t6989586621680438448. (~>) ((~>) a6989586621680438449 [b6989586621680438450]) ((~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450]) data ConcatMapSym1 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) :: forall t6989586621680438448. (~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450] type ConcatMapSym2 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) (a6989586621680439022 :: t6989586621680438448 a6989586621680438449) = ConcatMap a6989586621680439021 a6989586621680439022 data AndSym0 :: forall t6989586621680438447. (~>) (t6989586621680438447 Bool) Bool type AndSym1 (a6989586621680439012 :: t6989586621680438447 Bool) = And a6989586621680439012 data OrSym0 :: forall t6989586621680438446. (~>) (t6989586621680438446 Bool) Bool type OrSym1 (a6989586621680439003 :: t6989586621680438446 Bool) = Or a6989586621680439003 data AnySym0 :: forall a6989586621680438445 t6989586621680438444. (~>) ((~>) a6989586621680438445 Bool) ((~>) (t6989586621680438444 a6989586621680438445) Bool) data AnySym1 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) :: forall t6989586621680438444. (~>) (t6989586621680438444 a6989586621680438445) Bool type AnySym2 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) (a6989586621680438991 :: t6989586621680438444 a6989586621680438445) = Any a6989586621680438990 a6989586621680438991 data AllSym0 :: forall a6989586621680438443 t6989586621680438442. (~>) ((~>) a6989586621680438443 Bool) ((~>) (t6989586621680438442 a6989586621680438443) Bool) data AllSym1 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) :: forall t6989586621680438442. (~>) (t6989586621680438442 a6989586621680438443) Bool type AllSym2 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) (a6989586621680438978 :: t6989586621680438442 a6989586621680438443) = All a6989586621680438977 a6989586621680438978 data MaximumBySym0 :: forall a6989586621680438441 t6989586621680438440. (~>) ((~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) ((~>) (t6989586621680438440 a6989586621680438441) a6989586621680438441) data MaximumBySym1 (a6989586621680438952 :: (~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) :: forall t6989586621680438440. (~>) (t6989586621680438440 a6989586621680438441) a6989586621680438441 type MaximumBySym2 (a6989586621680438952 :: (~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) (a6989586621680438953 :: t6989586621680438440 a6989586621680438441) = MaximumBy a6989586621680438952 a6989586621680438953 data MinimumBySym0 :: forall a6989586621680438439 t6989586621680438438. (~>) ((~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) ((~>) (t6989586621680438438 a6989586621680438439) a6989586621680438439) data MinimumBySym1 (a6989586621680438927 :: (~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) :: forall t6989586621680438438. (~>) (t6989586621680438438 a6989586621680438439) a6989586621680438439 type MinimumBySym2 (a6989586621680438927 :: (~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) (a6989586621680438928 :: t6989586621680438438 a6989586621680438439) = MinimumBy a6989586621680438927 a6989586621680438928 data NotElemSym0 :: forall a6989586621680438437 t6989586621680438436. (~>) a6989586621680438437 ((~>) (t6989586621680438436 a6989586621680438437) Bool) data NotElemSym1 (a6989586621680438919 :: a6989586621680438437) :: forall t6989586621680438436. (~>) (t6989586621680438436 a6989586621680438437) Bool type NotElemSym2 (a6989586621680438919 :: a6989586621680438437) (a6989586621680438920 :: t6989586621680438436 a6989586621680438437) = NotElem a6989586621680438919 a6989586621680438920 data FindSym0 :: forall a6989586621680438435 t6989586621680438434. (~>) ((~>) a6989586621680438435 Bool) ((~>) (t6989586621680438434 a6989586621680438435) (Maybe a6989586621680438435)) data FindSym1 (a6989586621680438892 :: (~>) a6989586621680438435 Bool) :: forall t6989586621680438434. (~>) (t6989586621680438434 a6989586621680438435) (Maybe a6989586621680438435) type FindSym2 (a6989586621680438892 :: (~>) a6989586621680438435 Bool) (a6989586621680438893 :: t6989586621680438434 a6989586621680438435) = Find a6989586621680438892 a6989586621680438893 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680520961Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.Last instance forall a6989586621680438530 b6989586621680438531 (a6989586621680520958 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520961Sym1 a6989586621680520958) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680520959 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680520958 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520961Sym2 a6989586621680520959 a6989586621680520958) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680520947Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.Last instance forall k1 k2 (t6989586621680438526 :: * -> *) a6989586621680438530 k3 (_f_69895866216805208116989586621680520944 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520947Sym1 _f_69895866216805208116989586621680520944) instance forall k1 (t6989586621680438526 :: * -> *) k2 a6989586621680438530 k3 (_z_69895866216805208136989586621680520945 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_f_69895866216805208116989586621680520944 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520947Sym2 _z_69895866216805208136989586621680520945 _f_69895866216805208116989586621680520944) instance forall (t6989586621680438526 :: * -> *) k1 k2 a6989586621680438530 k3 (a_69895866216805208336989586621680520946 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_z_69895866216805208136989586621680520945 :: k2) (_f_69895866216805208116989586621680520944 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520947Sym3 a_69895866216805208336989586621680520946 _z_69895866216805208136989586621680520945 _f_69895866216805208116989586621680520944) instance forall (t6989586621680438526 :: * -> *) k1 k2 a6989586621680438530 k3 (t6989586621680520951 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (a_69895866216805208336989586621680520946 :: k2) (_z_69895866216805208136989586621680520945 :: k1) (_f_69895866216805208116989586621680520944 :: t6989586621680438526 a6989586621680438530). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520947Sym4 t6989586621680520951 a_69895866216805208336989586621680520946 _z_69895866216805208136989586621680520945 _f_69895866216805208116989586621680520944) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520934Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680520932 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520934Sym1 a6989586621680520932) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680520921Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.First instance forall a6989586621680438530 b6989586621680438531 (a6989586621680520918 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520921Sym1 a6989586621680520918) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680520919 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680520918 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520921Sym2 a6989586621680520919 a6989586621680520918) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680520907Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.First instance forall k1 k2 (t6989586621680438526 :: * -> *) a6989586621680438530 k3 (_f_69895866216805207776989586621680520904 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520907Sym1 _f_69895866216805207776989586621680520904) instance forall k1 (t6989586621680438526 :: * -> *) k2 a6989586621680438530 k3 (_z_69895866216805207796989586621680520905 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_f_69895866216805207776989586621680520904 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520907Sym2 _z_69895866216805207796989586621680520905 _f_69895866216805207776989586621680520904) instance forall (t6989586621680438526 :: * -> *) k1 k2 a6989586621680438530 k3 (a_69895866216805207996989586621680520906 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_z_69895866216805207796989586621680520905 :: k2) (_f_69895866216805207776989586621680520904 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520907Sym3 a_69895866216805207996989586621680520906 _z_69895866216805207796989586621680520905 _f_69895866216805207776989586621680520904) instance forall (t6989586621680438526 :: * -> *) k1 k2 a6989586621680438530 k3 (t6989586621680520911 :: a6989586621680438530 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (a_69895866216805207996989586621680520906 :: k2) (_z_69895866216805207796989586621680520905 :: k1) (_f_69895866216805207776989586621680520904 :: t6989586621680438526 a6989586621680438530). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520907Sym4 t6989586621680520911 a_69895866216805207996989586621680520906 _z_69895866216805207796989586621680520905 _f_69895866216805207776989586621680520904) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520894Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680520892 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520894Sym1 a6989586621680520892) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680520881Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable ((,) a) instance forall a6989586621680520724 a6989586621680438530 b6989586621680438531 (a6989586621680520878 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520881Sym1 a6989586621680520878) instance forall a6989586621680520724 a6989586621680438530 b6989586621680438531 (a6989586621680520879 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680520878 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680520881Sym2 a6989586621680520879 a6989586621680520878) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable ((,) a) instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216805207496989586621680520862 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym1 _f_69895866216805207496989586621680520862) instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216805207516989586621680520863 :: k6) (_f_69895866216805207496989586621680520862 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym2 _z_69895866216805207516989586621680520863 _f_69895866216805207496989586621680520862) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805207636989586621680520864 :: k6) (_z_69895866216805207516989586621680520863 :: k5) (_f_69895866216805207496989586621680520862 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym3 a_69895866216805207636989586621680520864 _z_69895866216805207516989586621680520863 _f_69895866216805207496989586621680520862) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805207656989586621680520865 :: k6) (a_69895866216805207636989586621680520864 :: k5) (_z_69895866216805207516989586621680520863 :: k4) (_f_69895866216805207496989586621680520862 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym4 a_69895866216805207656989586621680520865 a_69895866216805207636989586621680520864 _z_69895866216805207516989586621680520863 _f_69895866216805207496989586621680520862) instance forall k1 k2 k3 k4 k5 k6 (t6989586621680520870 :: k6) (a_69895866216805207656989586621680520865 :: k5) (a_69895866216805207636989586621680520864 :: k4) (_z_69895866216805207516989586621680520863 :: k3) (_f_69895866216805207496989586621680520862 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520866Sym5 t6989586621680520870 a_69895866216805207656989586621680520865 a_69895866216805207636989586621680520864 _z_69895866216805207516989586621680520863 _f_69895866216805207496989586621680520862) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520852Sym0 instance forall a6989586621680520724 a6989586621680438529 m6989586621680438528 (a6989586621680520850 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680520852Sym1 a6989586621680520850) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680520842Sym0 instance forall k1 k2 k3 k4 k5 (_f_69895866216805207496989586621680520839 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520842Sym1 _f_69895866216805207496989586621680520839) instance forall k1 k2 k3 k4 k5 (a_69895866216805207556989586621680520840 :: k5) (_f_69895866216805207496989586621680520839 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520842Sym2 a_69895866216805207556989586621680520840 _f_69895866216805207496989586621680520839) instance forall k1 k2 k3 k4 k5 (a_69895866216805207576989586621680520841 :: k5) (a_69895866216805207556989586621680520840 :: k4) (_f_69895866216805207496989586621680520839 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680520842Sym3 a_69895866216805207576989586621680520841 a_69895866216805207556989586621680520840 _f_69895866216805207496989586621680520839) 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.SAlternative f) => Data.Singletons.Internal.SingI Data.Singletons.Prelude.Foldable.AsumSym0 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.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.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.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.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.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.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_6989586621680440390Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Product instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680440383Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680440376Sym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680440369Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680440363Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680440356Sym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680440349Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440342Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680440340 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440342Sym1 a6989586621680440340) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440330Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680440327 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440330Sym1 a6989586621680440327) instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680440328 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (a6989586621680440327 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440330Sym2 a6989586621680440328 a6989586621680440327) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680440307Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680440304 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680440307Sym1 a6989586621680440304) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680440305 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680440304 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680440307Sym2 a6989586621680440305 a6989586621680440304) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680440291Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680440289 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680440291Sym1 a6989586621680440289) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440279Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680440276 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440279Sym1 a6989586621680440276) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680440277 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680440276 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440279Sym2 a6989586621680440277 a6989586621680440276) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680440262Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680440259 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680440262Sym1 a6989586621680440259) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680440260 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680440259 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680440262Sym2 a6989586621680440260 a6989586621680440259) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680440246Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (a6989586621680440244 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680440246Sym1 a6989586621680440244) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680440234Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680440232 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680440234Sym1 a6989586621680440232) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680440223Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Sum instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680440216Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680440209Sym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680440202Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680440196Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680440189Sym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680440182Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440175Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680440173 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440175Sym1 a6989586621680440173) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440163Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680440160 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440163Sym1 a6989586621680440160) instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680440161 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (a6989586621680440160 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680440163Sym2 a6989586621680440161 a6989586621680440160) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680440140Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680440137 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680440140Sym1 a6989586621680440137) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680440138 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680440137 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680440140Sym2 a6989586621680440138 a6989586621680440137) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680440124Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680440122 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680440124Sym1 a6989586621680440122) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440112Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680440109 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440112Sym1 a6989586621680440109) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680440110 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680440109 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680440112Sym2 a6989586621680440110 a6989586621680440109) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680440095Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680440092 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680440095Sym1 a6989586621680440092) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680440093 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680440092 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680440095Sym2 a6989586621680440093 a6989586621680440092) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680440079Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (a6989586621680440077 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680440079Sym1 a6989586621680440077) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680440067Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680440065 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680440067Sym1 a6989586621680440065) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680440056Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Dual instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680440049Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680440042Sym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680440035Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680440029Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680440022Sym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680440015Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440008Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680440006 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680440008Sym1 a6989586621680440006) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439996Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680439993 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439996Sym1 a6989586621680439993) instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680439994 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (a6989586621680439993 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439996Sym2 a6989586621680439994 a6989586621680439993) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439973Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439970 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439973Sym1 a6989586621680439970) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439971 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439970 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439973Sym2 a6989586621680439971 a6989586621680439970) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439957Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680439955 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439957Sym1 a6989586621680439955) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439945Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439942 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439945Sym1 a6989586621680439942) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439943 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680439942 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439945Sym2 a6989586621680439943 a6989586621680439942) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680439928Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439925 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439928Sym1 a6989586621680439925) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439926 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680439925 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439928Sym2 a6989586621680439926 a6989586621680439925) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680439912Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (a6989586621680439910 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680439912Sym1 a6989586621680439910) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439900Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680439898 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439900Sym1 a6989586621680439898) instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680439889Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Either.Either a) instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680439880Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439872Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439869 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439872Sym1 a6989586621680439869) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439870 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439869 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439872Sym2 a6989586621680439870 a6989586621680439869) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439855Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680439853 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439855Sym1 a6989586621680439853) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680439844Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Base.NonEmpty instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680439836Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439827Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680439825 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439827Sym1 a6989586621680439825) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439814Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680439812 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439814Sym1 a6989586621680439812) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680439796 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym1 f6989586621680439796) instance forall k2 k3 k4 k5 k6 k7 (p6989586621680439797 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680439796 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym2 p6989586621680439797 f6989586621680439796) instance forall k2 k3 k4 k5 k6 k7 (ps6989586621680439798 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (p6989586621680439797 :: k4) (f6989586621680439796 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym3 ps6989586621680439798 p6989586621680439797 f6989586621680439796) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439800 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (ps6989586621680439798 :: k4) (p6989586621680439797 :: k3) (f6989586621680439796 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym4 a6989586621680439800 ps6989586621680439798 p6989586621680439797 f6989586621680439796) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439801 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680439800 :: k4) (ps6989586621680439798 :: k3) (p6989586621680439797 :: k2) (f6989586621680439796 :: k2 Data.Singletons.Internal.~> k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439799GoSym5 a6989586621680439801 a6989586621680439800 ps6989586621680439798 p6989586621680439797 f6989586621680439796) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439788Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680439786 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439788Sym1 a6989586621680439786) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680439774Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439771 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439774Sym1 a6989586621680439771) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439772 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680439771 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439774Sym2 a6989586621680439772 a6989586621680439771) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439756Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439753 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439756Sym1 a6989586621680439753) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439754 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439753 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439756Sym2 a6989586621680439754 a6989586621680439753) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680439740Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable [] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680439731Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680439722Sym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680439713Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680439704Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680439695Sym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680439686Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439676Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680439674 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439676Sym1 a6989586621680439674) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439659Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439656 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439659Sym1 a6989586621680439656) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439657 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439656 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439659Sym2 a6989586621680439657 a6989586621680439656) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439637Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680439635 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439637Sym1 a6989586621680439635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439620Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439617 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439620Sym1 a6989586621680439617) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439618 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680439617 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439620Sym2 a6989586621680439618 a6989586621680439617) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680439597Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439594 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439597Sym1 a6989586621680439594) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439595 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680439594 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439597Sym2 a6989586621680439595 a6989586621680439594) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680439575Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (a6989586621680439573 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680439575Sym1 a6989586621680439573) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680439558Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Maybe.Maybe instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439555 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439558Sym1 a6989586621680439555) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439556 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680439555 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439558Sym2 a6989586621680439556 a6989586621680439555) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439540Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439537 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439540Sym1 a6989586621680439537) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439538 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439537 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439540Sym2 a6989586621680439538 a6989586621680439537) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439523Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680439521 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439523Sym1 a6989586621680439521) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438898Scrutinee_6989586621680438785Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 (p6989586621680438896 :: a6989586621680438529 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438898Scrutinee_6989586621680438785Sym1 p6989586621680438896) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FindSym0 instance forall (t6989586621680438434 :: * -> *) a6989586621680438435 (a6989586621680438892 :: a6989586621680438435 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FindSym1 a6989586621680438892) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438983Scrutinee_6989586621680438779Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 (p6989586621680438981 :: a6989586621680438529 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438983Scrutinee_6989586621680438779Sym1 p6989586621680438981) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AllSym0 instance forall (t6989586621680438442 :: * -> *) a6989586621680438443 (a6989586621680438977 :: a6989586621680438443 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AllSym1 a6989586621680438977) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438996Scrutinee_6989586621680438777Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 (p6989586621680438994 :: a6989586621680438529 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438996Scrutinee_6989586621680438777Sym1 p6989586621680438994) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439006Scrutinee_6989586621680438775Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.OrSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439015Scrutinee_6989586621680438773Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AndSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439237Scrutinee_6989586621680438738Sym0 instance forall k (t6989586621680438526 :: * -> *) a6989586621680438529 a (f6989586621680439234 :: a6989586621680438529 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439237Scrutinee_6989586621680438738Sym1 f6989586621680439234) instance forall (t6989586621680438526 :: * -> *) k a6989586621680438529 a (z6989586621680439235 :: a6989586621680438529 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)) (f6989586621680439234 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439237Scrutinee_6989586621680438738Sym2 z6989586621680439235 f6989586621680439234) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439292Scrutinee_6989586621680438741Sym0 instance forall k (t6989586621680438526 :: * -> *) a6989586621680438529 a (f6989586621680439289 :: a Data.Singletons.Internal.~> (a6989586621680438529 Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439292Scrutinee_6989586621680438741Sym1 f6989586621680439289) instance forall (t6989586621680438526 :: * -> *) k a6989586621680438529 a (z6989586621680439290 :: a Data.Singletons.Internal.~> (a6989586621680438529 Data.Singletons.Internal.~> a)) (f6989586621680439289 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439292Scrutinee_6989586621680438741Sym2 z6989586621680439290 f6989586621680439289) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439459Scrutinee_6989586621680438761Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439472Scrutinee_6989586621680438764Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439485Scrutinee_6989586621680438767Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439498Scrutinee_6989586621680438770Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatMapSym0 instance forall (t6989586621680438448 :: * -> *) a6989586621680438449 b6989586621680438450 (a6989586621680439021 :: a6989586621680438449 Data.Singletons.Internal.~> [b6989586621680438450]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ConcatMapSym1 a6989586621680439021) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680439027Sym0 instance forall k k1 (t6989586621680438526 :: * -> *) a6989586621680438530 (f6989586621680439025 :: k1 Data.Singletons.Internal.~> t6989586621680438526 a6989586621680438530). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439027Sym1 f6989586621680439025) instance forall k k1 (t6989586621680438526 :: * -> *) a6989586621680438530 (xs6989586621680439026 :: k1 Data.Singletons.Internal.~> t6989586621680438526 a6989586621680438530) (f6989586621680439025 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439027Sym2 xs6989586621680439026 f6989586621680439025) instance forall k k1 (t6989586621680438526 :: * -> *) a6989586621680438530 (t6989586621680439031 :: k1 Data.Singletons.Internal.~> t6989586621680438526 a6989586621680438530) (xs6989586621680439026 :: k) (f6989586621680439025 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439027Sym3 t6989586621680439031 xs6989586621680439026 f6989586621680439025) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680439040Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 k (xs6989586621680439039 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439040Sym1 xs6989586621680439039) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 k (t6989586621680439044 :: k) (xs6989586621680439039 :: t6989586621680438526 a6989586621680438530). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439040Sym2 t6989586621680439044 xs6989586621680439039) instance forall k (a6989586621680438455 :: k) (m6989586621680438454 :: k -> *) (t6989586621680438453 :: * -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MsumSym0 instance forall k (a6989586621680438458 :: k) (f6989586621680438457 :: k -> *) (t6989586621680438456 :: * -> *). 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 b6989586621680438468 (m6989586621680438466 :: * -> *) (t6989586621680438465 :: * -> *) a6989586621680438467 (a6989586621680439081 :: t6989586621680438465 a6989586621680438467). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ForM_Sym1 a6989586621680439081) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MapM_Sym0 instance forall (t6989586621680438469 :: * -> *) a6989586621680438471 (m6989586621680438470 :: * -> *) b6989586621680438472 (a6989586621680439069 :: a6989586621680438471 Data.Singletons.Internal.~> m6989586621680438470 b6989586621680438472). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MapM_Sym1 a6989586621680439069) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.For_Sym0 instance forall b6989586621680438476 (f6989586621680438474 :: * -> *) (t6989586621680438473 :: * -> *) a6989586621680438475 (a6989586621680439099 :: t6989586621680438473 a6989586621680438475). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.For_Sym1 a6989586621680439099) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Traverse_Sym0 instance forall (t6989586621680438477 :: * -> *) a6989586621680438479 (f6989586621680438478 :: * -> *) b6989586621680438480 (a6989586621680439087 :: a6989586621680438479 Data.Singletons.Internal.~> f6989586621680438478 b6989586621680438480). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Traverse_Sym1 a6989586621680439087) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlMSym0 instance forall (t6989586621680438481 :: * -> *) a6989586621680438484 (m6989586621680438482 :: * -> *) b6989586621680438483 (a6989586621680439105 :: b6989586621680438483 Data.Singletons.Internal.~> (a6989586621680438484 Data.Singletons.Internal.~> m6989586621680438482 b6989586621680438483)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym1 a6989586621680439105) instance forall (t6989586621680438481 :: * -> *) a6989586621680438484 (m6989586621680438482 :: * -> *) b6989586621680438483 (a6989586621680439106 :: b6989586621680438483 Data.Singletons.Internal.~> (a6989586621680438484 Data.Singletons.Internal.~> m6989586621680438482 b6989586621680438483)) (a6989586621680439105 :: b6989586621680438483). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym2 a6989586621680439106 a6989586621680439105) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (arg6989586621680439161 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym1 arg6989586621680439161) instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (arg6989586621680439162 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (arg6989586621680439161 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym2 arg6989586621680439162 arg6989586621680439161) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrMSym0 instance forall (t6989586621680438485 :: * -> *) a6989586621680438487 (m6989586621680438486 :: * -> *) b6989586621680438488 (a6989586621680439127 :: a6989586621680438487 Data.Singletons.Internal.~> (b6989586621680438488 Data.Singletons.Internal.~> m6989586621680438486 b6989586621680438488)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym1 a6989586621680439127) instance forall (t6989586621680438485 :: * -> *) a6989586621680438487 (m6989586621680438486 :: * -> *) b6989586621680438488 (a6989586621680439128 :: a6989586621680438487 Data.Singletons.Internal.~> (b6989586621680438488 Data.Singletons.Internal.~> m6989586621680438486 b6989586621680438488)) (a6989586621680439127 :: b6989586621680438488). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym2 a6989586621680439128 a6989586621680439127) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (arg6989586621680439179 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1Sym1 arg6989586621680439179) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MinimumBySym0 instance forall (t6989586621680438438 :: * -> *) a6989586621680438439 (a6989586621680438927 :: a6989586621680438439 Data.Singletons.Internal.~> (a6989586621680438439 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MinimumBySym1 a6989586621680438927) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MaximumBySym0 instance forall (t6989586621680438440 :: * -> *) a6989586621680438441 (a6989586621680438952 :: a6989586621680438441 Data.Singletons.Internal.~> (a6989586621680438441 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MaximumBySym1 a6989586621680438952) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (arg6989586621680439183 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1Sym1 arg6989586621680439183) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToListSym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NullSym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.LengthSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NotElemSym0 instance forall (t6989586621680438436 :: * -> *) a6989586621680438437 (a6989586621680438919 :: a6989586621680438437). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.NotElemSym1 a6989586621680438919) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ElemSym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (arg6989586621680439193 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ElemSym1 arg6989586621680439193) 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 (t6989586621680438444 :: * -> *) a6989586621680438445 (a6989586621680438990 :: a6989586621680438445 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AnySym1 a6989586621680438990) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AnySym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (arg6989586621680439151 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMapSym1 arg6989586621680439151) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMapSym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (arg6989586621680439156 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (arg6989586621680439155 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym2 arg6989586621680439156 arg6989586621680439155) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (arg6989586621680439155 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym1 arg6989586621680439155) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrSym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (arg6989586621680439168 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (arg6989586621680439167 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym2 arg6989586621680439168 arg6989586621680439167) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (arg6989586621680439167 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym1 arg6989586621680439167) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlSym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (arg6989586621680439174 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (arg6989586621680439173 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym2 arg6989586621680439174 arg6989586621680439173) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (arg6989586621680439173 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym1 arg6989586621680439173) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680439211Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438529 m6989586621680438528 (a6989586621680439222 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439224Sym1 a6989586621680439222) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680439224Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439246 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680439245 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439248Sym2 a6989586621680439246 a6989586621680439245) instance forall (t6989586621680438526 :: * -> *) a6989586621680438530 b6989586621680438531 (a6989586621680439245 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680439248Sym1 a6989586621680439245) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680439248Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680439276 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (a6989586621680439275 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439278Sym2 a6989586621680439276 a6989586621680439275) instance forall (t6989586621680438526 :: * -> *) a6989586621680438532 b6989586621680438533 (a6989586621680439275 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439278Sym1 a6989586621680439275) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680439278Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439301 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680439300 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439303Sym2 a6989586621680439301 a6989586621680439300) instance forall (t6989586621680438526 :: * -> *) a6989586621680438535 b6989586621680438534 (a6989586621680439300 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680439303Sym1 a6989586621680439300) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680439303Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439331 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680439330 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439333Sym2 a6989586621680439331 a6989586621680439330) instance forall (t6989586621680438526 :: * -> *) a6989586621680438537 b6989586621680438536 (a6989586621680439330 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439333Sym1 a6989586621680439330) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680439333Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438538 (a6989586621680439357 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439359Sym1 a6989586621680439357) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680439359Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438539 (a6989586621680439382 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439384Sym1 a6989586621680439382) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680439384Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680439394Sym0 instance forall k (a6989586621680438541 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680439415Sym0 instance forall k (a6989586621680438542 :: k) (t6989586621680438526 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680439437Sym0 instance forall (t6989586621680438526 :: * -> *) a6989586621680438543 (a6989586621680439450 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680439452Sym1 a6989586621680439450) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680439452Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680439466Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680439479Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680439492Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680439505Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680439423Sym0 instance forall k1 k2 k3 (a_69895866216804394186989586621680439422 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439423Sym1 a_69895866216804394186989586621680439422) instance forall k1 k2 k3 (t6989586621680439431 :: k3) (a_69895866216804394186989586621680439422 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439423Sym2 t6989586621680439431 a_69895866216804394186989586621680439422) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680439402Sym0 instance forall k1 k2 k3 (a_69895866216804393976989586621680439401 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439402Sym1 a_69895866216804393976989586621680439401) instance forall k1 k2 k3 (t6989586621680439409 :: k3) (a_69895866216804393976989586621680439401 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680439402Sym2 t6989586621680439409 a_69895866216804393976989586621680439401) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439369MfSym0 instance forall k k2 k3 (f6989586621680439367 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439369MfSym1 f6989586621680439367) instance forall k k2 k3 (xs6989586621680439368 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (f6989586621680439367 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439369MfSym2 xs6989586621680439368 f6989586621680439367) instance forall k k2 k3 (a6989586621680439370 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (xs6989586621680439368 :: k) (f6989586621680439367 :: GHC.Maybe.Maybe k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439369MfSym3 a6989586621680439370 xs6989586621680439368 f6989586621680439367) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439344MfSym0 instance forall k k2 k3 (f6989586621680439342 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439344MfSym1 f6989586621680439342) instance forall k k2 k3 (xs6989586621680439343 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (f6989586621680439342 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439344MfSym2 xs6989586621680439343 f6989586621680439342) instance forall k k2 k3 (a6989586621680439345 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (xs6989586621680439343 :: k) (f6989586621680439342 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439344MfSym3 a6989586621680439345 xs6989586621680439343 f6989586621680439342) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680439314 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym1 f6989586621680439314) instance forall k2 k3 k4 k5 k6 k7 (z06989586621680439315 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680439314 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym2 z06989586621680439315 f6989586621680439314) instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680439316 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (z06989586621680439315 :: k4) (f6989586621680439314 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym3 xs6989586621680439316 z06989586621680439315 f6989586621680439314) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439318 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (xs6989586621680439316 :: k4) (z06989586621680439315 :: k3) (f6989586621680439314 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym4 a6989586621680439318 xs6989586621680439316 z06989586621680439315 f6989586621680439314) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439319 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680439318 :: k4) (xs6989586621680439316 :: k3) (z06989586621680439315 :: k6) (f6989586621680439314 :: k7 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439317F'Sym5 a6989586621680439319 a6989586621680439318 xs6989586621680439316 z06989586621680439315 f6989586621680439314) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680439259 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym1 f6989586621680439259) instance forall k2 k3 k4 k5 k6 k7 (z06989586621680439260 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680439259 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym2 z06989586621680439260 f6989586621680439259) instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680439261 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (z06989586621680439260 :: k4) (f6989586621680439259 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym3 xs6989586621680439261 z06989586621680439260 f6989586621680439259) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439263 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (xs6989586621680439261 :: k4) (z06989586621680439260 :: k3) (f6989586621680439259 :: k7 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym4 a6989586621680439263 xs6989586621680439261 z06989586621680439260 f6989586621680439259) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680439264 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680439263 :: k4) (xs6989586621680439261 :: k3) (z06989586621680439260 :: k7 Data.Singletons.Internal.~> k2) (f6989586621680439259 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439262F'Sym5 a6989586621680439264 a6989586621680439263 xs6989586621680439261 z06989586621680439260 f6989586621680439259) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym0 instance forall k2 k3 b6989586621679536074 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (f6989586621680439133 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym1 f6989586621680439133) instance forall k2 b6989586621679536074 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (z06989586621680439134 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (f6989586621680439133 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym2 z06989586621680439134 f6989586621680439133) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (xs6989586621680439135 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (z06989586621680439134 :: k3) (f6989586621680439133 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym3 xs6989586621680439135 z06989586621680439134 f6989586621680439133) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (a6989586621680439137 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (xs6989586621680439135 :: k3) (z06989586621680439134 :: k2) (f6989586621680439133 :: a6989586621679536073 Data.Singletons.Internal.~> m6989586621679536072 b6989586621679536074). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym4 a6989586621680439137 xs6989586621680439135 z06989586621680439134 f6989586621680439133) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (a6989586621680439138 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (a6989586621680439137 :: k3) (xs6989586621680439135 :: k2) (z06989586621680439134 :: a6989586621679536073 Data.Singletons.Internal.~> m6989586621679536072 b6989586621679536074) (f6989586621680439133 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439136F'Sym5 a6989586621680439138 a6989586621680439137 xs6989586621680439135 z06989586621680439134 f6989586621680439133) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym0 instance forall k2 k3 b6989586621679536074 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (f6989586621680439111 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym1 f6989586621680439111) instance forall k2 b6989586621679536074 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (z06989586621680439112 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (f6989586621680439111 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym2 z06989586621680439112 f6989586621680439111) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (xs6989586621680439113 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (z06989586621680439112 :: k3) (f6989586621680439111 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym3 xs6989586621680439113 z06989586621680439112 f6989586621680439111) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (a6989586621680439115 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (xs6989586621680439113 :: k3) (z06989586621680439112 :: k2) (f6989586621680439111 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym4 a6989586621680439115 xs6989586621680439113 z06989586621680439112 f6989586621680439111) instance forall b6989586621679536074 k2 k3 k4 k5 (m6989586621679536072 :: * -> *) a6989586621679536073 (a6989586621680439116 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073)) (a6989586621680439115 :: k3) (xs6989586621680439113 :: k2) (z06989586621680439112 :: k5) (f6989586621680439111 :: a6989586621679536073 Data.Singletons.Internal.~> m6989586621679536072 b6989586621679536074). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680439114F'Sym5 a6989586621680439116 a6989586621680439115 xs6989586621680439113 z06989586621680439112 f6989586621680439111) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438960Max'Sym0 instance forall k1 k2 (cmp6989586621680438958 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438960Max'Sym1 cmp6989586621680438958) instance forall k1 k2 (a_69895866216804389566989586621680438959 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680438958 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438960Max'Sym2 a_69895866216804389566989586621680438959 cmp6989586621680438958) instance forall k1 k2 (a6989586621680438961 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804389566989586621680438959 :: k1) (cmp6989586621680438958 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438960Max'Sym3 a6989586621680438961 a_69895866216804389566989586621680438959 cmp6989586621680438958) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438969Scrutinee_6989586621680438781Sym0 instance forall k2 k3 k4 k5 (cmp6989586621680438958 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438969Scrutinee_6989586621680438781Sym1 cmp6989586621680438958) instance forall k2 k3 k4 k5 (x6989586621680438967 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (cmp6989586621680438958 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438969Scrutinee_6989586621680438781Sym2 x6989586621680438967 cmp6989586621680438958) instance forall k2 k3 k4 k5 (y6989586621680438968 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (x6989586621680438967 :: k3) (cmp6989586621680438958 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438969Scrutinee_6989586621680438781Sym3 y6989586621680438968 x6989586621680438967 cmp6989586621680438958) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438935Min'Sym0 instance forall k1 k2 (cmp6989586621680438933 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438935Min'Sym1 cmp6989586621680438933) instance forall k1 k2 (a_69895866216804389316989586621680438934 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680438933 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438935Min'Sym2 a_69895866216804389316989586621680438934 cmp6989586621680438933) instance forall k1 k2 (a6989586621680438936 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804389316989586621680438934 :: k1) (cmp6989586621680438933 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438935Min'Sym3 a6989586621680438936 a_69895866216804389316989586621680438934 cmp6989586621680438933) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438944Scrutinee_6989586621680438783Sym0 instance forall k2 k3 k4 k5 (cmp6989586621680438933 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438944Scrutinee_6989586621680438783Sym1 cmp6989586621680438933) instance forall k2 k3 k4 k5 (x6989586621680438942 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (cmp6989586621680438933 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438944Scrutinee_6989586621680438783Sym2 x6989586621680438942 cmp6989586621680438933) instance forall k2 k3 k4 k5 (y6989586621680438943 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (x6989586621680438942 :: k3) (cmp6989586621680438933 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438944Scrutinee_6989586621680438783Sym3 y6989586621680438943 x6989586621680438942 cmp6989586621680438933) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680438899Sym0 instance forall k a6989586621679081605 (p6989586621680438896 :: a6989586621679081605 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680438899Sym1 p6989586621680438896) instance forall k a6989586621679081605 (y6989586621680438897 :: a6989586621679081605 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621680438896 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680438899Sym2 y6989586621680438897 p6989586621680438896) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680438902Scrutinee_6989586621680438787Sym0 instance forall k1 k2 k3 (p6989586621680438896 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438902Scrutinee_6989586621680438787Sym1 p6989586621680438896) instance forall k1 k2 k3 (y6989586621680438897 :: k2 Data.Singletons.Internal.~> k3) (p6989586621680438896 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680438902Scrutinee_6989586621680438787Sym2 y6989586621680438897 p6989586621680438896) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MinInternal a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680430357Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MinInternal a) instance forall a6989586621680430277 (a6989586621680430355 :: Data.Singletons.Prelude.Foldable.MinInternal a6989586621680430277). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680430357Sym1 a6989586621680430355) 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.Let6989586621680430349Scrutinee_6989586621680430287Sym0 instance forall k1 (x6989586621680430342 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430349Scrutinee_6989586621680430287Sym1 x6989586621680430342) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680430344NSym0 instance forall k1 k (x6989586621680430342 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430344NSym1 x6989586621680430342) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680430344MSym0 instance forall k k1 (x6989586621680430342 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430344MSym1 x6989586621680430342) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MaxInternal a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680430330Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MaxInternal a) instance forall a6989586621680430269 (a6989586621680430328 :: Data.Singletons.Prelude.Foldable.MaxInternal a6989586621680430269). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680430330Sym1 a6989586621680430328) 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.Let6989586621680430322Scrutinee_6989586621680430285Sym0 instance forall k1 (x6989586621680430315 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430322Scrutinee_6989586621680430285Sym1 x6989586621680430315) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680430317NSym0 instance forall k1 k (x6989586621680430315 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430317NSym1 x6989586621680430315) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680430317MSym0 instance forall k k1 (x6989586621680430315 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680430317MSym1 x6989586621680430315) 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_6989586621680428850Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.Endo a) instance forall a6989586621680428828 (a6989586621680428848 :: Data.Singletons.Prelude.Foldable.Endo a6989586621680428828). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680428850Sym1 a6989586621680428848) 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 data family. data family Sing :: k -> Type type SIdentity = (Sing :: Identity a_aiG7 -> Type) type family RunIdentity (a_a1bs4 :: Identity a_aiG7) :: a_aiG7 data IdentitySym0 :: forall (a6989586621679081595 :: Type). (~>) a6989586621679081595 (Identity (a6989586621679081595 :: Type)) type IdentitySym1 (t6989586621679292147 :: a6989586621679081595) = 'Identity t6989586621679292147 data RunIdentitySym0 :: forall a6989586621679081595. (~>) (Identity a6989586621679081595) a6989586621679081595 type RunIdentitySym1 (a6989586621679292144 :: Identity a6989586621679081595) = RunIdentity a6989586621679292144 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680663081Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Functor.Identity.Identity instance forall b6989586621679536074 a6989586621679536073 (a6989586621680663079 :: Data.Functor.Identity.Identity a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680663081Sym1 a6989586621680663079) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.LiftA2_6989586621680663068Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Functor.Identity.Identity instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680663065 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680663068Sym1 a6989586621680663065) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680663066 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680663065 :: Data.Functor.Identity.Identity a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680663068Sym2 a6989586621680663066 a6989586621680663065) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680663052Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680663050 :: Data.Functor.Identity.Identity (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680663052Sym1 a6989586621680663050) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pure_6989586621680663041Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToList_6989586621680663032Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Functor.Identity.Identity instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Sum_6989586621680663025Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Product_6989586621680663018Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Null_6989586621680663011Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Minimum_6989586621680663005Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Maximum_6989586621680662998Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Length_6989586621680662991Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr1_6989586621680662984Sym0 instance forall a6989586621680438538 (a6989586621680662982 :: a6989586621680438538 Data.Singletons.Internal.~> (a6989586621680438538 Data.Singletons.Internal.~> a6989586621680438538)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr1_6989586621680662984Sym1 a6989586621680662982) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr'_6989586621680662972Sym0 instance forall a6989586621680438532 b6989586621680438533 (a6989586621680662969 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680662972Sym1 a6989586621680662969) instance forall a6989586621680438532 b6989586621680438533 (a6989586621680662970 :: a6989586621680438532 Data.Singletons.Internal.~> (b6989586621680438533 Data.Singletons.Internal.~> b6989586621680438533)) (a6989586621680662969 :: b6989586621680438533). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680662972Sym2 a6989586621680662970 a6989586621680662969) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr_6989586621680662949Sym0 instance forall a6989586621680438530 b6989586621680438531 (a6989586621680662946 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680662949Sym1 a6989586621680662946) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680662947 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680662946 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680662949Sym2 a6989586621680662947 a6989586621680662946) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl1_6989586621680662933Sym0 instance forall a6989586621680438539 (a6989586621680662931 :: a6989586621680438539 Data.Singletons.Internal.~> (a6989586621680438539 Data.Singletons.Internal.~> a6989586621680438539)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl1_6989586621680662933Sym1 a6989586621680662931) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl'_6989586621680662921Sym0 instance forall a6989586621680438537 b6989586621680438536 (a6989586621680662918 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680662921Sym1 a6989586621680662918) instance forall a6989586621680438537 b6989586621680438536 (a6989586621680662919 :: b6989586621680438536 Data.Singletons.Internal.~> (a6989586621680438537 Data.Singletons.Internal.~> b6989586621680438536)) (a6989586621680662918 :: b6989586621680438536). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680662921Sym2 a6989586621680662919 a6989586621680662918) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl_6989586621680662904Sym0 instance forall a6989586621680438535 b6989586621680438534 (a6989586621680662901 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680662904Sym1 a6989586621680662901) instance forall a6989586621680438535 b6989586621680438534 (a6989586621680662902 :: b6989586621680438534 Data.Singletons.Internal.~> (a6989586621680438535 Data.Singletons.Internal.~> b6989586621680438534)) (a6989586621680662901 :: b6989586621680438534). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680662904Sym2 a6989586621680662902 a6989586621680662901) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Elem_6989586621680662888Sym0 instance forall a6989586621680438543 (a6989586621680662886 :: a6989586621680438543). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Elem_6989586621680662888Sym1 a6989586621680662886) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FoldMap_6989586621680662876Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680662874 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.FoldMap_6989586621680662876Sym1 a6989586621680662874) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680662864Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Functor.Identity.Identity instance forall b6989586621679536047 a6989586621679536046 (a6989586621680662862 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680662864Sym1 a6989586621680662862) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Lambda_6989586621680662855Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Functor.Identity.Identity instance forall k1 k2 k3 (_z_69895866216806626756989586621680662853 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680662855Sym1 _z_69895866216806626756989586621680662853) instance forall k1 k2 k3 (a_69895866216806626816989586621680662854 :: k3) (_z_69895866216806626756989586621680662853 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680662855Sym2 a_69895866216806626816989586621680662854 _z_69895866216806626756989586621680662853) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Fmap_6989586621680662845Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680662843 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Fmap_6989586621680662845Sym1 a6989586621680662843) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680662832Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680662832Sym1 a6989586621680662829) instance forall a6989586621680662322 (a6989586621680662830 :: GHC.Types.Nat) (a6989586621680662829 :: Data.Functor.Identity.Identity a6989586621680662322). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680662832Sym2 a6989586621680662830 a6989586621680662829) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680662814Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Identity.Identity a) instance forall a6989586621680662319 (a6989586621680662812 :: Data.Functor.Identity.Identity a6989586621680662319). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680662814Sym1 a6989586621680662812) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromInteger_6989586621680662803Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Signum_6989586621680662796Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Abs_6989586621680662789Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Negate_6989586621680662782Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680662774Sym0 instance forall a6989586621680662308 (a6989586621680662772 :: Data.Functor.Identity.Identity a6989586621680662308). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680662774Sym1 a6989586621680662772) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680662762Sym0 instance forall a6989586621680662308 (a6989586621680662760 :: Data.Functor.Identity.Identity a6989586621680662308). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680662762Sym1 a6989586621680662760) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680662750Sym0 instance forall a6989586621680662308 (a6989586621680662748 :: Data.Functor.Identity.Identity a6989586621680662308). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680662750Sym1 a6989586621680662748) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680662735Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Identity.Identity a) instance forall a6989586621680662297 (a6989586621680662732 :: Data.Functor.Identity.Identity a6989586621680662297). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680662735Sym1 a6989586621680662732) instance forall a6989586621680662297 (a6989586621680662733 :: Data.Functor.Identity.Identity a6989586621680662297) (a6989586621680662732 :: Data.Functor.Identity.Identity a6989586621680662297). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680662735Sym2 a6989586621680662733 a6989586621680662732) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680662719Sym0 instance forall a6989586621680662297 (a6989586621680662717 :: Data.Functor.Identity.Identity a6989586621680662297). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680662719Sym1 a6989586621680662717) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromEnum_6989586621680662708Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToEnum_6989586621680662701Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pred_6989586621680662694Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Succ_6989586621680662687Sym0 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 data family. data family Sing :: k -> Type type SConst = (Sing :: Const a b -> Type) type family GetConst (x_a74Kb :: Const a_a74K9 b_a74Ka) :: a_a74K9 data ConstSym0 :: forall (a6989586621679086334 :: Type) k6989586621679086333 (b6989586621679086335 :: k6989586621679086333). (~>) a6989586621679086334 (Const (a6989586621679086334 :: Type) (b6989586621679086335 :: k6989586621679086333)) type ConstSym1 (t6989586621680696010 :: a6989586621679086334) = 'Const t6989586621680696010 data GetConstSym0 :: forall a6989586621680696325 b6989586621680696326. (~>) (Const a6989586621680696325 b6989586621680696326) a6989586621680696325 type GetConstSym1 (x6989586621680696327 :: Const a6989586621680696325 b6989586621680696326) = GetConst x6989586621680696327 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_6989586621680698463Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Functor.Const.Const m) instance forall m6989586621680697730 a6989586621679536050 b6989586621679536051 (a6989586621680698461 :: Data.Functor.Const.Const m6989586621680697730 (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698463Sym1 a6989586621680698461) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.LiftA2_6989586621680698450Sym0 instance forall m6989586621680697730 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680698447 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680698450Sym1 a6989586621680698447) instance forall m6989586621680697730 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680698448 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680698447 :: Data.Functor.Const.Const m6989586621680697730 a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680698450Sym2 a6989586621680698448 a6989586621680698447) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pure_6989586621680698436Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Foldr_6989586621680698428Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Functor.Const.Const m) instance forall m6989586621680697729 a6989586621680438530 b6989586621680438531 (a6989586621680698425 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680698428Sym1 a6989586621680698425) instance forall m6989586621680697729 a6989586621680438530 b6989586621680438531 (a6989586621680698426 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680698425 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680698428Sym2 a6989586621680698426 a6989586621680698425) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680698414Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Functor.Const.Const m) instance forall k1 k2 k3 k4 k5 (_f_69895866216806981646989586621680698411 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698414Sym1 _f_69895866216806981646989586621680698411) instance forall k1 k2 k3 k4 k5 (_z_69895866216806981666989586621680698412 :: k5) (_f_69895866216806981646989586621680698411 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698414Sym2 _z_69895866216806981666989586621680698412 _f_69895866216806981646989586621680698411) instance forall k1 k2 k3 k4 k5 (a_69895866216806981766989586621680698413 :: k5) (_z_69895866216806981666989586621680698412 :: k4) (_f_69895866216806981646989586621680698411 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698414Sym3 a_69895866216806981766989586621680698413 _z_69895866216806981666989586621680698412 _f_69895866216806981646989586621680698411) instance forall k1 k2 k3 k4 k5 (t6989586621680698418 :: k5) (a_69895866216806981766989586621680698413 :: k4) (_z_69895866216806981666989586621680698412 :: k3) (_f_69895866216806981646989586621680698411 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698414Sym4 t6989586621680698418 a_69895866216806981766989586621680698413 _z_69895866216806981666989586621680698412 _f_69895866216806981646989586621680698411) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FoldMap_6989586621680698401Sym0 instance forall m6989586621680697729 a6989586621680438529 m6989586621680438528 (a6989586621680698399 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.FoldMap_6989586621680698401Sym1 a6989586621680698399) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680698392Sym0 instance forall k1 k2 k3 k4 (_f_69895866216806981646989586621680698390 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698392Sym1 _f_69895866216806981646989586621680698390) instance forall k1 k2 k3 k4 (a_69895866216806981706989586621680698391 :: k4) (_f_69895866216806981646989586621680698390 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698392Sym2 a_69895866216806981706989586621680698391 _f_69895866216806981646989586621680698390) instance forall a6989586621679536046 k (b6989586621679536047 :: k) m6989586621680697728. Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680698382Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Functor.Const.Const m) instance forall k (b6989586621679536047 :: k) m6989586621680697728 a6989586621679536046 (a6989586621680698380 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698382Sym1 a6989586621680698380) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680698373Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Functor.Const.Const m) instance forall k1 k2 k3 (_z_69895866216806981436989586621680698371 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698373Sym1 _z_69895866216806981436989586621680698371) instance forall k1 k2 k3 (a_69895866216806981516989586621680698372 :: k3) (_z_69895866216806981436989586621680698371 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698373Sym2 a_69895866216806981516989586621680698372 _z_69895866216806981436989586621680698371) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Fmap_6989586621680698363Sym0 instance forall m6989586621680697728 a6989586621679536044 b6989586621679536045 (a6989586621680698361 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Fmap_6989586621680698363Sym1 a6989586621680698361) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680698354Sym0 instance forall k1 k2 k3 (_f_69895866216806981416989586621680698352 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698354Sym1 _f_69895866216806981416989586621680698352) instance forall k1 k2 k3 (a_69895866216806981476989586621680698353 :: k3) (_f_69895866216806981416989586621680698352 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680698354Sym2 a_69895866216806981476989586621680698353 _f_69895866216806981416989586621680698352) instance forall a6989586621680697724 k (b6989586621680697725 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ShowsPrec_6989586621680698343Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Show.PShow (Data.Functor.Const.Const a b) instance forall a6989586621680697724 k (b6989586621680697725 :: k) (a6989586621680698340 :: GHC.Types.Nat). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680698343Sym1 a6989586621680698340) instance forall a6989586621680697724 k (b6989586621680697725 :: k) (a6989586621680698341 :: GHC.Types.Nat) (a6989586621680698340 :: Data.Functor.Const.Const a6989586621680697724 b6989586621680697725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680698343Sym2 a6989586621680698341 a6989586621680698340) instance forall a6989586621680697720 k (b6989586621680697721 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680698325Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Const.Const a b) instance forall a6989586621680697720 k (b6989586621680697721 :: k) (a6989586621680698323 :: Data.Functor.Const.Const a6989586621680697720 b6989586621680697721). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698325Sym1 a6989586621680698323) instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromInteger_6989586621680698314Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Num.PNum (Data.Functor.Const.Const a b) instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Signum_6989586621680698307Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Abs_6989586621680698300Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Negate_6989586621680698293Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680698285Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k) (a6989586621680698283 :: Data.Functor.Const.Const a6989586621680697708 b6989586621680697709). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698285Sym1 a6989586621680698283) instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680698273Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k) (a6989586621680698271 :: Data.Functor.Const.Const a6989586621680697708 b6989586621680697709). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698273Sym1 a6989586621680698271) instance forall a6989586621680697708 k (b6989586621680697709 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680698261Sym0 instance forall a6989586621680697708 k (b6989586621680697709 :: k) (a6989586621680698259 :: Data.Functor.Const.Const a6989586621680697708 b6989586621680697709). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680698261Sym1 a6989586621680698259) instance forall k a (b :: k). Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Const.Const a b) instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680698246Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Const.Const a b) instance forall a6989586621680697695 k (b6989586621680697696 :: k) (a6989586621680698243 :: Data.Functor.Const.Const a6989586621680697695 b6989586621680697696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680698246Sym1 a6989586621680698243) instance forall a6989586621680697695 k (b6989586621680697696 :: k) (a6989586621680698244 :: Data.Functor.Const.Const a6989586621680697695 b6989586621680697696) (a6989586621680698243 :: Data.Functor.Const.Const a6989586621680697695 b6989586621680697696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680698246Sym2 a6989586621680698244 a6989586621680698243) instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromTo_6989586621680698230Sym0 instance forall a6989586621680697695 k (b6989586621680697696 :: k) (a6989586621680698228 :: Data.Functor.Const.Const a6989586621680697695 b6989586621680697696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromTo_6989586621680698230Sym1 a6989586621680698228) instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromEnum_6989586621680698219Sym0 instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ToEnum_6989586621680698212Sym0 instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pred_6989586621680698205Sym0 instance forall a6989586621680697695 k (b6989586621680697696 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Succ_6989586621680698198Sym0 instance forall a6989586621680697693 k (b6989586621680697694 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Compare_6989586621680698190Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Ord.POrd (Data.Functor.Const.Const a b) instance forall a6989586621680697693 k (b6989586621680697694 :: k) (a6989586621680698188 :: Data.Functor.Const.Const a6989586621680697693 b6989586621680697694). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Compare_6989586621680698190Sym1 a6989586621680698188) 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 a6989586621680696325 k (b6989586621680696326 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.GetConstSym0 instance forall a6989586621679086334 k6989586621679086333 (b6989586621679086335 :: k6989586621679086333). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ConstSym0 instance forall a6989586621679086334 k6989586621679086333 (b6989586621679086335 :: k6989586621679086333). Data.Singletons.Internal.SingI Data.Singletons.Prelude.Const.ConstSym0 instance forall k1 k (b :: k). Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 'Data.Functor.Const.Const) instance forall k a (b :: k). Data.Singletons.Internal.SingKind a => Data.Singletons.Internal.SingKind (Data.Functor.Const.Const a b) instance forall k (b :: k) a1 (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 (PFunctor t_a7eNp, PFoldable t_a7eNp) => PTraversable (t_a7eNp :: Type -> Type) where { type family Traverse (arg_a7eNB :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (arg_a7eNC :: t_a7eNp a_a7eNr) :: f_a7eNq (t_a7eNp b_a7eNs); type family SequenceA (arg_a7eNF :: t_a7eNp (f_a7eNt a_a7eNu)) :: f_a7eNt (t_a7eNp a_a7eNu); type family MapM (arg_a7eNH :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (arg_a7eNI :: t_a7eNp a_a7eNw) :: m_a7eNv (t_a7eNp b_a7eNx); type family Sequence (arg_a7eNL :: t_a7eNp (m_a7eNy a_a7eNz)) :: m_a7eNy (t_a7eNp a_a7eNz); type Traverse a_a7eNV a_a7eNW = Apply (Apply Traverse_6989586621680735001Sym0 a_a7eNV) a_a7eNW; type SequenceA a_a7eO6 = Apply SequenceA_6989586621680735011Sym0 a_a7eO6; type MapM a_a7eOk a_a7eOl = Apply (Apply MapM_6989586621680735026Sym0 a_a7eOk) a_a7eOl; type Sequence a_a7eOv = Apply Sequence_6989586621680735036Sym0 a_a7eOv; } class (SFunctor t_a7eNp, SFoldable t_a7eNp) => STraversable (t_a7eNp :: Type -> Type) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) ~ Apply (Apply Traverse_6989586621680735001Sym0 t_a7eOz) t_a7eOA, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) ~ Apply SequenceA_6989586621680735011Sym0 t_a7eOD, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) ~ Apply (Apply MapM_6989586621680735026Sym0 t_a7eOF) t_a7eOG, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) ~ Apply Sequence_6989586621680735036Sym0 t_a7eOJ, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) type family For (a_a7goz :: t_a7gfu a_a7gfw) (a_a7goA :: (~>) a_a7gfw (f_a7gfv b_a7gfx)) :: f_a7gfv (t_a7gfu b_a7gfx) sFor :: forall t_a7gfu f_a7gfv a_a7gfw b_a7gfx (t_a7gxW :: t_a7gfu a_a7gfw) (t_a7gxX :: (~>) a_a7gfw (f_a7gfv b_a7gfx)). (STraversable t_a7gfu, SApplicative f_a7gfv) => Sing t_a7gxW -> Sing t_a7gxX -> Sing (Apply (Apply ForSym0 t_a7gxW) t_a7gxX :: f_a7gfv (t_a7gfu b_a7gfx)) type family ForM (a_a7gop :: t_a7gfq a_a7gfs) (a_a7goq :: (~>) a_a7gfs (m_a7gfr b_a7gft)) :: m_a7gfr (t_a7gfq b_a7gft) sForM :: forall t_a7gfq m_a7gfr a_a7gfs b_a7gft (t_a7gxS :: t_a7gfq a_a7gfs) (t_a7gxT :: (~>) a_a7gfs (m_a7gfr b_a7gft)). (STraversable t_a7gfq, SMonad m_a7gfr) => Sing t_a7gxS -> Sing t_a7gxT -> Sing (Apply (Apply ForMSym0 t_a7gxS) t_a7gxT :: m_a7gfr (t_a7gfq b_a7gft)) type family MapAccumL (a_a7go4 :: (~>) a_a7gfn ((~>) b_a7gfo (a_a7gfn, c_a7gfp))) (a_a7go5 :: a_a7gfn) (a_a7go6 :: t_a7gfm b_a7gfo) :: (a_a7gfn, t_a7gfm c_a7gfp) sMapAccumL :: forall t_a7gfm a_a7gfn b_a7gfo c_a7gfp (t_a7gxM :: (~>) a_a7gfn ((~>) b_a7gfo (a_a7gfn, c_a7gfp))) (t_a7gxN :: a_a7gfn) (t_a7gxO :: t_a7gfm b_a7gfo). STraversable t_a7gfm => Sing t_a7gxM -> Sing t_a7gxN -> Sing t_a7gxO -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7gxM) t_a7gxN) t_a7gxO :: (a_a7gfn, t_a7gfm c_a7gfp)) type family MapAccumR (a_a7gnN :: (~>) a_a7gfj ((~>) b_a7gfk (a_a7gfj, c_a7gfl))) (a_a7gnO :: a_a7gfj) (a_a7gnP :: t_a7gfi b_a7gfk) :: (a_a7gfj, t_a7gfi c_a7gfl) sMapAccumR :: forall t_a7gfi a_a7gfj b_a7gfk c_a7gfl (t_a7gxG :: (~>) a_a7gfj ((~>) b_a7gfk (a_a7gfj, c_a7gfl))) (t_a7gxH :: a_a7gfj) (t_a7gxI :: t_a7gfi b_a7gfk). STraversable t_a7gfi => Sing t_a7gxG -> Sing t_a7gxH -> Sing t_a7gxI -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7gxG) t_a7gxH) t_a7gxI :: (a_a7gfj, t_a7gfi c_a7gfl)) type family FmapDefault (a_a7gnA :: (~>) a_a7gfg b_a7gfh) (a_a7gnB :: t_a7gff a_a7gfg) :: t_a7gff b_a7gfh sFmapDefault :: forall t_a7gff a_a7gfg b_a7gfh (t_a7gxC :: (~>) a_a7gfg b_a7gfh) (t_a7gxD :: t_a7gff a_a7gfg). STraversable t_a7gff => Sing t_a7gxC -> Sing t_a7gxD -> Sing (Apply (Apply FmapDefaultSym0 t_a7gxC) t_a7gxD :: t_a7gff b_a7gfh) type family FoldMapDefault (a_a7gnf :: (~>) a_a7gfe m_a7gfd) (a_a7gng :: t_a7gfc a_a7gfe) :: m_a7gfd sFoldMapDefault :: forall t_a7gfc m_a7gfd a_a7gfe (t_a7gxy :: (~>) a_a7gfe m_a7gfd) (t_a7gxz :: t_a7gfc a_a7gfe). (STraversable t_a7gfc, SMonoid m_a7gfd) => Sing t_a7gxy -> Sing t_a7gxz -> Sing (Apply (Apply FoldMapDefaultSym0 t_a7gxy) t_a7gxz :: m_a7gfd) data TraverseSym0 :: forall a6989586621680734969 b6989586621680734970 f6989586621680734968 t6989586621680734967. (~>) ((~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) ((~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970))) data TraverseSym1 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970)) type TraverseSym2 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) (arg6989586621680734980 :: t6989586621680734967 a6989586621680734969) = Traverse arg6989586621680734979 arg6989586621680734980 data SequenceASym0 :: forall a6989586621680734972 f6989586621680734971 t6989586621680734967. (~>) (t6989586621680734967 (f6989586621680734971 a6989586621680734972)) (f6989586621680734971 (t6989586621680734967 a6989586621680734972)) type SequenceASym1 (arg6989586621680734983 :: t6989586621680734967 (f6989586621680734971 a6989586621680734972)) = SequenceA arg6989586621680734983 data MapMSym0 :: forall a6989586621680734974 b6989586621680734975 m6989586621680734973 t6989586621680734967. (~>) ((~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) ((~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975))) data MapMSym1 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975)) type MapMSym2 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) (arg6989586621680734986 :: t6989586621680734967 a6989586621680734974) = MapM arg6989586621680734985 arg6989586621680734986 data SequenceSym0 :: forall a6989586621680734977 m6989586621680734976 t6989586621680734967. (~>) (t6989586621680734967 (m6989586621680734976 a6989586621680734977)) (m6989586621680734976 (t6989586621680734967 a6989586621680734977)) type SequenceSym1 (arg6989586621680734989 :: t6989586621680734967 (m6989586621680734976 a6989586621680734977)) = Sequence arg6989586621680734989 data ForSym0 :: forall a6989586621680740554 b6989586621680740555 f6989586621680740553 t6989586621680740552. (~>) (t6989586621680740552 a6989586621680740554) ((~>) ((~>) a6989586621680740554 (f6989586621680740553 b6989586621680740555)) (f6989586621680740553 (t6989586621680740552 b6989586621680740555))) data ForSym1 (a6989586621680741115 :: t6989586621680740552 a6989586621680740554) :: forall b6989586621680740555 f6989586621680740553. (~>) ((~>) a6989586621680740554 (f6989586621680740553 b6989586621680740555)) (f6989586621680740553 (t6989586621680740552 b6989586621680740555)) type ForSym2 (a6989586621680741115 :: t6989586621680740552 a6989586621680740554) (a6989586621680741116 :: (~>) a6989586621680740554 (f6989586621680740553 b6989586621680740555)) = For a6989586621680741115 a6989586621680741116 data ForMSym0 :: forall a6989586621680740550 b6989586621680740551 m6989586621680740549 t6989586621680740548. (~>) (t6989586621680740548 a6989586621680740550) ((~>) ((~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) (m6989586621680740549 (t6989586621680740548 b6989586621680740551))) data ForMSym1 (a6989586621680741105 :: t6989586621680740548 a6989586621680740550) :: forall b6989586621680740551 m6989586621680740549. (~>) ((~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) (m6989586621680740549 (t6989586621680740548 b6989586621680740551)) type ForMSym2 (a6989586621680741105 :: t6989586621680740548 a6989586621680740550) (a6989586621680741106 :: (~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) = ForM a6989586621680741105 a6989586621680741106 data MapAccumLSym0 :: forall a6989586621680740545 b6989586621680740546 c6989586621680740547 t6989586621680740544. (~>) ((~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) ((~>) a6989586621680740545 ((~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547))) data MapAccumLSym1 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) :: forall t6989586621680740544. (~>) a6989586621680740545 ((~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547)) data MapAccumLSym2 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) (a6989586621680741085 :: a6989586621680740545) :: forall t6989586621680740544. (~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547) type MapAccumLSym3 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) (a6989586621680741085 :: a6989586621680740545) (a6989586621680741086 :: t6989586621680740544 b6989586621680740546) = MapAccumL a6989586621680741084 a6989586621680741085 a6989586621680741086 data MapAccumRSym0 :: forall a6989586621680740541 b6989586621680740542 c6989586621680740543 t6989586621680740540. (~>) ((~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) ((~>) a6989586621680740541 ((~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543))) data MapAccumRSym1 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) :: forall t6989586621680740540. (~>) a6989586621680740541 ((~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543)) data MapAccumRSym2 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) (a6989586621680741068 :: a6989586621680740541) :: forall t6989586621680740540. (~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543) type MapAccumRSym3 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) (a6989586621680741068 :: a6989586621680740541) (a6989586621680741069 :: t6989586621680740540 b6989586621680740542) = MapAccumR a6989586621680741067 a6989586621680741068 a6989586621680741069 data FmapDefaultSym0 :: forall a6989586621680740538 b6989586621680740539 t6989586621680740537. (~>) ((~>) a6989586621680740538 b6989586621680740539) ((~>) (t6989586621680740537 a6989586621680740538) (t6989586621680740537 b6989586621680740539)) data FmapDefaultSym1 (a6989586621680741054 :: (~>) a6989586621680740538 b6989586621680740539) :: forall t6989586621680740537. (~>) (t6989586621680740537 a6989586621680740538) (t6989586621680740537 b6989586621680740539) type FmapDefaultSym2 (a6989586621680741054 :: (~>) a6989586621680740538 b6989586621680740539) (a6989586621680741055 :: t6989586621680740537 a6989586621680740538) = FmapDefault a6989586621680741054 a6989586621680741055 data FoldMapDefaultSym0 :: forall a6989586621680740536 m6989586621680740535 t6989586621680740534. (~>) ((~>) a6989586621680740536 m6989586621680740535) ((~>) (t6989586621680740534 a6989586621680740536) m6989586621680740535) data FoldMapDefaultSym1 (a6989586621680741033 :: (~>) a6989586621680740536 m6989586621680740535) :: forall t6989586621680740534. (~>) (t6989586621680740534 a6989586621680740536) m6989586621680740535 type FoldMapDefaultSym2 (a6989586621680741033 :: (~>) a6989586621680740536 m6989586621680740535) (a6989586621680741034 :: t6989586621680740534 a6989586621680740536) = FoldMapDefault a6989586621680741033 a6989586621680741034 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741667Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateR s) instance forall s6989586621680740595 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680741664 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741667Sym1 a6989586621680741664) instance forall s6989586621680740595 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680741665 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680741664 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680740595 a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741667Sym2 a6989586621680741665 a6989586621680741664) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741603Sym0 instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateR s) instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741600 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741603Sym1 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741601 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680741600 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741603Sym2 kx6989586621680741601 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741602 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (kx6989586621680741601 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680741600 :: k2 Data.Singletons.Internal.~> (k3, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741603Sym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741613Sym0 instance forall k2 k3 k4 k5 k6 (f6989586621680741600 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741613Sym1 f6989586621680741600) instance forall k2 k3 k4 k5 k6 (kx6989586621680741601 :: k6) (f6989586621680741600 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741613Sym2 kx6989586621680741601 f6989586621680741600) instance forall k2 k3 k4 k5 k6 (ky6989586621680741602 :: k6) (kx6989586621680741601 :: k4 Data.Singletons.Internal.~> k5) (f6989586621680741600 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741613Sym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606S''Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741600 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S''Sym1 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741601 :: k7) (f6989586621680741600 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S''Sym2 kx6989586621680741601 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741602 :: k7) (kx6989586621680741601 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680741600 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S''Sym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606XSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741600 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606XSym1 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741601 :: k7) (f6989586621680741600 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606XSym2 kx6989586621680741601 f6989586621680741600) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741602 :: k7) (kx6989586621680741601 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680741600 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606XSym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741607Sym0 instance forall k1 k2 k3 k4 (f6989586621680741600 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741607Sym1 f6989586621680741600) instance forall k1 k2 k3 k4 (kx6989586621680741601 :: k4) (f6989586621680741600 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741607Sym2 kx6989586621680741601 f6989586621680741600) instance forall k1 k2 k3 k4 (ky6989586621680741602 :: k4) (kx6989586621680741601 :: k3) (f6989586621680741600 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606X_6989586621680741607Sym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606S'Sym0 instance forall k1 k2 k3 k4 k5 (f6989586621680741600 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S'Sym1 f6989586621680741600) instance forall k1 k2 k3 k4 k5 (kx6989586621680741601 :: k5) (f6989586621680741600 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S'Sym2 kx6989586621680741601 f6989586621680741600) instance forall k1 k2 k3 k4 k5 (ky6989586621680741602 :: k5) (kx6989586621680741601 :: k4) (f6989586621680741600 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606S'Sym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741606YSym0 instance forall k1 k2 k3 k4 k5 (f6989586621680741600 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606YSym1 f6989586621680741600) instance forall k1 k2 k3 k4 k5 (kx6989586621680741601 :: k5) (f6989586621680741600 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606YSym2 kx6989586621680741601 f6989586621680741600) instance forall k1 k2 k3 k4 k5 (ky6989586621680741602 :: k5) (kx6989586621680741601 :: k4) (f6989586621680741600 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741606YSym3 ky6989586621680741602 kx6989586621680741601 f6989586621680741600) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680741590Sym0 instance forall s6989586621680740595 a6989586621679536050 b6989586621679536051 (a6989586621680741588 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680740595 (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680741590Sym1 a6989586621680741588) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741534Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680741532 :: k3 Data.Singletons.Internal.~> (k4, k5 Data.Singletons.Internal.~> k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741534Sym1 kf6989586621680741532) instance forall k2 k3 k4 k5 k6 (kv6989586621680741533 :: k3 Data.Singletons.Internal.~> (k4, k5 Data.Singletons.Internal.~> k6)) (kf6989586621680741532 :: k2 Data.Singletons.Internal.~> (k3, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741534Sym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741544Sym0 instance forall k2 k3 k4 k5 (kf6989586621680741532 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741544Sym1 kf6989586621680741532) instance forall k2 k3 k4 k5 (kv6989586621680741533 :: k4 Data.Singletons.Internal.~> k5) (kf6989586621680741532 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741544Sym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537S''Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680741532 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537S''Sym1 kf6989586621680741532) instance forall k2 k3 k4 k5 k6 (kv6989586621680741533 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680741532 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537S''Sym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537FSym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680741532 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537FSym1 kf6989586621680741532) instance forall k2 k3 k4 k5 k6 (kv6989586621680741533 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680741532 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537FSym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741538Sym0 instance forall k1 k2 k3 (kf6989586621680741532 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741538Sym1 kf6989586621680741532) instance forall k1 k2 k3 (kv6989586621680741533 :: k3) (kf6989586621680741532 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537X_6989586621680741538Sym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537S'Sym0 instance forall k1 k2 k3 k4 (kf6989586621680741532 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537S'Sym1 kf6989586621680741532) instance forall k1 k2 k3 k4 (kv6989586621680741533 :: k4) (kf6989586621680741532 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537S'Sym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741537VSym0 instance forall k1 k2 k3 k4 (kf6989586621680741532 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537VSym1 kf6989586621680741532) instance forall k1 k2 k3 k4 (kv6989586621680741533 :: k4) (kf6989586621680741532 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741537VSym2 kv6989586621680741533 kf6989586621680741532) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680741525Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741518Sym0 instance forall k2 k3 (x6989586621680741517 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741518Sym1 x6989586621680741517) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680741511Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateR s) instance forall s6989586621680740589 a6989586621679536044 b6989586621679536045 (a6989586621680741509 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680741511Sym1 a6989586621680741509) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741478Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateR s) instance forall k2 k k3 k4 (f6989586621680741476 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741478Sym1 f6989586621680741476) instance forall k2 k k3 k4 (k6989586621680741477 :: k3 Data.Singletons.Internal.~> k4) (f6989586621680741476 :: k2 Data.Singletons.Internal.~> (k, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741478Sym2 k6989586621680741477 f6989586621680741476) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741481X_6989586621680741482Sym0 instance forall k1 k2 k3 (f6989586621680741476 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481X_6989586621680741482Sym1 f6989586621680741476) instance forall k1 k2 k3 (k6989586621680741477 :: k3) (f6989586621680741476 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481X_6989586621680741482Sym2 k6989586621680741477 f6989586621680741476) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741481S'Sym0 instance forall k1 k2 k3 k4 (f6989586621680741476 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481S'Sym1 f6989586621680741476) instance forall k1 k2 k3 k4 (k6989586621680741477 :: k4) (f6989586621680741476 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481S'Sym2 k6989586621680741477 f6989586621680741476) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741481VSym0 instance forall k1 k2 k3 k4 (f6989586621680741476 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481VSym1 f6989586621680741476) instance forall k1 k2 k3 k4 (k6989586621680741477 :: k4) (f6989586621680741476 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741481VSym2 k6989586621680741477 f6989586621680741476) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741467Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateL s) instance forall s6989586621680740571 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680741464 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741467Sym1 a6989586621680741464) instance forall s6989586621680740571 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680741465 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680741464 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680740571 a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680741467Sym2 a6989586621680741465 a6989586621680741464) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741403Sym0 instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateL s) instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741400 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741403Sym1 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741401 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680741400 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741403Sym2 kx6989586621680741401 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741402 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (kx6989586621680741401 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680741400 :: k4 Data.Singletons.Internal.~> (k2, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741403Sym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741413Sym0 instance forall k2 k3 k4 k5 k6 (f6989586621680741400 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741413Sym1 f6989586621680741400) instance forall k2 k3 k4 k5 k6 (kx6989586621680741401 :: k6) (f6989586621680741400 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741413Sym2 kx6989586621680741401 f6989586621680741400) instance forall k2 k3 k4 k5 k6 (ky6989586621680741402 :: k6) (kx6989586621680741401 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680741400 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741413Sym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406S''Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741400 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S''Sym1 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741401 :: k7) (f6989586621680741400 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S''Sym2 kx6989586621680741401 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741402 :: k7) (kx6989586621680741401 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680741400 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S''Sym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406YSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680741400 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406YSym1 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680741401 :: k7) (f6989586621680741400 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406YSym2 kx6989586621680741401 f6989586621680741400) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680741402 :: k7) (kx6989586621680741401 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680741400 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406YSym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741407Sym0 instance forall k1 k2 k3 k4 (f6989586621680741400 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741407Sym1 f6989586621680741400) instance forall k1 k2 k3 k4 (kx6989586621680741401 :: k4) (f6989586621680741400 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741407Sym2 kx6989586621680741401 f6989586621680741400) instance forall k1 k2 k3 k4 (ky6989586621680741402 :: k4) (kx6989586621680741401 :: k2 Data.Singletons.Internal.~> k3) (f6989586621680741400 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406X_6989586621680741407Sym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406S'Sym0 instance forall k1 k2 k3 k4 k5 (f6989586621680741400 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S'Sym1 f6989586621680741400) instance forall k1 k2 k3 k4 k5 (kx6989586621680741401 :: k5) (f6989586621680741400 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S'Sym2 kx6989586621680741401 f6989586621680741400) instance forall k1 k2 k3 k4 k5 (ky6989586621680741402 :: k5) (kx6989586621680741401 :: k2 Data.Singletons.Internal.~> (k3, k4)) (f6989586621680741400 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406S'Sym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741406XSym0 instance forall k1 k2 k3 k4 k5 (f6989586621680741400 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406XSym1 f6989586621680741400) instance forall k1 k2 k3 k4 k5 (kx6989586621680741401 :: k5) (f6989586621680741400 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406XSym2 kx6989586621680741401 f6989586621680741400) instance forall k1 k2 k3 k4 k5 (ky6989586621680741402 :: k5) (kx6989586621680741401 :: k2 Data.Singletons.Internal.~> (k3, k4)) (f6989586621680741400 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741406XSym3 ky6989586621680741402 kx6989586621680741401 f6989586621680741400) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680741390Sym0 instance forall s6989586621680740571 a6989586621679536050 b6989586621679536051 (a6989586621680741388 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680740571 (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680741390Sym1 a6989586621680741388) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741334Sym0 instance forall k k2 k3 k4 k5 (kf6989586621680741332 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741334Sym1 kf6989586621680741332) instance forall k k2 k3 k4 k5 (kv6989586621680741333 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)) (kf6989586621680741332 :: k3 Data.Singletons.Internal.~> (k, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741334Sym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741344Sym0 instance forall k2 k3 k4 k5 (kf6989586621680741332 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741344Sym1 kf6989586621680741332) instance forall k2 k3 k4 k5 (kv6989586621680741333 :: k3 Data.Singletons.Internal.~> (k4, k5)) (kf6989586621680741332 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741344Sym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337S''Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680741332 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337S''Sym1 kf6989586621680741332) instance forall k2 k3 k4 k5 k6 (kv6989586621680741333 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680741332 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337S''Sym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337VSym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680741332 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337VSym1 kf6989586621680741332) instance forall k2 k3 k4 k5 k6 (kv6989586621680741333 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680741332 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337VSym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741338Sym0 instance forall k1 k2 k3 (kf6989586621680741332 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741338Sym1 kf6989586621680741332) instance forall k1 k2 k3 (kv6989586621680741333 :: k2 Data.Singletons.Internal.~> k3) (kf6989586621680741332 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337X_6989586621680741338Sym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337S'Sym0 instance forall k1 k2 k3 k4 (kf6989586621680741332 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337S'Sym1 kf6989586621680741332) instance forall k1 k2 k3 k4 (kv6989586621680741333 :: k2 Data.Singletons.Internal.~> (k3, k4)) (kf6989586621680741332 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337S'Sym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741337FSym0 instance forall k1 k2 k3 k4 (kf6989586621680741332 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337FSym1 kf6989586621680741332) instance forall k1 k2 k3 k4 (kv6989586621680741333 :: k2 Data.Singletons.Internal.~> (k3, k4)) (kf6989586621680741332 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741337FSym2 kv6989586621680741333 kf6989586621680741332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680741325Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741318Sym0 instance forall k2 k3 (x6989586621680741317 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741318Sym1 x6989586621680741317) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680741311Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateL s) instance forall s6989586621680740565 a6989586621679536044 b6989586621679536045 (a6989586621680741309 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680741311Sym1 a6989586621680741309) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680741278Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateL s) instance forall k2 k k3 k4 (f6989586621680741276 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741278Sym1 f6989586621680741276) instance forall k2 k k3 k4 (k6989586621680741277 :: k3 Data.Singletons.Internal.~> k4) (f6989586621680741276 :: k2 Data.Singletons.Internal.~> (k, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680741278Sym2 k6989586621680741277 f6989586621680741276) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741281X_6989586621680741282Sym0 instance forall k1 k2 k3 (f6989586621680741276 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281X_6989586621680741282Sym1 f6989586621680741276) instance forall k1 k2 k3 (k6989586621680741277 :: k3) (f6989586621680741276 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281X_6989586621680741282Sym2 k6989586621680741277 f6989586621680741276) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741281S'Sym0 instance forall k1 k2 k3 k4 (f6989586621680741276 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281S'Sym1 f6989586621680741276) instance forall k1 k2 k3 k4 (k6989586621680741277 :: k4) (f6989586621680741276 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281S'Sym2 k6989586621680741277 f6989586621680741276) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741281VSym0 instance forall k1 k2 k3 k4 (f6989586621680741276 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281VSym1 f6989586621680741276) instance forall k1 k2 k3 k4 (k6989586621680741277 :: k4) (f6989586621680741276 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741281VSym2 k6989586621680741277 f6989586621680741276) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741268Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Functor.Identity.Identity instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741266 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741268Sym1 a6989586621680741266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741256Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.Last instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741254 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741256Sym1 a6989586621680741254) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741244Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.First instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741242 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741244Sym1 a6989586621680741242) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741232Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Product instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741230 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741232Sym1 a6989586621680741230) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741220Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Sum instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741218 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741220Sym1 a6989586621680741218) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741208Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Dual instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741206 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741208Sym1 a6989586621680741206) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741196Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Functor.Const.Const m) instance forall m6989586621680740564 a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741194 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741196Sym1 a6989586621680741194) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741184Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable ((,) a) instance forall a6989586621680740563 a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741182 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741184Sym1 a6989586621680741182) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741171Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Either.Either a) instance forall a6989586621680740562 a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741169 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741171Sym1 a6989586621680741169) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741157Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Base.NonEmpty instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741155 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741157Sym1 a6989586621680741155) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741144Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable [] instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741142 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741144Sym1 a6989586621680741142) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680741130Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Maybe.Maybe instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680741128 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680741130Sym1 a6989586621680741128) 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 b6989586621680740555 (f6989586621680740553 :: * -> *) (t6989586621680740552 :: * -> *) a6989586621680740554 (a6989586621680741115 :: t6989586621680740552 a6989586621680740554). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForSym1 a6989586621680741115) 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 b6989586621680740551 (m6989586621680740549 :: * -> *) (t6989586621680740548 :: * -> *) a6989586621680740550 (a6989586621680741105 :: t6989586621680740548 a6989586621680740550). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForMSym1 a6989586621680741105) 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 (t6989586621680740544 :: * -> *) b6989586621680740546 a6989586621680740545 c6989586621680740547 (a6989586621680741084 :: a6989586621680740545 Data.Singletons.Internal.~> (b6989586621680740546 Data.Singletons.Internal.~> (a6989586621680740545, c6989586621680740547))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym1 a6989586621680741084) 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 (t6989586621680740544 :: * -> *) b6989586621680740546 a6989586621680740545 c6989586621680740547 (a6989586621680741085 :: a6989586621680740545 Data.Singletons.Internal.~> (b6989586621680740546 Data.Singletons.Internal.~> (a6989586621680740545, c6989586621680740547))) (a6989586621680741084 :: a6989586621680740545). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym2 a6989586621680741085 a6989586621680741084) 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 (t6989586621680740540 :: * -> *) b6989586621680740542 a6989586621680740541 c6989586621680740543 (a6989586621680741067 :: a6989586621680740541 Data.Singletons.Internal.~> (b6989586621680740542 Data.Singletons.Internal.~> (a6989586621680740541, c6989586621680740543))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym1 a6989586621680741067) 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 (t6989586621680740540 :: * -> *) b6989586621680740542 a6989586621680740541 c6989586621680740543 (a6989586621680741068 :: a6989586621680740541 Data.Singletons.Internal.~> (b6989586621680740542 Data.Singletons.Internal.~> (a6989586621680740541, c6989586621680740543))) (a6989586621680741067 :: a6989586621680740541). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym2 a6989586621680741068 a6989586621680741067) 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 (t6989586621680740537 :: * -> *) a6989586621680740538 b6989586621680740539 (a6989586621680741054 :: a6989586621680740538 Data.Singletons.Internal.~> b6989586621680740539). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FmapDefaultSym1 a6989586621680741054) 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 (t6989586621680740534 :: * -> *) a6989586621680740536 m6989586621680740535 (a6989586621680741033 :: a6989586621680740536 Data.Singletons.Internal.~> m6989586621680740535). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FoldMapDefaultSym1 a6989586621680741033) 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.Let6989586621680741093Scrutinee_6989586621680740628Sym0 instance forall k (t6989586621680734967 :: * -> *) a6989586621680734969 s b6989586621680734970 (f6989586621680741090 :: s Data.Singletons.Internal.~> (a6989586621680734969 Data.Singletons.Internal.~> (s, b6989586621680734970))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741093Scrutinee_6989586621680740628Sym1 f6989586621680741090) instance forall (t6989586621680734967 :: * -> *) k a6989586621680734969 s b6989586621680734970 (s6989586621680741091 :: s Data.Singletons.Internal.~> (a6989586621680734969 Data.Singletons.Internal.~> (s, b6989586621680734970))) (f6989586621680741090 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741093Scrutinee_6989586621680740628Sym2 s6989586621680741091 f6989586621680741090) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741076Scrutinee_6989586621680740632Sym0 instance forall k (t6989586621680734967 :: * -> *) a6989586621680734969 s b6989586621680734970 (f6989586621680741073 :: s Data.Singletons.Internal.~> (a6989586621680734969 Data.Singletons.Internal.~> (s, b6989586621680734970))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741076Scrutinee_6989586621680740632Sym1 f6989586621680741073) instance forall (t6989586621680734967 :: * -> *) k a6989586621680734969 s b6989586621680734970 (s6989586621680741074 :: s Data.Singletons.Internal.~> (a6989586621680734969 Data.Singletons.Internal.~> (s, b6989586621680734970))) (f6989586621680741073 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741076Scrutinee_6989586621680740632Sym2 s6989586621680741074 f6989586621680741073) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741060Scrutinee_6989586621680740636Sym0 instance forall (t6989586621680734967 :: * -> *) a6989586621680734969 b6989586621680734970 (f6989586621680741058 :: a6989586621680734969 Data.Singletons.Internal.~> b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741060Scrutinee_6989586621680740636Sym1 f6989586621680741058) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741047Scrutinee_6989586621680740639Sym0 instance forall (t6989586621680734967 :: * -> *) a6989586621680734969 b6989586621679511791 (f6989586621680741037 :: a6989586621680734969 Data.Singletons.Internal.~> b6989586621679511791). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741047Scrutinee_6989586621680740639Sym1 f6989586621680741037) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680741039MkConstSym0 instance forall k1 m6989586621680740535 k2 (f6989586621680741037 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741039MkConstSym1 f6989586621680741037) instance forall m6989586621680740535 k1 k2 (x6989586621680741038 :: k2) (f6989586621680741037 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680741039MkConstSym2 x6989586621680741038 f6989586621680741037) 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 (t6989586621680734967 :: * -> *) a6989586621680734974 (m6989586621680734973 :: * -> *) b6989586621680734975 (arg6989586621680734985 :: a6989586621680734974 Data.Singletons.Internal.~> m6989586621680734973 b6989586621680734975). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapMSym1 arg6989586621680734985) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceSym0 instance forall (t6989586621680734967 :: * -> *) a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (arg6989586621680734979 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TraverseSym1 arg6989586621680734979) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TraverseSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceASym0 instance forall (t6989586621680734967 :: * -> *) a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680734999 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680735001Sym1 a6989586621680734999) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680735001Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceA_6989586621680735011Sym0 instance forall (t6989586621680734967 :: * -> *) a6989586621680734974 (m6989586621680734973 :: * -> *) b6989586621680734975 (a6989586621680735024 :: a6989586621680734974 Data.Singletons.Internal.~> m6989586621680734973 b6989586621680734975). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapM_6989586621680735026Sym1 a6989586621680735024) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapM_6989586621680735026Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Sequence_6989586621680735036Sym0 -- | Defines the promoted version of Semigroup, PSemigroup, -- and the singleton version, SSemigroup. module Data.Singletons.Prelude.Semigroup class PSemigroup (a_a3jHE :: Type) where { type family (<>) (arg_a3jPt :: a_a3jHE) (arg_a3jPu :: a_a3jHE) :: a_a3jHE; type family Sconcat (arg_a3jPx :: NonEmpty a_a3jHE) :: a_a3jHE; type Sconcat a_a3jPO = Apply Sconcat_6989586621679801025Sym0 a_a3jPO; } infixr 6 <> class SSemigroup a_a3jHE (%<>) :: forall (t_a3jTh :: a_a3jHE) (t_a3jTi :: a_a3jHE). SSemigroup a_a3jHE => Sing t_a3jTh -> Sing t_a3jTi -> Sing (Apply (Apply (<>@#@$) t_a3jTh) t_a3jTi :: a_a3jHE) sSconcat :: forall (t_a3jTl :: NonEmpty a_a3jHE). SSemigroup a_a3jHE => Sing t_a3jTl -> Sing (Apply SconcatSym0 t_a3jTl :: a_a3jHE) sSconcat :: forall (t_a3jTl :: NonEmpty a_a3jHE). (SSemigroup a_a3jHE, (Apply SconcatSym0 t_a3jTl :: a_a3jHE) ~ Apply Sconcat_6989586621679801025Sym0 t_a3jTl) => Sing t_a3jTl -> Sing (Apply SconcatSym0 t_a3jTl :: a_a3jHE) infixr 6 %<> -- | The singleton kind-indexed data family. data family Sing :: k -> Type type family GetMin (a_a3mft :: Min a_adnk) :: a_adnk type family GetMax (a_a3mfK :: Max a_adnq) :: a_adnq type family GetFirst (a_a3mg1 :: First a_adnE) :: a_adnE type family GetLast (a_a3mgi :: Last a_adnK) :: a_adnK type family GetDual (a_a3mec :: Dual a_aiFO) :: a_aiFO type family GetAll (a_a3meq :: All) :: Bool type family GetAny (a_a3meE :: Any) :: Bool type family GetSum (a_a3meV :: Sum a_aiFz) :: a_aiFz type family GetProduct (a_a3mfc :: Product a_aiFE) :: a_aiFE type family GetOption (a_a3mdV :: Option a_adnW) :: Maybe a_adnW type SMin = (Sing :: Min a_adnk -> Type) type SMax = (Sing :: Max a_adnq -> Type) type SFirst = (Sing :: First a_adnE -> Type) type SLast = (Sing :: Last a_adnK -> Type) type SWrappedMonoid = (Sing :: WrappedMonoid m_adnQ -> Type) type SDual = (Sing :: Dual a_aiFO -> Type) type SAll = (Sing :: All -> Type) type SAny = (Sing :: Any -> Type) type SSum = (Sing :: Sum a_aiFz -> Type) type SProduct = (Sing :: Product a_aiFE -> Type) type SOption = (Sing :: Option a_adnW -> Type) type SArg = (Sing :: Arg a_adnx b_adny -> Type) option_ :: b_a85ve -> (a_a85vf -> b_a85ve) -> Option a_a85vf -> b_a85ve sOption_ :: forall b_a85ve a_a85vf (t_a85vz :: b_a85ve) (t_a85vA :: (~>) a_a85vf b_a85ve) (t_a85vB :: Option a_a85vf). Sing t_a85vz -> Sing t_a85vA -> Sing t_a85vB -> Sing (Apply (Apply (Apply Option_Sym0 t_a85vz) t_a85vA) t_a85vB :: b_a85ve) type family Option_ (a_a85vq :: b_a85ve) (a_a85vr :: (~>) a_a85vf b_a85ve) (a_a85vs :: Option a_a85vf) :: b_a85ve data (<>@#@$) :: forall a6989586621679800518. (~>) a6989586621679800518 ((~>) a6989586621679800518 a6989586621679800518) infixr 6 <>@#@$ data (<>@#@$$) (arg6989586621679801003 :: a6989586621679800518) :: (~>) a6989586621679800518 a6989586621679800518 infixr 6 <>@#@$$ type (<>@#@$$$) (arg6989586621679801003 :: a6989586621679800518) (arg6989586621679801004 :: a6989586621679800518) = (<>) arg6989586621679801003 arg6989586621679801004 data SconcatSym0 :: forall a6989586621679800518. (~>) (NonEmpty a6989586621679800518) a6989586621679800518 type SconcatSym1 (arg6989586621679801007 :: NonEmpty a6989586621679800518) = Sconcat arg6989586621679801007 data MinSym0 :: forall (a6989586621679061210 :: Type). (~>) a6989586621679061210 (Min (a6989586621679061210 :: Type)) type MinSym1 (t6989586621679810306 :: a6989586621679061210) = 'Min t6989586621679810306 data GetMinSym0 :: forall a6989586621679061210. (~>) (Min a6989586621679061210) a6989586621679061210 type GetMinSym1 (a6989586621679810303 :: Min a6989586621679061210) = GetMin a6989586621679810303 data MaxSym0 :: forall (a6989586621679061216 :: Type). (~>) a6989586621679061216 (Max (a6989586621679061216 :: Type)) type MaxSym1 (t6989586621679810323 :: a6989586621679061216) = 'Max t6989586621679810323 data GetMaxSym0 :: forall a6989586621679061216. (~>) (Max a6989586621679061216) a6989586621679061216 type GetMaxSym1 (a6989586621679810320 :: Max a6989586621679061216) = GetMax a6989586621679810320 data FirstSym0 :: forall (a6989586621679061230 :: Type). (~>) a6989586621679061230 (First (a6989586621679061230 :: Type)) type FirstSym1 (t6989586621679810340 :: a6989586621679061230) = 'First t6989586621679810340 data GetFirstSym0 :: forall a6989586621679061230. (~>) (First a6989586621679061230) a6989586621679061230 type GetFirstSym1 (a6989586621679810337 :: First a6989586621679061230) = GetFirst a6989586621679810337 data LastSym0 :: forall (a6989586621679061236 :: Type). (~>) a6989586621679061236 (Last (a6989586621679061236 :: Type)) type LastSym1 (t6989586621679810357 :: a6989586621679061236) = 'Last t6989586621679810357 data GetLastSym0 :: forall a6989586621679061236. (~>) (Last a6989586621679061236) a6989586621679061236 type GetLastSym1 (a6989586621679810354 :: Last a6989586621679061236) = GetLast a6989586621679810354 data WrapMonoidSym0 :: forall (m6989586621679061242 :: Type). (~>) m6989586621679061242 (WrappedMonoid (m6989586621679061242 :: Type)) type WrapMonoidSym1 (t6989586621679810374 :: m6989586621679061242) = 'WrapMonoid t6989586621679810374 data UnwrapMonoidSym0 :: forall m6989586621679061242. (~>) (WrappedMonoid m6989586621679061242) m6989586621679061242 type UnwrapMonoidSym1 (a6989586621679810371 :: WrappedMonoid m6989586621679061242) = UnwrapMonoid a6989586621679810371 data DualSym0 :: forall (a6989586621679081576 :: Type). (~>) a6989586621679081576 (Dual (a6989586621679081576 :: Type)) type DualSym1 (t6989586621679810227 :: a6989586621679081576) = 'Dual t6989586621679810227 data GetDualSym0 :: forall a6989586621679081576. (~>) (Dual a6989586621679081576) a6989586621679081576 type GetDualSym1 (a6989586621679810224 :: Dual a6989586621679081576) = GetDual a6989586621679810224 data AllSym0 :: (~>) Bool All type AllSym1 (t6989586621679810241 :: Bool) = 'All t6989586621679810241 data GetAllSym0 :: (~>) All Bool type GetAllSym1 (a6989586621679810238 :: All) = GetAll a6989586621679810238 data AnySym0 :: (~>) Bool Any type AnySym1 (t6989586621679810255 :: Bool) = 'Any t6989586621679810255 data GetAnySym0 :: (~>) Any Bool type GetAnySym1 (a6989586621679810252 :: Any) = GetAny a6989586621679810252 data SumSym0 :: forall (a6989586621679081561 :: Type). (~>) a6989586621679081561 (Sum (a6989586621679081561 :: Type)) type SumSym1 (t6989586621679810272 :: a6989586621679081561) = 'Sum t6989586621679810272 data GetSumSym0 :: forall a6989586621679081561. (~>) (Sum a6989586621679081561) a6989586621679081561 type GetSumSym1 (a6989586621679810269 :: Sum a6989586621679081561) = GetSum a6989586621679810269 data ProductSym0 :: forall (a6989586621679081566 :: Type). (~>) a6989586621679081566 (Product (a6989586621679081566 :: Type)) type ProductSym1 (t6989586621679810289 :: a6989586621679081566) = 'Product t6989586621679810289 data GetProductSym0 :: forall a6989586621679081566. (~>) (Product a6989586621679081566) a6989586621679081566 type GetProductSym1 (a6989586621679810286 :: Product a6989586621679081566) = GetProduct a6989586621679810286 data OptionSym0 :: forall (a6989586621679061248 :: Type). (~>) (Maybe a6989586621679061248) (Option (a6989586621679061248 :: Type)) type OptionSym1 (t6989586621679810210 :: Maybe a6989586621679061248) = 'Option t6989586621679810210 data GetOptionSym0 :: forall a6989586621679061248. (~>) (Option a6989586621679061248) (Maybe a6989586621679061248) type GetOptionSym1 (a6989586621679810207 :: Option a6989586621679061248) = GetOption a6989586621679810207 data ArgSym0 :: forall (a6989586621679061223 :: Type) (b6989586621679061224 :: Type). (~>) a6989586621679061223 ((~>) b6989586621679061224 (Arg (a6989586621679061223 :: Type) (b6989586621679061224 :: Type))) data ArgSym1 (t6989586621680850272 :: (a6989586621679061223 :: Type)) :: forall (b6989586621679061224 :: Type). (~>) b6989586621679061224 (Arg (a6989586621679061223 :: Type) (b6989586621679061224 :: Type)) type ArgSym2 (t6989586621680850272 :: a6989586621679061223) (t6989586621680850273 :: b6989586621679061224) = 'Arg t6989586621680850272 t6989586621680850273 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Option_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Semigroup.Option_Sym0 instance forall a6989586621680937573 b6989586621680937572 (a6989586621680937584 :: b6989586621680937572). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym1 a6989586621680937584) instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.Option_Sym1 d) instance forall a6989586621680937573 b6989586621680937572 (a6989586621680937585 :: b6989586621680937572) (a6989586621680937584 :: a6989586621680937573 Data.Singletons.Internal.~> b6989586621680937572). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym2 a6989586621680937585 a6989586621680937584) 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 forall a b (z :: Data.Semigroup.Arg a b). (Data.Singletons.ShowSing.ShowSing a, Data.Singletons.ShowSing.ShowSing b) => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680870062Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Option instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680870060 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680870062Sym1 a6989586621680870060) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680870050Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Option instance forall a6989586621680438529 m6989586621680438528 (a6989586621680870048 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680870050Sym1 a6989586621680870048) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Option a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870036Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Option a) instance forall a6989586621680868034 (a6989586621680870034 :: Data.Semigroup.Option a6989586621680868034). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870036Sym1 a6989586621680870034) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870024Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Option instance forall b6989586621679536076 a6989586621679536075 (a6989586621680870022 :: Data.Semigroup.Option a6989586621679536075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870024Sym1 a6989586621680870022) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870008Sym0 instance forall b6989586621679536074 a6989586621679536073 (a6989586621680870006 :: Data.Semigroup.Option a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680870008Sym1 a6989586621680870006) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869996Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Option instance forall b6989586621679536047 a6989586621679536046 (a6989586621680869994 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869996Sym1 a6989586621680869994) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869984Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680869982 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869984Sym1 a6989586621680869982) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869972Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Option instance forall b6989586621679536056 a6989586621679536055 (a6989586621680869970 :: Data.Semigroup.Option a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869972Sym1 a6989586621680869970) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869960Sym0 instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869957 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869960Sym1 a6989586621680869957) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869958 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680869957 :: Data.Semigroup.Option a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869960Sym2 a6989586621680869958 a6989586621680869957) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869944Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680869942 :: Data.Semigroup.Option (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869944Sym1 a6989586621680869942) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680869933Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869925Sym0 instance Data.Singletons.Prelude.Monad.Internal.PAlternative Data.Semigroup.Option instance forall a6989586621679536127 (a6989586621680869923 :: Data.Semigroup.Option a6989586621679536127). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869925Sym1 a6989586621680869923) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680869921ASym0 instance Data.Singletons.Prelude.Monad.Internal.SAlternative Data.Semigroup.Option instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869908Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.WrappedMonoid a) instance forall a6989586621680868014 (a6989586621680869905 :: Data.Semigroup.WrappedMonoid a6989586621680868014). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869908Sym1 a6989586621680869905) instance forall a6989586621680868014 (a6989586621680869906 :: Data.Semigroup.WrappedMonoid a6989586621680868014) (a6989586621680869905 :: Data.Semigroup.WrappedMonoid a6989586621680868014). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869908Sym2 a6989586621680869906 a6989586621680869905) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869892Sym0 instance forall a6989586621680868014 (a6989586621680869890 :: Data.Semigroup.WrappedMonoid a6989586621680868014). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869892Sym1 a6989586621680869890) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680869881Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680869874Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680869865Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680869858Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.WrappedMonoid m) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869848Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.WrappedMonoid m) instance forall m6989586621680868010 (a6989586621680869846 :: Data.Semigroup.WrappedMonoid m6989586621680868010). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869848Sym1 a6989586621680869846) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869836Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Last instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680869834 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869836Sym1 a6989586621680869834) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869823Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Last instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869820 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869823Sym1 a6989586621680869820) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869821 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680869820 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869823Sym2 a6989586621680869821 a6989586621680869820) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869807Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680869805 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869807Sym1 a6989586621680869805) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869795Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Last a) instance forall a6989586621680868008 (a6989586621680869793 :: Data.Semigroup.Last a6989586621680868008). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869795Sym1 a6989586621680869793) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869784Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Last instance forall b6989586621679536074 a6989586621679536073 (a6989586621680869782 :: Data.Semigroup.Last a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869784Sym1 a6989586621680869782) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869772Sym0 instance forall b6989586621679536076 a6989586621679536075 (a6989586621680869770 :: Data.Semigroup.Last a6989586621679536075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869772Sym1 a6989586621680869770) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869756Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Last instance forall b6989586621679536047 a6989586621679536046 (a6989586621680869754 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869756Sym1 a6989586621680869754) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869747Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Last instance forall k1 k2 k3 (_z_69895866216808684986989586621680869745 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869747Sym1 _z_69895866216808684986989586621680869745) instance forall k1 k2 k3 (a_69895866216808685046989586621680869746 :: k3) (_z_69895866216808684986989586621680869745 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869747Sym2 a_69895866216808685046989586621680869746 _z_69895866216808684986989586621680869745) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869737Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680869735 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869737Sym1 a6989586621680869735) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869724Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Last a) instance forall a6989586621680867997 (a6989586621680869721 :: Data.Semigroup.Last a6989586621680867997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869724Sym1 a6989586621680869721) instance forall a6989586621680867997 (a6989586621680869722 :: Data.Semigroup.Last a6989586621680867997) (a6989586621680869721 :: Data.Semigroup.Last a6989586621680867997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869724Sym2 a6989586621680869722 a6989586621680869721) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869708Sym0 instance forall a6989586621680867997 (a6989586621680869706 :: Data.Semigroup.Last a6989586621680867997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869708Sym1 a6989586621680869706) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680869697Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680869690Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680869681Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680869674Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869665Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Last instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869662 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869665Sym1 a6989586621680869662) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869663 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680869662 :: Data.Semigroup.Last a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869665Sym2 a6989586621680869663 a6989586621680869662) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869649Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680869647 :: Data.Semigroup.Last (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869649Sym1 a6989586621680869647) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869637Sym0 instance forall b6989586621679536056 a6989586621679536055 (a6989586621680869635 :: Data.Semigroup.Last a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869637Sym1 a6989586621680869635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869626Sym0 instance forall b6989586621679536058 a6989586621679536057 (a6989586621680869624 :: Data.Semigroup.Last a6989586621679536057). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869626Sym1 a6989586621680869624) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680869616Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869608Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.First instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680869606 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869608Sym1 a6989586621680869606) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869595Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.First instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869592 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869595Sym1 a6989586621680869592) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869593 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680869592 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869595Sym2 a6989586621680869593 a6989586621680869592) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869579Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680869577 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869579Sym1 a6989586621680869577) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869567Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.First a) instance forall a6989586621680867987 (a6989586621680869565 :: Data.Semigroup.First a6989586621680867987). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869567Sym1 a6989586621680869565) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869556Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.First instance forall b6989586621679536074 a6989586621679536073 (a6989586621680869554 :: Data.Semigroup.First a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869556Sym1 a6989586621680869554) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869544Sym0 instance forall b6989586621679536076 a6989586621679536075 (a6989586621680869542 :: Data.Semigroup.First a6989586621679536075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869544Sym1 a6989586621680869542) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869528Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.First instance forall b6989586621679536047 a6989586621679536046 (a6989586621680869526 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869528Sym1 a6989586621680869526) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869519Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.First instance forall k1 k2 k3 (_z_69895866216808684646989586621680869517 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869519Sym1 _z_69895866216808684646989586621680869517) instance forall k1 k2 k3 (a_69895866216808684706989586621680869518 :: k3) (_z_69895866216808684646989586621680869517 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869519Sym2 a_69895866216808684706989586621680869518 _z_69895866216808684646989586621680869517) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869509Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680869507 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869509Sym1 a6989586621680869507) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869496Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.First a) instance forall a6989586621680867976 (a6989586621680869493 :: Data.Semigroup.First a6989586621680867976). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869496Sym1 a6989586621680869493) instance forall a6989586621680867976 (a6989586621680869494 :: Data.Semigroup.First a6989586621680867976) (a6989586621680869493 :: Data.Semigroup.First a6989586621680867976). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680869496Sym2 a6989586621680869494 a6989586621680869493) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869480Sym0 instance forall a6989586621680867976 (a6989586621680869478 :: Data.Semigroup.First a6989586621680867976). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680869480Sym1 a6989586621680869478) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680869469Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680869462Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680869453Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680869446Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869437Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.First instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869434 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869437Sym1 a6989586621680869434) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680869435 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680869434 :: Data.Semigroup.First a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680869437Sym2 a6989586621680869435 a6989586621680869434) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869421Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680869419 :: Data.Semigroup.First (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869421Sym1 a6989586621680869419) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869409Sym0 instance forall b6989586621679536056 a6989586621679536055 (a6989586621680869407 :: Data.Semigroup.First a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869409Sym1 a6989586621680869407) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869398Sym0 instance forall b6989586621679536058 a6989586621679536057 (a6989586621680869396 :: Data.Semigroup.First a6989586621679536057). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869398Sym1 a6989586621680869396) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680869388Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869380Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Semigroup.Arg a) instance forall a6989586621680867967 a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680869378 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869380Sym1 a6989586621680869378) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869366Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Semigroup.Arg a) instance forall a6989586621680867966 a6989586621680438530 b6989586621680438531 (a6989586621680869363 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869366Sym1 a6989586621680869363) instance forall a6989586621680867966 a6989586621680438530 b6989586621680438531 (a6989586621680869364 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680869363 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869366Sym2 a6989586621680869364 a6989586621680869363) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Semigroup.Arg a) instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808684266989586621680869347 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym1 _f_69895866216808684266989586621680869347) instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216808684286989586621680869348 :: k6) (_f_69895866216808684266989586621680869347 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym2 _z_69895866216808684286989586621680869348 _f_69895866216808684266989586621680869347) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216808684406989586621680869349 :: k6) (_z_69895866216808684286989586621680869348 :: k5) (_f_69895866216808684266989586621680869347 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym3 a_69895866216808684406989586621680869349 _z_69895866216808684286989586621680869348 _f_69895866216808684266989586621680869347) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216808684426989586621680869350 :: k6) (a_69895866216808684406989586621680869349 :: k5) (_z_69895866216808684286989586621680869348 :: k4) (_f_69895866216808684266989586621680869347 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym4 a_69895866216808684426989586621680869350 a_69895866216808684406989586621680869349 _z_69895866216808684286989586621680869348 _f_69895866216808684266989586621680869347) instance forall k1 k2 k3 k4 k5 k6 (t6989586621680869355 :: k6) (a_69895866216808684426989586621680869350 :: k5) (a_69895866216808684406989586621680869349 :: k4) (_z_69895866216808684286989586621680869348 :: k3) (_f_69895866216808684266989586621680869347 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869351Sym5 t6989586621680869355 a_69895866216808684426989586621680869350 a_69895866216808684406989586621680869349 _z_69895866216808684286989586621680869348 _f_69895866216808684266989586621680869347) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869337Sym0 instance forall a6989586621680867966 a6989586621680438529 m6989586621680438528 (a6989586621680869335 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869337Sym1 a6989586621680869335) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869327Sym0 instance forall k1 k2 k3 k4 k5 (_f_69895866216808684266989586621680869324 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869327Sym1 _f_69895866216808684266989586621680869324) instance forall k1 k2 k3 k4 k5 (a_69895866216808684326989586621680869325 :: k5) (_f_69895866216808684266989586621680869324 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869327Sym2 a_69895866216808684326989586621680869325 _f_69895866216808684266989586621680869324) instance forall k1 k2 k3 k4 k5 (a_69895866216808684346989586621680869326 :: k5) (a_69895866216808684326989586621680869325 :: k4) (_f_69895866216808684266989586621680869324 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869327Sym3 a_69895866216808684346989586621680869326 a_69895866216808684326989586621680869325 _f_69895866216808684266989586621680869324) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680869315Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Arg a b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680869315Sym1 a6989586621680869312) instance forall a6989586621680867964 b6989586621680867965 (a6989586621680869313 :: GHC.Types.Nat) (a6989586621680869312 :: Data.Semigroup.Arg a6989586621680867964 b6989586621680867965). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680869315Sym2 a6989586621680869313 a6989586621680869312) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Max_6989586621680869296Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Semigroup.Arg a b) instance forall a6989586621680867952 b6989586621680867953 (a6989586621680869294 :: Data.Semigroup.Arg a6989586621680867952 b6989586621680867953). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Max_6989586621680869296Sym1 a6989586621680869294) 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.Let6989586621680869277YSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680869273 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277YSym1 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680869275 :: k7) (a6989586621680869273 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277YSym2 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680546989586621680869269 :: k7) (b6989586621680869275 :: k6) (a6989586621680869273 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277YSym3 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680566989586621680869270 :: k7) (arg_69895866216808680546989586621680869269 :: k6) (b6989586621680869275 :: k5) (a6989586621680869273 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277YSym4 arg_69895866216808680566989586621680869270 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808680586989586621680869274 :: k7) (arg_69895866216808680566989586621680869270 :: k6) (arg_69895866216808680546989586621680869269 :: k5) (b6989586621680869275 :: k4) (a6989586621680869273 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277YSym5 wild_69895866216808680586989586621680869274 arg_69895866216808680566989586621680869270 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680869273 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym1 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680869275 :: k7) (a6989586621680869273 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym2 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680546989586621680869269 :: k7) (b6989586621680869275 :: k6) (a6989586621680869273 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym3 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680566989586621680869270 :: k7) (arg_69895866216808680546989586621680869269 :: k6) (b6989586621680869275 :: k5) (a6989586621680869273 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym4 arg_69895866216808680566989586621680869270 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808680586989586621680869274 :: k7) (arg_69895866216808680566989586621680869270 :: k6) (arg_69895866216808680546989586621680869269 :: k5) (b6989586621680869275 :: k4) (a6989586621680869273 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869277XSym5 wild_69895866216808680586989586621680869274 arg_69895866216808680566989586621680869270 arg_69895866216808680546989586621680869269 b6989586621680869275 a6989586621680869273) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Min_6989586621680869261Sym0 instance forall a6989586621680867952 b6989586621680867953 (a6989586621680869259 :: Data.Semigroup.Arg a6989586621680867952 b6989586621680867953). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Min_6989586621680869261Sym1 a6989586621680869259) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680869238 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym1 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680869240 :: k7) (a6989586621680869238 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym2 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680426989586621680869234 :: k7) (b6989586621680869240 :: k6) (a6989586621680869238 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym3 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680446989586621680869235 :: k7) (arg_69895866216808680426989586621680869234 :: k6) (b6989586621680869240 :: k5) (a6989586621680869238 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym4 arg_69895866216808680446989586621680869235 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808680466989586621680869239 :: k7) (arg_69895866216808680446989586621680869235 :: k6) (arg_69895866216808680426989586621680869234 :: k5) (b6989586621680869240 :: k4) (a6989586621680869238 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242YSym5 wild_69895866216808680466989586621680869239 arg_69895866216808680446989586621680869235 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680869238 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym1 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680869240 :: k7) (a6989586621680869238 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym2 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680426989586621680869234 :: k7) (b6989586621680869240 :: k6) (a6989586621680869238 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym3 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808680446989586621680869235 :: k7) (arg_69895866216808680426989586621680869234 :: k6) (b6989586621680869240 :: k5) (a6989586621680869238 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym4 arg_69895866216808680446989586621680869235 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808680466989586621680869239 :: k7) (arg_69895866216808680446989586621680869235 :: k6) (arg_69895866216808680426989586621680869234 :: k5) (b6989586621680869240 :: k4) (a6989586621680869238 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680869242XSym5 wild_69895866216808680466989586621680869239 arg_69895866216808680446989586621680869235 arg_69895866216808680426989586621680869234 b6989586621680869240 a6989586621680869238) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Compare_6989586621680869226Sym0 instance forall a6989586621680867952 b6989586621680867953 (a6989586621680869224 :: Data.Semigroup.Arg a6989586621680867952 b6989586621680867953). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Compare_6989586621680869226Sym1 a6989586621680869224) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869214Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Semigroup.Arg a) instance forall a6989586621680867951 b6989586621679536047 a6989586621679536046 (a6989586621680869212 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869214Sym1 a6989586621680869212) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869204Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Semigroup.Arg a) instance forall k1 k2 k3 k4 (_z_69895866216808683946989586621680869193 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869204Sym1 _z_69895866216808683946989586621680869193) instance forall k1 k2 k3 k4 (a_69895866216808684066989586621680869194 :: k4) (_z_69895866216808683946989586621680869193 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869204Sym2 a_69895866216808684066989586621680869194 _z_69895866216808683946989586621680869193) instance forall k1 k2 k3 k4 (a_69895866216808684086989586621680869195 :: k4) (a_69895866216808684066989586621680869194 :: k3) (_z_69895866216808683946989586621680869193 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869204Sym3 a_69895866216808684086989586621680869195 a_69895866216808684066989586621680869194 _z_69895866216808683946989586621680869193) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869196Sym0 instance forall k1 k2 k3 k4 (_z_69895866216808683946989586621680869193 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869196Sym1 _z_69895866216808683946989586621680869193) instance forall k1 k2 k3 k4 (a_69895866216808684066989586621680869194 :: k4) (_z_69895866216808683946989586621680869193 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869196Sym2 a_69895866216808684066989586621680869194 _z_69895866216808683946989586621680869193) instance forall k1 k2 k3 k4 (a_69895866216808684086989586621680869195 :: k4) (a_69895866216808684066989586621680869194 :: k3) (_z_69895866216808683946989586621680869193 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869196Sym3 a_69895866216808684086989586621680869195 a_69895866216808684066989586621680869194 _z_69895866216808683946989586621680869193) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869185Sym0 instance forall a6989586621680867951 a6989586621679536044 b6989586621679536045 (a6989586621680869183 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680869185Sym1 a6989586621680869183) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869175Sym0 instance forall k1 k2 k3 k4 (_f_69895866216808683926989586621680869172 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869175Sym1 _f_69895866216808683926989586621680869172) instance forall k1 k2 k3 k4 (a_69895866216808683986989586621680869173 :: k4) (_f_69895866216808683926989586621680869172 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869175Sym2 a_69895866216808683986989586621680869173 _f_69895866216808683926989586621680869172) instance forall k1 k2 k3 k4 (a_69895866216808684006989586621680869174 :: k4) (a_69895866216808683986989586621680869173 :: k3) (_f_69895866216808683926989586621680869172 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680869175Sym3 a_69895866216808684006989586621680869174 a_69895866216808683986989586621680869173 _f_69895866216808683926989586621680869172) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869164Sym0 instance Data.Singletons.Prelude.Eq.PEq (Data.Semigroup.Arg a b) instance forall a6989586621680867947 b6989586621680867948 (a6989586621680869162 :: Data.Semigroup.Arg a6989586621680867947 b6989586621680867948). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869164Sym1 a6989586621680869162) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869152Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Max instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680869150 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680869152Sym1 a6989586621680869150) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869139Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Max instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869136 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869139Sym1 a6989586621680869136) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680869137 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680869136 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680869139Sym2 a6989586621680869137 a6989586621680869136) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869123Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680869121 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680869123Sym1 a6989586621680869121) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680869112Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680869103Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680869096Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680869089Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869081Sym0 instance forall a6989586621680867937 (a6989586621680869079 :: Data.Semigroup.Max a6989586621680867937). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869081Sym1 a6989586621680869079) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869069Sym0 instance forall a6989586621680867937 (a6989586621680869067 :: Data.Semigroup.Max a6989586621680867937). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869069Sym1 a6989586621680869067) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869057Sym0 instance forall a6989586621680867937 (a6989586621680869055 :: Data.Semigroup.Max a6989586621680867937). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869057Sym1 a6989586621680869055) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869043Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Max a) instance forall a6989586621680867933 (a6989586621680869041 :: Data.Semigroup.Max a6989586621680867933). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869043Sym1 a6989586621680869041) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869031Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Max instance forall b6989586621679536074 a6989586621679536073 (a6989586621680869029 :: Data.Semigroup.Max a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869031Sym1 a6989586621680869029) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869019Sym0 instance forall b6989586621679536076 a6989586621679536075 (a6989586621680869017 :: Data.Semigroup.Max a6989586621679536075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869019Sym1 a6989586621680869017) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869003Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Max instance forall b6989586621679536047 a6989586621679536046 (a6989586621680869001 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680869003Sym1 a6989586621680869001) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868994Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Max instance forall k1 k2 k3 (_z_69895866216808683566989586621680868992 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868994Sym1 _z_69895866216808683566989586621680868992) instance forall k1 k2 k3 (a_69895866216808683626989586621680868993 :: k3) (_z_69895866216808683566989586621680868992 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868994Sym2 a_69895866216808683626989586621680868993 _z_69895866216808683566989586621680868992) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680868984Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680868982 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680868984Sym1 a6989586621680868982) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868971Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Max a) instance forall a6989586621680867922 (a6989586621680868968 :: Data.Semigroup.Max a6989586621680867922). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868971Sym1 a6989586621680868968) instance forall a6989586621680867922 (a6989586621680868969 :: Data.Semigroup.Max a6989586621680867922) (a6989586621680868968 :: Data.Semigroup.Max a6989586621680867922). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868971Sym2 a6989586621680868969 a6989586621680868968) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680868955Sym0 instance forall a6989586621680867922 (a6989586621680868953 :: Data.Semigroup.Max a6989586621680867922). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680868955Sym1 a6989586621680868953) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680868944Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680868937Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680868928Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680868921Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868912Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Max instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680868909 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868912Sym1 a6989586621680868909) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680868910 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680868909 :: Data.Semigroup.Max a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868912Sym2 a6989586621680868910 a6989586621680868909) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868896Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680868894 :: Data.Semigroup.Max (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868896Sym1 a6989586621680868894) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868884Sym0 instance forall b6989586621679536056 a6989586621679536055 (a6989586621680868882 :: Data.Semigroup.Max a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868884Sym1 a6989586621680868882) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868873Sym0 instance forall b6989586621679536058 a6989586621679536057 (a6989586621680868871 :: Data.Semigroup.Max a6989586621679536057). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868873Sym1 a6989586621680868871) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680868863Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680868853Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Min instance forall a6989586621680734969 (f6989586621680734968 :: * -> *) b6989586621680734970 (a6989586621680868851 :: a6989586621680734969 Data.Singletons.Internal.~> f6989586621680734968 b6989586621680734970). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680868853Sym1 a6989586621680868851) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680868840Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Min instance forall a6989586621680438530 b6989586621680438531 (a6989586621680868837 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680868840Sym1 a6989586621680868837) instance forall a6989586621680438530 b6989586621680438531 (a6989586621680868838 :: a6989586621680438530 Data.Singletons.Internal.~> (b6989586621680438531 Data.Singletons.Internal.~> b6989586621680438531)) (a6989586621680868837 :: b6989586621680438531). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680868840Sym2 a6989586621680868838 a6989586621680868837) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680868824Sym0 instance forall a6989586621680438529 m6989586621680438528 (a6989586621680868822 :: a6989586621680438529 Data.Singletons.Internal.~> m6989586621680438528). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680868824Sym1 a6989586621680868822) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680868813Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680868804Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680868797Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680868790Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868782Sym0 instance forall a6989586621680867905 (a6989586621680868780 :: Data.Semigroup.Min a6989586621680867905). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868782Sym1 a6989586621680868780) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868770Sym0 instance forall a6989586621680867905 (a6989586621680868768 :: Data.Semigroup.Min a6989586621680867905). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868770Sym1 a6989586621680868768) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868758Sym0 instance forall a6989586621680867905 (a6989586621680868756 :: Data.Semigroup.Min a6989586621680867905). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868758Sym1 a6989586621680868756) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868744Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Min a) instance forall a6989586621680867901 (a6989586621680868742 :: Data.Semigroup.Min a6989586621680867901). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868744Sym1 a6989586621680868742) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868732Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Min instance forall b6989586621679536074 a6989586621679536073 (a6989586621680868730 :: Data.Semigroup.Min a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868732Sym1 a6989586621680868730) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868720Sym0 instance forall b6989586621679536076 a6989586621679536075 (a6989586621680868718 :: Data.Semigroup.Min a6989586621679536075). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868720Sym1 a6989586621680868718) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868704Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Min instance forall b6989586621679536047 a6989586621679536046 (a6989586621680868702 :: a6989586621679536046). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868704Sym1 a6989586621680868702) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868695Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Min instance forall k1 k2 k3 (_z_69895866216808683226989586621680868693 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868695Sym1 _z_69895866216808683226989586621680868693) instance forall k1 k2 k3 (a_69895866216808683286989586621680868694 :: k3) (_z_69895866216808683226989586621680868693 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680868695Sym2 a_69895866216808683286989586621680868694 _z_69895866216808683226989586621680868693) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680868685Sym0 instance forall a6989586621679536044 b6989586621679536045 (a6989586621680868683 :: a6989586621679536044 Data.Singletons.Internal.~> b6989586621679536045). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680868685Sym1 a6989586621680868683) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868672Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Min a) instance forall a6989586621680867890 (a6989586621680868669 :: Data.Semigroup.Min a6989586621680867890). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868672Sym1 a6989586621680868669) instance forall a6989586621680867890 (a6989586621680868670 :: Data.Semigroup.Min a6989586621680867890) (a6989586621680868669 :: Data.Semigroup.Min a6989586621680867890). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680868672Sym2 a6989586621680868670 a6989586621680868669) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680868656Sym0 instance forall a6989586621680867890 (a6989586621680868654 :: Data.Semigroup.Min a6989586621680867890). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680868656Sym1 a6989586621680868654) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680868645Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680868638Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680868629Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680868622Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868613Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Min instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680868610 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868613Sym1 a6989586621680868610) instance forall a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621680868611 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621680868610 :: Data.Semigroup.Min a6989586621679536052). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680868613Sym2 a6989586621680868611 a6989586621680868610) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868597Sym0 instance forall a6989586621679536050 b6989586621679536051 (a6989586621680868595 :: Data.Semigroup.Min (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868597Sym1 a6989586621680868595) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868585Sym0 instance forall b6989586621679536056 a6989586621679536055 (a6989586621680868583 :: Data.Semigroup.Min a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868585Sym1 a6989586621680868583) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868574Sym0 instance forall b6989586621679536058 a6989586621679536057 (a6989586621680868572 :: Data.Semigroup.Min a6989586621679536057). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680868574Sym1 a6989586621680868572) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680868564Sym0 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 Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852149Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.WrappedMonoid m) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852149Sym1 a6989586621680852146) instance forall m6989586621679061242 (a6989586621680852147 :: GHC.Types.Nat) (a6989586621680852146 :: Data.Semigroup.WrappedMonoid m6989586621679061242). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852149Sym2 a6989586621680852147 a6989586621680852146) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852120Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852120Sym1 a6989586621680852117) instance forall a6989586621679061236 (a6989586621680852118 :: GHC.Types.Nat) (a6989586621680852117 :: Data.Semigroup.Last a6989586621679061236). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852120Sym2 a6989586621680852118 a6989586621680852117) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852091Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852091Sym1 a6989586621680852088) instance forall a6989586621679061230 (a6989586621680852089 :: GHC.Types.Nat) (a6989586621680852088 :: Data.Semigroup.First a6989586621679061230). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852091Sym2 a6989586621680852089 a6989586621680852088) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852062Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852062Sym1 a6989586621680852059) instance forall a6989586621679061216 (a6989586621680852060 :: GHC.Types.Nat) (a6989586621680852059 :: Data.Semigroup.Max a6989586621679061216). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852062Sym2 a6989586621680852060 a6989586621680852059) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852033Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852033Sym1 a6989586621680852030) instance forall a6989586621679061210 (a6989586621680852031 :: GHC.Types.Nat) (a6989586621680852030 :: Data.Semigroup.Min a6989586621679061210). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852033Sym2 a6989586621680852031 a6989586621680852030) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852004Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Product a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852004Sym1 a6989586621680852001) instance forall a6989586621679081566 (a6989586621680852002 :: GHC.Types.Nat) (a6989586621680852001 :: Data.Semigroup.Internal.Product a6989586621679081566). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680852004Sym2 a6989586621680852002 a6989586621680852001) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851975Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Sum a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851975Sym1 a6989586621680851972) instance forall a6989586621679081561 (a6989586621680851973 :: GHC.Types.Nat) (a6989586621680851972 :: Data.Semigroup.Internal.Sum a6989586621679081561). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851975Sym2 a6989586621680851973 a6989586621680851972) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851946Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.Any instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851946Sym1 a6989586621680851943) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851946Sym2 a6989586621680851944 a6989586621680851943) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851920Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.All instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851920Sym1 a6989586621680851917) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851920Sym2 a6989586621680851918 a6989586621680851917) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851894Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Dual a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851894Sym1 a6989586621680851891) instance forall a6989586621679081576 (a6989586621680851892 :: GHC.Types.Nat) (a6989586621680851891 :: Data.Semigroup.Internal.Dual a6989586621679081576). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851894Sym2 a6989586621680851892 a6989586621680851891) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851865Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Option a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851865Sym1 a6989586621680851862) instance forall a6989586621679061248 (a6989586621680851863 :: GHC.Types.Nat) (a6989586621680851862 :: Data.Semigroup.Option a6989586621679061248). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680851865Sym2 a6989586621680851863 a6989586621680851862) 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.Internal.Sing z) instance forall a (z :: Data.Semigroup.Internal.Dual a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance Data.Singletons.ShowSing.ShowSing GHC.Types.Bool => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.Internal.Sum a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.Internal.Product a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.Min a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.Max a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.First a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall a (z :: Data.Semigroup.Last a). Data.Singletons.ShowSing.ShowSing a => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance forall m (z :: Data.Semigroup.WrappedMonoid m). Data.Singletons.ShowSing.ShowSing m => GHC.Show.Show (Data.Singletons.Internal.Sing z) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ArgSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Semigroup.ArgSym0 instance forall b6989586621679061224 a6989586621679061223 (t6989586621680850272 :: a6989586621679061223). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ArgSym1 t6989586621680850272) instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.ArgSym1 d) 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.Internal.TyCon2 'Data.Semigroup.Arg) instance forall a b (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 ('Data.Semigroup.Arg d)) -- | 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 data family. data family Sing :: k -> Type infixr 5 `SCons` type SList = (Sing :: [a_11] -> Type) type family (++) (a_a26E2 :: [a_a26AR]) (a_a26E3 :: [a_a26AR]) :: [a_a26AR] infixr 5 ++ (%++) :: forall a_a26AR (t_a26Fe :: [a_a26AR]) (t_a26Ff :: [a_a26AR]). Sing t_a26Fe -> Sing t_a26Ff -> Sing (Apply (Apply (++@#@$) t_a26Fe) t_a26Ff :: [a_a26AR]) infixr 5 %++ type family Head (a_a3U0m :: [a_a3RgD]) :: a_a3RgD sHead :: forall a_a3RgD (t_a3U5V :: [a_a3RgD]). Sing t_a3U5V -> Sing (Apply HeadSym0 t_a3U5V :: a_a3RgD) type family Last (a_a3U0h :: [a_a3RgC]) :: a_a3RgC sLast :: forall a_a3RgC (t_a3U5T :: [a_a3RgC]). Sing t_a3U5T -> Sing (Apply LastSym0 t_a3U5T :: a_a3RgC) type family Tail (a_a3U0e :: [a_a3RgB]) :: [a_a3RgB] sTail :: forall a_a3RgB (t_a3U5R :: [a_a3RgB]). Sing t_a3U5R -> Sing (Apply TailSym0 t_a3U5R :: [a_a3RgB]) type family Init (a_a3U00 :: [a_a3RgA]) :: [a_a3RgA] sInit :: forall a_a3RgA (t_a3U5P :: [a_a3RgA]). Sing t_a3U5P -> Sing (Apply InitSym0 t_a3U5P :: [a_a3RgA]) type family Null (arg_a5ZQN :: t_a5ZG6 a_a5ZGl) :: Bool sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). SFoldable t_a5ZG6 => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) type family Length (arg_a5ZQP :: t_a5ZG6 a_a5ZGm) :: Nat sLength :: forall a_a5ZGm (t_a60cG :: t_a5ZG6 a_a5ZGm). SFoldable t_a5ZG6 => Sing t_a60cG -> Sing (Apply LengthSym0 t_a60cG :: Nat) type family Map (a_a26Ea :: (~>) a_a26AS b_a26AT) (a_a26Eb :: [a_a26AS]) :: [b_a26AT] sMap :: forall a_a26AS b_a26AT (t_a26Fi :: (~>) a_a26AS b_a26AT) (t_a26Fj :: [a_a26AS]). Sing t_a26Fi -> Sing t_a26Fj -> Sing (Apply (Apply MapSym0 t_a26Fi) t_a26Fj :: [b_a26AT]) type family Reverse (a_a3TZf :: [a_a3Rgy]) :: [a_a3Rgy] sReverse :: forall a_a3Rgy (t_a3U5D :: [a_a3Rgy]). Sing t_a3U5D -> Sing (Apply ReverseSym0 t_a3U5D :: [a_a3Rgy]) type family Intersperse (a_a3TZ2 :: a_a3Rgx) (a_a3TZ3 :: [a_a3Rgx]) :: [a_a3Rgx] sIntersperse :: forall a_a3Rgx (t_a3U5v :: a_a3Rgx) (t_a3U5w :: [a_a3Rgx]). Sing t_a3U5v -> Sing t_a3U5w -> Sing (Apply (Apply IntersperseSym0 t_a3U5v) t_a3U5w :: [a_a3Rgx]) type family Intercalate (a_a3TZ9 :: [a_a3Rgw]) (a_a3TZa :: [[a_a3Rgw]]) :: [a_a3Rgw] sIntercalate :: forall a_a3Rgw (t_a3U5z :: [a_a3Rgw]) (t_a3U5A :: [[a_a3Rgw]]). Sing t_a3U5z -> Sing t_a3U5A -> Sing (Apply (Apply IntercalateSym0 t_a3U5z) t_a3U5A :: [a_a3Rgw]) type family Transpose (a_a3U0p :: [[a_a3ReH]]) :: [[a_a3ReH]] sTranspose :: forall a_a3ReH (t_a3U5X :: [[a_a3ReH]]). Sing t_a3U5X -> Sing (Apply TransposeSym0 t_a3U5X :: [[a_a3ReH]]) type family Subsequences (a_a3TYZ :: [a_a3Rgv]) :: [[a_a3Rgv]] sSubsequences :: forall a_a3Rgv (t_a3U5t :: [a_a3Rgv]). Sing t_a3U5t -> Sing (Apply SubsequencesSym0 t_a3U5t :: [[a_a3Rgv]]) type family Permutations (a_a3TX5 :: [a_a3Rgs]) :: [[a_a3Rgs]] sPermutations :: forall a_a3Rgs (t_a3U5l :: [a_a3Rgs]). Sing t_a3U5l -> Sing (Apply PermutationsSym0 t_a3U5l :: [[a_a3Rgs]]) type family Foldl (arg_a5ZQr :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (arg_a5ZQs :: b_a5ZGe) (arg_a5ZQt :: t_a5ZG6 a_a5ZGf) :: b_a5ZGe sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). SFoldable t_a5ZG6 => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) type family Foldl' (arg_a5ZQx :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (arg_a5ZQy :: b_a5ZGg) (arg_a5ZQz :: t_a5ZG6 a_a5ZGh) :: b_a5ZGg sFoldl' :: forall b_a5ZGg a_a5ZGh (t_a60co :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (t_a60cp :: b_a5ZGg) (t_a60cq :: t_a5ZG6 a_a5ZGh). SFoldable t_a5ZG6 => Sing t_a60co -> Sing t_a60cp -> Sing t_a60cq -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) type family Foldl1 (arg_a5ZQH :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (arg_a5ZQI :: t_a5ZG6 a_a5ZGj) :: a_a5ZGj sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). SFoldable t_a5ZG6 => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) type family Foldl1' (a_a3TWY :: (~>) a_a3Rgo ((~>) a_a3Rgo a_a3Rgo)) (a_a3TWZ :: [a_a3Rgo]) :: a_a3Rgo sFoldl1' :: forall a_a3Rgo (t_a3U5h :: (~>) a_a3Rgo ((~>) a_a3Rgo a_a3Rgo)) (t_a3U5i :: [a_a3Rgo]). Sing t_a3U5h -> Sing t_a3U5i -> Sing (Apply (Apply Foldl1'Sym0 t_a3U5h) t_a3U5i :: a_a3Rgo) type family Foldr (arg_a5ZQf :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (arg_a5ZQg :: b_a5ZGb) (arg_a5ZQh :: t_a5ZG6 a_a5ZGa) :: b_a5ZGb sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). SFoldable t_a5ZG6 => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) type family Foldr1 (arg_a5ZQD :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (arg_a5ZQE :: t_a5ZG6 a_a5ZGi) :: a_a5ZGi sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). SFoldable t_a5ZG6 => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) type family Concat (a_a5ZOl :: t_a5ZET [a_a5ZEU]) :: [a_a5ZEU] sConcat :: forall t_a5ZET a_a5ZEU (t_a60aJ :: t_a5ZET [a_a5ZEU]). SFoldable t_a5ZET => Sing t_a60aJ -> Sing (Apply ConcatSym0 t_a60aJ :: [a_a5ZEU]) type family ConcatMap (a_a5ZO5 :: (~>) a_a5ZER [b_a5ZES]) (a_a5ZO6 :: t_a5ZEQ a_a5ZER) :: [b_a5ZES] sConcatMap :: forall t_a5ZEQ a_a5ZER b_a5ZES (t_a60aF :: (~>) a_a5ZER [b_a5ZES]) (t_a60aG :: t_a5ZEQ a_a5ZER). SFoldable t_a5ZEQ => Sing t_a60aF -> Sing t_a60aG -> Sing (Apply (Apply ConcatMapSym0 t_a60aF) t_a60aG :: [b_a5ZES]) type family And (a_a5ZNW :: t_a5ZEP Bool) :: Bool sAnd :: forall t_a5ZEP (t_a60aD :: t_a5ZEP Bool). SFoldable t_a5ZEP => Sing t_a60aD -> Sing (Apply AndSym0 t_a60aD :: Bool) type family Or (a_a5ZNN :: t_a5ZEO Bool) :: Bool sOr :: forall t_a5ZEO (t_a60aB :: t_a5ZEO Bool). SFoldable t_a5ZEO => Sing t_a60aB -> Sing (Apply OrSym0 t_a60aB :: Bool) type family Any (a_a5ZNA :: (~>) a_a5ZEN Bool) (a_a5ZNB :: t_a5ZEM a_a5ZEN) :: Bool sAny :: forall t_a5ZEM a_a5ZEN (t_a60ax :: (~>) a_a5ZEN Bool) (t_a60ay :: t_a5ZEM a_a5ZEN). SFoldable t_a5ZEM => Sing t_a60ax -> Sing t_a60ay -> Sing (Apply (Apply AnySym0 t_a60ax) t_a60ay :: Bool) type family All (a_a5ZNn :: (~>) a_a5ZEL Bool) (a_a5ZNo :: t_a5ZEK a_a5ZEL) :: Bool sAll :: forall t_a5ZEK a_a5ZEL (t_a60at :: (~>) a_a5ZEL Bool) (t_a60au :: t_a5ZEK a_a5ZEL). SFoldable t_a5ZEK => Sing t_a60at -> Sing t_a60au -> Sing (Apply (Apply AllSym0 t_a60at) t_a60au :: Bool) type family Sum (arg_a5ZQZ :: t_a5ZG6 a_a5ZGq) :: a_a5ZGq sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) type family Product (arg_a5ZR1 :: t_a5ZG6 a_a5ZGr) :: a_a5ZGr sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) type family Maximum (arg_a5ZQV :: t_a5ZG6 a_a5ZGo) :: a_a5ZGo sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) type family Minimum (arg_a5ZQX :: t_a5ZG6 a_a5ZGp) :: a_a5ZGp sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) type family Scanl (a_a3TTj :: (~>) b_a3Rgg ((~>) a_a3Rgh b_a3Rgg)) (a_a3TTk :: b_a3Rgg) (a_a3TTl :: [a_a3Rgh]) :: [b_a3Rgg] sScanl :: forall b_a3Rgg a_a3Rgh (t_a3U4b :: (~>) b_a3Rgg ((~>) a_a3Rgh b_a3Rgg)) (t_a3U4c :: b_a3Rgg) (t_a3U4d :: [a_a3Rgh]). Sing t_a3U4b -> Sing t_a3U4c -> Sing t_a3U4d -> Sing (Apply (Apply (Apply ScanlSym0 t_a3U4b) t_a3U4c) t_a3U4d :: [b_a3Rgg]) type family Scanl1 (a_a3TTx :: (~>) a_a3Rgf ((~>) a_a3Rgf a_a3Rgf)) (a_a3TTy :: [a_a3Rgf]) :: [a_a3Rgf] sScanl1 :: forall a_a3Rgf (t_a3U4h :: (~>) a_a3Rgf ((~>) a_a3Rgf a_a3Rgf)) (t_a3U4i :: [a_a3Rgf]). Sing t_a3U4h -> Sing t_a3U4i -> Sing (Apply (Apply Scanl1Sym0 t_a3U4h) t_a3U4i :: [a_a3Rgf]) type family Scanr (a_a3TSY :: (~>) a_a3Rgd ((~>) b_a3Rge b_a3Rge)) (a_a3TSZ :: b_a3Rge) (a_a3TT0 :: [a_a3Rgd]) :: [b_a3Rge] sScanr :: forall a_a3Rgd b_a3Rge (t_a3U45 :: (~>) a_a3Rgd ((~>) b_a3Rge b_a3Rge)) (t_a3U46 :: b_a3Rge) (t_a3U47 :: [a_a3Rgd]). Sing t_a3U45 -> Sing t_a3U46 -> Sing t_a3U47 -> Sing (Apply (Apply (Apply ScanrSym0 t_a3U45) t_a3U46) t_a3U47 :: [b_a3Rge]) type family Scanr1 (a_a3TSA :: (~>) a_a3Rgc ((~>) a_a3Rgc a_a3Rgc)) (a_a3TSB :: [a_a3Rgc]) :: [a_a3Rgc] sScanr1 :: forall a_a3Rgc (t_a3U41 :: (~>) a_a3Rgc ((~>) a_a3Rgc a_a3Rgc)) (t_a3U42 :: [a_a3Rgc]). Sing t_a3U41 -> Sing t_a3U42 -> Sing (Apply (Apply Scanr1Sym0 t_a3U41) t_a3U42 :: [a_a3Rgc]) type family MapAccumL (a_a7go4 :: (~>) a_a7gfn ((~>) b_a7gfo (a_a7gfn, c_a7gfp))) (a_a7go5 :: a_a7gfn) (a_a7go6 :: t_a7gfm b_a7gfo) :: (a_a7gfn, t_a7gfm c_a7gfp) sMapAccumL :: forall t_a7gfm a_a7gfn b_a7gfo c_a7gfp (t_a7gxM :: (~>) a_a7gfn ((~>) b_a7gfo (a_a7gfn, c_a7gfp))) (t_a7gxN :: a_a7gfn) (t_a7gxO :: t_a7gfm b_a7gfo). STraversable t_a7gfm => Sing t_a7gxM -> Sing t_a7gxN -> Sing t_a7gxO -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7gxM) t_a7gxN) t_a7gxO :: (a_a7gfn, t_a7gfm c_a7gfp)) type family MapAccumR (a_a7gnN :: (~>) a_a7gfj ((~>) b_a7gfk (a_a7gfj, c_a7gfl))) (a_a7gnO :: a_a7gfj) (a_a7gnP :: t_a7gfi b_a7gfk) :: (a_a7gfj, t_a7gfi c_a7gfl) sMapAccumR :: forall t_a7gfi a_a7gfj b_a7gfk c_a7gfl (t_a7gxG :: (~>) a_a7gfj ((~>) b_a7gfk (a_a7gfj, c_a7gfl))) (t_a7gxH :: a_a7gfj) (t_a7gxI :: t_a7gfi b_a7gfk). STraversable t_a7gfi => Sing t_a7gxG -> Sing t_a7gxH -> Sing t_a7gxI -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7gxG) t_a7gxH) t_a7gxI :: (a_a7gfj, t_a7gfi c_a7gfl)) type family Replicate (a_a3TEK :: Nat) (a_a3TEL :: a_a3ReI) :: [a_a3ReI] sReplicate :: forall a_a3ReI (t_a3U0L :: Nat) (t_a3U0M :: a_a3ReI). Sing t_a3U0L -> Sing t_a3U0M -> Sing (Apply (Apply ReplicateSym0 t_a3U0L) t_a3U0M :: [a_a3ReI]) type family Unfoldr (a_a3TQi :: (~>) b_a3Rg4 (Maybe (a_a3Rg5, b_a3Rg4))) (a_a3TQj :: b_a3Rg4) :: [a_a3Rg5] sUnfoldr :: forall b_a3Rg4 a_a3Rg5 (t_a3U3L :: (~>) b_a3Rg4 (Maybe (a_a3Rg5, b_a3Rg4))) (t_a3U3M :: b_a3Rg4). Sing t_a3U3L -> Sing t_a3U3M -> Sing (Apply (Apply UnfoldrSym0 t_a3U3L) t_a3U3M :: [a_a3Rg5]) type family Take (a_a3TGi :: Nat) (a_a3TGj :: [a_a3ReY]) :: [a_a3ReY] sTake :: forall a_a3ReY (t_a3U1d :: Nat) (t_a3U1e :: [a_a3ReY]). Sing t_a3U1d -> Sing t_a3U1e -> Sing (Apply (Apply TakeSym0 t_a3U1d) t_a3U1e :: [a_a3ReY]) type family Drop (a_a3TG4 :: Nat) (a_a3TG5 :: [a_a3ReX]) :: [a_a3ReX] sDrop :: forall a_a3ReX (t_a3U19 :: Nat) (t_a3U1a :: [a_a3ReX]). Sing t_a3U19 -> Sing t_a3U1a -> Sing (Apply (Apply DropSym0 t_a3U19) t_a3U1a :: [a_a3ReX]) type family SplitAt (a_a3TGw :: Nat) (a_a3TGx :: [a_a3ReW]) :: ([a_a3ReW], [a_a3ReW]) sSplitAt :: forall a_a3ReW (t_a3U1h :: Nat) (t_a3U1i :: [a_a3ReW]). Sing t_a3U1h -> Sing t_a3U1i -> Sing (Apply (Apply SplitAtSym0 t_a3U1h) t_a3U1i :: ([a_a3ReW], [a_a3ReW])) type family TakeWhile (a_a3TIQ :: (~>) a_a3Rf3 Bool) (a_a3TIR :: [a_a3Rf3]) :: [a_a3Rf3] sTakeWhile :: forall a_a3Rf3 (t_a3U1D :: (~>) a_a3Rf3 Bool) (t_a3U1E :: [a_a3Rf3]). Sing t_a3U1D -> Sing t_a3U1E -> Sing (Apply (Apply TakeWhileSym0 t_a3U1D) t_a3U1E :: [a_a3Rf3]) type family DropWhile (a_a3TIy :: (~>) a_a3Rf2 Bool) (a_a3TIz :: [a_a3Rf2]) :: [a_a3Rf2] sDropWhile :: forall a_a3Rf2 (t_a3U1z :: (~>) a_a3Rf2 Bool) (t_a3U1A :: [a_a3Rf2]). Sing t_a3U1z -> Sing t_a3U1A -> Sing (Apply (Apply DropWhileSym0 t_a3U1z) t_a3U1A :: [a_a3Rf2]) type family DropWhileEnd (a_a3TZA :: (~>) a_a3Rf1 Bool) (a_a3TZB :: [a_a3Rf1]) :: [a_a3Rf1] sDropWhileEnd :: forall a_a3Rf1 (t_a3U5L :: (~>) a_a3Rf1 Bool) (t_a3U5M :: [a_a3Rf1]). Sing t_a3U5L -> Sing t_a3U5M -> Sing (Apply (Apply DropWhileEndSym0 t_a3U5L) t_a3U5M :: [a_a3Rf1]) type family Span (a_a3THj :: (~>) a_a3Rf0 Bool) (a_a3THk :: [a_a3Rf0]) :: ([a_a3Rf0], [a_a3Rf0]) sSpan :: forall a_a3Rf0 (t_a3U1p :: (~>) a_a3Rf0 Bool) (t_a3U1q :: [a_a3Rf0]). Sing t_a3U1p -> Sing t_a3U1q -> Sing (Apply (Apply SpanSym0 t_a3U1p) t_a3U1q :: ([a_a3Rf0], [a_a3Rf0])) type family Break (a_a3TGC :: (~>) a_a3ReZ Bool) (a_a3TGD :: [a_a3ReZ]) :: ([a_a3ReZ], [a_a3ReZ]) sBreak :: forall a_a3ReZ (t_a3U1l :: (~>) a_a3ReZ Bool) (t_a3U1m :: [a_a3ReZ]). Sing t_a3U1l -> Sing t_a3U1m -> Sing (Apply (Apply BreakSym0 t_a3U1l) t_a3U1m :: ([a_a3ReZ], [a_a3ReZ])) type family StripPrefix (a_a4rnT :: [a_a4o4T]) (a_a4rnU :: [a_a4o4T]) :: Maybe [a_a4o4T] type family Group (a_a3TIv :: [a_a3ReV]) :: [[a_a3ReV]] sGroup :: forall a_a3ReV (t_a3U1x :: [a_a3ReV]). SEq a_a3ReV => Sing t_a3U1x -> Sing (Apply GroupSym0 t_a3U1x :: [[a_a3ReV]]) type family Inits (a_a3TQa :: [a_a3Rg3]) :: [[a_a3Rg3]] sInits :: forall a_a3Rg3 (t_a3U3J :: [a_a3Rg3]). Sing t_a3U3J -> Sing (Apply InitsSym0 t_a3U3J :: [[a_a3Rg3]]) type family Tails (a_a3TQ3 :: [a_a3Rg2]) :: [[a_a3Rg2]] sTails :: forall a_a3Rg2 (t_a3U3H :: [a_a3Rg2]). Sing t_a3U3H -> Sing (Apply TailsSym0 t_a3U3H :: [[a_a3Rg2]]) type family IsPrefixOf (a_a3TPV :: [a_a3Rg1]) (a_a3TPW :: [a_a3Rg1]) :: Bool sIsPrefixOf :: forall a_a3Rg1 (t_a3U3D :: [a_a3Rg1]) (t_a3U3E :: [a_a3Rg1]). SEq a_a3Rg1 => Sing t_a3U3D -> Sing t_a3U3E -> Sing (Apply (Apply IsPrefixOfSym0 t_a3U3D) t_a3U3E :: Bool) type family IsSuffixOf (a_a3TZs :: [a_a3Rg0]) (a_a3TZt :: [a_a3Rg0]) :: Bool sIsSuffixOf :: forall a_a3Rg0 (t_a3U5F :: [a_a3Rg0]) (t_a3U5G :: [a_a3Rg0]). SEq a_a3Rg0 => Sing t_a3U5F -> Sing t_a3U5G -> Sing (Apply (Apply IsSuffixOfSym0 t_a3U5F) t_a3U5G :: Bool) type family IsInfixOf (a_a3TTL :: [a_a3RfZ]) (a_a3TTM :: [a_a3RfZ]) :: Bool sIsInfixOf :: forall a_a3RfZ (t_a3U4p :: [a_a3RfZ]) (t_a3U4q :: [a_a3RfZ]). SEq a_a3RfZ => Sing t_a3U4p -> Sing t_a3U4q -> Sing (Apply (Apply IsInfixOfSym0 t_a3U4p) t_a3U4q :: Bool) type family Elem (arg_a5ZQR :: a_a5ZGn) (arg_a5ZQS :: t_a5ZG6 a_a5ZGn) :: Bool sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) type family NotElem (a_a5ZMr :: a_a5ZEF) (a_a5ZMs :: t_a5ZEE a_a5ZEF) :: Bool sNotElem :: forall t_a5ZEE a_a5ZEF (t_a60ah :: a_a5ZEF) (t_a60ai :: t_a5ZEE a_a5ZEF). (SFoldable t_a5ZEE, SEq a_a5ZEF) => Sing t_a60ah -> Sing t_a60ai -> Sing (Apply (Apply NotElemSym0 t_a60ah) t_a60ai :: Bool) type family Lookup (a_a3TFN :: a_a3ReO) (a_a3TFO :: [(a_a3ReO, b_a3ReP)]) :: Maybe b_a3ReP sLookup :: forall a_a3ReO b_a3ReP (t_a3U15 :: a_a3ReO) (t_a3U16 :: [(a_a3ReO, b_a3ReP)]). SEq a_a3ReO => Sing t_a3U15 -> Sing t_a3U16 -> Sing (Apply (Apply LookupSym0 t_a3U15) t_a3U16 :: Maybe b_a3ReP) type family Find (a_a5ZM0 :: (~>) a_a5ZED Bool) (a_a5ZM1 :: t_a5ZEC a_a5ZED) :: Maybe a_a5ZED sFind :: forall t_a5ZEC a_a5ZED (t_a60ad :: (~>) a_a5ZED Bool) (t_a60ae :: t_a5ZEC a_a5ZED). SFoldable t_a5ZEC => Sing t_a60ad -> Sing t_a60ae -> Sing (Apply (Apply FindSym0 t_a60ad) t_a60ae :: Maybe a_a5ZED) type family Filter (a_a3TJ4 :: (~>) a_a3Rfb Bool) (a_a3TJ5 :: [a_a3Rfb]) :: [a_a3Rfb] sFilter :: forall a_a3Rfb (t_a3U1H :: (~>) a_a3Rfb Bool) (t_a3U1I :: [a_a3Rfb]). Sing t_a3U1H -> Sing t_a3U1I -> Sing (Apply (Apply FilterSym0 t_a3U1H) t_a3U1I :: [a_a3Rfb]) type family Partition (a_a3TFH :: (~>) a_a3ReN Bool) (a_a3TFI :: [a_a3ReN]) :: ([a_a3ReN], [a_a3ReN]) sPartition :: forall a_a3ReN (t_a3U11 :: (~>) a_a3ReN Bool) (t_a3U12 :: [a_a3ReN]). Sing t_a3U11 -> Sing t_a3U12 -> Sing (Apply (Apply PartitionSym0 t_a3U11) t_a3U12 :: ([a_a3ReN], [a_a3ReN])) type family (!!) (a_a3TEw :: [a_a3ReG]) (a_a3TEx :: Nat) :: a_a3ReG infixl 9 !! (%!!) :: forall a_a3ReG (t_a3U0H :: [a_a3ReG]) (t_a3U0I :: Nat). Sing t_a3U0H -> Sing t_a3U0I -> Sing (Apply (Apply (!!@#@$) t_a3U0H) t_a3U0I :: a_a3ReG) infixl 9 %!! type family ElemIndex (a_a3TPf :: a_a3Rf9) (a_a3TPg :: [a_a3Rf9]) :: Maybe Nat sElemIndex :: forall a_a3Rf9 (t_a3U3p :: a_a3Rf9) (t_a3U3q :: [a_a3Rf9]). SEq a_a3Rf9 => Sing t_a3U3p -> Sing t_a3U3q -> Sing (Apply (Apply ElemIndexSym0 t_a3U3p) t_a3U3q :: Maybe Nat) type family ElemIndices (a_a3TOZ :: a_a3Rf8) (a_a3TP0 :: [a_a3Rf8]) :: [Nat] sElemIndices :: forall a_a3Rf8 (t_a3U3h :: a_a3Rf8) (t_a3U3i :: [a_a3Rf8]). SEq a_a3Rf8 => Sing t_a3U3h -> Sing t_a3U3i -> Sing (Apply (Apply ElemIndicesSym0 t_a3U3h) t_a3U3i :: [Nat]) type family FindIndex (a_a3TP7 :: (~>) a_a3Rf7 Bool) (a_a3TP8 :: [a_a3Rf7]) :: Maybe Nat sFindIndex :: forall a_a3Rf7 (t_a3U3l :: (~>) a_a3Rf7 Bool) (t_a3U3m :: [a_a3Rf7]). Sing t_a3U3l -> Sing t_a3U3m -> Sing (Apply (Apply FindIndexSym0 t_a3U3l) t_a3U3m :: Maybe Nat) type family FindIndices (a_a3TOz :: (~>) a_a3Rf6 Bool) (a_a3TOA :: [a_a3Rf6]) :: [Nat] sFindIndices :: forall a_a3Rf6 (t_a3U3d :: (~>) a_a3Rf6 Bool) (t_a3U3e :: [a_a3Rf6]). Sing t_a3U3d -> Sing t_a3U3e -> Sing (Apply (Apply FindIndicesSym0 t_a3U3d) t_a3U3e :: [Nat]) type family Zip (a_a3TOr :: [a_a3RfV]) (a_a3TOs :: [b_a3RfW]) :: [(a_a3RfV, b_a3RfW)] sZip :: forall a_a3RfV b_a3RfW (t_a3U39 :: [a_a3RfV]) (t_a3U3a :: [b_a3RfW]). Sing t_a3U39 -> Sing t_a3U3a -> Sing (Apply (Apply ZipSym0 t_a3U39) t_a3U3a :: [(a_a3RfV, b_a3RfW)]) type family Zip3 (a_a3TOf :: [a_a3RfS]) (a_a3TOg :: [b_a3RfT]) (a_a3TOh :: [c_a3RfU]) :: [(a_a3RfS, b_a3RfT, c_a3RfU)] sZip3 :: forall a_a3RfS b_a3RfT c_a3RfU (t_a3U33 :: [a_a3RfS]) (t_a3U34 :: [b_a3RfT]) (t_a3U35 :: [c_a3RfU]). Sing t_a3U33 -> Sing t_a3U34 -> Sing t_a3U35 -> Sing (Apply (Apply (Apply Zip3Sym0 t_a3U33) t_a3U34) t_a3U35 :: [(a_a3RfS, b_a3RfT, c_a3RfU)]) type family Zip4 (a_a4rnH :: [a_a4o4P]) (a_a4rnI :: [b_a4o4Q]) (a_a4rnJ :: [c_a4o4R]) (a_a4rnK :: [d_a4o4S]) :: [(a_a4o4P, b_a4o4Q, c_a4o4R, d_a4o4S)] type family Zip5 (a_a4rnk :: [a_a4o4K]) (a_a4rnl :: [b_a4o4L]) (a_a4rnm :: [c_a4o4M]) (a_a4rnn :: [d_a4o4N]) (a_a4rno :: [e_a4o4O]) :: [(a_a4o4K, b_a4o4L, c_a4o4M, d_a4o4N, e_a4o4O)] type family Zip6 (a_a4rmS :: [a_a4o4E]) (a_a4rmT :: [b_a4o4F]) (a_a4rmU :: [c_a4o4G]) (a_a4rmV :: [d_a4o4H]) (a_a4rmW :: [e_a4o4I]) (a_a4rmX :: [f_a4o4J]) :: [(a_a4o4E, b_a4o4F, c_a4o4G, d_a4o4H, e_a4o4I, f_a4o4J)] type family Zip7 (a_a4rml :: [a_a4o4x]) (a_a4rmm :: [b_a4o4y]) (a_a4rmn :: [c_a4o4z]) (a_a4rmo :: [d_a4o4A]) (a_a4rmp :: [e_a4o4B]) (a_a4rmq :: [f_a4o4C]) (a_a4rmr :: [g_a4o4D]) :: [(a_a4o4x, b_a4o4y, c_a4o4z, d_a4o4A, e_a4o4B, f_a4o4C, g_a4o4D)] type family ZipWith (a_a3TO4 :: (~>) a_a3RfP ((~>) b_a3RfQ c_a3RfR)) (a_a3TO5 :: [a_a3RfP]) (a_a3TO6 :: [b_a3RfQ]) :: [c_a3RfR] sZipWith :: forall a_a3RfP b_a3RfQ c_a3RfR (t_a3U2X :: (~>) a_a3RfP ((~>) b_a3RfQ c_a3RfR)) (t_a3U2Y :: [a_a3RfP]) (t_a3U2Z :: [b_a3RfQ]). Sing t_a3U2X -> Sing t_a3U2Y -> Sing t_a3U2Z -> Sing (Apply (Apply (Apply ZipWithSym0 t_a3U2X) t_a3U2Y) t_a3U2Z :: [c_a3RfR]) type family ZipWith3 (a_a3TNP :: (~>) a_a3RfL ((~>) b_a3RfM ((~>) c_a3RfN d_a3RfO))) (a_a3TNQ :: [a_a3RfL]) (a_a3TNR :: [b_a3RfM]) (a_a3TNS :: [c_a3RfN]) :: [d_a3RfO] sZipWith3 :: forall a_a3RfL b_a3RfM c_a3RfN d_a3RfO (t_a3U2P :: (~>) a_a3RfL ((~>) b_a3RfM ((~>) c_a3RfN d_a3RfO))) (t_a3U2Q :: [a_a3RfL]) (t_a3U2R :: [b_a3RfM]) (t_a3U2S :: [c_a3RfN]). Sing t_a3U2P -> Sing t_a3U2Q -> Sing t_a3U2R -> Sing t_a3U2S -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a3U2P) t_a3U2Q) t_a3U2R) t_a3U2S :: [d_a3RfO]) type family ZipWith4 (a_a4rlO :: (~>) a_a4o4s ((~>) b_a4o4t ((~>) c_a4o4u ((~>) d_a4o4v e_a4o4w)))) (a_a4rlP :: [a_a4o4s]) (a_a4rlQ :: [b_a4o4t]) (a_a4rlR :: [c_a4o4u]) (a_a4rlS :: [d_a4o4v]) :: [e_a4o4w] type family ZipWith5 (a_a4rlr :: (~>) a_a4o4m ((~>) b_a4o4n ((~>) c_a4o4o ((~>) d_a4o4p ((~>) e_a4o4q f_a4o4r))))) (a_a4rls :: [a_a4o4m]) (a_a4rlt :: [b_a4o4n]) (a_a4rlu :: [c_a4o4o]) (a_a4rlv :: [d_a4o4p]) (a_a4rlw :: [e_a4o4q]) :: [f_a4o4r] type family ZipWith6 (a_a4rl0 :: (~>) a_a4o4f ((~>) b_a4o4g ((~>) c_a4o4h ((~>) d_a4o4i ((~>) e_a4o4j ((~>) f_a4o4k g_a4o4l)))))) (a_a4rl1 :: [a_a4o4f]) (a_a4rl2 :: [b_a4o4g]) (a_a4rl3 :: [c_a4o4h]) (a_a4rl4 :: [d_a4o4i]) (a_a4rl5 :: [e_a4o4j]) (a_a4rl6 :: [f_a4o4k]) :: [g_a4o4l] type family ZipWith7 (a_a4rkv :: (~>) a_a4o47 ((~>) b_a4o48 ((~>) c_a4o49 ((~>) d_a4o4a ((~>) e_a4o4b ((~>) f_a4o4c ((~>) g_a4o4d h_a4o4e))))))) (a_a4rkw :: [a_a4o47]) (a_a4rkx :: [b_a4o48]) (a_a4rky :: [c_a4o49]) (a_a4rkz :: [d_a4o4a]) (a_a4rkA :: [e_a4o4b]) (a_a4rkB :: [f_a4o4c]) (a_a4rkC :: [g_a4o4d]) :: [h_a4o4e] type family Unzip (a_a3TNw :: [(a_a3RfJ, b_a3RfK)]) :: ([a_a3RfJ], [b_a3RfK]) sUnzip :: forall a_a3RfJ b_a3RfK (t_a3U2N :: [(a_a3RfJ, b_a3RfK)]). Sing t_a3U2N -> Sing (Apply UnzipSym0 t_a3U2N :: ([a_a3RfJ], [b_a3RfK])) type family Unzip3 (a_a3TNb :: [(a_a3RfG, b_a3RfH, c_a3RfI)]) :: ([a_a3RfG], [b_a3RfH], [c_a3RfI]) sUnzip3 :: forall a_a3RfG b_a3RfH c_a3RfI (t_a3U2L :: [(a_a3RfG, b_a3RfH, c_a3RfI)]). Sing t_a3U2L -> Sing (Apply Unzip3Sym0 t_a3U2L :: ([a_a3RfG], [b_a3RfH], [c_a3RfI])) type family Unzip4 (a_a3TMO :: [(a_a3RfC, b_a3RfD, c_a3RfE, d_a3RfF)]) :: ([a_a3RfC], [b_a3RfD], [c_a3RfE], [d_a3RfF]) sUnzip4 :: forall a_a3RfC b_a3RfD c_a3RfE d_a3RfF (t_a3U2J :: [(a_a3RfC, b_a3RfD, c_a3RfE, d_a3RfF)]). Sing t_a3U2J -> Sing (Apply Unzip4Sym0 t_a3U2J :: ([a_a3RfC], [b_a3RfD], [c_a3RfE], [d_a3RfF])) type family Unzip5 (a_a3TMp :: [(a_a3Rfx, b_a3Rfy, c_a3Rfz, d_a3RfA, e_a3RfB)]) :: ([a_a3Rfx], [b_a3Rfy], [c_a3Rfz], [d_a3RfA], [e_a3RfB]) sUnzip5 :: forall a_a3Rfx b_a3Rfy c_a3Rfz d_a3RfA e_a3RfB (t_a3U2H :: [(a_a3Rfx, b_a3Rfy, c_a3Rfz, d_a3RfA, e_a3RfB)]). Sing t_a3U2H -> Sing (Apply Unzip5Sym0 t_a3U2H :: ([a_a3Rfx], [b_a3Rfy], [c_a3Rfz], [d_a3RfA], [e_a3RfB])) type family Unzip6 (a_a3TLY :: [(a_a3Rfr, b_a3Rfs, c_a3Rft, d_a3Rfu, e_a3Rfv, f_a3Rfw)]) :: ([a_a3Rfr], [b_a3Rfs], [c_a3Rft], [d_a3Rfu], [e_a3Rfv], [f_a3Rfw]) sUnzip6 :: forall a_a3Rfr b_a3Rfs c_a3Rft d_a3Rfu e_a3Rfv f_a3Rfw (t_a3U2F :: [(a_a3Rfr, b_a3Rfs, c_a3Rft, d_a3Rfu, e_a3Rfv, f_a3Rfw)]). Sing t_a3U2F -> Sing (Apply Unzip6Sym0 t_a3U2F :: ([a_a3Rfr], [b_a3Rfs], [c_a3Rft], [d_a3Rfu], [e_a3Rfv], [f_a3Rfw])) type family Unzip7 (a_a3TLv :: [(a_a3Rfk, b_a3Rfl, c_a3Rfm, d_a3Rfn, e_a3Rfo, f_a3Rfp, g_a3Rfq)]) :: ([a_a3Rfk], [b_a3Rfl], [c_a3Rfm], [d_a3Rfn], [e_a3Rfo], [f_a3Rfp], [g_a3Rfq]) sUnzip7 :: forall a_a3Rfk b_a3Rfl c_a3Rfm d_a3Rfn e_a3Rfo f_a3Rfp g_a3Rfq (t_a3U2D :: [(a_a3Rfk, b_a3Rfl, c_a3Rfm, d_a3Rfn, e_a3Rfo, f_a3Rfp, g_a3Rfq)]). Sing t_a3U2D -> Sing (Apply Unzip7Sym0 t_a3U2D :: ([a_a3Rfk], [b_a3Rfl], [c_a3Rfm], [d_a3Rfn], [e_a3Rfo], [f_a3Rfp], [g_a3Rfq])) type family Unlines (a_a3TLr :: [Symbol]) :: Symbol sUnlines :: forall (t_a3U2B :: [Symbol]). Sing t_a3U2B -> Sing (Apply UnlinesSym0 t_a3U2B :: Symbol) type family Unwords (a_a3TLg :: [Symbol]) :: Symbol sUnwords :: forall (t_a3U2z :: [Symbol]). Sing t_a3U2z -> Sing (Apply UnwordsSym0 t_a3U2z :: Symbol) type family Nub (a_a3TPB :: [a_a3ReF]) :: [a_a3ReF] sNub :: forall a_a3ReF (t_a3U3B :: [a_a3ReF]). SEq a_a3ReF => Sing t_a3U3B -> Sing (Apply NubSym0 t_a3U3B :: [a_a3ReF]) type family Delete (a_a3TL0 :: a_a3Rfj) (a_a3TL1 :: [a_a3Rfj]) :: [a_a3Rfj] sDelete :: forall a_a3Rfj (t_a3U2r :: a_a3Rfj) (t_a3U2s :: [a_a3Rfj]). SEq a_a3Rfj => Sing t_a3U2r -> Sing t_a3U2s -> Sing (Apply (Apply DeleteSym0 t_a3U2r) t_a3U2s :: [a_a3Rfj]) type family (\\) (a_a3TLa :: [a_a3Rfi]) (a_a3TLb :: [a_a3Rfi]) :: [a_a3Rfi] infix 5 \\ (%\\) :: forall a_a3Rfi (t_a3U2v :: [a_a3Rfi]) (t_a3U2w :: [a_a3Rfi]). SEq a_a3Rfi => Sing t_a3U2v -> Sing t_a3U2w -> Sing (Apply (Apply (\\@#@$) t_a3U2v) t_a3U2w :: [a_a3Rfi]) infix 5 %\\ type family Union (a_a3TKQ :: [a_a3ReB]) (a_a3TKR :: [a_a3ReB]) :: [a_a3ReB] sUnion :: forall a_a3ReB (t_a3U2n :: [a_a3ReB]) (t_a3U2o :: [a_a3ReB]). SEq a_a3ReB => Sing t_a3U2n -> Sing t_a3U2o -> Sing (Apply (Apply UnionSym0 t_a3U2n) t_a3U2o :: [a_a3ReB]) type family Intersect (a_a3TUr :: [a_a3Rf5]) (a_a3TUs :: [a_a3Rf5]) :: [a_a3Rf5] sIntersect :: forall a_a3Rf5 (t_a3U4z :: [a_a3Rf5]) (t_a3U4A :: [a_a3Rf5]). SEq a_a3Rf5 => Sing t_a3U4z -> Sing t_a3U4A -> Sing (Apply (Apply IntersectSym0 t_a3U4z) t_a3U4A :: [a_a3Rf5]) type family Insert (a_a3TJP :: a_a3ReS) (a_a3TJQ :: [a_a3ReS]) :: [a_a3ReS] sInsert :: forall a_a3ReS (t_a3U1V :: a_a3ReS) (t_a3U1W :: [a_a3ReS]). SOrd a_a3ReS => Sing t_a3U1V -> Sing t_a3U1W -> Sing (Apply (Apply InsertSym0 t_a3U1V) t_a3U1W :: [a_a3ReS]) type family Sort (a_a3TK5 :: [a_a3ReR]) :: [a_a3ReR] sSort :: forall a_a3ReR (t_a3U23 :: [a_a3ReR]). SOrd a_a3ReR => Sing t_a3U23 -> Sing (Apply SortSym0 t_a3U23 :: [a_a3ReR]) type family NubBy (a_a3TE7 :: (~>) a_a3ReE ((~>) a_a3ReE Bool)) (a_a3TE8 :: [a_a3ReE]) :: [a_a3ReE] sNubBy :: forall a_a3ReE (t_a3U0D :: (~>) a_a3ReE ((~>) a_a3ReE Bool)) (t_a3U0E :: [a_a3ReE]). Sing t_a3U0D -> Sing t_a3U0E -> Sing (Apply (Apply NubBySym0 t_a3U0D) t_a3U0E :: [a_a3ReE]) type family DeleteBy (a_a3TK8 :: (~>) a_a3Rfh ((~>) a_a3Rfh Bool)) (a_a3TK9 :: a_a3Rfh) (a_a3TKa :: [a_a3Rfh]) :: [a_a3Rfh] sDeleteBy :: forall a_a3Rfh (t_a3U25 :: (~>) a_a3Rfh ((~>) a_a3Rfh Bool)) (t_a3U26 :: a_a3Rfh) (t_a3U27 :: [a_a3Rfh]). Sing t_a3U25 -> Sing t_a3U26 -> Sing t_a3U27 -> Sing (Apply (Apply (Apply DeleteBySym0 t_a3U25) t_a3U26) t_a3U27 :: [a_a3Rfh]) type family DeleteFirstsBy (a_a3TKq :: (~>) a_a3Rfg ((~>) a_a3Rfg Bool)) (a_a3TKr :: [a_a3Rfg]) (a_a3TKs :: [a_a3Rfg]) :: [a_a3Rfg] sDeleteFirstsBy :: forall a_a3Rfg (t_a3U2b :: (~>) a_a3Rfg ((~>) a_a3Rfg Bool)) (t_a3U2c :: [a_a3Rfg]) (t_a3U2d :: [a_a3Rfg]). Sing t_a3U2b -> Sing t_a3U2c -> Sing t_a3U2d -> Sing (Apply (Apply (Apply DeleteFirstsBySym0 t_a3U2b) t_a3U2c) t_a3U2d :: [a_a3Rfg]) type family UnionBy (a_a3TKD :: (~>) a_a3ReC ((~>) a_a3ReC Bool)) (a_a3TKE :: [a_a3ReC]) (a_a3TKF :: [a_a3ReC]) :: [a_a3ReC] sUnionBy :: forall a_a3ReC (t_a3U2h :: (~>) a_a3ReC ((~>) a_a3ReC Bool)) (t_a3U2i :: [a_a3ReC]) (t_a3U2j :: [a_a3ReC]). Sing t_a3U2h -> Sing t_a3U2i -> Sing t_a3U2j -> Sing (Apply (Apply (Apply UnionBySym0 t_a3U2h) t_a3U2i) t_a3U2j :: [a_a3ReC]) type family IntersectBy (a_a3TTR :: (~>) a_a3Rf4 ((~>) a_a3Rf4 Bool)) (a_a3TTS :: [a_a3Rf4]) (a_a3TTT :: [a_a3Rf4]) :: [a_a3Rf4] sIntersectBy :: forall a_a3Rf4 (t_a3U4t :: (~>) a_a3Rf4 ((~>) a_a3Rf4 Bool)) (t_a3U4u :: [a_a3Rf4]) (t_a3U4v :: [a_a3Rf4]). Sing t_a3U4t -> Sing t_a3U4u -> Sing t_a3U4v -> Sing (Apply (Apply (Apply IntersectBySym0 t_a3U4t) t_a3U4u) t_a3U4v :: [a_a3Rf4]) type family GroupBy (a_a3TI0 :: (~>) a_a3ReQ ((~>) a_a3ReQ Bool)) (a_a3TI1 :: [a_a3ReQ]) :: [[a_a3ReQ]] sGroupBy :: forall a_a3ReQ (t_a3U1t :: (~>) a_a3ReQ ((~>) a_a3ReQ Bool)) (t_a3U1u :: [a_a3ReQ]). Sing t_a3U1t -> Sing t_a3U1u -> Sing (Apply (Apply GroupBySym0 t_a3U1t) t_a3U1u :: [[a_a3ReQ]]) type family SortBy (a_a3TJV :: (~>) a_a3Rff ((~>) a_a3Rff Ordering)) (a_a3TJW :: [a_a3Rff]) :: [a_a3Rff] sSortBy :: forall a_a3Rff (t_a3U1Z :: (~>) a_a3Rff ((~>) a_a3Rff Ordering)) (t_a3U20 :: [a_a3Rff]). Sing t_a3U1Z -> Sing t_a3U20 -> Sing (Apply (Apply SortBySym0 t_a3U1Z) t_a3U20 :: [a_a3Rff]) type family InsertBy (a_a3TJr :: (~>) a_a3Rfe ((~>) a_a3Rfe Ordering)) (a_a3TJs :: a_a3Rfe) (a_a3TJt :: [a_a3Rfe]) :: [a_a3Rfe] sInsertBy :: forall a_a3Rfe (t_a3U1P :: (~>) a_a3Rfe ((~>) a_a3Rfe Ordering)) (t_a3U1Q :: a_a3Rfe) (t_a3U1R :: [a_a3Rfe]). Sing t_a3U1P -> Sing t_a3U1Q -> Sing t_a3U1R -> Sing (Apply (Apply (Apply InsertBySym0 t_a3U1P) t_a3U1Q) t_a3U1R :: [a_a3Rfe]) type family MaximumBy (a_a5ZMY :: (~>) a_a5ZEJ ((~>) a_a5ZEJ Ordering)) (a_a5ZMZ :: t_a5ZEI a_a5ZEJ) :: a_a5ZEJ sMaximumBy :: forall t_a5ZEI a_a5ZEJ (t_a60ap :: (~>) a_a5ZEJ ((~>) a_a5ZEJ Ordering)) (t_a60aq :: t_a5ZEI a_a5ZEJ). SFoldable t_a5ZEI => Sing t_a60ap -> Sing t_a60aq -> Sing (Apply (Apply MaximumBySym0 t_a60ap) t_a60aq :: a_a5ZEJ) type family MinimumBy (a_a5ZMz :: (~>) a_a5ZEH ((~>) a_a5ZEH Ordering)) (a_a5ZMA :: t_a5ZEG a_a5ZEH) :: a_a5ZEH sMinimumBy :: forall t_a5ZEG a_a5ZEH (t_a60al :: (~>) a_a5ZEH ((~>) a_a5ZEH Ordering)) (t_a60am :: t_a5ZEG a_a5ZEH). SFoldable t_a5ZEG => Sing t_a60al -> Sing t_a60am -> Sing (Apply (Apply MinimumBySym0 t_a60al) t_a60am :: a_a5ZEH) type family GenericLength (a_a3TDU :: [a_a3ReA]) :: i_a3Rez sGenericLength :: forall i_a3Rez a_a3ReA (t_a3U0v :: [a_a3ReA]). SNum i_a3Rez => Sing t_a3U0v -> Sing (Apply GenericLengthSym0 t_a3U0v :: i_a3Rez) type family GenericTake (a_a4rkp :: i_a4o45) (a_a4rkq :: [a_a4o46]) :: [a_a4o46] type family GenericDrop (a_a4rkf :: i_a4o43) (a_a4rkg :: [a_a4o44]) :: [a_a4o44] type family GenericSplitAt (a_a4rk5 :: i_a4o41) (a_a4rk6 :: [a_a4o42]) :: ([a_a4o42], [a_a4o42]) type family GenericIndex (a_a4rjV :: [a_a4o40]) (a_a4rjW :: i_a4o3Z) :: a_a4o40 type family GenericReplicate (a_a4rjL :: i_a4o3X) (a_a4rjM :: a_a4o3Y) :: [a_a4o3Y] type NilSym0 = '[] data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679291660 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679291660 :: a3530822107858468865) (t6989586621679291661 :: [a3530822107858468865]) = '(:) t6989586621679291660 t6989586621679291661 type (++@#@$$$) (a6989586621679511994 :: [a6989586621679511797]) (a6989586621679511995 :: [a6989586621679511797]) = (++) a6989586621679511994 a6989586621679511995 data (++@#@$$) (a6989586621679511994 :: [a6989586621679511797]) :: (~>) [a6989586621679511797] [a6989586621679511797] infixr 5 ++@#@$$ data (++@#@$) :: forall a6989586621679511797. (~>) [a6989586621679511797] ((~>) [a6989586621679511797] [a6989586621679511797]) infixr 5 ++@#@$ data HeadSym0 :: forall a6989586621679929539. (~>) [a6989586621679929539] a6989586621679929539 type HeadSym1 (a6989586621679940062 :: [a6989586621679929539]) = Head a6989586621679940062 data LastSym0 :: forall a6989586621679929538. (~>) [a6989586621679929538] a6989586621679929538 type LastSym1 (a6989586621679940057 :: [a6989586621679929538]) = Last a6989586621679940057 data TailSym0 :: forall a6989586621679929537. (~>) [a6989586621679929537] [a6989586621679929537] type TailSym1 (a6989586621679940054 :: [a6989586621679929537]) = Tail a6989586621679940054 data InitSym0 :: forall a6989586621679929536. (~>) [a6989586621679929536] [a6989586621679929536] type InitSym1 (a6989586621679940040 :: [a6989586621679929536]) = Init a6989586621679940040 data NullSym0 :: forall a6989586621680438541 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438541) Bool type NullSym1 (arg6989586621680439189 :: t6989586621680438526 a6989586621680438541) = Null arg6989586621680439189 data LengthSym0 :: forall a6989586621680438542 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438542) Nat type LengthSym1 (arg6989586621680439191 :: t6989586621680438526 a6989586621680438542) = Length arg6989586621680439191 data MapSym0 :: forall a6989586621679511798 b6989586621679511799. (~>) ((~>) a6989586621679511798 b6989586621679511799) ((~>) [a6989586621679511798] [b6989586621679511799]) data MapSym1 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) :: (~>) [a6989586621679511798] [b6989586621679511799] type MapSym2 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) (a6989586621679512003 :: [a6989586621679511798]) = Map a6989586621679512002 a6989586621679512003 data ReverseSym0 :: forall a6989586621679929534. (~>) [a6989586621679929534] [a6989586621679929534] type ReverseSym1 (a6989586621679939993 :: [a6989586621679929534]) = Reverse a6989586621679939993 data IntersperseSym0 :: forall a6989586621679929533. (~>) a6989586621679929533 ((~>) [a6989586621679929533] [a6989586621679929533]) data IntersperseSym1 (a6989586621679939980 :: a6989586621679929533) :: (~>) [a6989586621679929533] [a6989586621679929533] type IntersperseSym2 (a6989586621679939980 :: a6989586621679929533) (a6989586621679939981 :: [a6989586621679929533]) = Intersperse a6989586621679939980 a6989586621679939981 data IntercalateSym0 :: forall a6989586621679929532. (~>) [a6989586621679929532] ((~>) [[a6989586621679929532]] [a6989586621679929532]) data IntercalateSym1 (a6989586621679939987 :: [a6989586621679929532]) :: (~>) [[a6989586621679929532]] [a6989586621679929532] type IntercalateSym2 (a6989586621679939987 :: [a6989586621679929532]) (a6989586621679939988 :: [[a6989586621679929532]]) = Intercalate a6989586621679939987 a6989586621679939988 data TransposeSym0 :: forall a6989586621679929419. (~>) [[a6989586621679929419]] [[a6989586621679929419]] type TransposeSym1 (a6989586621679940065 :: [[a6989586621679929419]]) = Transpose a6989586621679940065 data SubsequencesSym0 :: forall a6989586621679929531. (~>) [a6989586621679929531] [[a6989586621679929531]] type SubsequencesSym1 (a6989586621679939977 :: [a6989586621679929531]) = Subsequences a6989586621679939977 data PermutationsSym0 :: forall a6989586621679929528. (~>) [a6989586621679929528] [[a6989586621679929528]] type PermutationsSym1 (a6989586621679939859 :: [a6989586621679929528]) = Permutations a6989586621679939859 data FoldlSym0 :: forall a6989586621680438535 b6989586621680438534 t6989586621680438526. (~>) ((~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) ((~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534)) data FoldlSym1 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) :: forall t6989586621680438526. (~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534) data FoldlSym2 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534 type FoldlSym3 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) (arg6989586621680439169 :: t6989586621680438526 a6989586621680438535) = Foldl arg6989586621680439167 arg6989586621680439168 arg6989586621680439169 data Foldl'Sym0 :: forall a6989586621680438537 b6989586621680438536 t6989586621680438526. (~>) ((~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) ((~>) b6989586621680438536 ((~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536)) data Foldl'Sym1 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) :: forall t6989586621680438526. (~>) b6989586621680438536 ((~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536) data Foldl'Sym2 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) (arg6989586621680439174 :: b6989586621680438536) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438537) b6989586621680438536 type Foldl'Sym3 (arg6989586621680439173 :: (~>) b6989586621680438536 ((~>) a6989586621680438537 b6989586621680438536)) (arg6989586621680439174 :: b6989586621680438536) (arg6989586621680439175 :: t6989586621680438526 a6989586621680438537) = Foldl' arg6989586621680439173 arg6989586621680439174 arg6989586621680439175 data Foldl1Sym0 :: forall a6989586621680438539 t6989586621680438526. (~>) ((~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) ((~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539) data Foldl1Sym1 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539 type Foldl1Sym2 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) (arg6989586621680439184 :: t6989586621680438526 a6989586621680438539) = Foldl1 arg6989586621680439183 arg6989586621680439184 data Foldl1'Sym0 :: forall a6989586621679929524. (~>) ((~>) a6989586621679929524 ((~>) a6989586621679929524 a6989586621679929524)) ((~>) [a6989586621679929524] a6989586621679929524) data Foldl1'Sym1 (a6989586621679939852 :: (~>) a6989586621679929524 ((~>) a6989586621679929524 a6989586621679929524)) :: (~>) [a6989586621679929524] a6989586621679929524 type Foldl1'Sym2 (a6989586621679939852 :: (~>) a6989586621679929524 ((~>) a6989586621679929524 a6989586621679929524)) (a6989586621679939853 :: [a6989586621679929524]) = Foldl1' a6989586621679939852 a6989586621679939853 data FoldrSym0 :: forall a6989586621680438530 b6989586621680438531 t6989586621680438526. (~>) ((~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) ((~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531)) data FoldrSym1 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) :: forall t6989586621680438526. (~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531) data FoldrSym2 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531 type FoldrSym3 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) (arg6989586621680439157 :: t6989586621680438526 a6989586621680438530) = Foldr arg6989586621680439155 arg6989586621680439156 arg6989586621680439157 data Foldr1Sym0 :: forall a6989586621680438538 t6989586621680438526. (~>) ((~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) ((~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538) data Foldr1Sym1 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538 type Foldr1Sym2 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) (arg6989586621680439180 :: t6989586621680438526 a6989586621680438538) = Foldr1 arg6989586621680439179 arg6989586621680439180 data ConcatSym0 :: forall a6989586621680438452 t6989586621680438451. (~>) (t6989586621680438451 [a6989586621680438452]) [a6989586621680438452] type ConcatSym1 (a6989586621680439037 :: t6989586621680438451 [a6989586621680438452]) = Concat a6989586621680439037 data ConcatMapSym0 :: forall a6989586621680438449 b6989586621680438450 t6989586621680438448. (~>) ((~>) a6989586621680438449 [b6989586621680438450]) ((~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450]) data ConcatMapSym1 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) :: forall t6989586621680438448. (~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450] type ConcatMapSym2 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) (a6989586621680439022 :: t6989586621680438448 a6989586621680438449) = ConcatMap a6989586621680439021 a6989586621680439022 data AndSym0 :: forall t6989586621680438447. (~>) (t6989586621680438447 Bool) Bool type AndSym1 (a6989586621680439012 :: t6989586621680438447 Bool) = And a6989586621680439012 data OrSym0 :: forall t6989586621680438446. (~>) (t6989586621680438446 Bool) Bool type OrSym1 (a6989586621680439003 :: t6989586621680438446 Bool) = Or a6989586621680439003 data AnySym0 :: forall a6989586621680438445 t6989586621680438444. (~>) ((~>) a6989586621680438445 Bool) ((~>) (t6989586621680438444 a6989586621680438445) Bool) data AnySym1 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) :: forall t6989586621680438444. (~>) (t6989586621680438444 a6989586621680438445) Bool type AnySym2 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) (a6989586621680438991 :: t6989586621680438444 a6989586621680438445) = Any a6989586621680438990 a6989586621680438991 data AllSym0 :: forall a6989586621680438443 t6989586621680438442. (~>) ((~>) a6989586621680438443 Bool) ((~>) (t6989586621680438442 a6989586621680438443) Bool) data AllSym1 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) :: forall t6989586621680438442. (~>) (t6989586621680438442 a6989586621680438443) Bool type AllSym2 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) (a6989586621680438978 :: t6989586621680438442 a6989586621680438443) = All a6989586621680438977 a6989586621680438978 data SumSym0 :: forall a6989586621680438546 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438546) a6989586621680438546 type SumSym1 (arg6989586621680439201 :: t6989586621680438526 a6989586621680438546) = Sum arg6989586621680439201 data ProductSym0 :: forall a6989586621680438547 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438547) a6989586621680438547 type ProductSym1 (arg6989586621680439203 :: t6989586621680438526 a6989586621680438547) = Product arg6989586621680439203 data MaximumSym0 :: forall a6989586621680438544 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438544) a6989586621680438544 type MaximumSym1 (arg6989586621680439197 :: t6989586621680438526 a6989586621680438544) = Maximum arg6989586621680439197 data MinimumSym0 :: forall a6989586621680438545 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438545) a6989586621680438545 type MinimumSym1 (arg6989586621680439199 :: t6989586621680438526 a6989586621680438545) = Minimum arg6989586621680439199 data ScanlSym0 :: forall a6989586621679929517 b6989586621679929516. (~>) ((~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) ((~>) b6989586621679929516 ((~>) [a6989586621679929517] [b6989586621679929516])) data ScanlSym1 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) :: (~>) b6989586621679929516 ((~>) [a6989586621679929517] [b6989586621679929516]) data ScanlSym2 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) (a6989586621679939626 :: b6989586621679929516) :: (~>) [a6989586621679929517] [b6989586621679929516] type ScanlSym3 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) (a6989586621679939626 :: b6989586621679929516) (a6989586621679939627 :: [a6989586621679929517]) = Scanl a6989586621679939625 a6989586621679939626 a6989586621679939627 data Scanl1Sym0 :: forall a6989586621679929515. (~>) ((~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) ((~>) [a6989586621679929515] [a6989586621679929515]) data Scanl1Sym1 (a6989586621679939639 :: (~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) :: (~>) [a6989586621679929515] [a6989586621679929515] type Scanl1Sym2 (a6989586621679939639 :: (~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) (a6989586621679939640 :: [a6989586621679929515]) = Scanl1 a6989586621679939639 a6989586621679939640 data ScanrSym0 :: forall a6989586621679929513 b6989586621679929514. (~>) ((~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) ((~>) b6989586621679929514 ((~>) [a6989586621679929513] [b6989586621679929514])) data ScanrSym1 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) :: (~>) b6989586621679929514 ((~>) [a6989586621679929513] [b6989586621679929514]) data ScanrSym2 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) (a6989586621679939605 :: b6989586621679929514) :: (~>) [a6989586621679929513] [b6989586621679929514] type ScanrSym3 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) (a6989586621679939605 :: b6989586621679929514) (a6989586621679939606 :: [a6989586621679929513]) = Scanr a6989586621679939604 a6989586621679939605 a6989586621679939606 data Scanr1Sym0 :: forall a6989586621679929512. (~>) ((~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) ((~>) [a6989586621679929512] [a6989586621679929512]) data Scanr1Sym1 (a6989586621679939580 :: (~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) :: (~>) [a6989586621679929512] [a6989586621679929512] type Scanr1Sym2 (a6989586621679939580 :: (~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) (a6989586621679939581 :: [a6989586621679929512]) = Scanr1 a6989586621679939580 a6989586621679939581 data MapAccumLSym0 :: forall a6989586621680740545 b6989586621680740546 c6989586621680740547 t6989586621680740544. (~>) ((~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) ((~>) a6989586621680740545 ((~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547))) data MapAccumLSym1 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) :: forall t6989586621680740544. (~>) a6989586621680740545 ((~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547)) data MapAccumLSym2 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) (a6989586621680741085 :: a6989586621680740545) :: forall t6989586621680740544. (~>) (t6989586621680740544 b6989586621680740546) (a6989586621680740545, t6989586621680740544 c6989586621680740547) type MapAccumLSym3 (a6989586621680741084 :: (~>) a6989586621680740545 ((~>) b6989586621680740546 (a6989586621680740545, c6989586621680740547))) (a6989586621680741085 :: a6989586621680740545) (a6989586621680741086 :: t6989586621680740544 b6989586621680740546) = MapAccumL a6989586621680741084 a6989586621680741085 a6989586621680741086 data MapAccumRSym0 :: forall a6989586621680740541 b6989586621680740542 c6989586621680740543 t6989586621680740540. (~>) ((~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) ((~>) a6989586621680740541 ((~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543))) data MapAccumRSym1 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) :: forall t6989586621680740540. (~>) a6989586621680740541 ((~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543)) data MapAccumRSym2 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) (a6989586621680741068 :: a6989586621680740541) :: forall t6989586621680740540. (~>) (t6989586621680740540 b6989586621680740542) (a6989586621680740541, t6989586621680740540 c6989586621680740543) type MapAccumRSym3 (a6989586621680741067 :: (~>) a6989586621680740541 ((~>) b6989586621680740542 (a6989586621680740541, c6989586621680740543))) (a6989586621680741068 :: a6989586621680740541) (a6989586621680741069 :: t6989586621680740540 b6989586621680740542) = MapAccumR a6989586621680741067 a6989586621680741068 a6989586621680741069 data ReplicateSym0 :: forall a6989586621679929420. (~>) Nat ((~>) a6989586621679929420 [a6989586621679929420]) data ReplicateSym1 (a6989586621679938722 :: Nat) :: forall a6989586621679929420. (~>) a6989586621679929420 [a6989586621679929420] type ReplicateSym2 (a6989586621679938722 :: Nat) (a6989586621679938723 :: a6989586621679929420) = Replicate a6989586621679938722 a6989586621679938723 data UnfoldrSym0 :: forall a6989586621679929505 b6989586621679929504. (~>) ((~>) b6989586621679929504 (Maybe (a6989586621679929505, b6989586621679929504))) ((~>) b6989586621679929504 [a6989586621679929505]) data UnfoldrSym1 (a6989586621679939438 :: (~>) b6989586621679929504 (Maybe (a6989586621679929505, b6989586621679929504))) :: (~>) b6989586621679929504 [a6989586621679929505] type UnfoldrSym2 (a6989586621679939438 :: (~>) b6989586621679929504 (Maybe (a6989586621679929505, b6989586621679929504))) (a6989586621679939439 :: b6989586621679929504) = Unfoldr a6989586621679939438 a6989586621679939439 data TakeSym0 :: forall a6989586621679929436. (~>) Nat ((~>) [a6989586621679929436] [a6989586621679929436]) data TakeSym1 (a6989586621679938818 :: Nat) :: forall a6989586621679929436. (~>) [a6989586621679929436] [a6989586621679929436] type TakeSym2 (a6989586621679938818 :: Nat) (a6989586621679938819 :: [a6989586621679929436]) = Take a6989586621679938818 a6989586621679938819 data DropSym0 :: forall a6989586621679929435. (~>) Nat ((~>) [a6989586621679929435] [a6989586621679929435]) data DropSym1 (a6989586621679938804 :: Nat) :: forall a6989586621679929435. (~>) [a6989586621679929435] [a6989586621679929435] type DropSym2 (a6989586621679938804 :: Nat) (a6989586621679938805 :: [a6989586621679929435]) = Drop a6989586621679938804 a6989586621679938805 data SplitAtSym0 :: forall a6989586621679929434. (~>) Nat ((~>) [a6989586621679929434] ([a6989586621679929434], [a6989586621679929434])) data SplitAtSym1 (a6989586621679938832 :: Nat) :: forall a6989586621679929434. (~>) [a6989586621679929434] ([a6989586621679929434], [a6989586621679929434]) type SplitAtSym2 (a6989586621679938832 :: Nat) (a6989586621679938833 :: [a6989586621679929434]) = SplitAt a6989586621679938832 a6989586621679938833 data TakeWhileSym0 :: forall a6989586621679929441. (~>) ((~>) a6989586621679929441 Bool) ((~>) [a6989586621679929441] [a6989586621679929441]) data TakeWhileSym1 (a6989586621679938976 :: (~>) a6989586621679929441 Bool) :: (~>) [a6989586621679929441] [a6989586621679929441] type TakeWhileSym2 (a6989586621679938976 :: (~>) a6989586621679929441 Bool) (a6989586621679938977 :: [a6989586621679929441]) = TakeWhile a6989586621679938976 a6989586621679938977 data DropWhileSym0 :: forall a6989586621679929440. (~>) ((~>) a6989586621679929440 Bool) ((~>) [a6989586621679929440] [a6989586621679929440]) data DropWhileSym1 (a6989586621679938958 :: (~>) a6989586621679929440 Bool) :: (~>) [a6989586621679929440] [a6989586621679929440] type DropWhileSym2 (a6989586621679938958 :: (~>) a6989586621679929440 Bool) (a6989586621679938959 :: [a6989586621679929440]) = DropWhile a6989586621679938958 a6989586621679938959 data DropWhileEndSym0 :: forall a6989586621679929439. (~>) ((~>) a6989586621679929439 Bool) ((~>) [a6989586621679929439] [a6989586621679929439]) data DropWhileEndSym1 (a6989586621679940014 :: (~>) a6989586621679929439 Bool) :: (~>) [a6989586621679929439] [a6989586621679929439] type DropWhileEndSym2 (a6989586621679940014 :: (~>) a6989586621679929439 Bool) (a6989586621679940015 :: [a6989586621679929439]) = DropWhileEnd a6989586621679940014 a6989586621679940015 data SpanSym0 :: forall a6989586621679929438. (~>) ((~>) a6989586621679929438 Bool) ((~>) [a6989586621679929438] ([a6989586621679929438], [a6989586621679929438])) data SpanSym1 (a6989586621679938881 :: (~>) a6989586621679929438 Bool) :: (~>) [a6989586621679929438] ([a6989586621679929438], [a6989586621679929438]) type SpanSym2 (a6989586621679938881 :: (~>) a6989586621679929438 Bool) (a6989586621679938882 :: [a6989586621679929438]) = Span a6989586621679938881 a6989586621679938882 data BreakSym0 :: forall a6989586621679929437. (~>) ((~>) a6989586621679929437 Bool) ((~>) [a6989586621679929437] ([a6989586621679929437], [a6989586621679929437])) data BreakSym1 (a6989586621679938838 :: (~>) a6989586621679929437 Bool) :: (~>) [a6989586621679929437] ([a6989586621679929437], [a6989586621679929437]) type BreakSym2 (a6989586621679938838 :: (~>) a6989586621679929437 Bool) (a6989586621679938839 :: [a6989586621679929437]) = Break a6989586621679938838 a6989586621679938839 data StripPrefixSym0 :: forall a6989586621680055663. (~>) [a6989586621680055663] ((~>) [a6989586621680055663] (Maybe [a6989586621680055663])) data StripPrefixSym1 (a6989586621680068373 :: [a6989586621680055663]) :: (~>) [a6989586621680055663] (Maybe [a6989586621680055663]) type StripPrefixSym2 (a6989586621680068373 :: [a6989586621680055663]) (a6989586621680068374 :: [a6989586621680055663]) = StripPrefix a6989586621680068373 a6989586621680068374 data GroupSym0 :: forall a6989586621679929433. (~>) [a6989586621679929433] [[a6989586621679929433]] type GroupSym1 (a6989586621679938955 :: [a6989586621679929433]) = Group a6989586621679938955 data InitsSym0 :: forall a6989586621679929503. (~>) [a6989586621679929503] [[a6989586621679929503]] type InitsSym1 (a6989586621679939430 :: [a6989586621679929503]) = Inits a6989586621679939430 data TailsSym0 :: forall a6989586621679929502. (~>) [a6989586621679929502] [[a6989586621679929502]] type TailsSym1 (a6989586621679939423 :: [a6989586621679929502]) = Tails a6989586621679939423 data IsPrefixOfSym0 :: forall a6989586621679929501. (~>) [a6989586621679929501] ((~>) [a6989586621679929501] Bool) data IsPrefixOfSym1 (a6989586621679939415 :: [a6989586621679929501]) :: (~>) [a6989586621679929501] Bool type IsPrefixOfSym2 (a6989586621679939415 :: [a6989586621679929501]) (a6989586621679939416 :: [a6989586621679929501]) = IsPrefixOf a6989586621679939415 a6989586621679939416 data IsSuffixOfSym0 :: forall a6989586621679929500. (~>) [a6989586621679929500] ((~>) [a6989586621679929500] Bool) data IsSuffixOfSym1 (a6989586621679940006 :: [a6989586621679929500]) :: (~>) [a6989586621679929500] Bool type IsSuffixOfSym2 (a6989586621679940006 :: [a6989586621679929500]) (a6989586621679940007 :: [a6989586621679929500]) = IsSuffixOf a6989586621679940006 a6989586621679940007 data IsInfixOfSym0 :: forall a6989586621679929499. (~>) [a6989586621679929499] ((~>) [a6989586621679929499] Bool) data IsInfixOfSym1 (a6989586621679939653 :: [a6989586621679929499]) :: (~>) [a6989586621679929499] Bool type IsInfixOfSym2 (a6989586621679939653 :: [a6989586621679929499]) (a6989586621679939654 :: [a6989586621679929499]) = IsInfixOf a6989586621679939653 a6989586621679939654 data ElemSym0 :: forall a6989586621680438543 t6989586621680438526. (~>) a6989586621680438543 ((~>) (t6989586621680438526 a6989586621680438543) Bool) data ElemSym1 (arg6989586621680439193 :: a6989586621680438543) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438543) Bool type ElemSym2 (arg6989586621680439193 :: a6989586621680438543) (arg6989586621680439194 :: t6989586621680438526 a6989586621680438543) = Elem arg6989586621680439193 arg6989586621680439194 data NotElemSym0 :: forall a6989586621680438437 t6989586621680438436. (~>) a6989586621680438437 ((~>) (t6989586621680438436 a6989586621680438437) Bool) data NotElemSym1 (a6989586621680438919 :: a6989586621680438437) :: forall t6989586621680438436. (~>) (t6989586621680438436 a6989586621680438437) Bool type NotElemSym2 (a6989586621680438919 :: a6989586621680438437) (a6989586621680438920 :: t6989586621680438436 a6989586621680438437) = NotElem a6989586621680438919 a6989586621680438920 data LookupSym0 :: forall a6989586621679929426 b6989586621679929427. (~>) a6989586621679929426 ((~>) [(a6989586621679929426, b6989586621679929427)] (Maybe b6989586621679929427)) data LookupSym1 (a6989586621679938787 :: a6989586621679929426) :: forall b6989586621679929427. (~>) [(a6989586621679929426, b6989586621679929427)] (Maybe b6989586621679929427) type LookupSym2 (a6989586621679938787 :: a6989586621679929426) (a6989586621679938788 :: [(a6989586621679929426, b6989586621679929427)]) = Lookup a6989586621679938787 a6989586621679938788 data FindSym0 :: forall a6989586621680438435 t6989586621680438434. (~>) ((~>) a6989586621680438435 Bool) ((~>) (t6989586621680438434 a6989586621680438435) (Maybe a6989586621680438435)) data FindSym1 (a6989586621680438892 :: (~>) a6989586621680438435 Bool) :: forall t6989586621680438434. (~>) (t6989586621680438434 a6989586621680438435) (Maybe a6989586621680438435) type FindSym2 (a6989586621680438892 :: (~>) a6989586621680438435 Bool) (a6989586621680438893 :: t6989586621680438434 a6989586621680438435) = Find a6989586621680438892 a6989586621680438893 data FilterSym0 :: forall a6989586621679929449. (~>) ((~>) a6989586621679929449 Bool) ((~>) [a6989586621679929449] [a6989586621679929449]) data FilterSym1 (a6989586621679938990 :: (~>) a6989586621679929449 Bool) :: (~>) [a6989586621679929449] [a6989586621679929449] type FilterSym2 (a6989586621679938990 :: (~>) a6989586621679929449 Bool) (a6989586621679938991 :: [a6989586621679929449]) = Filter a6989586621679938990 a6989586621679938991 data PartitionSym0 :: forall a6989586621679929425. (~>) ((~>) a6989586621679929425 Bool) ((~>) [a6989586621679929425] ([a6989586621679929425], [a6989586621679929425])) data PartitionSym1 (a6989586621679938781 :: (~>) a6989586621679929425 Bool) :: (~>) [a6989586621679929425] ([a6989586621679929425], [a6989586621679929425]) type PartitionSym2 (a6989586621679938781 :: (~>) a6989586621679929425 Bool) (a6989586621679938782 :: [a6989586621679929425]) = Partition a6989586621679938781 a6989586621679938782 data (!!@#@$) :: forall a6989586621679929418. (~>) [a6989586621679929418] ((~>) Nat a6989586621679929418) infixl 9 !!@#@$ data (!!@#@$$) (a6989586621679938708 :: [a6989586621679929418]) :: (~>) Nat a6989586621679929418 infixl 9 !!@#@$$ type (!!@#@$$$) (a6989586621679938708 :: [a6989586621679929418]) (a6989586621679938709 :: Nat) = (!!) a6989586621679938708 a6989586621679938709 data ElemIndexSym0 :: forall a6989586621679929447. (~>) a6989586621679929447 ((~>) [a6989586621679929447] (Maybe Nat)) data ElemIndexSym1 (a6989586621679939373 :: a6989586621679929447) :: (~>) [a6989586621679929447] (Maybe Nat) type ElemIndexSym2 (a6989586621679939373 :: a6989586621679929447) (a6989586621679939374 :: [a6989586621679929447]) = ElemIndex a6989586621679939373 a6989586621679939374 data ElemIndicesSym0 :: forall a6989586621679929446. (~>) a6989586621679929446 ((~>) [a6989586621679929446] [Nat]) data ElemIndicesSym1 (a6989586621679939357 :: a6989586621679929446) :: (~>) [a6989586621679929446] [Nat] type ElemIndicesSym2 (a6989586621679939357 :: a6989586621679929446) (a6989586621679939358 :: [a6989586621679929446]) = ElemIndices a6989586621679939357 a6989586621679939358 data FindIndexSym0 :: forall a6989586621679929445. (~>) ((~>) a6989586621679929445 Bool) ((~>) [a6989586621679929445] (Maybe Nat)) data FindIndexSym1 (a6989586621679939365 :: (~>) a6989586621679929445 Bool) :: (~>) [a6989586621679929445] (Maybe Nat) type FindIndexSym2 (a6989586621679939365 :: (~>) a6989586621679929445 Bool) (a6989586621679939366 :: [a6989586621679929445]) = FindIndex a6989586621679939365 a6989586621679939366 data FindIndicesSym0 :: forall a6989586621679929444. (~>) ((~>) a6989586621679929444 Bool) ((~>) [a6989586621679929444] [Nat]) data FindIndicesSym1 (a6989586621679939331 :: (~>) a6989586621679929444 Bool) :: (~>) [a6989586621679929444] [Nat] type FindIndicesSym2 (a6989586621679939331 :: (~>) a6989586621679929444 Bool) (a6989586621679939332 :: [a6989586621679929444]) = FindIndices a6989586621679939331 a6989586621679939332 data ZipSym0 :: forall a6989586621679929495 b6989586621679929496. (~>) [a6989586621679929495] ((~>) [b6989586621679929496] [(a6989586621679929495, b6989586621679929496)]) data ZipSym1 (a6989586621679939323 :: [a6989586621679929495]) :: forall b6989586621679929496. (~>) [b6989586621679929496] [(a6989586621679929495, b6989586621679929496)] type ZipSym2 (a6989586621679939323 :: [a6989586621679929495]) (a6989586621679939324 :: [b6989586621679929496]) = Zip a6989586621679939323 a6989586621679939324 data Zip3Sym0 :: forall a6989586621679929492 b6989586621679929493 c6989586621679929494. (~>) [a6989586621679929492] ((~>) [b6989586621679929493] ((~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)])) data Zip3Sym1 (a6989586621679939311 :: [a6989586621679929492]) :: forall b6989586621679929493 c6989586621679929494. (~>) [b6989586621679929493] ((~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)]) data Zip3Sym2 (a6989586621679939311 :: [a6989586621679929492]) (a6989586621679939312 :: [b6989586621679929493]) :: forall c6989586621679929494. (~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)] type Zip3Sym3 (a6989586621679939311 :: [a6989586621679929492]) (a6989586621679939312 :: [b6989586621679929493]) (a6989586621679939313 :: [c6989586621679929494]) = Zip3 a6989586621679939311 a6989586621679939312 a6989586621679939313 data Zip4Sym0 :: forall a6989586621680055659 b6989586621680055660 c6989586621680055661 d6989586621680055662. (~>) [a6989586621680055659] ((~>) [b6989586621680055660] ((~>) [c6989586621680055661] ((~>) [d6989586621680055662] [(a6989586621680055659, b6989586621680055660, c6989586621680055661, d6989586621680055662)]))) data Zip4Sym1 (a6989586621680068361 :: [a6989586621680055659]) :: forall b6989586621680055660 c6989586621680055661 d6989586621680055662. (~>) [b6989586621680055660] ((~>) [c6989586621680055661] ((~>) [d6989586621680055662] [(a6989586621680055659, b6989586621680055660, c6989586621680055661, d6989586621680055662)])) data Zip4Sym2 (a6989586621680068361 :: [a6989586621680055659]) (a6989586621680068362 :: [b6989586621680055660]) :: forall c6989586621680055661 d6989586621680055662. (~>) [c6989586621680055661] ((~>) [d6989586621680055662] [(a6989586621680055659, b6989586621680055660, c6989586621680055661, d6989586621680055662)]) data Zip4Sym3 (a6989586621680068361 :: [a6989586621680055659]) (a6989586621680068362 :: [b6989586621680055660]) (a6989586621680068363 :: [c6989586621680055661]) :: forall d6989586621680055662. (~>) [d6989586621680055662] [(a6989586621680055659, b6989586621680055660, c6989586621680055661, d6989586621680055662)] type Zip4Sym4 (a6989586621680068361 :: [a6989586621680055659]) (a6989586621680068362 :: [b6989586621680055660]) (a6989586621680068363 :: [c6989586621680055661]) (a6989586621680068364 :: [d6989586621680055662]) = Zip4 a6989586621680068361 a6989586621680068362 a6989586621680068363 a6989586621680068364 data Zip5Sym0 :: forall a6989586621680055654 b6989586621680055655 c6989586621680055656 d6989586621680055657 e6989586621680055658. (~>) [a6989586621680055654] ((~>) [b6989586621680055655] ((~>) [c6989586621680055656] ((~>) [d6989586621680055657] ((~>) [e6989586621680055658] [(a6989586621680055654, b6989586621680055655, c6989586621680055656, d6989586621680055657, e6989586621680055658)])))) data Zip5Sym1 (a6989586621680068338 :: [a6989586621680055654]) :: forall b6989586621680055655 c6989586621680055656 d6989586621680055657 e6989586621680055658. (~>) [b6989586621680055655] ((~>) [c6989586621680055656] ((~>) [d6989586621680055657] ((~>) [e6989586621680055658] [(a6989586621680055654, b6989586621680055655, c6989586621680055656, d6989586621680055657, e6989586621680055658)]))) data Zip5Sym2 (a6989586621680068338 :: [a6989586621680055654]) (a6989586621680068339 :: [b6989586621680055655]) :: forall c6989586621680055656 d6989586621680055657 e6989586621680055658. (~>) [c6989586621680055656] ((~>) [d6989586621680055657] ((~>) [e6989586621680055658] [(a6989586621680055654, b6989586621680055655, c6989586621680055656, d6989586621680055657, e6989586621680055658)])) data Zip5Sym3 (a6989586621680068338 :: [a6989586621680055654]) (a6989586621680068339 :: [b6989586621680055655]) (a6989586621680068340 :: [c6989586621680055656]) :: forall d6989586621680055657 e6989586621680055658. (~>) [d6989586621680055657] ((~>) [e6989586621680055658] [(a6989586621680055654, b6989586621680055655, c6989586621680055656, d6989586621680055657, e6989586621680055658)]) data Zip5Sym4 (a6989586621680068338 :: [a6989586621680055654]) (a6989586621680068339 :: [b6989586621680055655]) (a6989586621680068340 :: [c6989586621680055656]) (a6989586621680068341 :: [d6989586621680055657]) :: forall e6989586621680055658. (~>) [e6989586621680055658] [(a6989586621680055654, b6989586621680055655, c6989586621680055656, d6989586621680055657, e6989586621680055658)] type Zip5Sym5 (a6989586621680068338 :: [a6989586621680055654]) (a6989586621680068339 :: [b6989586621680055655]) (a6989586621680068340 :: [c6989586621680055656]) (a6989586621680068341 :: [d6989586621680055657]) (a6989586621680068342 :: [e6989586621680055658]) = Zip5 a6989586621680068338 a6989586621680068339 a6989586621680068340 a6989586621680068341 a6989586621680068342 data Zip6Sym0 :: forall a6989586621680055648 b6989586621680055649 c6989586621680055650 d6989586621680055651 e6989586621680055652 f6989586621680055653. (~>) [a6989586621680055648] ((~>) [b6989586621680055649] ((~>) [c6989586621680055650] ((~>) [d6989586621680055651] ((~>) [e6989586621680055652] ((~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)]))))) data Zip6Sym1 (a6989586621680068310 :: [a6989586621680055648]) :: forall b6989586621680055649 c6989586621680055650 d6989586621680055651 e6989586621680055652 f6989586621680055653. (~>) [b6989586621680055649] ((~>) [c6989586621680055650] ((~>) [d6989586621680055651] ((~>) [e6989586621680055652] ((~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)])))) data Zip6Sym2 (a6989586621680068310 :: [a6989586621680055648]) (a6989586621680068311 :: [b6989586621680055649]) :: forall c6989586621680055650 d6989586621680055651 e6989586621680055652 f6989586621680055653. (~>) [c6989586621680055650] ((~>) [d6989586621680055651] ((~>) [e6989586621680055652] ((~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)]))) data Zip6Sym3 (a6989586621680068310 :: [a6989586621680055648]) (a6989586621680068311 :: [b6989586621680055649]) (a6989586621680068312 :: [c6989586621680055650]) :: forall d6989586621680055651 e6989586621680055652 f6989586621680055653. (~>) [d6989586621680055651] ((~>) [e6989586621680055652] ((~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)])) data Zip6Sym4 (a6989586621680068310 :: [a6989586621680055648]) (a6989586621680068311 :: [b6989586621680055649]) (a6989586621680068312 :: [c6989586621680055650]) (a6989586621680068313 :: [d6989586621680055651]) :: forall e6989586621680055652 f6989586621680055653. (~>) [e6989586621680055652] ((~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)]) data Zip6Sym5 (a6989586621680068310 :: [a6989586621680055648]) (a6989586621680068311 :: [b6989586621680055649]) (a6989586621680068312 :: [c6989586621680055650]) (a6989586621680068313 :: [d6989586621680055651]) (a6989586621680068314 :: [e6989586621680055652]) :: forall f6989586621680055653. (~>) [f6989586621680055653] [(a6989586621680055648, b6989586621680055649, c6989586621680055650, d6989586621680055651, e6989586621680055652, f6989586621680055653)] type Zip6Sym6 (a6989586621680068310 :: [a6989586621680055648]) (a6989586621680068311 :: [b6989586621680055649]) (a6989586621680068312 :: [c6989586621680055650]) (a6989586621680068313 :: [d6989586621680055651]) (a6989586621680068314 :: [e6989586621680055652]) (a6989586621680068315 :: [f6989586621680055653]) = Zip6 a6989586621680068310 a6989586621680068311 a6989586621680068312 a6989586621680068313 a6989586621680068314 a6989586621680068315 data Zip7Sym0 :: forall a6989586621680055641 b6989586621680055642 c6989586621680055643 d6989586621680055644 e6989586621680055645 f6989586621680055646 g6989586621680055647. (~>) [a6989586621680055641] ((~>) [b6989586621680055642] ((~>) [c6989586621680055643] ((~>) [d6989586621680055644] ((~>) [e6989586621680055645] ((~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)])))))) data Zip7Sym1 (a6989586621680068277 :: [a6989586621680055641]) :: forall b6989586621680055642 c6989586621680055643 d6989586621680055644 e6989586621680055645 f6989586621680055646 g6989586621680055647. (~>) [b6989586621680055642] ((~>) [c6989586621680055643] ((~>) [d6989586621680055644] ((~>) [e6989586621680055645] ((~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)]))))) data Zip7Sym2 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) :: forall c6989586621680055643 d6989586621680055644 e6989586621680055645 f6989586621680055646 g6989586621680055647. (~>) [c6989586621680055643] ((~>) [d6989586621680055644] ((~>) [e6989586621680055645] ((~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)])))) data Zip7Sym3 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) (a6989586621680068279 :: [c6989586621680055643]) :: forall d6989586621680055644 e6989586621680055645 f6989586621680055646 g6989586621680055647. (~>) [d6989586621680055644] ((~>) [e6989586621680055645] ((~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)]))) data Zip7Sym4 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) (a6989586621680068279 :: [c6989586621680055643]) (a6989586621680068280 :: [d6989586621680055644]) :: forall e6989586621680055645 f6989586621680055646 g6989586621680055647. (~>) [e6989586621680055645] ((~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)])) data Zip7Sym5 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) (a6989586621680068279 :: [c6989586621680055643]) (a6989586621680068280 :: [d6989586621680055644]) (a6989586621680068281 :: [e6989586621680055645]) :: forall f6989586621680055646 g6989586621680055647. (~>) [f6989586621680055646] ((~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)]) data Zip7Sym6 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) (a6989586621680068279 :: [c6989586621680055643]) (a6989586621680068280 :: [d6989586621680055644]) (a6989586621680068281 :: [e6989586621680055645]) (a6989586621680068282 :: [f6989586621680055646]) :: forall g6989586621680055647. (~>) [g6989586621680055647] [(a6989586621680055641, b6989586621680055642, c6989586621680055643, d6989586621680055644, e6989586621680055645, f6989586621680055646, g6989586621680055647)] type Zip7Sym7 (a6989586621680068277 :: [a6989586621680055641]) (a6989586621680068278 :: [b6989586621680055642]) (a6989586621680068279 :: [c6989586621680055643]) (a6989586621680068280 :: [d6989586621680055644]) (a6989586621680068281 :: [e6989586621680055645]) (a6989586621680068282 :: [f6989586621680055646]) (a6989586621680068283 :: [g6989586621680055647]) = Zip7 a6989586621680068277 a6989586621680068278 a6989586621680068279 a6989586621680068280 a6989586621680068281 a6989586621680068282 a6989586621680068283 data ZipWithSym0 :: forall a6989586621679929489 b6989586621679929490 c6989586621679929491. (~>) ((~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) ((~>) [a6989586621679929489] ((~>) [b6989586621679929490] [c6989586621679929491])) data ZipWithSym1 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) :: (~>) [a6989586621679929489] ((~>) [b6989586621679929490] [c6989586621679929491]) data ZipWithSym2 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) (a6989586621679939301 :: [a6989586621679929489]) :: (~>) [b6989586621679929490] [c6989586621679929491] type ZipWithSym3 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) (a6989586621679939301 :: [a6989586621679929489]) (a6989586621679939302 :: [b6989586621679929490]) = ZipWith a6989586621679939300 a6989586621679939301 a6989586621679939302 data ZipWith3Sym0 :: forall a6989586621679929485 b6989586621679929486 c6989586621679929487 d6989586621679929488. (~>) ((~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) ((~>) [a6989586621679929485] ((~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488]))) data ZipWith3Sym1 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) :: (~>) [a6989586621679929485] ((~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488])) data ZipWith3Sym2 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) (a6989586621679939286 :: [a6989586621679929485]) :: (~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488]) data ZipWith3Sym3 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) (a6989586621679939286 :: [a6989586621679929485]) (a6989586621679939287 :: [b6989586621679929486]) :: (~>) [c6989586621679929487] [d6989586621679929488] type ZipWith3Sym4 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) (a6989586621679939286 :: [a6989586621679929485]) (a6989586621679939287 :: [b6989586621679929486]) (a6989586621679939288 :: [c6989586621679929487]) = ZipWith3 a6989586621679939285 a6989586621679939286 a6989586621679939287 a6989586621679939288 data ZipWith4Sym0 :: forall a6989586621680055636 b6989586621680055637 c6989586621680055638 d6989586621680055639 e6989586621680055640. (~>) ((~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) ((~>) [a6989586621680055636] ((~>) [b6989586621680055637] ((~>) [c6989586621680055638] ((~>) [d6989586621680055639] [e6989586621680055640])))) data ZipWith4Sym1 (a6989586621680068244 :: (~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) :: (~>) [a6989586621680055636] ((~>) [b6989586621680055637] ((~>) [c6989586621680055638] ((~>) [d6989586621680055639] [e6989586621680055640]))) data ZipWith4Sym2 (a6989586621680068244 :: (~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) (a6989586621680068245 :: [a6989586621680055636]) :: (~>) [b6989586621680055637] ((~>) [c6989586621680055638] ((~>) [d6989586621680055639] [e6989586621680055640])) data ZipWith4Sym3 (a6989586621680068244 :: (~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) (a6989586621680068245 :: [a6989586621680055636]) (a6989586621680068246 :: [b6989586621680055637]) :: (~>) [c6989586621680055638] ((~>) [d6989586621680055639] [e6989586621680055640]) data ZipWith4Sym4 (a6989586621680068244 :: (~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) (a6989586621680068245 :: [a6989586621680055636]) (a6989586621680068246 :: [b6989586621680055637]) (a6989586621680068247 :: [c6989586621680055638]) :: (~>) [d6989586621680055639] [e6989586621680055640] type ZipWith4Sym5 (a6989586621680068244 :: (~>) a6989586621680055636 ((~>) b6989586621680055637 ((~>) c6989586621680055638 ((~>) d6989586621680055639 e6989586621680055640)))) (a6989586621680068245 :: [a6989586621680055636]) (a6989586621680068246 :: [b6989586621680055637]) (a6989586621680068247 :: [c6989586621680055638]) (a6989586621680068248 :: [d6989586621680055639]) = ZipWith4 a6989586621680068244 a6989586621680068245 a6989586621680068246 a6989586621680068247 a6989586621680068248 data ZipWith5Sym0 :: forall a6989586621680055630 b6989586621680055631 c6989586621680055632 d6989586621680055633 e6989586621680055634 f6989586621680055635. (~>) ((~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) ((~>) [a6989586621680055630] ((~>) [b6989586621680055631] ((~>) [c6989586621680055632] ((~>) [d6989586621680055633] ((~>) [e6989586621680055634] [f6989586621680055635]))))) data ZipWith5Sym1 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) :: (~>) [a6989586621680055630] ((~>) [b6989586621680055631] ((~>) [c6989586621680055632] ((~>) [d6989586621680055633] ((~>) [e6989586621680055634] [f6989586621680055635])))) data ZipWith5Sym2 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) (a6989586621680068222 :: [a6989586621680055630]) :: (~>) [b6989586621680055631] ((~>) [c6989586621680055632] ((~>) [d6989586621680055633] ((~>) [e6989586621680055634] [f6989586621680055635]))) data ZipWith5Sym3 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) (a6989586621680068222 :: [a6989586621680055630]) (a6989586621680068223 :: [b6989586621680055631]) :: (~>) [c6989586621680055632] ((~>) [d6989586621680055633] ((~>) [e6989586621680055634] [f6989586621680055635])) data ZipWith5Sym4 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) (a6989586621680068222 :: [a6989586621680055630]) (a6989586621680068223 :: [b6989586621680055631]) (a6989586621680068224 :: [c6989586621680055632]) :: (~>) [d6989586621680055633] ((~>) [e6989586621680055634] [f6989586621680055635]) data ZipWith5Sym5 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) (a6989586621680068222 :: [a6989586621680055630]) (a6989586621680068223 :: [b6989586621680055631]) (a6989586621680068224 :: [c6989586621680055632]) (a6989586621680068225 :: [d6989586621680055633]) :: (~>) [e6989586621680055634] [f6989586621680055635] type ZipWith5Sym6 (a6989586621680068221 :: (~>) a6989586621680055630 ((~>) b6989586621680055631 ((~>) c6989586621680055632 ((~>) d6989586621680055633 ((~>) e6989586621680055634 f6989586621680055635))))) (a6989586621680068222 :: [a6989586621680055630]) (a6989586621680068223 :: [b6989586621680055631]) (a6989586621680068224 :: [c6989586621680055632]) (a6989586621680068225 :: [d6989586621680055633]) (a6989586621680068226 :: [e6989586621680055634]) = ZipWith5 a6989586621680068221 a6989586621680068222 a6989586621680068223 a6989586621680068224 a6989586621680068225 a6989586621680068226 data ZipWith6Sym0 :: forall a6989586621680055623 b6989586621680055624 c6989586621680055625 d6989586621680055626 e6989586621680055627 f6989586621680055628 g6989586621680055629. (~>) ((~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) ((~>) [a6989586621680055623] ((~>) [b6989586621680055624] ((~>) [c6989586621680055625] ((~>) [d6989586621680055626] ((~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629])))))) data ZipWith6Sym1 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) :: (~>) [a6989586621680055623] ((~>) [b6989586621680055624] ((~>) [c6989586621680055625] ((~>) [d6989586621680055626] ((~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629]))))) data ZipWith6Sym2 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) :: (~>) [b6989586621680055624] ((~>) [c6989586621680055625] ((~>) [d6989586621680055626] ((~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629])))) data ZipWith6Sym3 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) (a6989586621680068196 :: [b6989586621680055624]) :: (~>) [c6989586621680055625] ((~>) [d6989586621680055626] ((~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629]))) data ZipWith6Sym4 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) (a6989586621680068196 :: [b6989586621680055624]) (a6989586621680068197 :: [c6989586621680055625]) :: (~>) [d6989586621680055626] ((~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629])) data ZipWith6Sym5 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) (a6989586621680068196 :: [b6989586621680055624]) (a6989586621680068197 :: [c6989586621680055625]) (a6989586621680068198 :: [d6989586621680055626]) :: (~>) [e6989586621680055627] ((~>) [f6989586621680055628] [g6989586621680055629]) data ZipWith6Sym6 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) (a6989586621680068196 :: [b6989586621680055624]) (a6989586621680068197 :: [c6989586621680055625]) (a6989586621680068198 :: [d6989586621680055626]) (a6989586621680068199 :: [e6989586621680055627]) :: (~>) [f6989586621680055628] [g6989586621680055629] type ZipWith6Sym7 (a6989586621680068194 :: (~>) a6989586621680055623 ((~>) b6989586621680055624 ((~>) c6989586621680055625 ((~>) d6989586621680055626 ((~>) e6989586621680055627 ((~>) f6989586621680055628 g6989586621680055629)))))) (a6989586621680068195 :: [a6989586621680055623]) (a6989586621680068196 :: [b6989586621680055624]) (a6989586621680068197 :: [c6989586621680055625]) (a6989586621680068198 :: [d6989586621680055626]) (a6989586621680068199 :: [e6989586621680055627]) (a6989586621680068200 :: [f6989586621680055628]) = ZipWith6 a6989586621680068194 a6989586621680068195 a6989586621680068196 a6989586621680068197 a6989586621680068198 a6989586621680068199 a6989586621680068200 data ZipWith7Sym0 :: forall a6989586621680055615 b6989586621680055616 c6989586621680055617 d6989586621680055618 e6989586621680055619 f6989586621680055620 g6989586621680055621 h6989586621680055622. (~>) ((~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) ((~>) [a6989586621680055615] ((~>) [b6989586621680055616] ((~>) [c6989586621680055617] ((~>) [d6989586621680055618] ((~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622]))))))) data ZipWith7Sym1 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) :: (~>) [a6989586621680055615] ((~>) [b6989586621680055616] ((~>) [c6989586621680055617] ((~>) [d6989586621680055618] ((~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622])))))) data ZipWith7Sym2 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) :: (~>) [b6989586621680055616] ((~>) [c6989586621680055617] ((~>) [d6989586621680055618] ((~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622]))))) data ZipWith7Sym3 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) :: (~>) [c6989586621680055617] ((~>) [d6989586621680055618] ((~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622])))) data ZipWith7Sym4 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) (a6989586621680068166 :: [c6989586621680055617]) :: (~>) [d6989586621680055618] ((~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622]))) data ZipWith7Sym5 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) (a6989586621680068166 :: [c6989586621680055617]) (a6989586621680068167 :: [d6989586621680055618]) :: (~>) [e6989586621680055619] ((~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622])) data ZipWith7Sym6 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) (a6989586621680068166 :: [c6989586621680055617]) (a6989586621680068167 :: [d6989586621680055618]) (a6989586621680068168 :: [e6989586621680055619]) :: (~>) [f6989586621680055620] ((~>) [g6989586621680055621] [h6989586621680055622]) data ZipWith7Sym7 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) (a6989586621680068166 :: [c6989586621680055617]) (a6989586621680068167 :: [d6989586621680055618]) (a6989586621680068168 :: [e6989586621680055619]) (a6989586621680068169 :: [f6989586621680055620]) :: (~>) [g6989586621680055621] [h6989586621680055622] type ZipWith7Sym8 (a6989586621680068163 :: (~>) a6989586621680055615 ((~>) b6989586621680055616 ((~>) c6989586621680055617 ((~>) d6989586621680055618 ((~>) e6989586621680055619 ((~>) f6989586621680055620 ((~>) g6989586621680055621 h6989586621680055622))))))) (a6989586621680068164 :: [a6989586621680055615]) (a6989586621680068165 :: [b6989586621680055616]) (a6989586621680068166 :: [c6989586621680055617]) (a6989586621680068167 :: [d6989586621680055618]) (a6989586621680068168 :: [e6989586621680055619]) (a6989586621680068169 :: [f6989586621680055620]) (a6989586621680068170 :: [g6989586621680055621]) = ZipWith7 a6989586621680068163 a6989586621680068164 a6989586621680068165 a6989586621680068166 a6989586621680068167 a6989586621680068168 a6989586621680068169 a6989586621680068170 data UnzipSym0 :: forall a6989586621679929483 b6989586621679929484. (~>) [(a6989586621679929483, b6989586621679929484)] ([a6989586621679929483], [b6989586621679929484]) type UnzipSym1 (a6989586621679939266 :: [(a6989586621679929483, b6989586621679929484)]) = Unzip a6989586621679939266 data Unzip3Sym0 :: forall a6989586621679929480 b6989586621679929481 c6989586621679929482. (~>) [(a6989586621679929480, b6989586621679929481, c6989586621679929482)] ([a6989586621679929480], [b6989586621679929481], [c6989586621679929482]) type Unzip3Sym1 (a6989586621679939245 :: [(a6989586621679929480, b6989586621679929481, c6989586621679929482)]) = Unzip3 a6989586621679939245 data Unzip4Sym0 :: forall a6989586621679929476 b6989586621679929477 c6989586621679929478 d6989586621679929479. (~>) [(a6989586621679929476, b6989586621679929477, c6989586621679929478, d6989586621679929479)] ([a6989586621679929476], [b6989586621679929477], [c6989586621679929478], [d6989586621679929479]) type Unzip4Sym1 (a6989586621679939222 :: [(a6989586621679929476, b6989586621679929477, c6989586621679929478, d6989586621679929479)]) = Unzip4 a6989586621679939222 data Unzip5Sym0 :: forall a6989586621679929471 b6989586621679929472 c6989586621679929473 d6989586621679929474 e6989586621679929475. (~>) [(a6989586621679929471, b6989586621679929472, c6989586621679929473, d6989586621679929474, e6989586621679929475)] ([a6989586621679929471], [b6989586621679929472], [c6989586621679929473], [d6989586621679929474], [e6989586621679929475]) type Unzip5Sym1 (a6989586621679939197 :: [(a6989586621679929471, b6989586621679929472, c6989586621679929473, d6989586621679929474, e6989586621679929475)]) = Unzip5 a6989586621679939197 data Unzip6Sym0 :: forall a6989586621679929465 b6989586621679929466 c6989586621679929467 d6989586621679929468 e6989586621679929469 f6989586621679929470. (~>) [(a6989586621679929465, b6989586621679929466, c6989586621679929467, d6989586621679929468, e6989586621679929469, f6989586621679929470)] ([a6989586621679929465], [b6989586621679929466], [c6989586621679929467], [d6989586621679929468], [e6989586621679929469], [f6989586621679929470]) type Unzip6Sym1 (a6989586621679939170 :: [(a6989586621679929465, b6989586621679929466, c6989586621679929467, d6989586621679929468, e6989586621679929469, f6989586621679929470)]) = Unzip6 a6989586621679939170 data Unzip7Sym0 :: forall a6989586621679929458 b6989586621679929459 c6989586621679929460 d6989586621679929461 e6989586621679929462 f6989586621679929463 g6989586621679929464. (~>) [(a6989586621679929458, b6989586621679929459, c6989586621679929460, d6989586621679929461, e6989586621679929462, f6989586621679929463, g6989586621679929464)] ([a6989586621679929458], [b6989586621679929459], [c6989586621679929460], [d6989586621679929461], [e6989586621679929462], [f6989586621679929463], [g6989586621679929464]) type Unzip7Sym1 (a6989586621679939141 :: [(a6989586621679929458, b6989586621679929459, c6989586621679929460, d6989586621679929461, e6989586621679929462, f6989586621679929463, g6989586621679929464)]) = Unzip7 a6989586621679939141 data UnlinesSym0 :: (~>) [Symbol] Symbol type UnlinesSym1 (a6989586621679939137 :: [Symbol]) = Unlines a6989586621679939137 data UnwordsSym0 :: (~>) [Symbol] Symbol type UnwordsSym1 (a6989586621679939126 :: [Symbol]) = Unwords a6989586621679939126 data NubSym0 :: forall a6989586621679929417. (~>) [a6989586621679929417] [a6989586621679929417] type NubSym1 (a6989586621679939395 :: [a6989586621679929417]) = Nub a6989586621679939395 data DeleteSym0 :: forall a6989586621679929457. (~>) a6989586621679929457 ((~>) [a6989586621679929457] [a6989586621679929457]) data DeleteSym1 (a6989586621679939110 :: a6989586621679929457) :: (~>) [a6989586621679929457] [a6989586621679929457] type DeleteSym2 (a6989586621679939110 :: a6989586621679929457) (a6989586621679939111 :: [a6989586621679929457]) = Delete a6989586621679939110 a6989586621679939111 data (\\@#@$) :: forall a6989586621679929456. (~>) [a6989586621679929456] ((~>) [a6989586621679929456] [a6989586621679929456]) infix 5 \\@#@$ data (\\@#@$$) (a6989586621679939120 :: [a6989586621679929456]) :: (~>) [a6989586621679929456] [a6989586621679929456] infix 5 \\@#@$$ type (\\@#@$$$) (a6989586621679939120 :: [a6989586621679929456]) (a6989586621679939121 :: [a6989586621679929456]) = (\\) a6989586621679939120 a6989586621679939121 data UnionSym0 :: forall a6989586621679929413. (~>) [a6989586621679929413] ((~>) [a6989586621679929413] [a6989586621679929413]) data UnionSym1 (a6989586621679939100 :: [a6989586621679929413]) :: (~>) [a6989586621679929413] [a6989586621679929413] type UnionSym2 (a6989586621679939100 :: [a6989586621679929413]) (a6989586621679939101 :: [a6989586621679929413]) = Union a6989586621679939100 a6989586621679939101 data IntersectSym0 :: forall a6989586621679929443. (~>) [a6989586621679929443] ((~>) [a6989586621679929443] [a6989586621679929443]) data IntersectSym1 (a6989586621679939695 :: [a6989586621679929443]) :: (~>) [a6989586621679929443] [a6989586621679929443] type IntersectSym2 (a6989586621679939695 :: [a6989586621679929443]) (a6989586621679939696 :: [a6989586621679929443]) = Intersect a6989586621679939695 a6989586621679939696 data InsertSym0 :: forall a6989586621679929430. (~>) a6989586621679929430 ((~>) [a6989586621679929430] [a6989586621679929430]) data InsertSym1 (a6989586621679939037 :: a6989586621679929430) :: (~>) [a6989586621679929430] [a6989586621679929430] type InsertSym2 (a6989586621679939037 :: a6989586621679929430) (a6989586621679939038 :: [a6989586621679929430]) = Insert a6989586621679939037 a6989586621679939038 data SortSym0 :: forall a6989586621679929429. (~>) [a6989586621679929429] [a6989586621679929429] type SortSym1 (a6989586621679939053 :: [a6989586621679929429]) = Sort a6989586621679939053 data NubBySym0 :: forall a6989586621679929416. (~>) ((~>) a6989586621679929416 ((~>) a6989586621679929416 Bool)) ((~>) [a6989586621679929416] [a6989586621679929416]) data NubBySym1 (a6989586621679938683 :: (~>) a6989586621679929416 ((~>) a6989586621679929416 Bool)) :: (~>) [a6989586621679929416] [a6989586621679929416] type NubBySym2 (a6989586621679938683 :: (~>) a6989586621679929416 ((~>) a6989586621679929416 Bool)) (a6989586621679938684 :: [a6989586621679929416]) = NubBy a6989586621679938683 a6989586621679938684 data DeleteBySym0 :: forall a6989586621679929455. (~>) ((~>) a6989586621679929455 ((~>) a6989586621679929455 Bool)) ((~>) a6989586621679929455 ((~>) [a6989586621679929455] [a6989586621679929455])) data DeleteBySym1 (a6989586621679939056 :: (~>) a6989586621679929455 ((~>) a6989586621679929455 Bool)) :: (~>) a6989586621679929455 ((~>) [a6989586621679929455] [a6989586621679929455]) data DeleteBySym2 (a6989586621679939056 :: (~>) a6989586621679929455 ((~>) a6989586621679929455 Bool)) (a6989586621679939057 :: a6989586621679929455) :: (~>) [a6989586621679929455] [a6989586621679929455] type DeleteBySym3 (a6989586621679939056 :: (~>) a6989586621679929455 ((~>) a6989586621679929455 Bool)) (a6989586621679939057 :: a6989586621679929455) (a6989586621679939058 :: [a6989586621679929455]) = DeleteBy a6989586621679939056 a6989586621679939057 a6989586621679939058 data DeleteFirstsBySym0 :: forall a6989586621679929454. (~>) ((~>) a6989586621679929454 ((~>) a6989586621679929454 Bool)) ((~>) [a6989586621679929454] ((~>) [a6989586621679929454] [a6989586621679929454])) data DeleteFirstsBySym1 (a6989586621679939074 :: (~>) a6989586621679929454 ((~>) a6989586621679929454 Bool)) :: (~>) [a6989586621679929454] ((~>) [a6989586621679929454] [a6989586621679929454]) data DeleteFirstsBySym2 (a6989586621679939074 :: (~>) a6989586621679929454 ((~>) a6989586621679929454 Bool)) (a6989586621679939075 :: [a6989586621679929454]) :: (~>) [a6989586621679929454] [a6989586621679929454] type DeleteFirstsBySym3 (a6989586621679939074 :: (~>) a6989586621679929454 ((~>) a6989586621679929454 Bool)) (a6989586621679939075 :: [a6989586621679929454]) (a6989586621679939076 :: [a6989586621679929454]) = DeleteFirstsBy a6989586621679939074 a6989586621679939075 a6989586621679939076 data UnionBySym0 :: forall a6989586621679929414. (~>) ((~>) a6989586621679929414 ((~>) a6989586621679929414 Bool)) ((~>) [a6989586621679929414] ((~>) [a6989586621679929414] [a6989586621679929414])) data UnionBySym1 (a6989586621679939087 :: (~>) a6989586621679929414 ((~>) a6989586621679929414 Bool)) :: (~>) [a6989586621679929414] ((~>) [a6989586621679929414] [a6989586621679929414]) data UnionBySym2 (a6989586621679939087 :: (~>) a6989586621679929414 ((~>) a6989586621679929414 Bool)) (a6989586621679939088 :: [a6989586621679929414]) :: (~>) [a6989586621679929414] [a6989586621679929414] type UnionBySym3 (a6989586621679939087 :: (~>) a6989586621679929414 ((~>) a6989586621679929414 Bool)) (a6989586621679939088 :: [a6989586621679929414]) (a6989586621679939089 :: [a6989586621679929414]) = UnionBy a6989586621679939087 a6989586621679939088 a6989586621679939089 data IntersectBySym0 :: forall a6989586621679929442. (~>) ((~>) a6989586621679929442 ((~>) a6989586621679929442 Bool)) ((~>) [a6989586621679929442] ((~>) [a6989586621679929442] [a6989586621679929442])) data IntersectBySym1 (a6989586621679939659 :: (~>) a6989586621679929442 ((~>) a6989586621679929442 Bool)) :: (~>) [a6989586621679929442] ((~>) [a6989586621679929442] [a6989586621679929442]) data IntersectBySym2 (a6989586621679939659 :: (~>) a6989586621679929442 ((~>) a6989586621679929442 Bool)) (a6989586621679939660 :: [a6989586621679929442]) :: (~>) [a6989586621679929442] [a6989586621679929442] type IntersectBySym3 (a6989586621679939659 :: (~>) a6989586621679929442 ((~>) a6989586621679929442 Bool)) (a6989586621679939660 :: [a6989586621679929442]) (a6989586621679939661 :: [a6989586621679929442]) = IntersectBy a6989586621679939659 a6989586621679939660 a6989586621679939661 data GroupBySym0 :: forall a6989586621679929428. (~>) ((~>) a6989586621679929428 ((~>) a6989586621679929428 Bool)) ((~>) [a6989586621679929428] [[a6989586621679929428]]) data GroupBySym1 (a6989586621679938924 :: (~>) a6989586621679929428 ((~>) a6989586621679929428 Bool)) :: (~>) [a6989586621679929428] [[a6989586621679929428]] type GroupBySym2 (a6989586621679938924 :: (~>) a6989586621679929428 ((~>) a6989586621679929428 Bool)) (a6989586621679938925 :: [a6989586621679929428]) = GroupBy a6989586621679938924 a6989586621679938925 data SortBySym0 :: forall a6989586621679929453. (~>) ((~>) a6989586621679929453 ((~>) a6989586621679929453 Ordering)) ((~>) [a6989586621679929453] [a6989586621679929453]) data SortBySym1 (a6989586621679939043 :: (~>) a6989586621679929453 ((~>) a6989586621679929453 Ordering)) :: (~>) [a6989586621679929453] [a6989586621679929453] type SortBySym2 (a6989586621679939043 :: (~>) a6989586621679929453 ((~>) a6989586621679929453 Ordering)) (a6989586621679939044 :: [a6989586621679929453]) = SortBy a6989586621679939043 a6989586621679939044 data InsertBySym0 :: forall a6989586621679929452. (~>) ((~>) a6989586621679929452 ((~>) a6989586621679929452 Ordering)) ((~>) a6989586621679929452 ((~>) [a6989586621679929452] [a6989586621679929452])) data InsertBySym1 (a6989586621679939013 :: (~>) a6989586621679929452 ((~>) a6989586621679929452 Ordering)) :: (~>) a6989586621679929452 ((~>) [a6989586621679929452] [a6989586621679929452]) data InsertBySym2 (a6989586621679939013 :: (~>) a6989586621679929452 ((~>) a6989586621679929452 Ordering)) (a6989586621679939014 :: a6989586621679929452) :: (~>) [a6989586621679929452] [a6989586621679929452] type InsertBySym3 (a6989586621679939013 :: (~>) a6989586621679929452 ((~>) a6989586621679929452 Ordering)) (a6989586621679939014 :: a6989586621679929452) (a6989586621679939015 :: [a6989586621679929452]) = InsertBy a6989586621679939013 a6989586621679939014 a6989586621679939015 data MaximumBySym0 :: forall a6989586621680438441 t6989586621680438440. (~>) ((~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) ((~>) (t6989586621680438440 a6989586621680438441) a6989586621680438441) data MaximumBySym1 (a6989586621680438952 :: (~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) :: forall t6989586621680438440. (~>) (t6989586621680438440 a6989586621680438441) a6989586621680438441 type MaximumBySym2 (a6989586621680438952 :: (~>) a6989586621680438441 ((~>) a6989586621680438441 Ordering)) (a6989586621680438953 :: t6989586621680438440 a6989586621680438441) = MaximumBy a6989586621680438952 a6989586621680438953 data MinimumBySym0 :: forall a6989586621680438439 t6989586621680438438. (~>) ((~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) ((~>) (t6989586621680438438 a6989586621680438439) a6989586621680438439) data MinimumBySym1 (a6989586621680438927 :: (~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) :: forall t6989586621680438438. (~>) (t6989586621680438438 a6989586621680438439) a6989586621680438439 type MinimumBySym2 (a6989586621680438927 :: (~>) a6989586621680438439 ((~>) a6989586621680438439 Ordering)) (a6989586621680438928 :: t6989586621680438438 a6989586621680438439) = MinimumBy a6989586621680438927 a6989586621680438928 data GenericLengthSym0 :: forall a6989586621679929412 i6989586621679929411. (~>) [a6989586621679929412] i6989586621679929411 type GenericLengthSym1 (a6989586621679938670 :: [a6989586621679929412]) = GenericLength a6989586621679938670 data GenericTakeSym0 :: forall a6989586621680055614 i6989586621680055613. (~>) i6989586621680055613 ((~>) [a6989586621680055614] [a6989586621680055614]) data GenericTakeSym1 (a6989586621680068157 :: i6989586621680055613) :: forall a6989586621680055614. (~>) [a6989586621680055614] [a6989586621680055614] type GenericTakeSym2 (a6989586621680068157 :: i6989586621680055613) (a6989586621680068158 :: [a6989586621680055614]) = GenericTake a6989586621680068157 a6989586621680068158 data GenericDropSym0 :: forall a6989586621680055612 i6989586621680055611. (~>) i6989586621680055611 ((~>) [a6989586621680055612] [a6989586621680055612]) data GenericDropSym1 (a6989586621680068147 :: i6989586621680055611) :: forall a6989586621680055612. (~>) [a6989586621680055612] [a6989586621680055612] type GenericDropSym2 (a6989586621680068147 :: i6989586621680055611) (a6989586621680068148 :: [a6989586621680055612]) = GenericDrop a6989586621680068147 a6989586621680068148 data GenericSplitAtSym0 :: forall a6989586621680055610 i6989586621680055609. (~>) i6989586621680055609 ((~>) [a6989586621680055610] ([a6989586621680055610], [a6989586621680055610])) data GenericSplitAtSym1 (a6989586621680068137 :: i6989586621680055609) :: forall a6989586621680055610. (~>) [a6989586621680055610] ([a6989586621680055610], [a6989586621680055610]) type GenericSplitAtSym2 (a6989586621680068137 :: i6989586621680055609) (a6989586621680068138 :: [a6989586621680055610]) = GenericSplitAt a6989586621680068137 a6989586621680068138 data GenericIndexSym0 :: forall a6989586621680055608 i6989586621680055607. (~>) [a6989586621680055608] ((~>) i6989586621680055607 a6989586621680055608) data GenericIndexSym1 (a6989586621680068127 :: [a6989586621680055608]) :: forall i6989586621680055607. (~>) i6989586621680055607 a6989586621680055608 type GenericIndexSym2 (a6989586621680068127 :: [a6989586621680055608]) (a6989586621680068128 :: i6989586621680055607) = GenericIndex a6989586621680068127 a6989586621680068128 data GenericReplicateSym0 :: forall a6989586621680055606 i6989586621680055605. (~>) i6989586621680055605 ((~>) a6989586621680055606 [a6989586621680055606]) data GenericReplicateSym1 (a6989586621680068117 :: i6989586621680055605) :: forall a6989586621680055606. (~>) a6989586621680055606 [a6989586621680055606] type GenericReplicateSym2 (a6989586621680068117 :: i6989586621680055605) (a6989586621680068118 :: a6989586621680055606) = GenericReplicate a6989586621680068117 a6989586621680068118 -- | Defines the promoted and singled versions of the MonadZip type -- class. module Data.Singletons.Prelude.Monad.Zip class PMonad m_a8AJd => PMonadZip (m_a8AJd :: Type -> Type) where { type family Mzip (arg_a8AKr :: m_a8AJd a_a8AJe) (arg_a8AKs :: m_a8AJd b_a8AJf) :: m_a8AJd (a_a8AJe, b_a8AJf); type family MzipWith (arg_a8AKv :: (~>) a_a8AJg ((~>) b_a8AJh c_a8AJi)) (arg_a8AKw :: m_a8AJd a_a8AJg) (arg_a8AKx :: m_a8AJd b_a8AJh) :: m_a8AJd c_a8AJi; type family Munzip (arg_a8AKB :: m_a8AJd (a_a8AJj, b_a8AJk)) :: (m_a8AJd a_a8AJj, m_a8AJd b_a8AJk); type Mzip a_a8AKN a_a8AKO = Apply (Apply Mzip_6989586621681057703Sym0 a_a8AKN) a_a8AKO; type MzipWith a_a8AL2 a_a8AL3 a_a8AL4 = Apply (Apply (Apply MzipWith_6989586621681057719Sym0 a_a8AL2) a_a8AL3) a_a8AL4; type Munzip a_a8ALd = Apply Munzip_6989586621681057728Sym0 a_a8ALd; } class SMonad m_a8AJd => SMonadZip (m_a8AJd :: Type -> Type) sMzip :: forall a_a8AJe b_a8AJf (t_a8APl :: m_a8AJd a_a8AJe) (t_a8APm :: m_a8AJd b_a8AJf). SMonadZip m_a8AJd => Sing t_a8APl -> Sing t_a8APm -> Sing (Apply (Apply MzipSym0 t_a8APl) t_a8APm :: m_a8AJd (a_a8AJe, b_a8AJf)) sMzipWith :: forall a_a8AJg b_a8AJh c_a8AJi (t_a8APp :: (~>) a_a8AJg ((~>) b_a8AJh c_a8AJi)) (t_a8APq :: m_a8AJd a_a8AJg) (t_a8APr :: m_a8AJd b_a8AJh). SMonadZip m_a8AJd => Sing t_a8APp -> Sing t_a8APq -> Sing t_a8APr -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8APp) t_a8APq) t_a8APr :: m_a8AJd c_a8AJi) sMunzip :: forall a_a8AJj b_a8AJk (t_a8APv :: m_a8AJd (a_a8AJj, b_a8AJk)). SMonadZip m_a8AJd => Sing t_a8APv -> Sing (Apply MunzipSym0 t_a8APv :: (m_a8AJd a_a8AJj, m_a8AJd b_a8AJk)) sMzip :: forall a_a8AJe b_a8AJf (t_a8APl :: m_a8AJd a_a8AJe) (t_a8APm :: m_a8AJd b_a8AJf). (SMonadZip m_a8AJd, (Apply (Apply MzipSym0 t_a8APl) t_a8APm :: m_a8AJd (a_a8AJe, b_a8AJf)) ~ Apply (Apply Mzip_6989586621681057703Sym0 t_a8APl) t_a8APm) => Sing t_a8APl -> Sing t_a8APm -> Sing (Apply (Apply MzipSym0 t_a8APl) t_a8APm :: m_a8AJd (a_a8AJe, b_a8AJf)) sMzipWith :: forall a_a8AJg b_a8AJh c_a8AJi (t_a8APp :: (~>) a_a8AJg ((~>) b_a8AJh c_a8AJi)) (t_a8APq :: m_a8AJd a_a8AJg) (t_a8APr :: m_a8AJd b_a8AJh). (SMonadZip m_a8AJd, (Apply (Apply (Apply MzipWithSym0 t_a8APp) t_a8APq) t_a8APr :: m_a8AJd c_a8AJi) ~ Apply (Apply (Apply MzipWith_6989586621681057719Sym0 t_a8APp) t_a8APq) t_a8APr) => Sing t_a8APp -> Sing t_a8APq -> Sing t_a8APr -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8APp) t_a8APq) t_a8APr :: m_a8AJd c_a8AJi) sMunzip :: forall a_a8AJj b_a8AJk (t_a8APv :: m_a8AJd (a_a8AJj, b_a8AJk)). (SMonadZip m_a8AJd, (Apply MunzipSym0 t_a8APv :: (m_a8AJd a_a8AJj, m_a8AJd b_a8AJk)) ~ Apply Munzip_6989586621681057728Sym0 t_a8APv) => Sing t_a8APv -> Sing (Apply MunzipSym0 t_a8APv :: (m_a8AJd a_a8AJj, m_a8AJd b_a8AJk)) data MzipSym0 :: forall a6989586621681057604 b6989586621681057605 m6989586621681057603. (~>) (m6989586621681057603 a6989586621681057604) ((~>) (m6989586621681057603 b6989586621681057605) (m6989586621681057603 (a6989586621681057604, b6989586621681057605))) data MzipSym1 (arg6989586621681057679 :: m6989586621681057603 a6989586621681057604) :: forall b6989586621681057605. (~>) (m6989586621681057603 b6989586621681057605) (m6989586621681057603 (a6989586621681057604, b6989586621681057605)) type MzipSym2 (arg6989586621681057679 :: m6989586621681057603 a6989586621681057604) (arg6989586621681057680 :: m6989586621681057603 b6989586621681057605) = Mzip arg6989586621681057679 arg6989586621681057680 data MzipWithSym0 :: forall a6989586621681057606 b6989586621681057607 c6989586621681057608 m6989586621681057603. (~>) ((~>) a6989586621681057606 ((~>) b6989586621681057607 c6989586621681057608)) ((~>) (m6989586621681057603 a6989586621681057606) ((~>) (m6989586621681057603 b6989586621681057607) (m6989586621681057603 c6989586621681057608))) data MzipWithSym1 (arg6989586621681057683 :: (~>) a6989586621681057606 ((~>) b6989586621681057607 c6989586621681057608)) :: forall m6989586621681057603. (~>) (m6989586621681057603 a6989586621681057606) ((~>) (m6989586621681057603 b6989586621681057607) (m6989586621681057603 c6989586621681057608)) data MzipWithSym2 (arg6989586621681057683 :: (~>) a6989586621681057606 ((~>) b6989586621681057607 c6989586621681057608)) (arg6989586621681057684 :: m6989586621681057603 a6989586621681057606) :: (~>) (m6989586621681057603 b6989586621681057607) (m6989586621681057603 c6989586621681057608) type MzipWithSym3 (arg6989586621681057683 :: (~>) a6989586621681057606 ((~>) b6989586621681057607 c6989586621681057608)) (arg6989586621681057684 :: m6989586621681057603 a6989586621681057606) (arg6989586621681057685 :: m6989586621681057603 b6989586621681057607) = MzipWith arg6989586621681057683 arg6989586621681057684 arg6989586621681057685 data MunzipSym0 :: forall a6989586621681057609 b6989586621681057610 m6989586621681057603. (~>) (m6989586621681057603 (a6989586621681057609, b6989586621681057610)) (m6989586621681057603 a6989586621681057609, m6989586621681057603 b6989586621681057610) type MunzipSym1 (arg6989586621681057689 :: m6989586621681057603 (a6989586621681057609, b6989586621681057610)) = Munzip arg6989586621681057689 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_6989586621681057978Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.Last instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057975 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057978Sym1 a6989586621681057975) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057976 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057975 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057978Sym2 a6989586621681057976 a6989586621681057975) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057955Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.First instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057952 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057955Sym1 a6989586621681057952) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057953 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057952 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057955Sym2 a6989586621681057953 a6989586621681057952) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057932Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Maybe.Maybe instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057929 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057932Sym1 a6989586621681057929) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057930 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057929 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057932Sym2 a6989586621681057930 a6989586621681057929) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057909Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Product instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057906 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057909Sym1 a6989586621681057906) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057907 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057906 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057909Sym2 a6989586621681057907 a6989586621681057906) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057886Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Sum instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057883 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057886Sym1 a6989586621681057883) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057884 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057883 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057886Sym2 a6989586621681057884 a6989586621681057883) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057863Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Dual instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057860 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057863Sym1 a6989586621681057860) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057861 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057860 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057863Sym2 a6989586621681057861 a6989586621681057860) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681057842Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Functor.Identity.Identity instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057832Sym0 instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057829 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057832Sym1 a6989586621681057829) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057830 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057829 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057832Sym2 a6989586621681057830 a6989586621681057829) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681057811Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip [] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057800Sym0 instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057797 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057800Sym1 a6989586621681057797) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057798 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057797 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057800Sym2 a6989586621681057798 a6989586621681057797) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681057778Sym0 instance forall b6989586621681057605 (m6989586621681057603 :: * -> *) a6989586621681057604 (a6989586621681057776 :: m6989586621681057603 a6989586621681057604). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681057778Sym1 a6989586621681057776) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MunzipSym0 instance forall b6989586621681057605 (m6989586621681057603 :: * -> *) a6989586621681057604 (arg6989586621681057679 :: m6989586621681057603 a6989586621681057604). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipSym1 arg6989586621681057679) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipSym0 instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (arg6989586621681057684 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (arg6989586621681057683 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym2 arg6989586621681057684 arg6989586621681057683) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (arg6989586621681057683 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym1 arg6989586621681057683) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWithSym0 instance forall b6989586621681057605 (m6989586621681057603 :: * -> *) a6989586621681057604 (a6989586621681057701 :: m6989586621681057603 a6989586621681057604). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681057703Sym1 a6989586621681057701) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681057703Sym0 instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057717 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681057716 :: m6989586621681057603 a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057719Sym2 a6989586621681057717 a6989586621681057716) instance forall (m6989586621681057603 :: * -> *) a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681057716 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057719Sym1 a6989586621681057716) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681057719Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681057728Sym0 -- | 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 data family. data family Sing :: k -> Type infixr 5 :%| type SNonEmpty = (Sing :: NonEmpty a_aevL -> Type) type family Map (a_a8Jra :: (~>) a_a8J11 b_a8J12) (a_a8Jrb :: NonEmpty a_a8J11) :: NonEmpty b_a8J12 sMap :: forall a_a8J11 b_a8J12 (t_a8JxA :: (~>) a_a8J11 b_a8J12) (t_a8JxB :: NonEmpty a_a8J11). Sing t_a8JxA -> Sing t_a8JxB -> Sing (Apply (Apply MapSym0 t_a8JxA) t_a8JxB :: NonEmpty b_a8J12) type family Intersperse (a_a8Jr0 :: a_a8J0R) (a_a8Jr1 :: NonEmpty a_a8J0R) :: NonEmpty a_a8J0R sIntersperse :: forall a_a8J0R (t_a8Jxw :: a_a8J0R) (t_a8Jxx :: NonEmpty a_a8J0R). Sing t_a8Jxw -> Sing t_a8Jxx -> Sing (Apply (Apply IntersperseSym0 t_a8Jxw) t_a8Jxx :: NonEmpty a_a8J0R) type family Scanl (a_a8Jtu :: (~>) b_a8J0W ((~>) a_a8J0X b_a8J0W)) (a_a8Jtv :: b_a8J0W) (a_a8Jtw :: [a_a8J0X]) :: NonEmpty b_a8J0W sScanl :: forall b_a8J0W a_a8J0X (t_a8JyI :: (~>) b_a8J0W ((~>) a_a8J0X b_a8J0W)) (t_a8JyJ :: b_a8J0W) (t_a8JyK :: [a_a8J0X]). Sing t_a8JyI -> Sing t_a8JyJ -> Sing t_a8JyK -> Sing (Apply (Apply (Apply ScanlSym0 t_a8JyI) t_a8JyJ) t_a8JyK :: NonEmpty b_a8J0W) type family Scanr (a_a8JtF :: (~>) a_a8J0U ((~>) b_a8J0V b_a8J0V)) (a_a8JtG :: b_a8J0V) (a_a8JtH :: [a_a8J0U]) :: NonEmpty b_a8J0V sScanr :: forall a_a8J0U b_a8J0V (t_a8JyO :: (~>) a_a8J0U ((~>) b_a8J0V b_a8J0V)) (t_a8JyP :: b_a8J0V) (t_a8JyQ :: [a_a8J0U]). Sing t_a8JyO -> Sing t_a8JyP -> Sing t_a8JyQ -> Sing (Apply (Apply (Apply ScanrSym0 t_a8JyO) t_a8JyP) t_a8JyQ :: NonEmpty b_a8J0V) type family Scanl1 (a_a8JtQ :: (~>) a_a8J0T ((~>) a_a8J0T a_a8J0T)) (a_a8JtR :: NonEmpty a_a8J0T) :: NonEmpty a_a8J0T sScanl1 :: forall a_a8J0T (t_a8JyU :: (~>) a_a8J0T ((~>) a_a8J0T a_a8J0T)) (t_a8JyV :: NonEmpty a_a8J0T). Sing t_a8JyU -> Sing t_a8JyV -> Sing (Apply (Apply Scanl1Sym0 t_a8JyU) t_a8JyV :: NonEmpty a_a8J0T) type family Scanr1 (a_a8JtX :: (~>) a_a8J0S ((~>) a_a8J0S a_a8J0S)) (a_a8JtY :: NonEmpty a_a8J0S) :: NonEmpty a_a8J0S sScanr1 :: forall a_a8J0S (t_a8JyY :: (~>) a_a8J0S ((~>) a_a8J0S a_a8J0S)) (t_a8JyZ :: NonEmpty a_a8J0S). Sing t_a8JyY -> Sing t_a8JyZ -> Sing (Apply (Apply Scanr1Sym0 t_a8JyY) t_a8JyZ :: NonEmpty a_a8J0S) type family Transpose (a_a8JvT :: NonEmpty (NonEmpty a_a8J0j)) :: NonEmpty (NonEmpty a_a8J0j) sTranspose :: forall a_a8J0j (t_a8JzE :: NonEmpty (NonEmpty a_a8J0j)). Sing t_a8JzE -> Sing (Apply TransposeSym0 t_a8JzE :: NonEmpty (NonEmpty a_a8J0j)) type family SortBy (a_a8JsM :: (~>) a_a8J0i ((~>) a_a8J0i Ordering)) (a_a8JsN :: NonEmpty a_a8J0i) :: NonEmpty a_a8J0i sSortBy :: forall a_a8J0i (t_a8Jyo :: (~>) a_a8J0i ((~>) a_a8J0i Ordering)) (t_a8Jyp :: NonEmpty a_a8J0i). Sing t_a8Jyo -> Sing t_a8Jyp -> Sing (Apply (Apply SortBySym0 t_a8Jyo) t_a8Jyp :: NonEmpty a_a8J0i) type family SortWith (a_a8JsY :: (~>) a_a8J0h o_a8J0g) (a_a8JsZ :: NonEmpty a_a8J0h) :: NonEmpty a_a8J0h sSortWith :: forall o_a8J0g a_a8J0h (t_a8Jys :: (~>) a_a8J0h o_a8J0g) (t_a8Jyt :: NonEmpty a_a8J0h). SOrd o_a8J0g => Sing t_a8Jys -> Sing t_a8Jyt -> Sing (Apply (Apply SortWithSym0 t_a8Jys) t_a8Jyt :: NonEmpty a_a8J0h) type family Length (a_a8JvH :: NonEmpty a_a8J1k) :: Nat sLength :: forall a_a8J1k (t_a8Jzy :: NonEmpty a_a8J1k). Sing t_a8Jzy -> Sing (Apply LengthSym0 t_a8Jzy :: Nat) type family Head (a_a8JuB :: NonEmpty a_a8J1d) :: a_a8J1d sHead :: forall a_a8J1d (t_a8Jzi :: NonEmpty a_a8J1d). Sing t_a8Jzi -> Sing (Apply HeadSym0 t_a8Jzi :: a_a8J1d) type family Tail (a_a8Juy :: NonEmpty a_a8J1c) :: [a_a8J1c] sTail :: forall a_a8J1c (t_a8Jzg :: NonEmpty a_a8J1c). Sing t_a8Jzg -> Sing (Apply TailSym0 t_a8Jzg :: [a_a8J1c]) type family Last (a_a8Juu :: NonEmpty a_a8J1b) :: a_a8J1b sLast :: forall a_a8J1b (t_a8Jze :: NonEmpty a_a8J1b). Sing t_a8Jze -> Sing (Apply LastSym0 t_a8Jze :: a_a8J1b) type family Init (a_a8Juq :: NonEmpty a_a8J1a) :: [a_a8J1a] sInit :: forall a_a8J1a (t_a8Jzc :: NonEmpty a_a8J1a). Sing t_a8Jzc -> Sing (Apply InitSym0 t_a8Jzc :: [a_a8J1a]) type family (<|) (a_a8Ju9 :: a_a8J19) (a_a8Jua :: NonEmpty a_a8J19) :: NonEmpty a_a8J19 (%<|) :: forall a_a8J19 (t_a8Jz4 :: a_a8J19) (t_a8Jz5 :: NonEmpty a_a8J19). Sing t_a8Jz4 -> Sing t_a8Jz5 -> Sing (Apply (Apply (<|@#@$) t_a8Jz4) t_a8Jz5 :: NonEmpty a_a8J19) type family Cons (a_a8Juk :: a_a8J18) (a_a8Jul :: NonEmpty a_a8J18) :: NonEmpty a_a8J18 sCons :: forall a_a8J18 (t_a8Jz8 :: a_a8J18) (t_a8Jz9 :: NonEmpty a_a8J18). Sing t_a8Jz8 -> Sing t_a8Jz9 -> Sing (Apply (Apply ConsSym0 t_a8Jz8) t_a8Jz9 :: NonEmpty a_a8J18) type family Uncons (a_a8Jvb :: NonEmpty a_a8J1g) :: (a_a8J1g, Maybe (NonEmpty a_a8J1g)) sUncons :: forall a_a8J1g (t_a8Jzq :: NonEmpty a_a8J1g). Sing t_a8Jzq -> Sing (Apply UnconsSym0 t_a8Jzq :: (a_a8J1g, Maybe (NonEmpty a_a8J1g))) type family Unfoldr (a_a8JuE :: (~>) a_a8J1e (b_a8J1f, Maybe a_a8J1e)) (a_a8JuF :: a_a8J1e) :: NonEmpty b_a8J1f sUnfoldr :: forall a_a8J1e b_a8J1f (t_a8Jzk :: (~>) a_a8J1e (b_a8J1f, Maybe a_a8J1e)) (t_a8Jzl :: a_a8J1e). Sing t_a8Jzk -> Sing t_a8Jzl -> Sing (Apply (Apply UnfoldrSym0 t_a8Jzk) t_a8Jzl :: NonEmpty b_a8J1f) type family Sort (a_a8Ju6 :: NonEmpty a_a8J17) :: NonEmpty a_a8J17 sSort :: forall a_a8J17 (t_a8Jz2 :: NonEmpty a_a8J17). SOrd a_a8J17 => Sing t_a8Jz2 -> Sing (Apply SortSym0 t_a8Jz2 :: NonEmpty a_a8J17) type family Reverse (a_a8JsJ :: NonEmpty a_a8J0Q) :: NonEmpty a_a8J0Q sReverse :: forall a_a8J0Q (t_a8Jym :: NonEmpty a_a8J0Q). Sing t_a8Jym -> Sing (Apply ReverseSym0 t_a8Jym :: NonEmpty a_a8J0Q) type family Inits (a_a8Jte :: [a_a8J10]) :: NonEmpty [a_a8J10] sInits :: forall a_a8J10 (t_a8JyA :: [a_a8J10]). Sing t_a8JyA -> Sing (Apply InitsSym0 t_a8JyA :: NonEmpty [a_a8J10]) type family Tails (a_a8Jtj :: [a_a8J0Z]) :: NonEmpty [a_a8J0Z] sTails :: forall a_a8J0Z (t_a8JyC :: [a_a8J0Z]). Sing t_a8JyC -> Sing (Apply TailsSym0 t_a8JyC :: NonEmpty [a_a8J0Z]) type family Unfold (a_a8Jvf :: (~>) a_a8J1i (b_a8J1j, Maybe a_a8J1i)) (a_a8Jvg :: a_a8J1i) :: NonEmpty b_a8J1j sUnfold :: forall a_a8J1i b_a8J1j (t_a8Jzs :: (~>) a_a8J1i (b_a8J1j, Maybe a_a8J1i)) (t_a8Jzt :: a_a8J1i). Sing t_a8Jzs -> Sing t_a8Jzt -> Sing (Apply (Apply UnfoldSym0 t_a8Jzs) t_a8Jzt :: NonEmpty b_a8J1j) type family Insert (a_a8Jtm :: a_a8J0Y) (a_a8Jtn :: [a_a8J0Y]) :: NonEmpty a_a8J0Y sInsert :: forall a_a8J0Y (t_a8JyE :: a_a8J0Y) (t_a8JyF :: [a_a8J0Y]). SOrd a_a8J0Y => Sing t_a8JyE -> Sing t_a8JyF -> Sing (Apply (Apply InsertSym0 t_a8JyE) t_a8JyF :: NonEmpty a_a8J0Y) type family Take (a_a8Jrl :: Nat) (a_a8Jrm :: NonEmpty a_a8J0P) :: [a_a8J0P] sTake :: forall a_a8J0P (t_a8JxG :: Nat) (t_a8JxH :: NonEmpty a_a8J0P). Sing t_a8JxG -> Sing t_a8JxH -> Sing (Apply (Apply TakeSym0 t_a8JxG) t_a8JxH :: [a_a8J0P]) type family Drop (a_a8Jrt :: Nat) (a_a8Jru :: NonEmpty a_a8J0O) :: [a_a8J0O] sDrop :: forall a_a8J0O (t_a8JxK :: Nat) (t_a8JxL :: NonEmpty a_a8J0O). Sing t_a8JxK -> Sing t_a8JxL -> Sing (Apply (Apply DropSym0 t_a8JxK) t_a8JxL :: [a_a8J0O]) type family SplitAt (a_a8JrB :: Nat) (a_a8JrC :: NonEmpty a_a8J0N) :: ([a_a8J0N], [a_a8J0N]) sSplitAt :: forall a_a8J0N (t_a8JxO :: Nat) (t_a8JxP :: NonEmpty a_a8J0N). Sing t_a8JxO -> Sing t_a8JxP -> Sing (Apply (Apply SplitAtSym0 t_a8JxO) t_a8JxP :: ([a_a8J0N], [a_a8J0N])) type family TakeWhile (a_a8JrJ :: (~>) a_a8J0M Bool) (a_a8JrK :: NonEmpty a_a8J0M) :: [a_a8J0M] sTakeWhile :: forall a_a8J0M (t_a8JxS :: (~>) a_a8J0M Bool) (t_a8JxT :: NonEmpty a_a8J0M). Sing t_a8JxS -> Sing t_a8JxT -> Sing (Apply (Apply TakeWhileSym0 t_a8JxS) t_a8JxT :: [a_a8J0M]) type family DropWhile (a_a8JrR :: (~>) a_a8J0L Bool) (a_a8JrS :: NonEmpty a_a8J0L) :: [a_a8J0L] sDropWhile :: forall a_a8J0L (t_a8JxW :: (~>) a_a8J0L Bool) (t_a8JxX :: NonEmpty a_a8J0L). Sing t_a8JxW -> Sing t_a8JxX -> Sing (Apply (Apply DropWhileSym0 t_a8JxW) t_a8JxX :: [a_a8J0L]) type family Span (a_a8JrZ :: (~>) a_a8J0K Bool) (a_a8Js0 :: NonEmpty a_a8J0K) :: ([a_a8J0K], [a_a8J0K]) sSpan :: forall a_a8J0K (t_a8Jy0 :: (~>) a_a8J0K Bool) (t_a8Jy1 :: NonEmpty a_a8J0K). Sing t_a8Jy0 -> Sing t_a8Jy1 -> Sing (Apply (Apply SpanSym0 t_a8Jy0) t_a8Jy1 :: ([a_a8J0K], [a_a8J0K])) type family Break (a_a8Js7 :: (~>) a_a8J0J Bool) (a_a8Js8 :: NonEmpty a_a8J0J) :: ([a_a8J0J], [a_a8J0J]) sBreak :: forall a_a8J0J (t_a8Jy4 :: (~>) a_a8J0J Bool) (t_a8Jy5 :: NonEmpty a_a8J0J). Sing t_a8Jy4 -> Sing t_a8Jy5 -> Sing (Apply (Apply BreakSym0 t_a8Jy4) t_a8Jy5 :: ([a_a8J0J], [a_a8J0J])) type family Filter (a_a8Jsf :: (~>) a_a8J0I Bool) (a_a8Jsg :: NonEmpty a_a8J0I) :: [a_a8J0I] sFilter :: forall a_a8J0I (t_a8Jy8 :: (~>) a_a8J0I Bool) (t_a8Jy9 :: NonEmpty a_a8J0I). Sing t_a8Jy8 -> Sing t_a8Jy9 -> Sing (Apply (Apply FilterSym0 t_a8Jy8) t_a8Jy9 :: [a_a8J0I]) type family Partition (a_a8Jsn :: (~>) a_a8J0H Bool) (a_a8Jso :: NonEmpty a_a8J0H) :: ([a_a8J0H], [a_a8J0H]) sPartition :: forall a_a8J0H (t_a8Jyc :: (~>) a_a8J0H Bool) (t_a8Jyd :: NonEmpty a_a8J0H). Sing t_a8Jyc -> Sing t_a8Jyd -> Sing (Apply (Apply PartitionSym0 t_a8Jyc) t_a8Jyd :: ([a_a8J0H], [a_a8J0H])) type family Group (a_a8JqX :: [a_a8J0G]) :: [NonEmpty a_a8J0G] sGroup :: forall a_a8J0G (t_a8Jxu :: [a_a8J0G]). SEq a_a8J0G => Sing t_a8Jxu -> Sing (Apply GroupSym0 t_a8Jxu :: [NonEmpty a_a8J0G]) type family GroupBy (a_a8Jpb :: (~>) a_a8J0F ((~>) a_a8J0F Bool)) (a_a8Jpc :: [a_a8J0F]) :: [NonEmpty a_a8J0F] sGroupBy :: forall a_a8J0F (t_a8Jx8 :: (~>) a_a8J0F ((~>) a_a8J0F Bool)) (t_a8Jx9 :: [a_a8J0F]). Sing t_a8Jx8 -> Sing t_a8Jx9 -> Sing (Apply (Apply GroupBySym0 t_a8Jx8) t_a8Jx9 :: [NonEmpty a_a8J0F]) type family GroupWith (a_a8JpX :: (~>) a_a8J0E b_a8J0D) (a_a8JpY :: [a_a8J0E]) :: [NonEmpty a_a8J0E] sGroupWith :: forall b_a8J0D a_a8J0E (t_a8Jxc :: (~>) a_a8J0E b_a8J0D) (t_a8Jxd :: [a_a8J0E]). SEq b_a8J0D => Sing t_a8Jxc -> Sing t_a8Jxd -> Sing (Apply (Apply GroupWithSym0 t_a8Jxc) t_a8Jxd :: [NonEmpty a_a8J0E]) type family GroupAllWith (a_a8Jq5 :: (~>) a_a8J0C b_a8J0B) (a_a8Jq6 :: [a_a8J0C]) :: [NonEmpty a_a8J0C] sGroupAllWith :: forall b_a8J0B a_a8J0C (t_a8Jxg :: (~>) a_a8J0C b_a8J0B) (t_a8Jxh :: [a_a8J0C]). SOrd b_a8J0B => Sing t_a8Jxg -> Sing t_a8Jxh -> Sing (Apply (Apply GroupAllWithSym0 t_a8Jxg) t_a8Jxh :: [NonEmpty a_a8J0C]) type family Group1 (a_a8JqK :: NonEmpty a_a8J0A) :: NonEmpty (NonEmpty a_a8J0A) sGroup1 :: forall a_a8J0A (t_a8Jxo :: NonEmpty a_a8J0A). SEq a_a8J0A => Sing t_a8Jxo -> Sing (Apply Group1Sym0 t_a8Jxo :: NonEmpty (NonEmpty a_a8J0A)) type family GroupBy1 (a_a8Jqd :: (~>) a_a8J0z ((~>) a_a8J0z Bool)) (a_a8Jqe :: NonEmpty a_a8J0z) :: NonEmpty (NonEmpty a_a8J0z) sGroupBy1 :: forall a_a8J0z (t_a8Jxk :: (~>) a_a8J0z ((~>) a_a8J0z Bool)) (t_a8Jxl :: NonEmpty a_a8J0z). Sing t_a8Jxk -> Sing t_a8Jxl -> Sing (Apply (Apply GroupBy1Sym0 t_a8Jxk) t_a8Jxl :: NonEmpty (NonEmpty a_a8J0z)) type family GroupWith1 (a_a8JqN :: (~>) a_a8J0y b_a8J0x) (a_a8JqO :: NonEmpty a_a8J0y) :: NonEmpty (NonEmpty a_a8J0y) sGroupWith1 :: forall b_a8J0x a_a8J0y (t_a8Jxq :: (~>) a_a8J0y b_a8J0x) (t_a8Jxr :: NonEmpty a_a8J0y). SEq b_a8J0x => Sing t_a8Jxq -> Sing t_a8Jxr -> Sing (Apply (Apply GroupWith1Sym0 t_a8Jxq) t_a8Jxr :: NonEmpty (NonEmpty a_a8J0y)) type family GroupAllWith1 (a_a8Jt4 :: (~>) a_a8J0w b_a8J0v) (a_a8Jt5 :: NonEmpty a_a8J0w) :: NonEmpty (NonEmpty a_a8J0w) sGroupAllWith1 :: forall b_a8J0v a_a8J0w (t_a8Jyw :: (~>) a_a8J0w b_a8J0v) (t_a8Jyx :: NonEmpty a_a8J0w). SOrd b_a8J0v => Sing t_a8Jyw -> Sing t_a8Jyx -> Sing (Apply (Apply GroupAllWith1Sym0 t_a8Jyw) t_a8Jyx :: NonEmpty (NonEmpty a_a8J0w)) type family IsPrefixOf (a_a8Jp3 :: [a_a8J0u]) (a_a8Jp4 :: NonEmpty a_a8J0u) :: Bool sIsPrefixOf :: forall a_a8J0u (t_a8Jx4 :: [a_a8J0u]) (t_a8Jx5 :: NonEmpty a_a8J0u). SEq a_a8J0u => Sing t_a8Jx4 -> Sing t_a8Jx5 -> Sing (Apply (Apply IsPrefixOfSym0 t_a8Jx4) t_a8Jx5 :: Bool) type family Nub (a_a8JnW :: NonEmpty a_a8J0l) :: NonEmpty a_a8J0l sNub :: forall a_a8J0l (t_a8JwM :: NonEmpty a_a8J0l). SEq a_a8J0l => Sing t_a8JwM -> Sing (Apply NubSym0 t_a8JwM :: NonEmpty a_a8J0l) type family NubBy (a_a8JnF :: (~>) a_a8J0k ((~>) a_a8J0k Bool)) (a_a8JnG :: NonEmpty a_a8J0k) :: NonEmpty a_a8J0k sNubBy :: forall a_a8J0k (t_a8JwI :: (~>) a_a8J0k ((~>) a_a8J0k Bool)) (t_a8JwJ :: NonEmpty a_a8J0k). Sing t_a8JwI -> Sing t_a8JwJ -> Sing (Apply (Apply NubBySym0 t_a8JwI) t_a8JwJ :: NonEmpty a_a8J0k) type family (!!) (a_a8JoL :: NonEmpty a_a8J0t) (a_a8JoM :: Nat) :: a_a8J0t (%!!) :: forall a_a8J0t (t_a8Jx0 :: NonEmpty a_a8J0t) (t_a8Jx1 :: Nat). Sing t_a8Jx0 -> Sing t_a8Jx1 -> Sing (Apply (Apply (!!@#@$) t_a8Jx0) t_a8Jx1 :: a_a8J0t) type family Zip (a_a8JoD :: NonEmpty a_a8J0r) (a_a8JoE :: NonEmpty b_a8J0s) :: NonEmpty (a_a8J0r, b_a8J0s) sZip :: forall a_a8J0r b_a8J0s (t_a8JwW :: NonEmpty a_a8J0r) (t_a8JwX :: NonEmpty b_a8J0s). Sing t_a8JwW -> Sing t_a8JwX -> Sing (Apply (Apply ZipSym0 t_a8JwW) t_a8JwX :: NonEmpty (a_a8J0r, b_a8J0s)) type family ZipWith (a_a8Jos :: (~>) a_a8J0o ((~>) b_a8J0p c_a8J0q)) (a_a8Jot :: NonEmpty a_a8J0o) (a_a8Jou :: NonEmpty b_a8J0p) :: NonEmpty c_a8J0q sZipWith :: forall a_a8J0o b_a8J0p c_a8J0q (t_a8JwQ :: (~>) a_a8J0o ((~>) b_a8J0p c_a8J0q)) (t_a8JwR :: NonEmpty a_a8J0o) (t_a8JwS :: NonEmpty b_a8J0p). Sing t_a8JwQ -> Sing t_a8JwR -> Sing t_a8JwS -> Sing (Apply (Apply (Apply ZipWithSym0 t_a8JwQ) t_a8JwR) t_a8JwS :: NonEmpty c_a8J0q) type family Unzip (a_a8JnZ :: NonEmpty (a_a8J0m, b_a8J0n)) :: (NonEmpty a_a8J0m, NonEmpty b_a8J0n) sUnzip :: forall a_a8J0m b_a8J0n (t_a8JwO :: NonEmpty (a_a8J0m, b_a8J0n)). Sing t_a8JwO -> Sing (Apply UnzipSym0 t_a8JwO :: (NonEmpty a_a8J0m, NonEmpty b_a8J0n)) type family FromList (a_a8Jsv :: [a_a8J16]) :: NonEmpty a_a8J16 sFromList :: forall a_a8J16 (t_a8Jyg :: [a_a8J16]). Sing t_a8Jyg -> Sing (Apply FromListSym0 t_a8Jyg :: NonEmpty a_a8J16) type family ToList (a_a8Jrh :: NonEmpty a_a8J15) :: [a_a8J15] sToList :: forall a_a8J15 (t_a8JxE :: NonEmpty a_a8J15). Sing t_a8JxE -> Sing (Apply ToListSym0 t_a8JxE :: [a_a8J15]) type family NonEmpty_ (a_a8Jv7 :: [a_a8J1h]) :: Maybe (NonEmpty a_a8J1h) sNonEmpty_ :: forall a_a8J1h (t_a8Jzo :: [a_a8J1h]). Sing t_a8Jzo -> Sing (Apply NonEmpty_Sym0 t_a8Jzo :: Maybe (NonEmpty a_a8J1h)) type family Xor (a_a8Jvu :: NonEmpty Bool) :: Bool sXor :: forall (t_a8Jzw :: NonEmpty Bool). Sing t_a8Jzw -> Sing (Apply XorSym0 t_a8Jzw :: Bool) data (:|@#@$) :: forall (a6989586621679065577 :: Type). (~>) a6989586621679065577 ((~>) [a6989586621679065577] (NonEmpty (a6989586621679065577 :: Type))) infixr 5 :|@#@$ data (:|@#@$$) (t6989586621679291727 :: (a6989586621679065577 :: Type)) :: (~>) [a6989586621679065577] (NonEmpty (a6989586621679065577 :: Type)) infixr 5 :|@#@$$ type (:|@#@$$$) (t6989586621679291727 :: a6989586621679065577) (t6989586621679291728 :: [a6989586621679065577]) = '(:|) t6989586621679291727 t6989586621679291728 data MapSym0 :: forall a6989586621681089459 b6989586621681089460. (~>) ((~>) a6989586621681089459 b6989586621681089460) ((~>) (NonEmpty a6989586621681089459) (NonEmpty b6989586621681089460)) data MapSym1 (a6989586621681091080 :: (~>) a6989586621681089459 b6989586621681089460) :: (~>) (NonEmpty a6989586621681089459) (NonEmpty b6989586621681089460) type MapSym2 (a6989586621681091080 :: (~>) a6989586621681089459 b6989586621681089460) (a6989586621681091081 :: NonEmpty a6989586621681089459) = Map a6989586621681091080 a6989586621681091081 data IntersperseSym0 :: forall a6989586621681089449. (~>) a6989586621681089449 ((~>) (NonEmpty a6989586621681089449) (NonEmpty a6989586621681089449)) data IntersperseSym1 (a6989586621681091070 :: a6989586621681089449) :: (~>) (NonEmpty a6989586621681089449) (NonEmpty a6989586621681089449) type IntersperseSym2 (a6989586621681091070 :: a6989586621681089449) (a6989586621681091071 :: NonEmpty a6989586621681089449) = Intersperse a6989586621681091070 a6989586621681091071 data ScanlSym0 :: forall a6989586621681089455 b6989586621681089454. (~>) ((~>) b6989586621681089454 ((~>) a6989586621681089455 b6989586621681089454)) ((~>) b6989586621681089454 ((~>) [a6989586621681089455] (NonEmpty b6989586621681089454))) data ScanlSym1 (a6989586621681091224 :: (~>) b6989586621681089454 ((~>) a6989586621681089455 b6989586621681089454)) :: (~>) b6989586621681089454 ((~>) [a6989586621681089455] (NonEmpty b6989586621681089454)) data ScanlSym2 (a6989586621681091224 :: (~>) b6989586621681089454 ((~>) a6989586621681089455 b6989586621681089454)) (a6989586621681091225 :: b6989586621681089454) :: (~>) [a6989586621681089455] (NonEmpty b6989586621681089454) type ScanlSym3 (a6989586621681091224 :: (~>) b6989586621681089454 ((~>) a6989586621681089455 b6989586621681089454)) (a6989586621681091225 :: b6989586621681089454) (a6989586621681091226 :: [a6989586621681089455]) = Scanl a6989586621681091224 a6989586621681091225 a6989586621681091226 data ScanrSym0 :: forall a6989586621681089452 b6989586621681089453. (~>) ((~>) a6989586621681089452 ((~>) b6989586621681089453 b6989586621681089453)) ((~>) b6989586621681089453 ((~>) [a6989586621681089452] (NonEmpty b6989586621681089453))) data ScanrSym1 (a6989586621681091235 :: (~>) a6989586621681089452 ((~>) b6989586621681089453 b6989586621681089453)) :: (~>) b6989586621681089453 ((~>) [a6989586621681089452] (NonEmpty b6989586621681089453)) data ScanrSym2 (a6989586621681091235 :: (~>) a6989586621681089452 ((~>) b6989586621681089453 b6989586621681089453)) (a6989586621681091236 :: b6989586621681089453) :: (~>) [a6989586621681089452] (NonEmpty b6989586621681089453) type ScanrSym3 (a6989586621681091235 :: (~>) a6989586621681089452 ((~>) b6989586621681089453 b6989586621681089453)) (a6989586621681091236 :: b6989586621681089453) (a6989586621681091237 :: [a6989586621681089452]) = Scanr a6989586621681091235 a6989586621681091236 a6989586621681091237 data Scanl1Sym0 :: forall a6989586621681089451. (~>) ((~>) a6989586621681089451 ((~>) a6989586621681089451 a6989586621681089451)) ((~>) (NonEmpty a6989586621681089451) (NonEmpty a6989586621681089451)) data Scanl1Sym1 (a6989586621681091246 :: (~>) a6989586621681089451 ((~>) a6989586621681089451 a6989586621681089451)) :: (~>) (NonEmpty a6989586621681089451) (NonEmpty a6989586621681089451) type Scanl1Sym2 (a6989586621681091246 :: (~>) a6989586621681089451 ((~>) a6989586621681089451 a6989586621681089451)) (a6989586621681091247 :: NonEmpty a6989586621681089451) = Scanl1 a6989586621681091246 a6989586621681091247 data Scanr1Sym0 :: forall a6989586621681089450. (~>) ((~>) a6989586621681089450 ((~>) a6989586621681089450 a6989586621681089450)) ((~>) (NonEmpty a6989586621681089450) (NonEmpty a6989586621681089450)) data Scanr1Sym1 (a6989586621681091253 :: (~>) a6989586621681089450 ((~>) a6989586621681089450 a6989586621681089450)) :: (~>) (NonEmpty a6989586621681089450) (NonEmpty a6989586621681089450) type Scanr1Sym2 (a6989586621681091253 :: (~>) a6989586621681089450 ((~>) a6989586621681089450 a6989586621681089450)) (a6989586621681091254 :: NonEmpty a6989586621681089450) = Scanr1 a6989586621681091253 a6989586621681091254 data TransposeSym0 :: forall a6989586621681089415. (~>) (NonEmpty (NonEmpty a6989586621681089415)) (NonEmpty (NonEmpty a6989586621681089415)) type TransposeSym1 (a6989586621681091373 :: NonEmpty (NonEmpty a6989586621681089415)) = Transpose a6989586621681091373 data SortBySym0 :: forall a6989586621681089414. (~>) ((~>) a6989586621681089414 ((~>) a6989586621681089414 Ordering)) ((~>) (NonEmpty a6989586621681089414) (NonEmpty a6989586621681089414)) data SortBySym1 (a6989586621681091180 :: (~>) a6989586621681089414 ((~>) a6989586621681089414 Ordering)) :: (~>) (NonEmpty a6989586621681089414) (NonEmpty a6989586621681089414) type SortBySym2 (a6989586621681091180 :: (~>) a6989586621681089414 ((~>) a6989586621681089414 Ordering)) (a6989586621681091181 :: NonEmpty a6989586621681089414) = SortBy a6989586621681091180 a6989586621681091181 data SortWithSym0 :: forall a6989586621681089413 o6989586621681089412. (~>) ((~>) a6989586621681089413 o6989586621681089412) ((~>) (NonEmpty a6989586621681089413) (NonEmpty a6989586621681089413)) data SortWithSym1 (a6989586621681091192 :: (~>) a6989586621681089413 o6989586621681089412) :: (~>) (NonEmpty a6989586621681089413) (NonEmpty a6989586621681089413) type SortWithSym2 (a6989586621681091192 :: (~>) a6989586621681089413 o6989586621681089412) (a6989586621681091193 :: NonEmpty a6989586621681089413) = SortWith a6989586621681091192 a6989586621681091193 data LengthSym0 :: forall a6989586621681089478. (~>) (NonEmpty a6989586621681089478) Nat type LengthSym1 (a6989586621681091361 :: NonEmpty a6989586621681089478) = Length a6989586621681091361 data HeadSym0 :: forall a6989586621681089471. (~>) (NonEmpty a6989586621681089471) a6989586621681089471 type HeadSym1 (a6989586621681091293 :: NonEmpty a6989586621681089471) = Head a6989586621681091293 data TailSym0 :: forall a6989586621681089470. (~>) (NonEmpty a6989586621681089470) [a6989586621681089470] type TailSym1 (a6989586621681091290 :: NonEmpty a6989586621681089470) = Tail a6989586621681091290 data LastSym0 :: forall a6989586621681089469. (~>) (NonEmpty a6989586621681089469) a6989586621681089469 type LastSym1 (a6989586621681091286 :: NonEmpty a6989586621681089469) = Last a6989586621681091286 data InitSym0 :: forall a6989586621681089468. (~>) (NonEmpty a6989586621681089468) [a6989586621681089468] type InitSym1 (a6989586621681091282 :: NonEmpty a6989586621681089468) = Init a6989586621681091282 data (<|@#@$) :: forall a6989586621681089467. (~>) a6989586621681089467 ((~>) (NonEmpty a6989586621681089467) (NonEmpty a6989586621681089467)) data (<|@#@$$) (a6989586621681091265 :: a6989586621681089467) :: (~>) (NonEmpty a6989586621681089467) (NonEmpty a6989586621681089467) type (<|@#@$$$) (a6989586621681091265 :: a6989586621681089467) (a6989586621681091266 :: NonEmpty a6989586621681089467) = (<|) a6989586621681091265 a6989586621681091266 data ConsSym0 :: forall a6989586621681089466. (~>) a6989586621681089466 ((~>) (NonEmpty a6989586621681089466) (NonEmpty a6989586621681089466)) data ConsSym1 (a6989586621681091276 :: a6989586621681089466) :: (~>) (NonEmpty a6989586621681089466) (NonEmpty a6989586621681089466) type ConsSym2 (a6989586621681091276 :: a6989586621681089466) (a6989586621681091277 :: NonEmpty a6989586621681089466) = Cons a6989586621681091276 a6989586621681091277 data UnconsSym0 :: forall a6989586621681089474. (~>) (NonEmpty a6989586621681089474) (a6989586621681089474, Maybe (NonEmpty a6989586621681089474)) type UnconsSym1 (a6989586621681091329 :: NonEmpty a6989586621681089474) = Uncons a6989586621681091329 data UnfoldrSym0 :: forall a6989586621681089472 b6989586621681089473. (~>) ((~>) a6989586621681089472 (b6989586621681089473, Maybe a6989586621681089472)) ((~>) a6989586621681089472 (NonEmpty b6989586621681089473)) data UnfoldrSym1 (a6989586621681091296 :: (~>) a6989586621681089472 (b6989586621681089473, Maybe a6989586621681089472)) :: (~>) a6989586621681089472 (NonEmpty b6989586621681089473) type UnfoldrSym2 (a6989586621681091296 :: (~>) a6989586621681089472 (b6989586621681089473, Maybe a6989586621681089472)) (a6989586621681091297 :: a6989586621681089472) = Unfoldr a6989586621681091296 a6989586621681091297 data SortSym0 :: forall a6989586621681089465. (~>) (NonEmpty a6989586621681089465) (NonEmpty a6989586621681089465) type SortSym1 (a6989586621681091262 :: NonEmpty a6989586621681089465) = Sort a6989586621681091262 data ReverseSym0 :: forall a6989586621681089448. (~>) (NonEmpty a6989586621681089448) (NonEmpty a6989586621681089448) type ReverseSym1 (a6989586621681091177 :: NonEmpty a6989586621681089448) = Reverse a6989586621681091177 data InitsSym0 :: forall a6989586621681089458. (~>) [a6989586621681089458] (NonEmpty [a6989586621681089458]) type InitsSym1 (a6989586621681091208 :: [a6989586621681089458]) = Inits a6989586621681091208 data TailsSym0 :: forall a6989586621681089457. (~>) [a6989586621681089457] (NonEmpty [a6989586621681089457]) type TailsSym1 (a6989586621681091213 :: [a6989586621681089457]) = Tails a6989586621681091213 data UnfoldSym0 :: forall a6989586621681089476 b6989586621681089477. (~>) ((~>) a6989586621681089476 (b6989586621681089477, Maybe a6989586621681089476)) ((~>) a6989586621681089476 (NonEmpty b6989586621681089477)) data UnfoldSym1 (a6989586621681091333 :: (~>) a6989586621681089476 (b6989586621681089477, Maybe a6989586621681089476)) :: (~>) a6989586621681089476 (NonEmpty b6989586621681089477) data InsertSym0 :: forall a6989586621681089456. (~>) a6989586621681089456 ((~>) [a6989586621681089456] (NonEmpty a6989586621681089456)) data InsertSym1 (a6989586621681091216 :: a6989586621681089456) :: (~>) [a6989586621681089456] (NonEmpty a6989586621681089456) type InsertSym2 (a6989586621681091216 :: a6989586621681089456) (a6989586621681091217 :: [a6989586621681089456]) = Insert a6989586621681091216 a6989586621681091217 data TakeSym0 :: forall a6989586621681089447. (~>) Nat ((~>) (NonEmpty a6989586621681089447) [a6989586621681089447]) data TakeSym1 (a6989586621681091091 :: Nat) :: forall a6989586621681089447. (~>) (NonEmpty a6989586621681089447) [a6989586621681089447] type TakeSym2 (a6989586621681091091 :: Nat) (a6989586621681091092 :: NonEmpty a6989586621681089447) = Take a6989586621681091091 a6989586621681091092 data DropSym0 :: forall a6989586621681089446. (~>) Nat ((~>) (NonEmpty a6989586621681089446) [a6989586621681089446]) data DropSym1 (a6989586621681091099 :: Nat) :: forall a6989586621681089446. (~>) (NonEmpty a6989586621681089446) [a6989586621681089446] type DropSym2 (a6989586621681091099 :: Nat) (a6989586621681091100 :: NonEmpty a6989586621681089446) = Drop a6989586621681091099 a6989586621681091100 data SplitAtSym0 :: forall a6989586621681089445. (~>) Nat ((~>) (NonEmpty a6989586621681089445) ([a6989586621681089445], [a6989586621681089445])) data SplitAtSym1 (a6989586621681091107 :: Nat) :: forall a6989586621681089445. (~>) (NonEmpty a6989586621681089445) ([a6989586621681089445], [a6989586621681089445]) type SplitAtSym2 (a6989586621681091107 :: Nat) (a6989586621681091108 :: NonEmpty a6989586621681089445) = SplitAt a6989586621681091107 a6989586621681091108 data TakeWhileSym0 :: forall a6989586621681089444. (~>) ((~>) a6989586621681089444 Bool) ((~>) (NonEmpty a6989586621681089444) [a6989586621681089444]) data TakeWhileSym1 (a6989586621681091115 :: (~>) a6989586621681089444 Bool) :: (~>) (NonEmpty a6989586621681089444) [a6989586621681089444] type TakeWhileSym2 (a6989586621681091115 :: (~>) a6989586621681089444 Bool) (a6989586621681091116 :: NonEmpty a6989586621681089444) = TakeWhile a6989586621681091115 a6989586621681091116 data DropWhileSym0 :: forall a6989586621681089443. (~>) ((~>) a6989586621681089443 Bool) ((~>) (NonEmpty a6989586621681089443) [a6989586621681089443]) data DropWhileSym1 (a6989586621681091123 :: (~>) a6989586621681089443 Bool) :: (~>) (NonEmpty a6989586621681089443) [a6989586621681089443] type DropWhileSym2 (a6989586621681091123 :: (~>) a6989586621681089443 Bool) (a6989586621681091124 :: NonEmpty a6989586621681089443) = DropWhile a6989586621681091123 a6989586621681091124 data SpanSym0 :: forall a6989586621681089442. (~>) ((~>) a6989586621681089442 Bool) ((~>) (NonEmpty a6989586621681089442) ([a6989586621681089442], [a6989586621681089442])) data SpanSym1 (a6989586621681091131 :: (~>) a6989586621681089442 Bool) :: (~>) (NonEmpty a6989586621681089442) ([a6989586621681089442], [a6989586621681089442]) type SpanSym2 (a6989586621681091131 :: (~>) a6989586621681089442 Bool) (a6989586621681091132 :: NonEmpty a6989586621681089442) = Span a6989586621681091131 a6989586621681091132 data BreakSym0 :: forall a6989586621681089441. (~>) ((~>) a6989586621681089441 Bool) ((~>) (NonEmpty a6989586621681089441) ([a6989586621681089441], [a6989586621681089441])) data BreakSym1 (a6989586621681091139 :: (~>) a6989586621681089441 Bool) :: (~>) (NonEmpty a6989586621681089441) ([a6989586621681089441], [a6989586621681089441]) type BreakSym2 (a6989586621681091139 :: (~>) a6989586621681089441 Bool) (a6989586621681091140 :: NonEmpty a6989586621681089441) = Break a6989586621681091139 a6989586621681091140 data FilterSym0 :: forall a6989586621681089440. (~>) ((~>) a6989586621681089440 Bool) ((~>) (NonEmpty a6989586621681089440) [a6989586621681089440]) data FilterSym1 (a6989586621681091147 :: (~>) a6989586621681089440 Bool) :: (~>) (NonEmpty a6989586621681089440) [a6989586621681089440] type FilterSym2 (a6989586621681091147 :: (~>) a6989586621681089440 Bool) (a6989586621681091148 :: NonEmpty a6989586621681089440) = Filter a6989586621681091147 a6989586621681091148 data PartitionSym0 :: forall a6989586621681089439. (~>) ((~>) a6989586621681089439 Bool) ((~>) (NonEmpty a6989586621681089439) ([a6989586621681089439], [a6989586621681089439])) data PartitionSym1 (a6989586621681091155 :: (~>) a6989586621681089439 Bool) :: (~>) (NonEmpty a6989586621681089439) ([a6989586621681089439], [a6989586621681089439]) type PartitionSym2 (a6989586621681091155 :: (~>) a6989586621681089439 Bool) (a6989586621681091156 :: NonEmpty a6989586621681089439) = Partition a6989586621681091155 a6989586621681091156 data GroupSym0 :: forall a6989586621681089438. (~>) [a6989586621681089438] [NonEmpty a6989586621681089438] type GroupSym1 (a6989586621681091067 :: [a6989586621681089438]) = Group a6989586621681091067 data GroupBySym0 :: forall a6989586621681089437. (~>) ((~>) a6989586621681089437 ((~>) a6989586621681089437 Bool)) ((~>) [a6989586621681089437] [NonEmpty a6989586621681089437]) data GroupBySym1 (a6989586621681090957 :: (~>) a6989586621681089437 ((~>) a6989586621681089437 Bool)) :: (~>) [a6989586621681089437] [NonEmpty a6989586621681089437] type GroupBySym2 (a6989586621681090957 :: (~>) a6989586621681089437 ((~>) a6989586621681089437 Bool)) (a6989586621681090958 :: [a6989586621681089437]) = GroupBy a6989586621681090957 a6989586621681090958 data GroupWithSym0 :: forall a6989586621681089436 b6989586621681089435. (~>) ((~>) a6989586621681089436 b6989586621681089435) ((~>) [a6989586621681089436] [NonEmpty a6989586621681089436]) data GroupWithSym1 (a6989586621681091005 :: (~>) a6989586621681089436 b6989586621681089435) :: (~>) [a6989586621681089436] [NonEmpty a6989586621681089436] type GroupWithSym2 (a6989586621681091005 :: (~>) a6989586621681089436 b6989586621681089435) (a6989586621681091006 :: [a6989586621681089436]) = GroupWith a6989586621681091005 a6989586621681091006 data GroupAllWithSym0 :: forall a6989586621681089434 b6989586621681089433. (~>) ((~>) a6989586621681089434 b6989586621681089433) ((~>) [a6989586621681089434] [NonEmpty a6989586621681089434]) data GroupAllWithSym1 (a6989586621681091013 :: (~>) a6989586621681089434 b6989586621681089433) :: (~>) [a6989586621681089434] [NonEmpty a6989586621681089434] type GroupAllWithSym2 (a6989586621681091013 :: (~>) a6989586621681089434 b6989586621681089433) (a6989586621681091014 :: [a6989586621681089434]) = GroupAllWith a6989586621681091013 a6989586621681091014 data Group1Sym0 :: forall a6989586621681089432. (~>) (NonEmpty a6989586621681089432) (NonEmpty (NonEmpty a6989586621681089432)) type Group1Sym1 (a6989586621681091054 :: NonEmpty a6989586621681089432) = Group1 a6989586621681091054 data GroupBy1Sym0 :: forall a6989586621681089431. (~>) ((~>) a6989586621681089431 ((~>) a6989586621681089431 Bool)) ((~>) (NonEmpty a6989586621681089431) (NonEmpty (NonEmpty a6989586621681089431))) data GroupBy1Sym1 (a6989586621681091021 :: (~>) a6989586621681089431 ((~>) a6989586621681089431 Bool)) :: (~>) (NonEmpty a6989586621681089431) (NonEmpty (NonEmpty a6989586621681089431)) type GroupBy1Sym2 (a6989586621681091021 :: (~>) a6989586621681089431 ((~>) a6989586621681089431 Bool)) (a6989586621681091022 :: NonEmpty a6989586621681089431) = GroupBy1 a6989586621681091021 a6989586621681091022 data GroupWith1Sym0 :: forall a6989586621681089430 b6989586621681089429. (~>) ((~>) a6989586621681089430 b6989586621681089429) ((~>) (NonEmpty a6989586621681089430) (NonEmpty (NonEmpty a6989586621681089430))) data GroupWith1Sym1 (a6989586621681091057 :: (~>) a6989586621681089430 b6989586621681089429) :: (~>) (NonEmpty a6989586621681089430) (NonEmpty (NonEmpty a6989586621681089430)) type GroupWith1Sym2 (a6989586621681091057 :: (~>) a6989586621681089430 b6989586621681089429) (a6989586621681091058 :: NonEmpty a6989586621681089430) = GroupWith1 a6989586621681091057 a6989586621681091058 data GroupAllWith1Sym0 :: forall a6989586621681089428 b6989586621681089427. (~>) ((~>) a6989586621681089428 b6989586621681089427) ((~>) (NonEmpty a6989586621681089428) (NonEmpty (NonEmpty a6989586621681089428))) data GroupAllWith1Sym1 (a6989586621681091198 :: (~>) a6989586621681089428 b6989586621681089427) :: (~>) (NonEmpty a6989586621681089428) (NonEmpty (NonEmpty a6989586621681089428)) type GroupAllWith1Sym2 (a6989586621681091198 :: (~>) a6989586621681089428 b6989586621681089427) (a6989586621681091199 :: NonEmpty a6989586621681089428) = GroupAllWith1 a6989586621681091198 a6989586621681091199 data IsPrefixOfSym0 :: forall a6989586621681089426. (~>) [a6989586621681089426] ((~>) (NonEmpty a6989586621681089426) Bool) data IsPrefixOfSym1 (a6989586621681090949 :: [a6989586621681089426]) :: (~>) (NonEmpty a6989586621681089426) Bool type IsPrefixOfSym2 (a6989586621681090949 :: [a6989586621681089426]) (a6989586621681090950 :: NonEmpty a6989586621681089426) = IsPrefixOf a6989586621681090949 a6989586621681090950 data NubSym0 :: forall a6989586621681089417. (~>) (NonEmpty a6989586621681089417) (NonEmpty a6989586621681089417) type NubSym1 (a6989586621681090880 :: NonEmpty a6989586621681089417) = Nub a6989586621681090880 data NubBySym0 :: forall a6989586621681089416. (~>) ((~>) a6989586621681089416 ((~>) a6989586621681089416 Bool)) ((~>) (NonEmpty a6989586621681089416) (NonEmpty a6989586621681089416)) data NubBySym1 (a6989586621681090863 :: (~>) a6989586621681089416 ((~>) a6989586621681089416 Bool)) :: (~>) (NonEmpty a6989586621681089416) (NonEmpty a6989586621681089416) type NubBySym2 (a6989586621681090863 :: (~>) a6989586621681089416 ((~>) a6989586621681089416 Bool)) (a6989586621681090864 :: NonEmpty a6989586621681089416) = NubBy a6989586621681090863 a6989586621681090864 data (!!@#@$) :: forall a6989586621681089425. (~>) (NonEmpty a6989586621681089425) ((~>) Nat a6989586621681089425) data (!!@#@$$) (a6989586621681090931 :: NonEmpty a6989586621681089425) :: (~>) Nat a6989586621681089425 type (!!@#@$$$) (a6989586621681090931 :: NonEmpty a6989586621681089425) (a6989586621681090932 :: Nat) = (!!) a6989586621681090931 a6989586621681090932 data ZipSym0 :: forall a6989586621681089423 b6989586621681089424. (~>) (NonEmpty a6989586621681089423) ((~>) (NonEmpty b6989586621681089424) (NonEmpty (a6989586621681089423, b6989586621681089424))) data ZipSym1 (a6989586621681090923 :: NonEmpty a6989586621681089423) :: forall b6989586621681089424. (~>) (NonEmpty b6989586621681089424) (NonEmpty (a6989586621681089423, b6989586621681089424)) type ZipSym2 (a6989586621681090923 :: NonEmpty a6989586621681089423) (a6989586621681090924 :: NonEmpty b6989586621681089424) = Zip a6989586621681090923 a6989586621681090924 data ZipWithSym0 :: forall a6989586621681089420 b6989586621681089421 c6989586621681089422. (~>) ((~>) a6989586621681089420 ((~>) b6989586621681089421 c6989586621681089422)) ((~>) (NonEmpty a6989586621681089420) ((~>) (NonEmpty b6989586621681089421) (NonEmpty c6989586621681089422))) data ZipWithSym1 (a6989586621681090912 :: (~>) a6989586621681089420 ((~>) b6989586621681089421 c6989586621681089422)) :: (~>) (NonEmpty a6989586621681089420) ((~>) (NonEmpty b6989586621681089421) (NonEmpty c6989586621681089422)) data ZipWithSym2 (a6989586621681090912 :: (~>) a6989586621681089420 ((~>) b6989586621681089421 c6989586621681089422)) (a6989586621681090913 :: NonEmpty a6989586621681089420) :: (~>) (NonEmpty b6989586621681089421) (NonEmpty c6989586621681089422) type ZipWithSym3 (a6989586621681090912 :: (~>) a6989586621681089420 ((~>) b6989586621681089421 c6989586621681089422)) (a6989586621681090913 :: NonEmpty a6989586621681089420) (a6989586621681090914 :: NonEmpty b6989586621681089421) = ZipWith a6989586621681090912 a6989586621681090913 a6989586621681090914 data UnzipSym0 :: forall a6989586621681089418 b6989586621681089419. (~>) (NonEmpty (a6989586621681089418, b6989586621681089419)) (NonEmpty a6989586621681089418, NonEmpty b6989586621681089419) type UnzipSym1 (a6989586621681090883 :: NonEmpty (a6989586621681089418, b6989586621681089419)) = Unzip a6989586621681090883 data FromListSym0 :: forall a6989586621681089464. (~>) [a6989586621681089464] (NonEmpty a6989586621681089464) type FromListSym1 (a6989586621681091163 :: [a6989586621681089464]) = FromList a6989586621681091163 data ToListSym0 :: forall a6989586621681089463. (~>) (NonEmpty a6989586621681089463) [a6989586621681089463] type ToListSym1 (a6989586621681091087 :: NonEmpty a6989586621681089463) = ToList a6989586621681091087 data NonEmpty_Sym0 :: forall a6989586621681089475. (~>) [a6989586621681089475] (Maybe (NonEmpty a6989586621681089475)) type NonEmpty_Sym1 (a6989586621681091325 :: [a6989586621681089475]) = NonEmpty_ a6989586621681091325 data XorSym0 :: (~>) (NonEmpty Bool) Bool type XorSym1 (a6989586621681091348 :: NonEmpty Bool) = Xor a6989586621681091348 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Munzip_6989586621681091421Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Base.NonEmpty instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681091410Sym0 instance forall a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681091407 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681091410Sym1 a6989586621681091407) instance forall a6989586621681057606 b6989586621681057607 c6989586621681057608 (a6989586621681091408 :: a6989586621681057606 Data.Singletons.Internal.~> (b6989586621681057607 Data.Singletons.Internal.~> c6989586621681057608)) (a6989586621681091407 :: GHC.Base.NonEmpty a6989586621681057606). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681091410Sym2 a6989586621681091408 a6989586621681091407) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681091388Sym0 instance forall b6989586621681057605 a6989586621681057604 (a6989586621681091386 :: GHC.Base.NonEmpty a6989586621681057604). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681091388Sym1 a6989586621681091386) 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 a6989586621681089479 b6989586621681089480 (a6989586621681091364 :: a6989586621681089479 Data.Singletons.Internal.~> b6989586621681089480). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FmapSym1 a6989586621681091364) 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 b6989586621681089477 a6989586621681089476 (a6989586621681091333 :: a6989586621681089476 Data.Singletons.Internal.~> (b6989586621681089477, GHC.Maybe.Maybe a6989586621681089476)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldSym1 a6989586621681091333) 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 b6989586621681089473 a6989586621681089472 (a6989586621681091296 :: a6989586621681089472 Data.Singletons.Internal.~> (b6989586621681089473, GHC.Maybe.Maybe a6989586621681089472)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym1 a6989586621681091296) 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 a6989586621681089466 (a6989586621681091276 :: a6989586621681089466). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ConsSym1 a6989586621681091276) 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 a6989586621681089467 (a6989586621681091265 :: a6989586621681089467). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.<|@#@$$) a6989586621681091265) 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 a6989586621681089450 (a6989586621681091253 :: a6989586621681089450 Data.Singletons.Internal.~> (a6989586621681089450 Data.Singletons.Internal.~> a6989586621681089450)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym1 a6989586621681091253) 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 a6989586621681089451 (a6989586621681091246 :: a6989586621681089451 Data.Singletons.Internal.~> (a6989586621681089451 Data.Singletons.Internal.~> a6989586621681089451)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym1 a6989586621681091246) 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 a6989586621681089452 b6989586621681089453 (a6989586621681091235 :: a6989586621681089452 Data.Singletons.Internal.~> (b6989586621681089453 Data.Singletons.Internal.~> b6989586621681089453)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym1 a6989586621681091235) 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 a6989586621681089452 b6989586621681089453 (a6989586621681091236 :: a6989586621681089452 Data.Singletons.Internal.~> (b6989586621681089453 Data.Singletons.Internal.~> b6989586621681089453)) (a6989586621681091235 :: b6989586621681089453). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym2 a6989586621681091236 a6989586621681091235) 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 a6989586621681089455 b6989586621681089454 (a6989586621681091224 :: b6989586621681089454 Data.Singletons.Internal.~> (a6989586621681089455 Data.Singletons.Internal.~> b6989586621681089454)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym1 a6989586621681091224) 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 a6989586621681089455 b6989586621681089454 (a6989586621681091225 :: b6989586621681089454 Data.Singletons.Internal.~> (a6989586621681089455 Data.Singletons.Internal.~> b6989586621681089454)) (a6989586621681091224 :: b6989586621681089454). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym2 a6989586621681091225 a6989586621681091224) 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 a6989586621681089456 (a6989586621681091216 :: a6989586621681089456). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.InsertSym1 a6989586621681091216) 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 a6989586621681089428 b6989586621681089427 (a6989586621681091198 :: a6989586621681089428 Data.Singletons.Internal.~> b6989586621681089427). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym1 a6989586621681091198) 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 a6989586621681089413 o6989586621681089412 (a6989586621681091192 :: a6989586621681089413 Data.Singletons.Internal.~> o6989586621681089412). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortWithSym1 a6989586621681091192) 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 a6989586621681089414 (a6989586621681091180 :: a6989586621681089414 Data.Singletons.Internal.~> (a6989586621681089414 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortBySym1 a6989586621681091180) 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 a6989586621681089461 b6989586621681089462 (a6989586621681091167 :: [a6989586621681089461] Data.Singletons.Internal.~> [b6989586621681089462]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.LiftSym1 a6989586621681091167) 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 a6989586621681089439 (a6989586621681091155 :: a6989586621681089439 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.PartitionSym1 a6989586621681091155) 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 a6989586621681089440 (a6989586621681091147 :: a6989586621681089440 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FilterSym1 a6989586621681091147) 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 a6989586621681089441 (a6989586621681091139 :: a6989586621681089441 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.BreakSym1 a6989586621681091139) 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 a6989586621681089442 (a6989586621681091131 :: a6989586621681089442 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SpanSym1 a6989586621681091131) 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 a6989586621681089443 (a6989586621681091123 :: a6989586621681089443 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.DropWhileSym1 a6989586621681091123) 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 a6989586621681089444 (a6989586621681091115 :: a6989586621681089444 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym1 a6989586621681091115) 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 a6989586621681091107) 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 a6989586621681091099) 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 a6989586621681091091) 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 a6989586621681089459 b6989586621681089460 (a6989586621681091080 :: a6989586621681089459 Data.Singletons.Internal.~> b6989586621681089460). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MapSym1 a6989586621681091080) 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 a6989586621681089449 (a6989586621681091070 :: a6989586621681089449). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IntersperseSym1 a6989586621681091070) 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.GroupWith1Sym0 instance Data.Singletons.Prelude.Eq.SEq b => Data.Singletons.Internal.SingI Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym0 instance forall a6989586621681089430 b6989586621681089429 (a6989586621681091057 :: a6989586621681089430 Data.Singletons.Internal.~> b6989586621681089429). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym1 a6989586621681091057) 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 a6989586621681089431 (a6989586621681091021 :: a6989586621681089431 Data.Singletons.Internal.~> (a6989586621681089431 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym1 a6989586621681091021) 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 a6989586621681089434 b6989586621681089433 (a6989586621681091013 :: a6989586621681089434 Data.Singletons.Internal.~> b6989586621681089433). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym1 a6989586621681091013) 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 a6989586621681089436 b6989586621681089435 (a6989586621681091005 :: a6989586621681089436 Data.Singletons.Internal.~> b6989586621681089435). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWithSym1 a6989586621681091005) 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 Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090965GoSym0 instance forall k1 a6989586621680375082 k2 (eq06989586621681090963 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090965GoSym1 eq06989586621681090963) instance forall a6989586621680375082 k1 k2 (a6989586621681090966 :: k2) (a_69895866216810909616989586621681090964 :: k1) (eq06989586621681090963 :: a6989586621680375082 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090965GoSym3 a6989586621681090966 a_69895866216810909616989586621681090964 eq06989586621681090963) instance forall a6989586621680375082 k1 k2 (a_69895866216810909616989586621681090964 :: k2) (eq06989586621681090963 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090965GoSym2 a_69895866216810909616989586621681090964 eq06989586621681090963) instance forall a6989586621681089437 (a6989586621681090957 :: a6989586621681089437 Data.Singletons.Internal.~> (a6989586621681089437 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBySym1 a6989586621681090957) 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 a6989586621681089426 (a6989586621681090949 :: [a6989586621681089426]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym1 a6989586621681090949) 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 a6989586621681089425 (a6989586621681090931 :: GHC.Base.NonEmpty a6989586621681089425). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.!!@#@$$) a6989586621681090931) 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 b6989586621681089424 a6989586621681089423 (a6989586621681090923 :: GHC.Base.NonEmpty a6989586621681089423). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipSym1 a6989586621681090923) 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 a6989586621681089420 b6989586621681089421 c6989586621681089422 (a6989586621681090912 :: a6989586621681089420 Data.Singletons.Internal.~> (b6989586621681089421 Data.Singletons.Internal.~> c6989586621681089422)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym1 a6989586621681090912) 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 a6989586621681089420 b6989586621681089421 c6989586621681089422 (a6989586621681090913 :: a6989586621681089420 Data.Singletons.Internal.~> (b6989586621681089421 Data.Singletons.Internal.~> c6989586621681089422)) (a6989586621681090912 :: GHC.Base.NonEmpty a6989586621681089420). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym2 a6989586621681090913 a6989586621681090912) 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 a6989586621681089416 (a6989586621681090863 :: a6989586621681089416 Data.Singletons.Internal.~> (a6989586621681089416 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.NubBySym1 a6989586621681090863) 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.Let6989586621681091352Xor'Sym0 instance forall k1 k2 (x6989586621681091350 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091352Xor'Sym1 x6989586621681091350) instance forall k1 k2 (xs6989586621681091351 :: k2) (x6989586621681091350 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091352Xor'Sym2 xs6989586621681091351 x6989586621681091350) instance forall k1 k2 (a6989586621681091353 :: k2) (xs6989586621681091351 :: k1) (x6989586621681091350 :: GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091352Xor'Sym3 a6989586621681091353 xs6989586621681091351 x6989586621681091350) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091339Scrutinee_6989586621681089643Sym0 instance forall k1 k (f6989586621681091337 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091339Scrutinee_6989586621681089643Sym1 f6989586621681091337) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091317Scrutinee_6989586621681089653Sym0 instance forall k1 k (f6989586621681091300 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091317Scrutinee_6989586621681089653Sym1 f6989586621681091300) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091302GoSym0 instance forall k k2 k3 (f6989586621681091300 :: k3 Data.Singletons.Internal.~> (k2, GHC.Maybe.Maybe k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091302GoSym1 f6989586621681091300) instance forall k k2 k3 (a6989586621681091301 :: k3 Data.Singletons.Internal.~> (k2, GHC.Maybe.Maybe k3)) (f6989586621681091300 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091302GoSym2 a6989586621681091301 f6989586621681091300) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091308Scrutinee_6989586621681089657Sym0 instance forall k1 k2 k3 (f6989586621681091300 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091308Scrutinee_6989586621681089657Sym1 f6989586621681091300) instance forall k1 k2 k3 (a6989586621681091301 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681091300 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091308Scrutinee_6989586621681089657Sym2 a6989586621681091301 f6989586621681091300) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028X_6989586621681091029Sym0 instance forall k1 a6989586621680375082 (eq6989586621681091025 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028X_6989586621681091029Sym1 eq6989586621681091025) instance forall k1 a6989586621680375082 (x6989586621681091026 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681091025 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028X_6989586621681091029Sym2 x6989586621681091026 eq6989586621681091025) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028YsSym0 instance forall k1 a6989586621680375082 (eq6989586621681091025 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028YsSym1 eq6989586621681091025) instance forall k1 a6989586621680375082 (x6989586621681091026 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681091025 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028YsSym2 x6989586621681091026 eq6989586621681091025) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028ZsSym0 instance forall k1 a6989586621680375082 (eq6989586621681091025 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028ZsSym1 eq6989586621681091025) instance forall k1 a6989586621680375082 (x6989586621681091026 :: k1 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681091025 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681091028ZsSym2 x6989586621681091026 eq6989586621681091025) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975X_6989586621681090976Sym0 instance forall k1 k2 a6989586621680375082 k3 (eq06989586621681090963 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975X_6989586621681090976Sym1 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (eq6989586621681090972 :: k3) (eq06989586621681090963 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975X_6989586621681090976Sym2 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (x6989586621681090973 :: k3) (eq6989586621681090972 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681090963 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975X_6989586621681090976Sym3 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (xs6989586621681090974 :: k3) (x6989586621681090973 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681090972 :: k2) (eq06989586621681090963 :: [a6989586621680375082]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975X_6989586621681090976Sym4 xs6989586621681090974 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975YsSym0 instance forall k1 k2 a6989586621680375082 k3 (eq06989586621681090963 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975YsSym1 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (eq6989586621681090972 :: k3) (eq06989586621681090963 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975YsSym2 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (x6989586621681090973 :: k3) (eq6989586621681090972 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681090963 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975YsSym3 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (xs6989586621681090974 :: k3) (x6989586621681090973 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681090972 :: k2) (eq06989586621681090963 :: [a6989586621680375082]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975YsSym4 xs6989586621681090974 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975ZsSym0 instance forall k1 k2 a6989586621680375082 k3 (eq06989586621681090963 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975ZsSym1 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (eq6989586621681090972 :: k3) (eq06989586621681090963 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975ZsSym2 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (x6989586621681090973 :: k3) (eq6989586621681090972 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681090963 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975ZsSym3 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance forall k1 k2 a6989586621680375082 k3 (xs6989586621681090974 :: k3) (x6989586621681090973 :: k2 Data.Singletons.Internal.~> (a6989586621680375082 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681090972 :: k2) (eq06989586621681090963 :: [a6989586621680375082]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090975ZsSym4 xs6989586621681090974 x6989586621681090973 eq6989586621681090972 eq06989586621681090963) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888X_6989586621681090889Sym0 instance forall k1 a6989586621680375069 b6989586621680375070 k2 (a6989586621681090885 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888X_6989586621681090889Sym1 a6989586621681090885) instance forall a6989586621680375069 b6989586621680375070 k1 k2 (b6989586621681090886 :: k2) (a6989586621681090885 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888X_6989586621681090889Sym2 b6989586621681090886 a6989586621681090885) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888AsSym0 instance forall k1 b6989586621680375070 a6989586621680375069 k2 (a6989586621681090885 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888AsSym1 a6989586621681090885) instance forall b6989586621680375070 a6989586621680375069 k1 k2 (b6989586621681090886 :: k2) (a6989586621681090885 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888AsSym2 b6989586621681090886 a6989586621681090885) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888BsSym0 instance forall k1 a6989586621680375069 b6989586621680375070 k2 (a6989586621681090885 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888BsSym1 a6989586621681090885) instance forall a6989586621680375069 b6989586621680375070 k1 k2 (b6989586621681090886 :: k2) (a6989586621681090885 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681090888BsSym2 b6989586621681090886 a6989586621681090885) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681090870Sym0 instance forall k k2 k3 (eq6989586621681090867 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681090870Sym1 eq6989586621681090867) instance forall k k2 k3 (a6989586621681090868 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681090867 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681090870Sym2 a6989586621681090868 eq6989586621681090867) instance forall k k2 k3 (as6989586621681090869 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (a6989586621681090868 :: k2) (eq6989586621681090867 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681090870Sym3 as6989586621681090869 a6989586621681090868 eq6989586621681090867) -- | Defines and exports a promoted and singled version of the -- IsString type class from Data.String. module Data.Singletons.Prelude.IsString class PIsString (a_a977p :: Type) where { type family FromString (arg_a977Z :: Symbol) :: a_a977p; } class SIsString a_a977p sFromString :: forall (t_a978f :: Symbol). SIsString a_a977p => Sing t_a978f -> Sing (Apply FromStringSym0 t_a978f :: a_a977p) data FromStringSym0 :: forall a6989586621681182111. (~>) Symbol a6989586621681182111 type FromStringSym1 (arg6989586621681182147 :: Symbol) = FromString arg6989586621681182147 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_6989586621681182160Sym0 instance Data.Singletons.Prelude.IsString.PIsString (Data.Functor.Identity.Identity a) instance forall a6989586621681182113 k6989586621681182112 (b6989586621681182114 :: k6989586621681182112). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.IsString.FromString_6989586621681182153Sym0 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 PFunctor f_a2cU0 => PApplicative (f_a2cU0 :: Type -> Type) where { type family Pure (arg_a2d0F :: a_a2cU1) :: f_a2cU0 a_a2cU1; type family (<*>) (arg_a2d0H :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (arg_a2d0I :: f_a2cU0 a_a2cU2) :: f_a2cU0 b_a2cU3; type family LiftA2 (arg_a2d0L :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (arg_a2d0M :: f_a2cU0 a_a2cU4) (arg_a2d0N :: f_a2cU0 b_a2cU5) :: f_a2cU0 c_a2cU6; type family (*>) (arg_a2d0R :: f_a2cU0 a_a2cU7) (arg_a2d0S :: f_a2cU0 b_a2cU8) :: f_a2cU0 b_a2cU8; type family (<*) (arg_a2d0V :: f_a2cU0 a_a2cU9) (arg_a2d0W :: f_a2cU0 b_a2cUa) :: f_a2cU0 a_a2cU9; type (<*>) a_a2d19 a_a2d1a = Apply (Apply TFHelper_6989586621679536493Sym0 a_a2d19) a_a2d1a; type LiftA2 a_a2d1q a_a2d1r a_a2d1s = Apply (Apply (Apply LiftA2_6989586621679536511Sym0 a_a2d1q) a_a2d1r) a_a2d1s; type (*>) a_a2d1E a_a2d1F = Apply (Apply TFHelper_6989586621679536524Sym0 a_a2d1E) a_a2d1F; type (<*) a_a2d1U a_a2d1V = Apply (Apply TFHelper_6989586621679536540Sym0 a_a2d1U) a_a2d1V; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2cU0 => SApplicative (f_a2cU0 :: Type -> Type) sPure :: forall a_a2cU1 (t_a2d4S :: a_a2cU1). SApplicative f_a2cU0 => Sing t_a2d4S -> Sing (Apply PureSym0 t_a2d4S :: f_a2cU0 a_a2cU1) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). SApplicative f_a2cU0 => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) sLiftA2 :: forall a_a2cU4 b_a2cU5 c_a2cU6 (t_a2d4Y :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (t_a2d4Z :: f_a2cU0 a_a2cU4) (t_a2d50 :: f_a2cU0 b_a2cU5). SApplicative f_a2cU0 => Sing t_a2d4Y -> Sing t_a2d4Z -> Sing t_a2d50 -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). SApplicative f_a2cU0 => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). SApplicative f_a2cU0 => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). (SApplicative f_a2cU0, (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) ~ Apply (Apply TFHelper_6989586621679536493Sym0 t_a2d4U) t_a2d4V) => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) sLiftA2 :: forall a_a2cU4 b_a2cU5 c_a2cU6 (t_a2d4Y :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (t_a2d4Z :: f_a2cU0 a_a2cU4) (t_a2d50 :: f_a2cU0 b_a2cU5). (SApplicative f_a2cU0, (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) ~ Apply (Apply (Apply LiftA2_6989586621679536511Sym0 t_a2d4Y) t_a2d4Z) t_a2d50) => Sing t_a2d4Y -> Sing t_a2d4Z -> Sing t_a2d50 -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). (SApplicative f_a2cU0, (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) ~ Apply (Apply TFHelper_6989586621679536524Sym0 t_a2d54) t_a2d55) => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). (SApplicative f_a2cU0, (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) ~ Apply (Apply TFHelper_6989586621679536540Sym0 t_a2d58) t_a2d59) => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) infixl 4 %<*> infixl 4 %*> infixl 4 %<* class PApplicative f_a2cVf => PAlternative (f_a2cVf :: Type -> Type) where { type family Empty :: f_a2cVf a_a2cVg; type family (<|>) (arg_a2d2O :: f_a2cVf a_a2cVh) (arg_a2d2P :: f_a2cVf a_a2cVh) :: f_a2cVf a_a2cVh; } infixl 3 <|> class SApplicative f_a2cVf => SAlternative (f_a2cVf :: Type -> Type) sEmpty :: forall a_a2cVg. SAlternative f_a2cVf => Sing (EmptySym0 :: f_a2cVf a_a2cVg) (%<|>) :: forall a_a2cVh (t_a2d5z :: f_a2cVf a_a2cVh) (t_a2d5A :: f_a2cVf a_a2cVh). SAlternative f_a2cVf => Sing t_a2d5z -> Sing t_a2d5A -> Sing (Apply (Apply (<|>@#@$) t_a2d5z) t_a2d5A :: f_a2cVf a_a2cVh) infixl 3 %<|> -- | The singleton kind-indexed data family. data family Sing :: k -> Type type SConst = (Sing :: Const a b -> Type) -- | The Const functor. data Const a (b :: k) :: forall k. () => Type -> k -> Type type family GetConst (x_a74Kb :: Const a_a74K9 b_a74Ka) :: a_a74K9 type family (<$>) (a_a2UYr :: (~>) a_a2UX9 b_a2UXa) (a_a2UYs :: f_a2UX8 a_a2UX9) :: f_a2UX8 b_a2UXa infixl 4 <$> (%<$>) :: forall f_a2UX8 a_a2UX9 b_a2UXa (t_a2V02 :: (~>) a_a2UX9 b_a2UXa) (t_a2V03 :: f_a2UX8 a_a2UX9). SFunctor f_a2UX8 => Sing t_a2V02 -> Sing t_a2V03 -> Sing (Apply (Apply (<$>@#@$) t_a2V02) t_a2V03 :: f_a2UX8 b_a2UXa) infixl 4 %<$> type family (<$) (arg_a2d0l :: a_a2cTY) (arg_a2d0m :: f_a2cTV b_a2cTZ) :: f_a2cTV a_a2cTY infixl 4 <$ (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). SFunctor f_a2cTV => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) infixl 4 %<$ type family (<**>) (a_a2d01 :: f_a2cTl a_a2cTm) (a_a2d02 :: f_a2cTl ((~>) a_a2cTm b_a2cTn)) :: f_a2cTl b_a2cTn infixl 4 <**> (%<**>) :: forall f_a2cTl a_a2cTm b_a2cTn (t_a2d4k :: f_a2cTl a_a2cTm) (t_a2d4l :: f_a2cTl ((~>) a_a2cTm b_a2cTn)). SApplicative f_a2cTl => Sing t_a2d4k -> Sing t_a2d4l -> Sing (Apply (Apply (<**>@#@$) t_a2d4k) t_a2d4l :: f_a2cTl b_a2cTn) infixl 4 %<**> type family LiftA (a_a2cZR :: (~>) a_a2cTj b_a2cTk) (a_a2cZS :: f_a2cTi a_a2cTj) :: f_a2cTi b_a2cTk sLiftA :: forall f_a2cTi a_a2cTj b_a2cTk (t_a2d4g :: (~>) a_a2cTj b_a2cTk) (t_a2d4h :: f_a2cTi a_a2cTj). SApplicative f_a2cTi => Sing t_a2d4g -> Sing t_a2d4h -> Sing (Apply (Apply LiftASym0 t_a2d4g) t_a2d4h :: f_a2cTi b_a2cTk) type family LiftA3 (a_a2cZF :: (~>) a_a2cTe ((~>) b_a2cTf ((~>) c_a2cTg d_a2cTh))) (a_a2cZG :: f_a2cTd a_a2cTe) (a_a2cZH :: f_a2cTd b_a2cTf) (a_a2cZI :: f_a2cTd c_a2cTg) :: f_a2cTd d_a2cTh sLiftA3 :: forall f_a2cTd a_a2cTe b_a2cTf c_a2cTg d_a2cTh (t_a2d48 :: (~>) a_a2cTe ((~>) b_a2cTf ((~>) c_a2cTg d_a2cTh))) (t_a2d49 :: f_a2cTd a_a2cTe) (t_a2d4a :: f_a2cTd b_a2cTf) (t_a2d4b :: f_a2cTd c_a2cTg). SApplicative f_a2cTd => Sing t_a2d48 -> Sing t_a2d49 -> Sing t_a2d4a -> Sing t_a2d4b -> Sing (Apply (Apply (Apply (Apply LiftA3Sym0 t_a2d48) t_a2d49) t_a2d4a) t_a2d4b :: f_a2cTd d_a2cTh) type family Optional (a_a97Kd :: f_a97Jz a_a97JA) :: f_a97Jz (Maybe a_a97JA) sOptional :: forall f_a97Jz a_a97JA (t_a97Lf :: f_a97Jz a_a97JA). SAlternative f_a97Jz => Sing t_a97Lf -> Sing (Apply OptionalSym0 t_a97Lf :: f_a97Jz (Maybe a_a97JA)) data PureSym0 :: forall a6989586621679536049 f6989586621679536048. (~>) a6989586621679536049 (f6989586621679536048 a6989586621679536049) type PureSym1 (arg6989586621679536461 :: a6989586621679536049) = Pure arg6989586621679536461 data (<*>@#@$) :: forall a6989586621679536050 b6989586621679536051 f6989586621679536048. (~>) (f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) ((~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) :: (~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) (arg6989586621679536464 :: f6989586621679536048 a6989586621679536050) = (<*>) arg6989586621679536463 arg6989586621679536464 data (*>@#@$) :: forall a6989586621679536055 b6989586621679536056 f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536055) ((~>) (f6989586621679536048 b6989586621679536056) (f6989586621679536048 b6989586621679536056)) infixl 4 *>@#@$ data (*>@#@$$) (arg6989586621679536473 :: f6989586621679536048 a6989586621679536055) :: forall b6989586621679536056. (~>) (f6989586621679536048 b6989586621679536056) (f6989586621679536048 b6989586621679536056) infixl 4 *>@#@$$ type (*>@#@$$$) (arg6989586621679536473 :: f6989586621679536048 a6989586621679536055) (arg6989586621679536474 :: f6989586621679536048 b6989586621679536056) = (*>) arg6989586621679536473 arg6989586621679536474 data (<*@#@$) :: forall a6989586621679536057 b6989586621679536058 f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536057) ((~>) (f6989586621679536048 b6989586621679536058) (f6989586621679536048 a6989586621679536057)) infixl 4 <*@#@$ data (<*@#@$$) (arg6989586621679536477 :: f6989586621679536048 a6989586621679536057) :: forall b6989586621679536058. (~>) (f6989586621679536048 b6989586621679536058) (f6989586621679536048 a6989586621679536057) infixl 4 <*@#@$$ type (<*@#@$$$) (arg6989586621679536477 :: f6989586621679536048 a6989586621679536057) (arg6989586621679536478 :: f6989586621679536048 b6989586621679536058) = (<*) arg6989586621679536477 arg6989586621679536478 type EmptySym0 = Empty data (<|>@#@$) :: forall a6989586621679536127 f6989586621679536125. (~>) (f6989586621679536125 a6989586621679536127) ((~>) (f6989586621679536125 a6989586621679536127) (f6989586621679536125 a6989586621679536127)) infixl 3 <|>@#@$ data (<|>@#@$$) (arg6989586621679536594 :: f6989586621679536125 a6989586621679536127) :: (~>) (f6989586621679536125 a6989586621679536127) (f6989586621679536125 a6989586621679536127) infixl 3 <|>@#@$$ type (<|>@#@$$$) (arg6989586621679536594 :: f6989586621679536125 a6989586621679536127) (arg6989586621679536595 :: f6989586621679536125 a6989586621679536127) = (<|>) arg6989586621679536594 arg6989586621679536595 data ConstSym0 :: forall (a6989586621679086334 :: Type) k6989586621679086333 (b6989586621679086335 :: k6989586621679086333). (~>) a6989586621679086334 (Const (a6989586621679086334 :: Type) (b6989586621679086335 :: k6989586621679086333)) type ConstSym1 (t6989586621680696010 :: a6989586621679086334) = 'Const t6989586621680696010 data GetConstSym0 :: forall a6989586621680696325 b6989586621680696326. (~>) (Const a6989586621680696325 b6989586621680696326) a6989586621680696325 type GetConstSym1 (x6989586621680696327 :: Const a6989586621680696325 b6989586621680696326) = GetConst x6989586621680696327 data (<$>@#@$) :: forall a6989586621679705379 b6989586621679705380 f6989586621679705378. (~>) ((~>) a6989586621679705379 b6989586621679705380) ((~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) :: forall f6989586621679705378. (~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) (a6989586621679705460 :: f6989586621679705378 a6989586621679705379) = (<$>) a6989586621679705459 a6989586621679705460 data (<$@#@$) :: forall a6989586621679536046 b6989586621679536047 f6989586621679536043. (~>) a6989586621679536046 ((~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679536441 :: a6989586621679536046) :: forall b6989586621679536047 f6989586621679536043. (~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679536441 :: a6989586621679536046) (arg6989586621679536442 :: f6989586621679536043 b6989586621679536047) = (<$) arg6989586621679536441 arg6989586621679536442 data (<**>@#@$) :: forall a6989586621679536008 b6989586621679536009 f6989586621679536007. (~>) (f6989586621679536007 a6989586621679536008) ((~>) (f6989586621679536007 ((~>) a6989586621679536008 b6989586621679536009)) (f6989586621679536007 b6989586621679536009)) infixl 4 <**>@#@$ data (<**>@#@$$) (a6989586621679536421 :: f6989586621679536007 a6989586621679536008) :: forall b6989586621679536009. (~>) (f6989586621679536007 ((~>) a6989586621679536008 b6989586621679536009)) (f6989586621679536007 b6989586621679536009) infixl 4 <**>@#@$$ type (<**>@#@$$$) (a6989586621679536421 :: f6989586621679536007 a6989586621679536008) (a6989586621679536422 :: f6989586621679536007 ((~>) a6989586621679536008 b6989586621679536009)) = (<**>) a6989586621679536421 a6989586621679536422 data LiftASym0 :: forall a6989586621679536005 b6989586621679536006 f6989586621679536004. (~>) ((~>) a6989586621679536005 b6989586621679536006) ((~>) (f6989586621679536004 a6989586621679536005) (f6989586621679536004 b6989586621679536006)) data LiftASym1 (a6989586621679536411 :: (~>) a6989586621679536005 b6989586621679536006) :: forall f6989586621679536004. (~>) (f6989586621679536004 a6989586621679536005) (f6989586621679536004 b6989586621679536006) type LiftASym2 (a6989586621679536411 :: (~>) a6989586621679536005 b6989586621679536006) (a6989586621679536412 :: f6989586621679536004 a6989586621679536005) = LiftA a6989586621679536411 a6989586621679536412 data LiftA2Sym0 :: forall a6989586621679536052 b6989586621679536053 c6989586621679536054 f6989586621679536048. (~>) ((~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) ((~>) (f6989586621679536048 a6989586621679536052) ((~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054))) data LiftA2Sym1 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) :: forall f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536052) ((~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054)) data LiftA2Sym2 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) (arg6989586621679536468 :: f6989586621679536048 a6989586621679536052) :: (~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054) type LiftA2Sym3 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) (arg6989586621679536468 :: f6989586621679536048 a6989586621679536052) (arg6989586621679536469 :: f6989586621679536048 b6989586621679536053) = LiftA2 arg6989586621679536467 arg6989586621679536468 arg6989586621679536469 data LiftA3Sym0 :: forall a6989586621679536000 b6989586621679536001 c6989586621679536002 d6989586621679536003 f6989586621679535999. (~>) ((~>) a6989586621679536000 ((~>) b6989586621679536001 ((~>) c6989586621679536002 d6989586621679536003))) ((~>) (f6989586621679535999 a6989586621679536000) ((~>) (f6989586621679535999 b6989586621679536001) ((~>) (f6989586621679535999 c6989586621679536002) (f6989586621679535999 d6989586621679536003)))) data LiftA3Sym1 (a6989586621679536399 :: (~>) a6989586621679536000 ((~>) b6989586621679536001 ((~>) c6989586621679536002 d6989586621679536003))) :: forall f6989586621679535999. (~>) (f6989586621679535999 a6989586621679536000) ((~>) (f6989586621679535999 b6989586621679536001) ((~>) (f6989586621679535999 c6989586621679536002) (f6989586621679535999 d6989586621679536003))) data LiftA3Sym2 (a6989586621679536399 :: (~>) a6989586621679536000 ((~>) b6989586621679536001 ((~>) c6989586621679536002 d6989586621679536003))) (a6989586621679536400 :: f6989586621679535999 a6989586621679536000) :: (~>) (f6989586621679535999 b6989586621679536001) ((~>) (f6989586621679535999 c6989586621679536002) (f6989586621679535999 d6989586621679536003)) data LiftA3Sym3 (a6989586621679536399 :: (~>) a6989586621679536000 ((~>) b6989586621679536001 ((~>) c6989586621679536002 d6989586621679536003))) (a6989586621679536400 :: f6989586621679535999 a6989586621679536000) (a6989586621679536401 :: f6989586621679535999 b6989586621679536001) :: (~>) (f6989586621679535999 c6989586621679536002) (f6989586621679535999 d6989586621679536003) data OptionalSym0 :: forall a6989586621681184478 f6989586621681184477. (~>) (f6989586621681184477 a6989586621681184478) (f6989586621681184477 (Maybe a6989586621681184478)) type OptionalSym1 (a6989586621681184517 :: f6989586621681184477 a6989586621681184478) = Optional a6989586621681184517 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681184577Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Ord.Down instance forall a6989586621679536050 b6989586621679536051 (a6989586621681184575 :: Data.Ord.Down (a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681184577Sym1 a6989586621681184575) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681184566Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.LiftA2_6989586621681184555Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative ((,) a) instance forall a6989586621681184481 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621681184552 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681184555Sym1 a6989586621681184552) instance forall a6989586621681184481 a6989586621679536052 b6989586621679536053 c6989586621679536054 (a6989586621681184553 :: a6989586621679536052 Data.Singletons.Internal.~> (b6989586621679536053 Data.Singletons.Internal.~> c6989586621679536054)) (a6989586621681184552 :: (a6989586621681184481, a6989586621679536052)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681184555Sym2 a6989586621681184553 a6989586621681184552) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681184537Sym0 instance forall a6989586621681184481 a6989586621679536050 b6989586621679536051 (a6989586621681184535 :: (a6989586621681184481, a6989586621679536050 Data.Singletons.Internal.~> b6989586621679536051)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681184537Sym1 a6989586621681184535) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681184524Sym0 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_a2cTV :: Type -> Type) where { type family Fmap (arg_a2d0h :: (~>) a_a2cTW b_a2cTX) (arg_a2d0i :: f_a2cTV a_a2cTW) :: f_a2cTV b_a2cTX; type (<$) a_a2d0z a_a2d0A = Apply (Apply TFHelper_6989586621679536457Sym0 a_a2d0z) a_a2d0A; } class SFunctor (f_a2cTV :: Type -> Type) sFmap :: forall a_a2cTW b_a2cTX (t_a2d4I :: (~>) a_a2cTW b_a2cTX) (t_a2d4J :: f_a2cTV a_a2cTW). SFunctor f_a2cTV => Sing t_a2d4I -> Sing t_a2d4J -> Sing (Apply (Apply FmapSym0 t_a2d4I) t_a2d4J :: f_a2cTV b_a2cTX) class PApplicative m_a2cUo => PMonad (m_a2cUo :: Type -> Type) where { type family (>>=) (arg_a2d20 :: m_a2cUo a_a2cUp) (arg_a2d21 :: (~>) a_a2cUp (m_a2cUo b_a2cUq)) :: m_a2cUo b_a2cUq; type family (>>) (arg_a2d24 :: m_a2cUo a_a2cUr) (arg_a2d25 :: m_a2cUo b_a2cUs) :: m_a2cUo b_a2cUs; type family Return (arg_a2d28 :: a_a2cUt) :: m_a2cUo a_a2cUt; type family Fail (arg_a2d2a :: Symbol) :: m_a2cUo a_a2cUu; type (>>) a_a2d2s a_a2d2t = Apply (Apply TFHelper_6989586621679536574Sym0 a_a2d2s) a_a2d2t; type Return a_a2d2D = Apply Return_6989586621679536584Sym0 a_a2d2D; type Fail a_a2d2K = Apply Fail_6989586621679536591Sym0 a_a2d2K; } infixl 1 >>= infixl 1 >> class SApplicative m_a2cUo => SMonad (m_a2cUo :: Type -> Type) (%>>=) :: forall a_a2cUp b_a2cUq (t_a2d5j :: m_a2cUo a_a2cUp) (t_a2d5k :: (~>) a_a2cUp (m_a2cUo b_a2cUq)). SMonad m_a2cUo => Sing t_a2d5j -> Sing t_a2d5k -> Sing (Apply (Apply (>>=@#@$) t_a2d5j) t_a2d5k :: m_a2cUo b_a2cUq) (%>>) :: forall a_a2cUr b_a2cUs (t_a2d5n :: m_a2cUo a_a2cUr) (t_a2d5o :: m_a2cUo b_a2cUs). SMonad m_a2cUo => Sing t_a2d5n -> Sing t_a2d5o -> Sing (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) sReturn :: forall a_a2cUt (t_a2d5r :: a_a2cUt). SMonad m_a2cUo => Sing t_a2d5r -> Sing (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) sFail :: forall a_a2cUu (t_a2d5t :: Symbol). SMonad m_a2cUo => Sing t_a2d5t -> Sing (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) (%>>) :: forall a_a2cUr b_a2cUs (t_a2d5n :: m_a2cUo a_a2cUr) (t_a2d5o :: m_a2cUo b_a2cUs). (SMonad m_a2cUo, (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) ~ Apply (Apply TFHelper_6989586621679536574Sym0 t_a2d5n) t_a2d5o) => Sing t_a2d5n -> Sing t_a2d5o -> Sing (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) sReturn :: forall a_a2cUt (t_a2d5r :: a_a2cUt). (SMonad m_a2cUo, (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) ~ Apply Return_6989586621679536584Sym0 t_a2d5r) => Sing t_a2d5r -> Sing (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) sFail :: forall a_a2cUu (t_a2d5t :: Symbol). (SMonad m_a2cUo, (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) ~ Apply Fail_6989586621679536591Sym0 t_a2d5t) => Sing t_a2d5t -> Sing (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) infixl 1 %>>= infixl 1 %>> class (PAlternative m_a2cVi, PMonad m_a2cVi) => PMonadPlus (m_a2cVi :: Type -> Type) where { type family Mzero :: m_a2cVi a_a2cVj; type family Mplus (arg_a2d2S :: m_a2cVi a_a2cVk) (arg_a2d2T :: m_a2cVi a_a2cVk) :: m_a2cVi a_a2cVk; type Mzero = Mzero_6989586621679536602Sym0; type Mplus a_a2d38 a_a2d39 = Apply (Apply Mplus_6989586621679536616Sym0 a_a2d38) a_a2d39; } class (SAlternative m_a2cVi, SMonad m_a2cVi) => SMonadPlus (m_a2cVi :: Type -> Type) sMzero :: forall a_a2cVj. SMonadPlus m_a2cVi => Sing (MzeroSym0 :: m_a2cVi a_a2cVj) sMplus :: forall a_a2cVk (t_a2d5D :: m_a2cVi a_a2cVk) (t_a2d5E :: m_a2cVi a_a2cVk). SMonadPlus m_a2cVi => Sing t_a2d5D -> Sing t_a2d5E -> Sing (Apply (Apply MplusSym0 t_a2d5D) t_a2d5E :: m_a2cVi a_a2cVk) sMzero :: forall a_a2cVj. (SMonadPlus m_a2cVi, (MzeroSym0 :: m_a2cVi a_a2cVj) ~ Mzero_6989586621679536602Sym0) => Sing (MzeroSym0 :: m_a2cVi a_a2cVj) sMplus :: forall a_a2cVk (t_a2d5D :: m_a2cVi a_a2cVk) (t_a2d5E :: m_a2cVi a_a2cVk). (SMonadPlus m_a2cVi, (Apply (Apply MplusSym0 t_a2d5D) t_a2d5E :: m_a2cVi a_a2cVk) ~ Apply (Apply Mplus_6989586621679536616Sym0 t_a2d5D) t_a2d5E) => Sing t_a2d5D -> Sing t_a2d5E -> Sing (Apply (Apply MplusSym0 t_a2d5D) t_a2d5E :: m_a2cVi a_a2cVk) type family MapM (arg_a7eNH :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (arg_a7eNI :: t_a7eNp a_a7eNw) :: m_a7eNv (t_a7eNp b_a7eNx) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) type family MapM_ (a_a5ZOR :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (a_a5ZOS :: t_a5ZFb a_a5ZFd) :: m_a5ZFc () sMapM_ :: forall t_a5ZFb m_a5ZFc a_a5ZFd b_a5ZFe (t_a60aT :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (t_a60aU :: t_a5ZFb a_a5ZFd). (SFoldable t_a5ZFb, SMonad m_a5ZFc) => Sing t_a60aT -> Sing t_a60aU -> Sing (Apply (Apply MapM_Sym0 t_a60aT) t_a60aU :: m_a5ZFc ()) type family ForM (a_a7gop :: t_a7gfq a_a7gfs) (a_a7goq :: (~>) a_a7gfs (m_a7gfr b_a7gft)) :: m_a7gfr (t_a7gfq b_a7gft) sForM :: forall t_a7gfq m_a7gfr a_a7gfs b_a7gft (t_a7gxS :: t_a7gfq a_a7gfs) (t_a7gxT :: (~>) a_a7gfs (m_a7gfr b_a7gft)). (STraversable t_a7gfq, SMonad m_a7gfr) => Sing t_a7gxS -> Sing t_a7gxT -> Sing (Apply (Apply ForMSym0 t_a7gxS) t_a7gxT :: m_a7gfr (t_a7gfq b_a7gft)) type family Sequence (arg_a7eNL :: t_a7eNp (m_a7eNy a_a7eNz)) :: m_a7eNy (t_a7eNp a_a7eNz) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) type family Sequence_ (a_a5ZOJ :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)) :: m_a5ZF2 () sSequence_ :: forall t_a5ZF1 m_a5ZF2 a_a5ZF3 (t_a60aP :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)). (SFoldable t_a5ZF1, SMonad m_a5ZF2) => Sing t_a60aP -> Sing (Apply Sequence_Sym0 t_a60aP :: m_a5ZF2 ()) type family (=<<) (a_a2cZw :: (~>) a_a2cT9 (m_a2cT8 b_a2cTa)) (a_a2cZx :: m_a2cT8 a_a2cT9) :: m_a2cT8 b_a2cTa infixr 1 =<< (%=<<) :: forall m_a2cT8 a_a2cT9 b_a2cTa (t_a2d42 :: (~>) a_a2cT9 (m_a2cT8 b_a2cTa)) (t_a2d43 :: m_a2cT8 a_a2cT9). SMonad m_a2cT8 => Sing t_a2d42 -> Sing t_a2d43 -> Sing (Apply (Apply (=<<@#@$) t_a2d42) t_a2d43 :: m_a2cT8 b_a2cTa) infixr 1 %=<< type family (>=>) (a_a9a7Z :: (~>) a_a9a10 (m_a9a0Z b_a9a11)) (a_a9a80 :: (~>) b_a9a11 (m_a9a0Z c_a9a12)) (a_a9a81 :: a_a9a10) :: m_a9a0Z c_a9a12 infixr 1 >=> (%>=>) :: forall m_a9a0Z a_a9a10 b_a9a11 c_a9a12 (t_a9aah :: (~>) a_a9a10 (m_a9a0Z b_a9a11)) (t_a9aai :: (~>) b_a9a11 (m_a9a0Z c_a9a12)) (t_a9aaj :: a_a9a10). SMonad m_a9a0Z => Sing t_a9aah -> Sing t_a9aai -> Sing t_a9aaj -> Sing (Apply (Apply (Apply (>=>@#@$) t_a9aah) t_a9aai) t_a9aaj :: m_a9a0Z c_a9a12) infixr 1 %>=> type family (<=<) (a_a9a8o :: (~>) b_a9a0W (m_a9a0V c_a9a0X)) (a_a9a8p :: (~>) a_a9a0Y (m_a9a0V b_a9a0W)) (a_a9a8q :: a_a9a0Y) :: m_a9a0V c_a9a0X infixr 1 <=< (%<=<) :: forall m_a9a0V b_a9a0W c_a9a0X a_a9a0Y (t_a9aan :: (~>) b_a9a0W (m_a9a0V c_a9a0X)) (t_a9aao :: (~>) a_a9a0Y (m_a9a0V b_a9a0W)) (t_a9aap :: a_a9a0Y). SMonad m_a9a0V => Sing t_a9aan -> Sing t_a9aao -> Sing t_a9aap -> Sing (Apply (Apply (Apply (<=<@#@$) t_a9aan) t_a9aao) t_a9aap :: m_a9a0V c_a9a0X) infixr 1 %<=< type family Void (a_a2UYa :: f_a2UX0 a_a2UX1) :: f_a2UX0 () sVoid :: forall f_a2UX0 a_a2UX1 (t_a2UZW :: f_a2UX0 a_a2UX1). SFunctor f_a2UX0 => Sing t_a2UZW -> Sing (Apply VoidSym0 t_a2UZW :: f_a2UX0 ()) type family Join (a_a2cZC :: m_a2cTb (m_a2cTb a_a2cTc)) :: m_a2cTb a_a2cTc sJoin :: forall m_a2cTb a_a2cTc (t_a2d46 :: m_a2cTb (m_a2cTb a_a2cTc)). SMonad m_a2cTb => Sing t_a2d46 -> Sing (Apply JoinSym0 t_a2d46 :: m_a2cTb a_a2cTc) type family Msum (a_a5ZOE :: t_a5ZEV (m_a5ZEW a_a5ZEX)) :: m_a5ZEW a_a5ZEX sMsum :: forall t_a5ZEV m_a5ZEW a_a5ZEX (t_a60aN :: t_a5ZEV (m_a5ZEW a_a5ZEX)). (SFoldable t_a5ZEV, SMonadPlus m_a5ZEW) => Sing t_a60aN -> Sing (Apply MsumSym0 t_a60aN :: m_a5ZEW a_a5ZEX) type family Mfilter (a_a9a5R :: (~>) a_a9a0s Bool) (a_a9a5S :: m_a9a0r a_a9a0s) :: m_a9a0r a_a9a0s sMfilter :: forall m_a9a0r a_a9a0s (t_a9a9v :: (~>) a_a9a0s Bool) (t_a9a9w :: m_a9a0r a_a9a0s). SMonadPlus m_a9a0r => Sing t_a9a9v -> Sing t_a9a9w -> Sing (Apply (Apply MfilterSym0 t_a9a9v) t_a9a9w :: m_a9a0r a_a9a0s) type family FilterM (a_a9a8x :: (~>) a_a9a14 (m_a9a13 Bool)) (a_a9a8y :: [a_a9a14]) :: m_a9a13 [a_a9a14] sFilterM :: forall m_a9a13 a_a9a14 (t_a9aat :: (~>) a_a9a14 (m_a9a13 Bool)) (t_a9aau :: [a_a9a14]). SApplicative m_a9a13 => Sing t_a9aat -> Sing t_a9aau -> Sing (Apply (Apply FilterMSym0 t_a9aat) t_a9aau :: m_a9a13 [a_a9a14]) type family MapAndUnzipM (a_a9a7T :: (~>) a_a9a0S (m_a9a0R (b_a9a0T, c_a9a0U))) (a_a9a7U :: [a_a9a0S]) :: m_a9a0R ([b_a9a0T], [c_a9a0U]) sMapAndUnzipM :: forall m_a9a0R a_a9a0S b_a9a0T c_a9a0U (t_a9aad :: (~>) a_a9a0S (m_a9a0R (b_a9a0T, c_a9a0U))) (t_a9aae :: [a_a9a0S]). SApplicative m_a9a0R => Sing t_a9aad -> Sing t_a9aae -> Sing (Apply (Apply MapAndUnzipMSym0 t_a9aad) t_a9aae :: m_a9a0R ([b_a9a0T], [c_a9a0U])) type family ZipWithM (a_a9a7K :: (~>) a_a9a0O ((~>) b_a9a0P (m_a9a0N c_a9a0Q))) (a_a9a7L :: [a_a9a0O]) (a_a9a7M :: [b_a9a0P]) :: m_a9a0N [c_a9a0Q] sZipWithM :: forall m_a9a0N a_a9a0O b_a9a0P c_a9a0Q (t_a9aa7 :: (~>) a_a9a0O ((~>) b_a9a0P (m_a9a0N c_a9a0Q))) (t_a9aa8 :: [a_a9a0O]) (t_a9aa9 :: [b_a9a0P]). SApplicative m_a9a0N => Sing t_a9aa7 -> Sing t_a9aa8 -> Sing t_a9aa9 -> Sing (Apply (Apply (Apply ZipWithMSym0 t_a9aa7) t_a9aa8) t_a9aa9 :: m_a9a0N [c_a9a0Q]) type family ZipWithM_ (a_a9a7B :: (~>) a_a9a0K ((~>) b_a9a0L (m_a9a0J c_a9a0M))) (a_a9a7C :: [a_a9a0K]) (a_a9a7D :: [b_a9a0L]) :: m_a9a0J () sZipWithM_ :: forall m_a9a0J a_a9a0K b_a9a0L c_a9a0M (t_a9aa1 :: (~>) a_a9a0K ((~>) b_a9a0L (m_a9a0J c_a9a0M))) (t_a9aa2 :: [a_a9a0K]) (t_a9aa3 :: [b_a9a0L]). SApplicative m_a9a0J => Sing t_a9aa1 -> Sing t_a9aa2 -> Sing t_a9aa3 -> Sing (Apply (Apply (Apply ZipWithM_Sym0 t_a9aa1) t_a9aa2) t_a9aa3 :: m_a9a0J ()) type family FoldlM (a_a5ZPr :: (~>) b_a5ZFp ((~>) a_a5ZFq (m_a5ZFo b_a5ZFp))) (a_a5ZPs :: b_a5ZFp) (a_a5ZPt :: t_a5ZFn a_a5ZFq) :: m_a5ZFo b_a5ZFp sFoldlM :: forall t_a5ZFn m_a5ZFo b_a5ZFp a_a5ZFq (t_a60b9 :: (~>) b_a5ZFp ((~>) a_a5ZFq (m_a5ZFo b_a5ZFp))) (t_a60ba :: b_a5ZFp) (t_a60bb :: t_a5ZFn a_a5ZFq). (SFoldable t_a5ZFn, SMonad m_a5ZFo) => Sing t_a60b9 -> Sing t_a60ba -> Sing t_a60bb -> Sing (Apply (Apply (Apply FoldlMSym0 t_a60b9) t_a60ba) t_a60bb :: m_a5ZFo b_a5ZFp) type family ReplicateM (a_a9a6U :: Nat) (a_a9a6V :: m_a9a0z a_a9a0A) :: m_a9a0z [a_a9a0A] sReplicateM :: forall m_a9a0z a_a9a0A (t_a9a9L :: Nat) (t_a9a9M :: m_a9a0z a_a9a0A). SApplicative m_a9a0z => Sing t_a9a9L -> Sing t_a9a9M -> Sing (Apply (Apply ReplicateMSym0 t_a9a9L) t_a9a9M :: m_a9a0z [a_a9a0A]) type family ReplicateM_ (a_a9a6B :: Nat) (a_a9a6C :: m_a9a0x a_a9a0y) :: m_a9a0x () sReplicateM_ :: forall m_a9a0x a_a9a0y (t_a9a9H :: Nat) (t_a9a9I :: m_a9a0x a_a9a0y). SApplicative m_a9a0x => Sing t_a9a9H -> Sing t_a9a9I -> Sing (Apply (Apply ReplicateM_Sym0 t_a9a9H) t_a9a9I :: m_a9a0x ()) type family Guard (a_a2cVn :: Bool) :: f_a2cSE () sGuard :: forall f_a2cSE (t_a2d3e :: Bool). SAlternative f_a2cSE => Sing t_a2d3e -> Sing (Apply GuardSym0 t_a2d3e :: f_a2cSE ()) type family When (a_a2cZn :: Bool) (a_a2cZo :: f_a2cT7 ()) :: f_a2cT7 () sWhen :: forall f_a2cT7 (t_a2d3Y :: Bool) (t_a2d3Z :: f_a2cT7 ()). SApplicative f_a2cT7 => Sing t_a2d3Y -> Sing t_a2d3Z -> Sing (Apply (Apply WhenSym0 t_a2d3Y) t_a2d3Z :: f_a2cT7 ()) type family Unless (a_a9a6s :: Bool) (a_a9a6t :: f_a9a0w ()) :: f_a9a0w () sUnless :: forall f_a9a0w (t_a9a9D :: Bool) (t_a9a9E :: f_a9a0w ()). SApplicative f_a9a0w => Sing t_a9a9D -> Sing t_a9a9E -> Sing (Apply (Apply UnlessSym0 t_a9a9D) t_a9a9E :: f_a9a0w ()) type family LiftM (a_a2cZa :: (~>) a1_a2cT5 r_a2cT6) (a_a2cZb :: m_a2cT4 a1_a2cT5) :: m_a2cT4 r_a2cT6 sLiftM :: forall m_a2cT4 a1_a2cT5 r_a2cT6 (t_a2d3U :: (~>) a1_a2cT5 r_a2cT6) (t_a2d3V :: m_a2cT4 a1_a2cT5). SMonad m_a2cT4 => Sing t_a2d3U -> Sing t_a2d3V -> Sing (Apply (Apply LiftMSym0 t_a2d3U) t_a2d3V :: m_a2cT4 r_a2cT6) type family LiftM2 (a_a2cYK :: (~>) a1_a2cT1 ((~>) a2_a2cT2 r_a2cT3)) (a_a2cYL :: m_a2cT0 a1_a2cT1) (a_a2cYM :: m_a2cT0 a2_a2cT2) :: m_a2cT0 r_a2cT3 sLiftM2 :: forall m_a2cT0 a1_a2cT1 a2_a2cT2 r_a2cT3 (t_a2d3O :: (~>) a1_a2cT1 ((~>) a2_a2cT2 r_a2cT3)) (t_a2d3P :: m_a2cT0 a1_a2cT1) (t_a2d3Q :: m_a2cT0 a2_a2cT2). SMonad m_a2cT0 => Sing t_a2d3O -> Sing t_a2d3P -> Sing t_a2d3Q -> Sing (Apply (Apply (Apply LiftM2Sym0 t_a2d3O) t_a2d3P) t_a2d3Q :: m_a2cT0 r_a2cT3) type family LiftM3 (a_a2cY4 :: (~>) a1_a2cSW ((~>) a2_a2cSX ((~>) a3_a2cSY r_a2cSZ))) (a_a2cY5 :: m_a2cSV a1_a2cSW) (a_a2cY6 :: m_a2cSV a2_a2cSX) (a_a2cY7 :: m_a2cSV a3_a2cSY) :: m_a2cSV r_a2cSZ sLiftM3 :: forall m_a2cSV a1_a2cSW a2_a2cSX a3_a2cSY r_a2cSZ (t_a2d3G :: (~>) a1_a2cSW ((~>) a2_a2cSX ((~>) a3_a2cSY r_a2cSZ))) (t_a2d3H :: m_a2cSV a1_a2cSW) (t_a2d3I :: m_a2cSV a2_a2cSX) (t_a2d3J :: m_a2cSV a3_a2cSY). SMonad m_a2cSV => Sing t_a2d3G -> Sing t_a2d3H -> Sing t_a2d3I -> Sing t_a2d3J -> Sing (Apply (Apply (Apply (Apply LiftM3Sym0 t_a2d3G) t_a2d3H) t_a2d3I) t_a2d3J :: m_a2cSV r_a2cSZ) type family LiftM4 (a_a2cX5 :: (~>) a1_a2cSQ ((~>) a2_a2cSR ((~>) a3_a2cSS ((~>) a4_a2cST r_a2cSU)))) (a_a2cX6 :: m_a2cSP a1_a2cSQ) (a_a2cX7 :: m_a2cSP a2_a2cSR) (a_a2cX8 :: m_a2cSP a3_a2cSS) (a_a2cX9 :: m_a2cSP a4_a2cST) :: m_a2cSP r_a2cSU sLiftM4 :: forall m_a2cSP a1_a2cSQ a2_a2cSR a3_a2cSS a4_a2cST r_a2cSU (t_a2d3w :: (~>) a1_a2cSQ ((~>) a2_a2cSR ((~>) a3_a2cSS ((~>) a4_a2cST r_a2cSU)))) (t_a2d3x :: m_a2cSP a1_a2cSQ) (t_a2d3y :: m_a2cSP a2_a2cSR) (t_a2d3z :: m_a2cSP a3_a2cSS) (t_a2d3A :: m_a2cSP a4_a2cST). SMonad m_a2cSP => Sing t_a2d3w -> Sing t_a2d3x -> Sing t_a2d3y -> Sing t_a2d3z -> Sing t_a2d3A -> Sing (Apply (Apply (Apply (Apply (Apply LiftM4Sym0 t_a2d3w) t_a2d3x) t_a2d3y) t_a2d3z) t_a2d3A :: m_a2cSP r_a2cSU) type family LiftM5 (a_a2cVK :: (~>) a1_a2cSJ ((~>) a2_a2cSK ((~>) a3_a2cSL ((~>) a4_a2cSM ((~>) a5_a2cSN r_a2cSO))))) (a_a2cVL :: m_a2cSI a1_a2cSJ) (a_a2cVM :: m_a2cSI a2_a2cSK) (a_a2cVN :: m_a2cSI a3_a2cSL) (a_a2cVO :: m_a2cSI a4_a2cSM) (a_a2cVP :: m_a2cSI a5_a2cSN) :: m_a2cSI r_a2cSO sLiftM5 :: forall m_a2cSI a1_a2cSJ a2_a2cSK a3_a2cSL a4_a2cSM a5_a2cSN r_a2cSO (t_a2d3k :: (~>) a1_a2cSJ ((~>) a2_a2cSK ((~>) a3_a2cSL ((~>) a4_a2cSM ((~>) a5_a2cSN r_a2cSO))))) (t_a2d3l :: m_a2cSI a1_a2cSJ) (t_a2d3m :: m_a2cSI a2_a2cSK) (t_a2d3n :: m_a2cSI a3_a2cSL) (t_a2d3o :: m_a2cSI a4_a2cSM) (t_a2d3p :: m_a2cSI a5_a2cSN). SMonad m_a2cSI => Sing t_a2d3k -> Sing t_a2d3l -> Sing t_a2d3m -> Sing t_a2d3n -> Sing t_a2d3o -> Sing t_a2d3p -> Sing (Apply (Apply (Apply (Apply (Apply (Apply LiftM5Sym0 t_a2d3k) t_a2d3l) t_a2d3m) t_a2d3n) t_a2d3o) t_a2d3p :: m_a2cSI r_a2cSO) type family Ap (a_a2cVp :: m_a2cSF ((~>) a_a2cSG b_a2cSH)) (a_a2cVq :: m_a2cSF a_a2cSG) :: m_a2cSF b_a2cSH sAp :: forall m_a2cSF a_a2cSG b_a2cSH (t_a2d3g :: m_a2cSF ((~>) a_a2cSG b_a2cSH)) (t_a2d3h :: m_a2cSF a_a2cSG). SMonad m_a2cSF => Sing t_a2d3g -> Sing t_a2d3h -> Sing (Apply (Apply ApSym0 t_a2d3g) t_a2d3h :: m_a2cSF b_a2cSH) type family (<$!>) (a_a9a6b :: (~>) a_a9a0u b_a9a0v) (a_a9a6c :: m_a9a0t a_a9a0u) :: m_a9a0t b_a9a0v infixl 4 <$!> (%<$!>) :: forall m_a9a0t a_a9a0u b_a9a0v (t_a9a9z :: (~>) a_a9a0u b_a9a0v) (t_a9a9A :: m_a9a0t a_a9a0u). SMonad m_a9a0t => Sing t_a9a9z -> Sing t_a9a9A -> Sing (Apply (Apply (<$!>@#@$) t_a9a9z) t_a9a9A :: m_a9a0t b_a9a0v) infixl 4 %<$!> data FmapSym0 :: forall a6989586621679536044 b6989586621679536045 f6989586621679536043. (~>) ((~>) a6989586621679536044 b6989586621679536045) ((~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045)) data FmapSym1 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) :: forall f6989586621679536043. (~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045) type FmapSym2 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) (arg6989586621679536438 :: f6989586621679536043 a6989586621679536044) = Fmap arg6989586621679536437 arg6989586621679536438 data (>>=@#@$) :: forall a6989586621679536073 b6989586621679536074 m6989586621679536072. (~>) (m6989586621679536072 a6989586621679536073) ((~>) ((~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) (m6989586621679536072 b6989586621679536074)) infixl 1 >>=@#@$ data (>>=@#@$$) (arg6989586621679536544 :: m6989586621679536072 a6989586621679536073) :: forall b6989586621679536074. (~>) ((~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) (m6989586621679536072 b6989586621679536074) infixl 1 >>=@#@$$ type (>>=@#@$$$) (arg6989586621679536544 :: m6989586621679536072 a6989586621679536073) (arg6989586621679536545 :: (~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) = (>>=) arg6989586621679536544 arg6989586621679536545 data (>>@#@$) :: forall a6989586621679536075 b6989586621679536076 m6989586621679536072. (~>) (m6989586621679536072 a6989586621679536075) ((~>) (m6989586621679536072 b6989586621679536076) (m6989586621679536072 b6989586621679536076)) infixl 1 >>@#@$ data (>>@#@$$) (arg6989586621679536548 :: m6989586621679536072 a6989586621679536075) :: forall b6989586621679536076. (~>) (m6989586621679536072 b6989586621679536076) (m6989586621679536072 b6989586621679536076) infixl 1 >>@#@$$ type (>>@#@$$$) (arg6989586621679536548 :: m6989586621679536072 a6989586621679536075) (arg6989586621679536549 :: m6989586621679536072 b6989586621679536076) = (>>) arg6989586621679536548 arg6989586621679536549 data ReturnSym0 :: forall a6989586621679536077 m6989586621679536072. (~>) a6989586621679536077 (m6989586621679536072 a6989586621679536077) type ReturnSym1 (arg6989586621679536552 :: a6989586621679536077) = Return arg6989586621679536552 data FailSym0 :: forall a6989586621679536078 m6989586621679536072. (~>) Symbol (m6989586621679536072 a6989586621679536078) type FailSym1 (arg6989586621679536554 :: Symbol) = Fail arg6989586621679536554 type MzeroSym0 = Mzero data MplusSym0 :: forall a6989586621679536130 m6989586621679536128. (~>) (m6989586621679536128 a6989586621679536130) ((~>) (m6989586621679536128 a6989586621679536130) (m6989586621679536128 a6989586621679536130)) data MplusSym1 (arg6989586621679536598 :: m6989586621679536128 a6989586621679536130) :: (~>) (m6989586621679536128 a6989586621679536130) (m6989586621679536128 a6989586621679536130) type MplusSym2 (arg6989586621679536598 :: m6989586621679536128 a6989586621679536130) (arg6989586621679536599 :: m6989586621679536128 a6989586621679536130) = Mplus arg6989586621679536598 arg6989586621679536599 data MapMSym0 :: forall a6989586621680734974 b6989586621680734975 m6989586621680734973 t6989586621680734967. (~>) ((~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) ((~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975))) data MapMSym1 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975)) type MapMSym2 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) (arg6989586621680734986 :: t6989586621680734967 a6989586621680734974) = MapM arg6989586621680734985 arg6989586621680734986 data MapM_Sym0 :: forall a6989586621680438471 b6989586621680438472 m6989586621680438470 t6989586621680438469. (~>) ((~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) ((~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ())) data MapM_Sym1 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) :: forall t6989586621680438469. (~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ()) type MapM_Sym2 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) (a6989586621680439070 :: t6989586621680438469 a6989586621680438471) = MapM_ a6989586621680439069 a6989586621680439070 data ForMSym0 :: forall a6989586621680740550 b6989586621680740551 m6989586621680740549 t6989586621680740548. (~>) (t6989586621680740548 a6989586621680740550) ((~>) ((~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) (m6989586621680740549 (t6989586621680740548 b6989586621680740551))) data ForMSym1 (a6989586621680741105 :: t6989586621680740548 a6989586621680740550) :: forall b6989586621680740551 m6989586621680740549. (~>) ((~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) (m6989586621680740549 (t6989586621680740548 b6989586621680740551)) type ForMSym2 (a6989586621680741105 :: t6989586621680740548 a6989586621680740550) (a6989586621680741106 :: (~>) a6989586621680740550 (m6989586621680740549 b6989586621680740551)) = ForM a6989586621680741105 a6989586621680741106 data SequenceSym0 :: forall a6989586621680734977 m6989586621680734976 t6989586621680734967. (~>) (t6989586621680734967 (m6989586621680734976 a6989586621680734977)) (m6989586621680734976 (t6989586621680734967 a6989586621680734977)) type SequenceSym1 (arg6989586621680734989 :: t6989586621680734967 (m6989586621680734976 a6989586621680734977)) = Sequence arg6989586621680734989 data Sequence_Sym0 :: forall a6989586621680438461 m6989586621680438460 t6989586621680438459. (~>) (t6989586621680438459 (m6989586621680438460 a6989586621680438461)) (m6989586621680438460 ()) type Sequence_Sym1 (a6989586621680439061 :: t6989586621680438459 (m6989586621680438460 a6989586621680438461)) = Sequence_ a6989586621680439061 data (=<<@#@$) :: forall a6989586621679535995 b6989586621679535996 m6989586621679535994. (~>) ((~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) ((~>) (m6989586621679535994 a6989586621679535995) (m6989586621679535994 b6989586621679535996)) infixr 1 =<<@#@$ data (=<<@#@$$) (a6989586621679536390 :: (~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) :: (~>) (m6989586621679535994 a6989586621679535995) (m6989586621679535994 b6989586621679535996) infixr 1 =<<@#@$$ type (=<<@#@$$$) (a6989586621679536390 :: (~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) (a6989586621679536391 :: m6989586621679535994 a6989586621679535995) = (=<<) a6989586621679536390 a6989586621679536391 data (>=>@#@$) :: forall a6989586621681193246 b6989586621681193247 c6989586621681193248 m6989586621681193245. (~>) ((~>) a6989586621681193246 (m6989586621681193245 b6989586621681193247)) ((~>) ((~>) b6989586621681193247 (m6989586621681193245 c6989586621681193248)) ((~>) a6989586621681193246 (m6989586621681193245 c6989586621681193248))) infixr 1 >=>@#@$ data (>=>@#@$$) (a6989586621681193679 :: (~>) a6989586621681193246 (m6989586621681193245 b6989586621681193247)) :: forall c6989586621681193248. (~>) ((~>) b6989586621681193247 (m6989586621681193245 c6989586621681193248)) ((~>) a6989586621681193246 (m6989586621681193245 c6989586621681193248)) infixr 1 >=>@#@$$ data (>=>@#@$$$) (a6989586621681193679 :: (~>) a6989586621681193246 (m6989586621681193245 b6989586621681193247)) (a6989586621681193680 :: (~>) b6989586621681193247 (m6989586621681193245 c6989586621681193248)) :: (~>) a6989586621681193246 (m6989586621681193245 c6989586621681193248) infixr 1 >=>@#@$$$ data (<=<@#@$) :: forall a6989586621681193244 b6989586621681193242 c6989586621681193243 m6989586621681193241. (~>) ((~>) b6989586621681193242 (m6989586621681193241 c6989586621681193243)) ((~>) ((~>) a6989586621681193244 (m6989586621681193241 b6989586621681193242)) ((~>) a6989586621681193244 (m6989586621681193241 c6989586621681193243))) infixr 1 <=<@#@$ data (<=<@#@$$) (a6989586621681193704 :: (~>) b6989586621681193242 (m6989586621681193241 c6989586621681193243)) :: forall a6989586621681193244. (~>) ((~>) a6989586621681193244 (m6989586621681193241 b6989586621681193242)) ((~>) a6989586621681193244 (m6989586621681193241 c6989586621681193243)) infixr 1 <=<@#@$$ data (<=<@#@$$$) (a6989586621681193704 :: (~>) b6989586621681193242 (m6989586621681193241 c6989586621681193243)) (a6989586621681193705 :: (~>) a6989586621681193244 (m6989586621681193241 b6989586621681193242)) :: (~>) a6989586621681193244 (m6989586621681193241 c6989586621681193243) infixr 1 <=<@#@$$$ data VoidSym0 :: forall a6989586621679705371 f6989586621679705370. (~>) (f6989586621679705370 a6989586621679705371) (f6989586621679705370 ()) type VoidSym1 (a6989586621679705442 :: f6989586621679705370 a6989586621679705371) = Void a6989586621679705442 data JoinSym0 :: forall a6989586621679535998 m6989586621679535997. (~>) (m6989586621679535997 (m6989586621679535997 a6989586621679535998)) (m6989586621679535997 a6989586621679535998) type JoinSym1 (a6989586621679536396 :: m6989586621679535997 (m6989586621679535997 a6989586621679535998)) = Join a6989586621679536396 data MsumSym0 :: forall a6989586621680438455 m6989586621680438454 t6989586621680438453. (~>) (t6989586621680438453 (m6989586621680438454 a6989586621680438455)) (m6989586621680438454 a6989586621680438455) type MsumSym1 (a6989586621680439056 :: t6989586621680438453 (m6989586621680438454 a6989586621680438455)) = Msum a6989586621680439056 data MfilterSym0 :: forall a6989586621681193212 m6989586621681193211. (~>) ((~>) a6989586621681193212 Bool) ((~>) (m6989586621681193211 a6989586621681193212) (m6989586621681193211 a6989586621681193212)) data MfilterSym1 (a6989586621681193547 :: (~>) a6989586621681193212 Bool) :: forall m6989586621681193211. (~>) (m6989586621681193211 a6989586621681193212) (m6989586621681193211 a6989586621681193212) type MfilterSym2 (a6989586621681193547 :: (~>) a6989586621681193212 Bool) (a6989586621681193548 :: m6989586621681193211 a6989586621681193212) = Mfilter a6989586621681193547 a6989586621681193548 data FilterMSym0 :: forall a6989586621681193250 m6989586621681193249. (~>) ((~>) a6989586621681193250 (m6989586621681193249 Bool)) ((~>) [a6989586621681193250] (m6989586621681193249 [a6989586621681193250])) data FilterMSym1 (a6989586621681193713 :: (~>) a6989586621681193250 (m6989586621681193249 Bool)) :: (~>) [a6989586621681193250] (m6989586621681193249 [a6989586621681193250]) type FilterMSym2 (a6989586621681193713 :: (~>) a6989586621681193250 (m6989586621681193249 Bool)) (a6989586621681193714 :: [a6989586621681193250]) = FilterM a6989586621681193713 a6989586621681193714 data MapAndUnzipMSym0 :: forall a6989586621681193238 b6989586621681193239 c6989586621681193240 m6989586621681193237. (~>) ((~>) a6989586621681193238 (m6989586621681193237 (b6989586621681193239, c6989586621681193240))) ((~>) [a6989586621681193238] (m6989586621681193237 ([b6989586621681193239], [c6989586621681193240]))) data MapAndUnzipMSym1 (a6989586621681193673 :: (~>) a6989586621681193238 (m6989586621681193237 (b6989586621681193239, c6989586621681193240))) :: (~>) [a6989586621681193238] (m6989586621681193237 ([b6989586621681193239], [c6989586621681193240])) type MapAndUnzipMSym2 (a6989586621681193673 :: (~>) a6989586621681193238 (m6989586621681193237 (b6989586621681193239, c6989586621681193240))) (a6989586621681193674 :: [a6989586621681193238]) = MapAndUnzipM a6989586621681193673 a6989586621681193674 data ZipWithMSym0 :: forall a6989586621681193234 b6989586621681193235 c6989586621681193236 m6989586621681193233. (~>) ((~>) a6989586621681193234 ((~>) b6989586621681193235 (m6989586621681193233 c6989586621681193236))) ((~>) [a6989586621681193234] ((~>) [b6989586621681193235] (m6989586621681193233 [c6989586621681193236]))) data ZipWithMSym1 (a6989586621681193664 :: (~>) a6989586621681193234 ((~>) b6989586621681193235 (m6989586621681193233 c6989586621681193236))) :: (~>) [a6989586621681193234] ((~>) [b6989586621681193235] (m6989586621681193233 [c6989586621681193236])) data ZipWithMSym2 (a6989586621681193664 :: (~>) a6989586621681193234 ((~>) b6989586621681193235 (m6989586621681193233 c6989586621681193236))) (a6989586621681193665 :: [a6989586621681193234]) :: (~>) [b6989586621681193235] (m6989586621681193233 [c6989586621681193236]) type ZipWithMSym3 (a6989586621681193664 :: (~>) a6989586621681193234 ((~>) b6989586621681193235 (m6989586621681193233 c6989586621681193236))) (a6989586621681193665 :: [a6989586621681193234]) (a6989586621681193666 :: [b6989586621681193235]) = ZipWithM a6989586621681193664 a6989586621681193665 a6989586621681193666 data ZipWithM_Sym0 :: forall a6989586621681193230 b6989586621681193231 c6989586621681193232 m6989586621681193229. (~>) ((~>) a6989586621681193230 ((~>) b6989586621681193231 (m6989586621681193229 c6989586621681193232))) ((~>) [a6989586621681193230] ((~>) [b6989586621681193231] (m6989586621681193229 ()))) data ZipWithM_Sym1 (a6989586621681193655 :: (~>) a6989586621681193230 ((~>) b6989586621681193231 (m6989586621681193229 c6989586621681193232))) :: (~>) [a6989586621681193230] ((~>) [b6989586621681193231] (m6989586621681193229 ())) data ZipWithM_Sym2 (a6989586621681193655 :: (~>) a6989586621681193230 ((~>) b6989586621681193231 (m6989586621681193229 c6989586621681193232))) (a6989586621681193656 :: [a6989586621681193230]) :: (~>) [b6989586621681193231] (m6989586621681193229 ()) type ZipWithM_Sym3 (a6989586621681193655 :: (~>) a6989586621681193230 ((~>) b6989586621681193231 (m6989586621681193229 c6989586621681193232))) (a6989586621681193656 :: [a6989586621681193230]) (a6989586621681193657 :: [b6989586621681193231]) = ZipWithM_ a6989586621681193655 a6989586621681193656 a6989586621681193657 data FoldlMSym0 :: forall a6989586621680438484 b6989586621680438483 m6989586621680438482 t6989586621680438481. (~>) ((~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) ((~>) b6989586621680438483 ((~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483))) data FoldlMSym1 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) :: forall t6989586621680438481. (~>) b6989586621680438483 ((~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483)) data FoldlMSym2 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) (a6989586621680439106 :: b6989586621680438483) :: forall t6989586621680438481. (~>) (t6989586621680438481 a6989586621680438484) (m6989586621680438482 b6989586621680438483) type FoldlMSym3 (a6989586621680439105 :: (~>) b6989586621680438483 ((~>) a6989586621680438484 (m6989586621680438482 b6989586621680438483))) (a6989586621680439106 :: b6989586621680438483) (a6989586621680439107 :: t6989586621680438481 a6989586621680438484) = FoldlM a6989586621680439105 a6989586621680439106 a6989586621680439107 data ReplicateMSym0 :: forall a6989586621681193220 m6989586621681193219. (~>) Nat ((~>) (m6989586621681193219 a6989586621681193220) (m6989586621681193219 [a6989586621681193220])) data ReplicateMSym1 (a6989586621681193612 :: Nat) :: forall a6989586621681193220 m6989586621681193219. (~>) (m6989586621681193219 a6989586621681193220) (m6989586621681193219 [a6989586621681193220]) type ReplicateMSym2 (a6989586621681193612 :: Nat) (a6989586621681193613 :: m6989586621681193219 a6989586621681193220) = ReplicateM a6989586621681193612 a6989586621681193613 data ReplicateM_Sym0 :: forall a6989586621681193218 m6989586621681193217. (~>) Nat ((~>) (m6989586621681193217 a6989586621681193218) (m6989586621681193217 ())) data ReplicateM_Sym1 (a6989586621681193593 :: Nat) :: forall a6989586621681193218 m6989586621681193217. (~>) (m6989586621681193217 a6989586621681193218) (m6989586621681193217 ()) type ReplicateM_Sym2 (a6989586621681193593 :: Nat) (a6989586621681193594 :: m6989586621681193217 a6989586621681193218) = ReplicateM_ a6989586621681193593 a6989586621681193594 data GuardSym0 :: forall f6989586621679535964. (~>) Bool (f6989586621679535964 ()) type GuardSym1 (a6989586621679536133 :: Bool) = Guard a6989586621679536133 data WhenSym0 :: forall f6989586621679535993. (~>) Bool ((~>) (f6989586621679535993 ()) (f6989586621679535993 ())) data WhenSym1 (a6989586621679536381 :: Bool) :: forall f6989586621679535993. (~>) (f6989586621679535993 ()) (f6989586621679535993 ()) type WhenSym2 (a6989586621679536381 :: Bool) (a6989586621679536382 :: f6989586621679535993 ()) = When a6989586621679536381 a6989586621679536382 data UnlessSym0 :: forall f6989586621681193216. (~>) Bool ((~>) (f6989586621681193216 ()) (f6989586621681193216 ())) data UnlessSym1 (a6989586621681193584 :: Bool) :: forall f6989586621681193216. (~>) (f6989586621681193216 ()) (f6989586621681193216 ()) type UnlessSym2 (a6989586621681193584 :: Bool) (a6989586621681193585 :: f6989586621681193216 ()) = Unless a6989586621681193584 a6989586621681193585 data LiftMSym0 :: forall a16989586621679535991 m6989586621679535990 r6989586621679535992. (~>) ((~>) a16989586621679535991 r6989586621679535992) ((~>) (m6989586621679535990 a16989586621679535991) (m6989586621679535990 r6989586621679535992)) data LiftMSym1 (a6989586621679536368 :: (~>) a16989586621679535991 r6989586621679535992) :: forall m6989586621679535990. (~>) (m6989586621679535990 a16989586621679535991) (m6989586621679535990 r6989586621679535992) type LiftMSym2 (a6989586621679536368 :: (~>) a16989586621679535991 r6989586621679535992) (a6989586621679536369 :: m6989586621679535990 a16989586621679535991) = LiftM a6989586621679536368 a6989586621679536369 data LiftM2Sym0 :: forall a16989586621679535987 a26989586621679535988 m6989586621679535986 r6989586621679535989. (~>) ((~>) a16989586621679535987 ((~>) a26989586621679535988 r6989586621679535989)) ((~>) (m6989586621679535986 a16989586621679535987) ((~>) (m6989586621679535986 a26989586621679535988) (m6989586621679535986 r6989586621679535989))) data LiftM2Sym1 (a6989586621679536342 :: (~>) a16989586621679535987 ((~>) a26989586621679535988 r6989586621679535989)) :: forall m6989586621679535986. (~>) (m6989586621679535986 a16989586621679535987) ((~>) (m6989586621679535986 a26989586621679535988) (m6989586621679535986 r6989586621679535989)) data LiftM2Sym2 (a6989586621679536342 :: (~>) a16989586621679535987 ((~>) a26989586621679535988 r6989586621679535989)) (a6989586621679536343 :: m6989586621679535986 a16989586621679535987) :: (~>) (m6989586621679535986 a26989586621679535988) (m6989586621679535986 r6989586621679535989) type LiftM2Sym3 (a6989586621679536342 :: (~>) a16989586621679535987 ((~>) a26989586621679535988 r6989586621679535989)) (a6989586621679536343 :: m6989586621679535986 a16989586621679535987) (a6989586621679536344 :: m6989586621679535986 a26989586621679535988) = LiftM2 a6989586621679536342 a6989586621679536343 a6989586621679536344 data LiftM3Sym0 :: forall a16989586621679535982 a26989586621679535983 a36989586621679535984 m6989586621679535981 r6989586621679535985. (~>) ((~>) a16989586621679535982 ((~>) a26989586621679535983 ((~>) a36989586621679535984 r6989586621679535985))) ((~>) (m6989586621679535981 a16989586621679535982) ((~>) (m6989586621679535981 a26989586621679535983) ((~>) (m6989586621679535981 a36989586621679535984) (m6989586621679535981 r6989586621679535985)))) data LiftM3Sym1 (a6989586621679536300 :: (~>) a16989586621679535982 ((~>) a26989586621679535983 ((~>) a36989586621679535984 r6989586621679535985))) :: forall m6989586621679535981. (~>) (m6989586621679535981 a16989586621679535982) ((~>) (m6989586621679535981 a26989586621679535983) ((~>) (m6989586621679535981 a36989586621679535984) (m6989586621679535981 r6989586621679535985))) data LiftM3Sym2 (a6989586621679536300 :: (~>) a16989586621679535982 ((~>) a26989586621679535983 ((~>) a36989586621679535984 r6989586621679535985))) (a6989586621679536301 :: m6989586621679535981 a16989586621679535982) :: (~>) (m6989586621679535981 a26989586621679535983) ((~>) (m6989586621679535981 a36989586621679535984) (m6989586621679535981 r6989586621679535985)) data LiftM3Sym3 (a6989586621679536300 :: (~>) a16989586621679535982 ((~>) a26989586621679535983 ((~>) a36989586621679535984 r6989586621679535985))) (a6989586621679536301 :: m6989586621679535981 a16989586621679535982) (a6989586621679536302 :: m6989586621679535981 a26989586621679535983) :: (~>) (m6989586621679535981 a36989586621679535984) (m6989586621679535981 r6989586621679535985) type LiftM3Sym4 (a6989586621679536300 :: (~>) a16989586621679535982 ((~>) a26989586621679535983 ((~>) a36989586621679535984 r6989586621679535985))) (a6989586621679536301 :: m6989586621679535981 a16989586621679535982) (a6989586621679536302 :: m6989586621679535981 a26989586621679535983) (a6989586621679536303 :: m6989586621679535981 a36989586621679535984) = LiftM3 a6989586621679536300 a6989586621679536301 a6989586621679536302 a6989586621679536303 data LiftM4Sym0 :: forall a16989586621679535976 a26989586621679535977 a36989586621679535978 a46989586621679535979 m6989586621679535975 r6989586621679535980. (~>) ((~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) ((~>) (m6989586621679535975 a16989586621679535976) ((~>) (m6989586621679535975 a26989586621679535977) ((~>) (m6989586621679535975 a36989586621679535978) ((~>) (m6989586621679535975 a46989586621679535979) (m6989586621679535975 r6989586621679535980))))) data LiftM4Sym1 (a6989586621679536239 :: (~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) :: forall m6989586621679535975. (~>) (m6989586621679535975 a16989586621679535976) ((~>) (m6989586621679535975 a26989586621679535977) ((~>) (m6989586621679535975 a36989586621679535978) ((~>) (m6989586621679535975 a46989586621679535979) (m6989586621679535975 r6989586621679535980)))) data LiftM4Sym2 (a6989586621679536239 :: (~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) (a6989586621679536240 :: m6989586621679535975 a16989586621679535976) :: (~>) (m6989586621679535975 a26989586621679535977) ((~>) (m6989586621679535975 a36989586621679535978) ((~>) (m6989586621679535975 a46989586621679535979) (m6989586621679535975 r6989586621679535980))) data LiftM4Sym3 (a6989586621679536239 :: (~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) (a6989586621679536240 :: m6989586621679535975 a16989586621679535976) (a6989586621679536241 :: m6989586621679535975 a26989586621679535977) :: (~>) (m6989586621679535975 a36989586621679535978) ((~>) (m6989586621679535975 a46989586621679535979) (m6989586621679535975 r6989586621679535980)) data LiftM4Sym4 (a6989586621679536239 :: (~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) (a6989586621679536240 :: m6989586621679535975 a16989586621679535976) (a6989586621679536241 :: m6989586621679535975 a26989586621679535977) (a6989586621679536242 :: m6989586621679535975 a36989586621679535978) :: (~>) (m6989586621679535975 a46989586621679535979) (m6989586621679535975 r6989586621679535980) type LiftM4Sym5 (a6989586621679536239 :: (~>) a16989586621679535976 ((~>) a26989586621679535977 ((~>) a36989586621679535978 ((~>) a46989586621679535979 r6989586621679535980)))) (a6989586621679536240 :: m6989586621679535975 a16989586621679535976) (a6989586621679536241 :: m6989586621679535975 a26989586621679535977) (a6989586621679536242 :: m6989586621679535975 a36989586621679535978) (a6989586621679536243 :: m6989586621679535975 a46989586621679535979) = LiftM4 a6989586621679536239 a6989586621679536240 a6989586621679536241 a6989586621679536242 a6989586621679536243 data LiftM5Sym0 :: forall a16989586621679535969 a26989586621679535970 a36989586621679535971 a46989586621679535972 a56989586621679535973 m6989586621679535968 r6989586621679535974. (~>) ((~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) ((~>) (m6989586621679535968 a16989586621679535969) ((~>) (m6989586621679535968 a26989586621679535970) ((~>) (m6989586621679535968 a36989586621679535971) ((~>) (m6989586621679535968 a46989586621679535972) ((~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974)))))) data LiftM5Sym1 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) :: forall m6989586621679535968. (~>) (m6989586621679535968 a16989586621679535969) ((~>) (m6989586621679535968 a26989586621679535970) ((~>) (m6989586621679535968 a36989586621679535971) ((~>) (m6989586621679535968 a46989586621679535972) ((~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974))))) data LiftM5Sym2 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) (a6989586621679536157 :: m6989586621679535968 a16989586621679535969) :: (~>) (m6989586621679535968 a26989586621679535970) ((~>) (m6989586621679535968 a36989586621679535971) ((~>) (m6989586621679535968 a46989586621679535972) ((~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974)))) data LiftM5Sym3 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) (a6989586621679536157 :: m6989586621679535968 a16989586621679535969) (a6989586621679536158 :: m6989586621679535968 a26989586621679535970) :: (~>) (m6989586621679535968 a36989586621679535971) ((~>) (m6989586621679535968 a46989586621679535972) ((~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974))) data LiftM5Sym4 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) (a6989586621679536157 :: m6989586621679535968 a16989586621679535969) (a6989586621679536158 :: m6989586621679535968 a26989586621679535970) (a6989586621679536159 :: m6989586621679535968 a36989586621679535971) :: (~>) (m6989586621679535968 a46989586621679535972) ((~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974)) data LiftM5Sym5 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) (a6989586621679536157 :: m6989586621679535968 a16989586621679535969) (a6989586621679536158 :: m6989586621679535968 a26989586621679535970) (a6989586621679536159 :: m6989586621679535968 a36989586621679535971) (a6989586621679536160 :: m6989586621679535968 a46989586621679535972) :: (~>) (m6989586621679535968 a56989586621679535973) (m6989586621679535968 r6989586621679535974) type LiftM5Sym6 (a6989586621679536156 :: (~>) a16989586621679535969 ((~>) a26989586621679535970 ((~>) a36989586621679535971 ((~>) a46989586621679535972 ((~>) a56989586621679535973 r6989586621679535974))))) (a6989586621679536157 :: m6989586621679535968 a16989586621679535969) (a6989586621679536158 :: m6989586621679535968 a26989586621679535970) (a6989586621679536159 :: m6989586621679535968 a36989586621679535971) (a6989586621679536160 :: m6989586621679535968 a46989586621679535972) (a6989586621679536161 :: m6989586621679535968 a56989586621679535973) = LiftM5 a6989586621679536156 a6989586621679536157 a6989586621679536158 a6989586621679536159 a6989586621679536160 a6989586621679536161 data ApSym0 :: forall a6989586621679535966 b6989586621679535967 m6989586621679535965. (~>) (m6989586621679535965 ((~>) a6989586621679535966 b6989586621679535967)) ((~>) (m6989586621679535965 a6989586621679535966) (m6989586621679535965 b6989586621679535967)) data ApSym1 (a6989586621679536135 :: m6989586621679535965 ((~>) a6989586621679535966 b6989586621679535967)) :: (~>) (m6989586621679535965 a6989586621679535966) (m6989586621679535965 b6989586621679535967) type ApSym2 (a6989586621679536135 :: m6989586621679535965 ((~>) a6989586621679535966 b6989586621679535967)) (a6989586621679536136 :: m6989586621679535965 a6989586621679535966) = Ap a6989586621679536135 a6989586621679536136 data (<$!>@#@$) :: forall a6989586621681193214 b6989586621681193215 m6989586621681193213. (~>) ((~>) a6989586621681193214 b6989586621681193215) ((~>) (m6989586621681193213 a6989586621681193214) (m6989586621681193213 b6989586621681193215)) infixl 4 <$!>@#@$ data (<$!>@#@$$) (a6989586621681193567 :: (~>) a6989586621681193214 b6989586621681193215) :: forall m6989586621681193213. (~>) (m6989586621681193213 a6989586621681193214) (m6989586621681193213 b6989586621681193215) infixl 4 <$!>@#@$$ type (<$!>@#@$$$) (a6989586621681193567 :: (~>) a6989586621681193214 b6989586621681193215) (a6989586621681193568 :: m6989586621681193213 a6989586621681193214) = (<$!>) a6989586621681193567 a6989586621681193568 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681193769Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Ord.Down instance forall b6989586621679536074 a6989586621679536073 (a6989586621681193767 :: Data.Ord.Down a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681193769Sym1 a6989586621681193767) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681193757Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad ((,) a) instance forall b6989586621679536074 a6989586621681193298 a6989586621679536073 (a6989586621681193755 :: (a6989586621681193298, a6989586621679536073)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681193757Sym1 a6989586621681193755) instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monad.Internal.SMonad ((,) a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681193746Scrutinee_6989586621681193312Sym0 instance forall k1 k2 k3 (u6989586621681193743 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193746Scrutinee_6989586621681193312Sym1 u6989586621681193743) instance forall k1 k2 k3 (a6989586621681193744 :: k3) (u6989586621681193743 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193746Scrutinee_6989586621681193312Sym2 a6989586621681193744 u6989586621681193743) 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 a6989586621681193250 (m6989586621681193249 :: * -> *) (a6989586621681193713 :: a6989586621681193250 Data.Singletons.Internal.~> m6989586621681193249 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FilterMSym1 a6989586621681193713) 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 a6989586621681193244 b6989586621681193242 (m6989586621681193241 :: * -> *) c6989586621681193243 (a6989586621681193704 :: b6989586621681193242 Data.Singletons.Internal.~> m6989586621681193241 c6989586621681193243). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<=<@#@$$) a6989586621681193704) 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 a6989586621681193244 b6989586621681193242 (m6989586621681193241 :: * -> *) c6989586621681193243 (a6989586621681193705 :: b6989586621681193242 Data.Singletons.Internal.~> m6989586621681193241 c6989586621681193243) (a6989586621681193704 :: a6989586621681193244 Data.Singletons.Internal.~> m6989586621681193241 b6989586621681193242). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681193705 Data.Singletons.Prelude.Monad.<=<@#@$$$ a6989586621681193704) 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 c6989586621681193248 a6989586621681193246 (m6989586621681193245 :: * -> *) b6989586621681193247 (a6989586621681193679 :: a6989586621681193246 Data.Singletons.Internal.~> m6989586621681193245 b6989586621681193247). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.>=>@#@$$) a6989586621681193679) 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 c6989586621681193248 a6989586621681193246 (m6989586621681193245 :: * -> *) b6989586621681193247 (a6989586621681193680 :: a6989586621681193246 Data.Singletons.Internal.~> m6989586621681193245 b6989586621681193247) (a6989586621681193679 :: b6989586621681193247 Data.Singletons.Internal.~> m6989586621681193245 c6989586621681193248). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681193680 Data.Singletons.Prelude.Monad.>=>@#@$$$ a6989586621681193679) 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 a6989586621681193238 (m6989586621681193237 :: * -> *) b6989586621681193239 c6989586621681193240 (a6989586621681193673 :: a6989586621681193238 Data.Singletons.Internal.~> m6989586621681193237 (b6989586621681193239, c6989586621681193240)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MapAndUnzipMSym1 a6989586621681193673) 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 a6989586621681193234 b6989586621681193235 (m6989586621681193233 :: * -> *) c6989586621681193236 (a6989586621681193664 :: a6989586621681193234 Data.Singletons.Internal.~> (b6989586621681193235 Data.Singletons.Internal.~> m6989586621681193233 c6989586621681193236)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym1 a6989586621681193664) 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 a6989586621681193234 b6989586621681193235 (m6989586621681193233 :: * -> *) c6989586621681193236 (a6989586621681193665 :: a6989586621681193234 Data.Singletons.Internal.~> (b6989586621681193235 Data.Singletons.Internal.~> m6989586621681193233 c6989586621681193236)) (a6989586621681193664 :: [a6989586621681193234]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym2 a6989586621681193665 a6989586621681193664) 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 a6989586621681193230 b6989586621681193231 (m6989586621681193229 :: * -> *) c6989586621681193232 (a6989586621681193655 :: a6989586621681193230 Data.Singletons.Internal.~> (b6989586621681193231 Data.Singletons.Internal.~> m6989586621681193229 c6989586621681193232)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym1 a6989586621681193655) 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 a6989586621681193230 b6989586621681193231 (m6989586621681193229 :: * -> *) c6989586621681193232 (a6989586621681193656 :: a6989586621681193230 Data.Singletons.Internal.~> (b6989586621681193231 Data.Singletons.Internal.~> m6989586621681193229 c6989586621681193232)) (a6989586621681193655 :: [a6989586621681193230]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym2 a6989586621681193656 a6989586621681193655) 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 (t6989586621681193225 :: * -> *) a6989586621681193228 (m6989586621681193226 :: * -> *) b6989586621681193227 (a6989586621681193646 :: b6989586621681193227 Data.Singletons.Internal.~> (a6989586621681193228 Data.Singletons.Internal.~> m6989586621681193226 b6989586621681193227)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym1 a6989586621681193646) 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 (t6989586621681193225 :: * -> *) a6989586621681193228 (m6989586621681193226 :: * -> *) b6989586621681193227 (a6989586621681193647 :: b6989586621681193227 Data.Singletons.Internal.~> (a6989586621681193228 Data.Singletons.Internal.~> m6989586621681193226 b6989586621681193227)) (a6989586621681193646 :: b6989586621681193227). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym2 a6989586621681193647 a6989586621681193646) 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 (t6989586621681193221 :: * -> *) a6989586621681193224 (m6989586621681193222 :: * -> *) b6989586621681193223 (a6989586621681193631 :: b6989586621681193223 Data.Singletons.Internal.~> (a6989586621681193224 Data.Singletons.Internal.~> m6989586621681193222 b6989586621681193223)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym1 a6989586621681193631) 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 (t6989586621681193221 :: * -> *) a6989586621681193224 (m6989586621681193222 :: * -> *) b6989586621681193223 (a6989586621681193632 :: b6989586621681193223 Data.Singletons.Internal.~> (a6989586621681193224 Data.Singletons.Internal.~> m6989586621681193222 b6989586621681193223)) (a6989586621681193631 :: b6989586621681193223). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym2 a6989586621681193632 a6989586621681193631) 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 a6989586621681193612) 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 a6989586621681193593) 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 a6989586621681193584) 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 (m6989586621681193213 :: * -> *) a6989586621681193214 b6989586621681193215 (a6989586621681193567 :: a6989586621681193214 Data.Singletons.Internal.~> b6989586621681193215). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<$!>@#@$$) a6989586621681193567) 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 (m6989586621681193211 :: * -> *) a6989586621681193212 (a6989586621681193547 :: a6989586621681193212 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MfilterSym1 a6989586621681193547) 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_6989586621681193721Sym0 instance forall k2 k3 (f6989586621679536048 :: * -> *) (p6989586621681193719 :: k3 Data.Singletons.Internal.~> f6989586621679536048 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193721Sym1 p6989586621681193719) instance forall k2 k3 (f6989586621679536048 :: * -> *) (a_69895866216811937176989586621681193720 :: k3 Data.Singletons.Internal.~> f6989586621679536048 GHC.Types.Bool) (p6989586621681193719 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193721Sym2 a_69895866216811937176989586621681193720 p6989586621681193719) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681193724Sym0 instance forall k1 k2 k3 (p6989586621681193719 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193724Sym1 p6989586621681193719) instance forall k1 k2 k3 (x6989586621681193723 :: k3) (p6989586621681193719 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193724Sym2 x6989586621681193723 p6989586621681193719) instance forall k1 k2 k3 (a_69895866216811937176989586621681193720 :: k3) (x6989586621681193723 :: k2) (p6989586621681193719 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193724Sym3 a_69895866216811937176989586621681193720 x6989586621681193723 p6989586621681193719) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681193690Sym0 instance forall k b6989586621679536074 k1 (m6989586621679536072 :: * -> *) a6989586621679536073 (f6989586621681193687 :: k1 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193690Sym1 f6989586621681193687) instance forall k b6989586621679536074 k1 (m6989586621679536072 :: * -> *) a6989586621679536073 (g6989586621681193688 :: k1 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073) (f6989586621681193687 :: a6989586621679536073 Data.Singletons.Internal.~> m6989586621679536072 b6989586621679536074). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193690Sym2 g6989586621681193688 f6989586621681193687) instance forall k b6989586621679536074 k1 (m6989586621679536072 :: * -> *) a6989586621679536073 (a_69895866216811936856989586621681193689 :: k1 Data.Singletons.Internal.~> m6989586621679536072 a6989586621679536073) (g6989586621681193688 :: a6989586621679536073 Data.Singletons.Internal.~> m6989586621679536072 b6989586621679536074) (f6989586621681193687 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193690Sym3 a_69895866216811936856989586621681193689 g6989586621681193688 f6989586621681193687) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681193618LoopSym0 instance forall k1 (f6989586621679536048 :: * -> *) k2 k3 (cnt06989586621681193616 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193618LoopSym1 cnt06989586621681193616) instance forall k1 (f6989586621679536048 :: * -> *) k2 k3 (f6989586621681193617 :: k3) (cnt06989586621681193616 :: f6989586621679536048 k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193618LoopSym2 f6989586621681193617 cnt06989586621681193616) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681193599LoopSym0 instance forall a6989586621679536055 k1 (f6989586621679536048 :: * -> *) k2 (cnt06989586621681193597 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193599LoopSym1 cnt06989586621681193597) instance forall k1 (f6989586621679536048 :: * -> *) a6989586621679536055 k2 (f6989586621681193598 :: k2) (cnt06989586621681193597 :: f6989586621679536048 a6989586621679536055). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193599LoopSym2 f6989586621681193598 cnt06989586621681193597) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681193573Sym0 instance forall k (m6989586621679536072 :: * -> *) k2 k3 (f6989586621681193571 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193573Sym1 f6989586621681193571) instance forall (m6989586621679536072 :: * -> *) k k2 k3 (m6989586621681193572 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681193571 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193573Sym2 m6989586621681193572 f6989586621681193571) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681193576ZSym0 instance forall k1 k2 k3 (f6989586621681193571 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193576ZSym1 f6989586621681193571) instance forall k1 k2 k3 (m6989586621681193572 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681193571 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193576ZSym2 m6989586621681193572 f6989586621681193571) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681193553Sym0 instance forall k (m6989586621679536072 :: * -> *) k1 (p6989586621681193551 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193553Sym1 p6989586621681193551) instance forall (m6989586621679536072 :: * -> *) k k1 (ma6989586621681193552 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621681193551 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681193553Sym2 ma6989586621681193552 p6989586621681193551) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681193556Scrutinee_6989586621681193310Sym0 instance forall k1 k2 k3 (p6989586621681193551 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193556Scrutinee_6989586621681193310Sym1 p6989586621681193551) instance forall k1 k2 k3 (ma6989586621681193552 :: k2 Data.Singletons.Internal.~> k3) (p6989586621681193551 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681193556Scrutinee_6989586621681193310Sym2 ma6989586621681193552 p6989586621681193551) 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 data family. data family Sing :: k -> Type -- | 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 . fromSingSomeSing
--   (\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. -- | 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)
--   
-- | 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) -- | 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 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) :: forall k. () => k -> Type Proxy :: Proxy data DemoteSym0 :: (~>) Type Type type DemoteSym1 (k6989586621679027556 :: Type) = Demote k6989586621679027556 data SameKindSym0 a6989586621679027562 data SameKindSym1 (a6989586621679027562 :: k6989586621679027561) b6989586621679027563 type SameKindSym2 (a6989586621679027562 :: k6989586621679027561) (b6989586621679027563 :: k6989586621679027561) = SameKind a6989586621679027562 b6989586621679027563 data KindOfSym0 a6989586621679027565 type KindOfSym1 (a6989586621679027565 :: k6989586621679027564) = KindOf a6989586621679027565 data (~>@#@$) a6989586621679025706 infixr 0 ~>@#@$ data (~>@#@$$) (a6989586621679025706 :: Type) b6989586621679025707 infixr 0 ~>@#@$$ type (~>@#@$$$) (a6989586621679025706 :: Type) (b6989586621679025707 :: Type) = (~>) a6989586621679025706 b6989586621679025707 data ApplySym0 :: forall k16989586621679025703 k26989586621679025702. (~>) ((~>) k16989586621679025703 k26989586621679025702) ((~>) k16989586621679025703 k26989586621679025702) data ApplySym1 (f6989586621679025704 :: (~>) k16989586621679025703 k26989586621679025702) :: (~>) k16989586621679025703 k26989586621679025702 type ApplySym2 (f6989586621679025704 :: (~>) k16989586621679025703 k26989586621679025702) (x6989586621679025705 :: k16989586621679025703) = Apply f6989586621679025704 x6989586621679025705 data (@@@#@$) a6989586621679025700 infixl 9 @@@#@$ data (@@@#@$$) (a6989586621679025700 :: (~>) k16989586621679031880 k6989586621679031878) b6989586621679025701 infixl 9 @@@#@$$ type (@@@#@$$$) (a6989586621679025700 :: (~>) k16989586621679031880 k6989586621679031878) (b6989586621679025701 :: k16989586621679031880) = (@@) a6989586621679025700 b6989586621679025701 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.@@@#@$) instance forall k16989586621679031880 k6989586621679031878 (a6989586621679025700 :: k16989586621679031880 Data.Singletons.Internal.~> k6989586621679031878). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.@@@#@$$) a6989586621679025700) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.ApplySym0 instance forall k16989586621679025703 k26989586621679025702 (f6989586621679025704 :: k16989586621679025703 Data.Singletons.Internal.~> k26989586621679025702). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.ApplySym1 f6989586621679025704) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.~>@#@$) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.~>@#@$$) a6989586621679025706) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.KindOfSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.SameKindSym0 instance forall k6989586621679027561 (a6989586621679027562 :: k6989586621679027561). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.SameKindSym1 a6989586621679027562) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.DemoteSym0 instance Data.Singletons.ShowSing.ShowSing k => GHC.Show.Show (Data.Singletons.Internal.SomeSing k) 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, Data.Singletons.Internal.SingKind 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.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 for each type in the list. singDecideInstances :: DsMonad q => [Name] -> q [Dec] -- | Create instance of SDecide 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] -- | 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 -- | The singleton kind-indexed data family. data family Sing :: k -> Type -- | 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 PEq a_a1wCM => POrd (a_a1wCM :: Type) where { type family Compare (arg_a1wEi :: a_a1wCM) (arg_a1wEj :: a_a1wCM) :: Ordering; type family (<) (arg_a1wEm :: a_a1wCM) (arg_a1wEn :: a_a1wCM) :: Bool; type family (<=) (arg_a1wEq :: a_a1wCM) (arg_a1wEr :: a_a1wCM) :: Bool; type family (>) (arg_a1wEu :: a_a1wCM) (arg_a1wEv :: a_a1wCM) :: Bool; type family (>=) (arg_a1wEy :: a_a1wCM) (arg_a1wEz :: a_a1wCM) :: Bool; type family Max (arg_a1wEC :: a_a1wCM) (arg_a1wED :: a_a1wCM) :: a_a1wCM; type family Min (arg_a1wEG :: a_a1wCM) (arg_a1wEH :: a_a1wCM) :: a_a1wCM; type Compare a_a1wF2 a_a1wF3 = Apply (Apply Compare_6989586621679373674Sym0 a_a1wF2) a_a1wF3; type (<) a_a1wFk a_a1wFl = Apply (Apply TFHelper_6989586621679373692Sym0 a_a1wFk) a_a1wFl; type (<=) a_a1wFC a_a1wFD = Apply (Apply TFHelper_6989586621679373710Sym0 a_a1wFC) a_a1wFD; type (>) a_a1wFU a_a1wFV = Apply (Apply TFHelper_6989586621679373728Sym0 a_a1wFU) a_a1wFV; type (>=) a_a1wGc a_a1wGd = Apply (Apply TFHelper_6989586621679373746Sym0 a_a1wGc) a_a1wGd; type Max a_a1wGu a_a1wGv = Apply (Apply Max_6989586621679373764Sym0 a_a1wGu) a_a1wGv; type Min a_a1wGM a_a1wGN = Apply (Apply Min_6989586621679373782Sym0 a_a1wGM) a_a1wGN; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1wCM => SOrd a_a1wCM sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) ~ Apply (Apply Compare_6989586621679373674Sym0 t_a1wH1) t_a1wH2) => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) ~ Apply (Apply TFHelper_6989586621679373692Sym0 t_a1wH5) t_a1wH6) => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) ~ Apply (Apply TFHelper_6989586621679373710Sym0 t_a1wH9) t_a1wHa) => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) ~ Apply (Apply TFHelper_6989586621679373728Sym0 t_a1wHd) t_a1wHe) => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) ~ Apply (Apply TFHelper_6989586621679373746Sym0 t_a1wHh) t_a1wHi) => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) ~ Apply (Apply Max_6989586621679373764Sym0 t_a1wHl) t_a1wHm) => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) ~ Apply (Apply Min_6989586621679373782Sym0 t_a1wHp) t_a1wHq) => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= type family ThenCmp (a_a1zmd :: Ordering) (a_a1zme :: Ordering) :: Ordering sThenCmp :: forall (t_a1zmi :: Ordering) (t_a1zmj :: Ordering). Sing t_a1zmi -> Sing t_a1zmj -> Sing (Apply (Apply ThenCmpSym0 t_a1zmi) t_a1zmj :: 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) :: forall k. () => k -> k -> Type [Refl] :: forall k (a :: k) (b :: 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_a30wc :: Type) where { type family MinBound :: a_a30wc; type family MaxBound :: a_a30wc; } class SBounded a_a30wc sMinBound :: SBounded a_a30wc => Sing (MinBoundSym0 :: a_a30wc) sMaxBound :: SBounded a_a30wc => Sing (MaxBoundSym0 :: a_a30wc) class PEnum (a_a31C6 :: Type) where { type family ToEnum (arg_a31GK :: Nat) :: a_a31C6; type family FromEnum (arg_a31GM :: a_a31C6) :: Nat; type Succ a_a31H9 = Apply Succ_6989586621679731296Sym0 a_a31H9; type Pred a_a31Hi = Apply Pred_6989586621679731305Sym0 a_a31Hi; type EnumFromTo a_a31Hs a_a31Ht = Apply (Apply EnumFromTo_6989586621679731316Sym0 a_a31Hs) a_a31Ht; type EnumFromThenTo a_a31HH a_a31HI a_a31HJ = Apply (Apply (Apply EnumFromThenTo_6989586621679731332Sym0 a_a31HH) a_a31HI) a_a31HJ; } class SEnum a_a31C6 sToEnum :: forall (t_a31JI :: Nat). SEnum a_a31C6 => Sing t_a31JI -> Sing (Apply ToEnumSym0 t_a31JI :: a_a31C6) sFromEnum :: forall (t_a31JK :: a_a31C6). SEnum a_a31C6 => Sing t_a31JK -> Sing (Apply FromEnumSym0 t_a31JK :: Nat) class PShow (a_a5chP :: Type) where { type family ShowsPrec (arg_a5cNh :: Nat) (arg_a5cNi :: a_a5chP) (arg_a5cNj :: Symbol) :: Symbol; type family Show_ (arg_a5cNn :: a_a5chP) :: Symbol; type family ShowList (arg_a5cNp :: [a_a5chP]) (arg_a5cNq :: Symbol) :: Symbol; type ShowsPrec a_a5cNB a_a5cNC a_a5cND = Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 a_a5cNB) a_a5cNC) a_a5cND; type Show_ a_a5cNM = Apply Show__6989586621680250647Sym0 a_a5cNM; type ShowList a_a5cNW a_a5cNX = Apply (Apply ShowList_6989586621680250658Sym0 a_a5cNW) a_a5cNX; } class SShow a_a5chP sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). SShow a_a5chP => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). SShow a_a5chP => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). SShow a_a5chP => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). (SShow a_a5chP, (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 t_a5cRq) t_a5cRr) t_a5cRs) => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). (SShow a_a5chP, (Apply Show_Sym0 t_a5cRw :: Symbol) ~ Apply Show__6989586621680250647Sym0 t_a5cRw) => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). (SShow a_a5chP, (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) ~ Apply (Apply ShowList_6989586621680250658Sym0 t_a5cRy) t_a5cRz) => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) type family ShowString (a_a5cLY :: Symbol) (a_a5cLZ :: Symbol) :: Symbol sShowString :: forall (t_a5cQB :: Symbol) (t_a5cQC :: Symbol). Sing t_a5cQB -> Sing t_a5cQC -> Sing (Apply (Apply ShowStringSym0 t_a5cQB) t_a5cQC :: Symbol) type family ShowParen (a_a5cMj :: Bool) (a_a5cMk :: (~>) Symbol Symbol) (a_a5cMl :: Symbol) :: Symbol sShowParen :: forall (t_a5cQL :: Bool) (t_a5cQM :: (~>) Symbol Symbol) (t_a5cQN :: Symbol). Sing t_a5cQL -> Sing t_a5cQM -> Sing t_a5cQN -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5cQL) t_a5cQM) t_a5cQN :: Symbol) type family ShowSpace (a_a5cLL :: Symbol) :: Symbol sShowSpace :: forall (t_a5cQz :: Symbol). Sing t_a5cQz -> Sing (Apply ShowSpaceSym0 t_a5cQz :: Symbol) type family ShowChar (a_a5cMd :: Symbol) (a_a5cMe :: Symbol) :: Symbol sShowChar :: forall (t_a5cQH :: Symbol) (t_a5cQI :: Symbol). Sing t_a5cQH -> Sing t_a5cQI -> Sing (Apply (Apply ShowCharSym0 t_a5cQH) t_a5cQI :: Symbol) type family ShowCommaSpace (a_a5cM6 :: Symbol) :: Symbol sShowCommaSpace :: forall (t_a5cQF :: Symbol). Sing t_a5cQF -> Sing (Apply ShowCommaSpaceSym0 t_a5cQF :: Symbol) class PFunctor (f_a2cTV :: Type -> Type) where { type family Fmap (arg_a2d0h :: (~>) a_a2cTW b_a2cTX) (arg_a2d0i :: f_a2cTV a_a2cTW) :: f_a2cTV b_a2cTX; type family (<$) (arg_a2d0l :: a_a2cTY) (arg_a2d0m :: f_a2cTV b_a2cTZ) :: f_a2cTV a_a2cTY; type (<$) a_a2d0z a_a2d0A = Apply (Apply TFHelper_6989586621679536457Sym0 a_a2d0z) a_a2d0A; } infixl 4 <$ class SFunctor (f_a2cTV :: Type -> Type) sFmap :: forall a_a2cTW b_a2cTX (t_a2d4I :: (~>) a_a2cTW b_a2cTX) (t_a2d4J :: f_a2cTV a_a2cTW). SFunctor f_a2cTV => Sing t_a2d4I -> Sing t_a2d4J -> Sing (Apply (Apply FmapSym0 t_a2d4I) t_a2d4J :: f_a2cTV b_a2cTX) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). SFunctor f_a2cTV => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). (SFunctor f_a2cTV, (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) ~ Apply (Apply TFHelper_6989586621679536457Sym0 t_a2d4M) t_a2d4N) => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) infixl 4 %<$ class PFoldable (t_a5ZG6 :: Type -> Type) where { type family Fold (arg_a5ZQ9 :: t_a5ZG6 m_a5ZG7) :: m_a5ZG7; type family FoldMap (arg_a5ZQb :: (~>) a_a5ZG9 m_a5ZG8) (arg_a5ZQc :: t_a5ZG6 a_a5ZG9) :: m_a5ZG8; type family Foldr (arg_a5ZQf :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (arg_a5ZQg :: b_a5ZGb) (arg_a5ZQh :: t_a5ZG6 a_a5ZGa) :: b_a5ZGb; type family Foldr' (arg_a5ZQl :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (arg_a5ZQm :: b_a5ZGd) (arg_a5ZQn :: t_a5ZG6 a_a5ZGc) :: b_a5ZGd; type family Foldl (arg_a5ZQr :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (arg_a5ZQs :: b_a5ZGe) (arg_a5ZQt :: t_a5ZG6 a_a5ZGf) :: b_a5ZGe; type family Foldl' (arg_a5ZQx :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (arg_a5ZQy :: b_a5ZGg) (arg_a5ZQz :: t_a5ZG6 a_a5ZGh) :: b_a5ZGg; type family Foldr1 (arg_a5ZQD :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (arg_a5ZQE :: t_a5ZG6 a_a5ZGi) :: a_a5ZGi; type family Foldl1 (arg_a5ZQH :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (arg_a5ZQI :: t_a5ZG6 a_a5ZGj) :: a_a5ZGj; type family ToList (arg_a5ZQL :: t_a5ZG6 a_a5ZGk) :: [a_a5ZGk]; type family Null (arg_a5ZQN :: t_a5ZG6 a_a5ZGl) :: Bool; type family Length (arg_a5ZQP :: t_a5ZG6 a_a5ZGm) :: Nat; type family Elem (arg_a5ZQR :: a_a5ZGn) (arg_a5ZQS :: t_a5ZG6 a_a5ZGn) :: Bool; type family Maximum (arg_a5ZQV :: t_a5ZG6 a_a5ZGo) :: a_a5ZGo; type family Minimum (arg_a5ZQX :: t_a5ZG6 a_a5ZGp) :: a_a5ZGp; type family Sum (arg_a5ZQZ :: t_a5ZG6 a_a5ZGq) :: a_a5ZGq; type family Product (arg_a5ZR1 :: t_a5ZG6 a_a5ZGr) :: a_a5ZGr; type Fold a_a5ZR8 = Apply Fold_6989586621680439211Sym0 a_a5ZR8; type FoldMap a_a5ZRk a_a5ZRl = Apply (Apply FoldMap_6989586621680439224Sym0 a_a5ZRk) a_a5ZRl; type Foldr a_a5ZRH a_a5ZRI a_a5ZRJ = Apply (Apply (Apply Foldr_6989586621680439248Sym0 a_a5ZRH) a_a5ZRI) a_a5ZRJ; type Foldr' a_a5ZSb a_a5ZSc a_a5ZSd = Apply (Apply (Apply Foldr'_6989586621680439278Sym0 a_a5ZSb) a_a5ZSc) a_a5ZSd; type Foldl a_a5ZSA a_a5ZSB a_a5ZSC = Apply (Apply (Apply Foldl_6989586621680439303Sym0 a_a5ZSA) a_a5ZSB) a_a5ZSC; type Foldl' a_a5ZT4 a_a5ZT5 a_a5ZT6 = Apply (Apply (Apply Foldl'_6989586621680439333Sym0 a_a5ZT4) a_a5ZT5) a_a5ZT6; type Foldr1 a_a5ZTv a_a5ZTw = Apply (Apply Foldr1_6989586621680439359Sym0 a_a5ZTv) a_a5ZTw; type Foldl1 a_a5ZTU a_a5ZTV = Apply (Apply Foldl1_6989586621680439384Sym0 a_a5ZTU) a_a5ZTV; type ToList a_a5ZU5 = Apply ToList_6989586621680439394Sym0 a_a5ZU5; type Null a_a5ZUq = Apply Null_6989586621680439415Sym0 a_a5ZUq; type Length a_a5ZUM = Apply Length_6989586621680439437Sym0 a_a5ZUM; type Elem a_a5ZV0 a_a5ZV1 = Apply (Apply Elem_6989586621680439452Sym0 a_a5ZV0) a_a5ZV1; type Maximum a_a5ZVf = Apply Maximum_6989586621680439466Sym0 a_a5ZVf; type Minimum a_a5ZVs = Apply Minimum_6989586621680439479Sym0 a_a5ZVs; type Sum a_a5ZVF = Apply Sum_6989586621680439492Sym0 a_a5ZVF; type Product a_a5ZVS = Apply Product_6989586621680439505Sym0 a_a5ZVS; } class SFoldable (t_a5ZG6 :: Type -> Type) sFold :: forall m_a5ZG7 (t_a60c0 :: t_a5ZG6 m_a5ZG7). (SFoldable t_a5ZG6, SMonoid m_a5ZG7) => Sing t_a60c0 -> Sing (Apply FoldSym0 t_a60c0 :: m_a5ZG7) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). SFoldable t_a5ZG6 => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldr' :: forall a_a5ZGc b_a5ZGd (t_a60cc :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (t_a60cd :: b_a5ZGd) (t_a60ce :: t_a5ZG6 a_a5ZGc). SFoldable t_a5ZG6 => Sing t_a60cc -> Sing t_a60cd -> Sing t_a60ce -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). SFoldable t_a5ZG6 => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldl' :: forall b_a5ZGg a_a5ZGh (t_a60co :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (t_a60cp :: b_a5ZGg) (t_a60cq :: t_a5ZG6 a_a5ZGh). SFoldable t_a5ZG6 => Sing t_a60co -> Sing t_a60cp -> Sing t_a60cq -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). SFoldable t_a5ZG6 => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). SFoldable t_a5ZG6 => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sToList :: forall a_a5ZGk (t_a60cC :: t_a5ZG6 a_a5ZGk). SFoldable t_a5ZG6 => Sing t_a60cC -> Sing (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). SFoldable t_a5ZG6 => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) sLength :: forall a_a5ZGm (t_a60cG :: t_a5ZG6 a_a5ZGm). SFoldable t_a5ZG6 => Sing t_a60cG -> Sing (Apply LengthSym0 t_a60cG :: Nat) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) sFold :: forall m_a5ZG7 (t_a60c0 :: t_a5ZG6 m_a5ZG7). (SFoldable t_a5ZG6, (Apply FoldSym0 t_a60c0 :: m_a5ZG7) ~ Apply Fold_6989586621680439211Sym0 t_a60c0, SMonoid m_a5ZG7) => Sing t_a60c0 -> Sing (Apply FoldSym0 t_a60c0 :: m_a5ZG7) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) ~ Apply (Apply FoldMap_6989586621680439224Sym0 t_a60c2) t_a60c3, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) ~ Apply (Apply (Apply Foldr_6989586621680439248Sym0 t_a60c6) t_a60c7) t_a60c8) => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldr' :: forall a_a5ZGc b_a5ZGd (t_a60cc :: (~>) a_a5ZGc ((~>) b_a5ZGd b_a5ZGd)) (t_a60cd :: b_a5ZGd) (t_a60ce :: t_a5ZG6 a_a5ZGc). (SFoldable t_a5ZG6, (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) ~ Apply (Apply (Apply Foldr'_6989586621680439278Sym0 t_a60cc) t_a60cd) t_a60ce) => Sing t_a60cc -> Sing t_a60cd -> Sing t_a60ce -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a60cc) t_a60cd) t_a60ce :: b_a5ZGd) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) ~ Apply (Apply (Apply Foldl_6989586621680439303Sym0 t_a60ci) t_a60cj) t_a60ck) => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldl' :: forall b_a5ZGg a_a5ZGh (t_a60co :: (~>) b_a5ZGg ((~>) a_a5ZGh b_a5ZGg)) (t_a60cp :: b_a5ZGg) (t_a60cq :: t_a5ZG6 a_a5ZGh). (SFoldable t_a5ZG6, (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) ~ Apply (Apply (Apply Foldl'_6989586621680439333Sym0 t_a60co) t_a60cp) t_a60cq) => Sing t_a60co -> Sing t_a60cp -> Sing t_a60cq -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a60co) t_a60cp) t_a60cq :: b_a5ZGg) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). (SFoldable t_a5ZG6, (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) ~ Apply (Apply Foldr1_6989586621680439359Sym0 t_a60cu) t_a60cv) => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). (SFoldable t_a5ZG6, (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) ~ Apply (Apply Foldl1_6989586621680439384Sym0 t_a60cy) t_a60cz) => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sToList :: forall a_a5ZGk (t_a60cC :: t_a5ZG6 a_a5ZGk). (SFoldable t_a5ZG6, (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) ~ Apply ToList_6989586621680439394Sym0 t_a60cC) => Sing t_a60cC -> Sing (Apply ToListSym0 t_a60cC :: [a_a5ZGk]) sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). (SFoldable t_a5ZG6, (Apply NullSym0 t_a60cE :: Bool) ~ Apply Null_6989586621680439415Sym0 t_a60cE) => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) sLength :: forall a_a5ZGm (t_a60cG :: t_a5ZG6 a_a5ZGm). (SFoldable t_a5ZG6, (Apply LengthSym0 t_a60cG :: Nat) ~ Apply Length_6989586621680439437Sym0 t_a60cG) => Sing t_a60cG -> Sing (Apply LengthSym0 t_a60cG :: Nat) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) ~ Apply (Apply Elem_6989586621680439452Sym0 t_a60cI) t_a60cJ, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, (Apply MaximumSym0 t_a60cM :: a_a5ZGo) ~ Apply Maximum_6989586621680439466Sym0 t_a60cM, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, (Apply MinimumSym0 t_a60cO :: a_a5ZGp) ~ Apply Minimum_6989586621680439479Sym0 t_a60cO, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, (Apply SumSym0 t_a60cQ :: a_a5ZGq) ~ Apply Sum_6989586621680439492Sym0 t_a60cQ, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, (Apply ProductSym0 t_a60cS :: a_a5ZGr) ~ Apply Product_6989586621680439505Sym0 t_a60cS, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) class PSemigroup a_a5tZ0 => PMonoid (a_a5tZ0 :: Type) where { type family Mempty :: a_a5tZ0; type family Mappend (arg_a5u5d :: a_a5tZ0) (arg_a5u5e :: a_a5tZ0) :: a_a5tZ0; type family Mconcat (arg_a5u5h :: [a_a5tZ0]) :: a_a5tZ0; type Mappend a_a5u5t a_a5u5u = Apply (Apply Mappend_6989586621680317093Sym0 a_a5u5t) a_a5u5u; type Mconcat a_a5u5E = Apply Mconcat_6989586621680317103Sym0 a_a5u5E; } class SSemigroup a_a5tZ0 => SMonoid a_a5tZ0 sMempty :: SMonoid a_a5tZ0 => Sing (MemptySym0 :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). SMonoid a_a5tZ0 => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). SMonoid a_a5tZ0 => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). (SMonoid a_a5tZ0, (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) ~ Apply (Apply Mappend_6989586621680317093Sym0 t_a5u6y) t_a5u6z) => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). (SMonoid a_a5tZ0, (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) ~ Apply Mconcat_6989586621680317103Sym0 t_a5u6C) => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) class (PFunctor t_a7eNp, PFoldable t_a7eNp) => PTraversable (t_a7eNp :: Type -> Type) where { type family Traverse (arg_a7eNB :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (arg_a7eNC :: t_a7eNp a_a7eNr) :: f_a7eNq (t_a7eNp b_a7eNs); type family SequenceA (arg_a7eNF :: t_a7eNp (f_a7eNt a_a7eNu)) :: f_a7eNt (t_a7eNp a_a7eNu); type family MapM (arg_a7eNH :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (arg_a7eNI :: t_a7eNp a_a7eNw) :: m_a7eNv (t_a7eNp b_a7eNx); type family Sequence (arg_a7eNL :: t_a7eNp (m_a7eNy a_a7eNz)) :: m_a7eNy (t_a7eNp a_a7eNz); type Traverse a_a7eNV a_a7eNW = Apply (Apply Traverse_6989586621680735001Sym0 a_a7eNV) a_a7eNW; type SequenceA a_a7eO6 = Apply SequenceA_6989586621680735011Sym0 a_a7eO6; type MapM a_a7eOk a_a7eOl = Apply (Apply MapM_6989586621680735026Sym0 a_a7eOk) a_a7eOl; type Sequence a_a7eOv = Apply Sequence_6989586621680735036Sym0 a_a7eOv; } class (SFunctor t_a7eNp, SFoldable t_a7eNp) => STraversable (t_a7eNp :: Type -> Type) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) ~ Apply (Apply Traverse_6989586621680735001Sym0 t_a7eOz) t_a7eOA, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) ~ Apply SequenceA_6989586621680735011Sym0 t_a7eOD, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) ~ Apply (Apply MapM_6989586621680735026Sym0 t_a7eOF) t_a7eOG, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) ~ Apply Sequence_6989586621680735036Sym0 t_a7eOJ, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) class PFunctor f_a2cU0 => PApplicative (f_a2cU0 :: Type -> Type) where { type family Pure (arg_a2d0F :: a_a2cU1) :: f_a2cU0 a_a2cU1; type family (<*>) (arg_a2d0H :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (arg_a2d0I :: f_a2cU0 a_a2cU2) :: f_a2cU0 b_a2cU3; type family LiftA2 (arg_a2d0L :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (arg_a2d0M :: f_a2cU0 a_a2cU4) (arg_a2d0N :: f_a2cU0 b_a2cU5) :: f_a2cU0 c_a2cU6; type family (*>) (arg_a2d0R :: f_a2cU0 a_a2cU7) (arg_a2d0S :: f_a2cU0 b_a2cU8) :: f_a2cU0 b_a2cU8; type family (<*) (arg_a2d0V :: f_a2cU0 a_a2cU9) (arg_a2d0W :: f_a2cU0 b_a2cUa) :: f_a2cU0 a_a2cU9; type (<*>) a_a2d19 a_a2d1a = Apply (Apply TFHelper_6989586621679536493Sym0 a_a2d19) a_a2d1a; type LiftA2 a_a2d1q a_a2d1r a_a2d1s = Apply (Apply (Apply LiftA2_6989586621679536511Sym0 a_a2d1q) a_a2d1r) a_a2d1s; type (*>) a_a2d1E a_a2d1F = Apply (Apply TFHelper_6989586621679536524Sym0 a_a2d1E) a_a2d1F; type (<*) a_a2d1U a_a2d1V = Apply (Apply TFHelper_6989586621679536540Sym0 a_a2d1U) a_a2d1V; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2cU0 => SApplicative (f_a2cU0 :: Type -> Type) sPure :: forall a_a2cU1 (t_a2d4S :: a_a2cU1). SApplicative f_a2cU0 => Sing t_a2d4S -> Sing (Apply PureSym0 t_a2d4S :: f_a2cU0 a_a2cU1) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). SApplicative f_a2cU0 => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) sLiftA2 :: forall a_a2cU4 b_a2cU5 c_a2cU6 (t_a2d4Y :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (t_a2d4Z :: f_a2cU0 a_a2cU4) (t_a2d50 :: f_a2cU0 b_a2cU5). SApplicative f_a2cU0 => Sing t_a2d4Y -> Sing t_a2d4Z -> Sing t_a2d50 -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). SApplicative f_a2cU0 => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). SApplicative f_a2cU0 => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). (SApplicative f_a2cU0, (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) ~ Apply (Apply TFHelper_6989586621679536493Sym0 t_a2d4U) t_a2d4V) => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) sLiftA2 :: forall a_a2cU4 b_a2cU5 c_a2cU6 (t_a2d4Y :: (~>) a_a2cU4 ((~>) b_a2cU5 c_a2cU6)) (t_a2d4Z :: f_a2cU0 a_a2cU4) (t_a2d50 :: f_a2cU0 b_a2cU5). (SApplicative f_a2cU0, (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) ~ Apply (Apply (Apply LiftA2_6989586621679536511Sym0 t_a2d4Y) t_a2d4Z) t_a2d50) => Sing t_a2d4Y -> Sing t_a2d4Z -> Sing t_a2d50 -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2d4Y) t_a2d4Z) t_a2d50 :: f_a2cU0 c_a2cU6) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). (SApplicative f_a2cU0, (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) ~ Apply (Apply TFHelper_6989586621679536524Sym0 t_a2d54) t_a2d55) => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). (SApplicative f_a2cU0, (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) ~ Apply (Apply TFHelper_6989586621679536540Sym0 t_a2d58) t_a2d59) => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) infixl 4 %<*> infixl 4 %*> infixl 4 %<* type family (:.) (a_a26Dr :: (~>) b_a26AL c_a26AM) (a_a26Ds :: (~>) a_a26AN b_a26AL) (a_a26Dt :: a_a26AN) :: c_a26AM infixr 9 :. (%.) :: forall b_a26AL c_a26AM a_a26AN (t_a26EY :: (~>) b_a26AL c_a26AM) (t_a26EZ :: (~>) a_a26AN b_a26AL) (t_a26F0 :: a_a26AN). Sing t_a26EY -> Sing t_a26EZ -> Sing t_a26F0 -> Sing (Apply (Apply (Apply (.@#@$) t_a26EY) t_a26EZ) t_a26F0 :: c_a26AM) 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 k06989586621679458997 k6989586621679458996. (~>) k06989586621679458997 k6989586621679458996 type ErrorSym1 (str6989586621679458998 :: k06989586621679458997) = Error str6989586621679458998 -- | 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 a6989586621679359331. (~>) a6989586621679359331 ((~>) a6989586621679359331 Bool) infix 4 ==@#@$ data (==@#@$$) (x6989586621679359332 :: a6989586621679359331) :: (~>) a6989586621679359331 Bool infix 4 ==@#@$$ type (==@#@$$$) (x6989586621679359332 :: a6989586621679359331) (y6989586621679359333 :: a6989586621679359331) = (==) x6989586621679359332 y6989586621679359333 data (>@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679373638 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679373638 :: a6989586621679373532) (arg6989586621679373639 :: a6989586621679373532) = (>) arg6989586621679373638 arg6989586621679373639 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 (t6989586621679291753 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679291753 :: a3530822107858468865) (t6989586621679291754 :: b3530822107858468866) = '(t6989586621679291753, t6989586621679291754) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679291784 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679291784 :: (a3530822107858468865 :: Type)) (t6989586621679291785 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679291784 :: a3530822107858468865) (t6989586621679291785 :: b3530822107858468866) (t6989586621679291786 :: c3530822107858468867) = '(t6989586621679291784, t6989586621679291785, t6989586621679291786) 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 (t6989586621679291831 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) (t6989586621679291833 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679291831 :: a3530822107858468865) (t6989586621679291832 :: b3530822107858468866) (t6989586621679291833 :: c3530822107858468867) (t6989586621679291834 :: d3530822107858468868) = '(t6989586621679291831, t6989586621679291832, t6989586621679291833, t6989586621679291834) 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 (t6989586621679291896 :: (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 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) (t6989586621679291899 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679291896 :: a3530822107858468865) (t6989586621679291897 :: b3530822107858468866) (t6989586621679291898 :: c3530822107858468867) (t6989586621679291899 :: d3530822107858468868) (t6989586621679291900 :: e3530822107858468869) = '(t6989586621679291896, t6989586621679291897, t6989586621679291898, t6989586621679291899, t6989586621679291900) 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 (t6989586621679291981 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) (t6989586621679291985 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679291981 :: a3530822107858468865) (t6989586621679291982 :: b3530822107858468866) (t6989586621679291983 :: c3530822107858468867) (t6989586621679291984 :: d3530822107858468868) (t6989586621679291985 :: e3530822107858468869) (t6989586621679291986 :: f3530822107858468870) = '(t6989586621679291981, t6989586621679291982, t6989586621679291983, t6989586621679291984, t6989586621679291985, t6989586621679291986) 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 (t6989586621679292088 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (e3530822107858468869 :: Type)) (t6989586621679292093 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679292088 :: a3530822107858468865) (t6989586621679292089 :: b3530822107858468866) (t6989586621679292090 :: c3530822107858468867) (t6989586621679292091 :: d3530822107858468868) (t6989586621679292092 :: e3530822107858468869) (t6989586621679292093 :: f3530822107858468870) (t6989586621679292094 :: g3530822107858468871) = '(t6989586621679292088, t6989586621679292089, t6989586621679292090, t6989586621679292091, t6989586621679292092, t6989586621679292093, t6989586621679292094) data CompareSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Ordering) data CompareSym1 (arg6989586621679373626 :: a6989586621679373532) :: (~>) a6989586621679373532 Ordering type CompareSym2 (arg6989586621679373626 :: a6989586621679373532) (arg6989586621679373627 :: a6989586621679373532) = Compare arg6989586621679373626 arg6989586621679373627 data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering) data ThenCmpSym1 (a6989586621679384037 :: Ordering) :: (~>) Ordering Ordering type ThenCmpSym2 (a6989586621679384037 :: Ordering) (a6989586621679384038 :: Ordering) = ThenCmp a6989586621679384037 a6989586621679384038 data FoldlSym0 :: forall a6989586621680438535 b6989586621680438534 t6989586621680438526. (~>) ((~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) ((~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534)) data FoldlSym1 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) :: forall t6989586621680438526. (~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534) data FoldlSym2 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534 type FoldlSym3 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) (arg6989586621680439169 :: t6989586621680438526 a6989586621680438535) = Foldl arg6989586621680439167 arg6989586621680439168 arg6989586621680439169 type MinBoundSym0 = MinBound type MaxBoundSym0 = MaxBound data ShowsPrecSym0 :: forall a6989586621680248665. (~>) Nat ((~>) a6989586621680248665 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680250615 :: Nat) :: forall a6989586621680248665. (~>) a6989586621680248665 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) (arg6989586621680250617 :: Symbol) = ShowsPrec arg6989586621680250615 arg6989586621680250616 arg6989586621680250617 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680250534 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680250534 :: Symbol) (a6989586621680250535 :: Symbol) = ShowString a6989586621680250534 a6989586621680250535 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680250555 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680250555 :: Bool) (a6989586621680250556 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data ShowSpaceSym0 :: (~>) Symbol Symbol type ShowSpaceSym1 (a6989586621680250521 :: Symbol) = ShowSpace a6989586621680250521 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680250549 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680250549 :: Symbol) (a6989586621680250550 :: Symbol) = ShowChar a6989586621680250549 a6989586621680250550 data ShowCommaSpaceSym0 :: (~>) Symbol Symbol type ShowCommaSpaceSym1 (a6989586621680250542 :: Symbol) = ShowCommaSpace a6989586621680250542 data FmapSym0 :: forall a6989586621679536044 b6989586621679536045 f6989586621679536043. (~>) ((~>) a6989586621679536044 b6989586621679536045) ((~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045)) data FmapSym1 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) :: forall f6989586621679536043. (~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045) type FmapSym2 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) (arg6989586621679536438 :: f6989586621679536043 a6989586621679536044) = Fmap arg6989586621679536437 arg6989586621679536438 data (<$@#@$) :: forall a6989586621679536046 b6989586621679536047 f6989586621679536043. (~>) a6989586621679536046 ((~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679536441 :: a6989586621679536046) :: forall b6989586621679536047 f6989586621679536043. (~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679536441 :: a6989586621679536046) (arg6989586621679536442 :: f6989586621679536043 b6989586621679536047) = (<$) arg6989586621679536441 arg6989586621679536442 data FoldMapSym0 :: forall a6989586621680438529 m6989586621680438528 t6989586621680438526. (~>) ((~>) a6989586621680438529 m6989586621680438528) ((~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528) data FoldMapSym1 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528 type FoldMapSym2 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) (arg6989586621680439152 :: t6989586621680438526 a6989586621680438529) = FoldMap arg6989586621680439151 arg6989586621680439152 type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680316690. (~>) a6989586621680316690 ((~>) a6989586621680316690 a6989586621680316690) data MappendSym1 (arg6989586621680317075 :: a6989586621680316690) :: (~>) a6989586621680316690 a6989586621680316690 type MappendSym2 (arg6989586621680317075 :: a6989586621680316690) (arg6989586621680317076 :: a6989586621680316690) = Mappend arg6989586621680317075 arg6989586621680317076 data FoldrSym0 :: forall a6989586621680438530 b6989586621680438531 t6989586621680438526. (~>) ((~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) ((~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531)) data FoldrSym1 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) :: forall t6989586621680438526. (~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531) data FoldrSym2 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531 type FoldrSym3 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) (arg6989586621680439157 :: t6989586621680438526 a6989586621680438530) = Foldr arg6989586621680439155 arg6989586621680439156 arg6989586621680439157 data TraverseSym0 :: forall a6989586621680734969 b6989586621680734970 f6989586621680734968 t6989586621680734967. (~>) ((~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) ((~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970))) data TraverseSym1 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970)) type TraverseSym2 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) (arg6989586621680734980 :: t6989586621680734967 a6989586621680734969) = Traverse arg6989586621680734979 arg6989586621680734980 data PureSym0 :: forall a6989586621679536049 f6989586621679536048. (~>) a6989586621679536049 (f6989586621679536048 a6989586621679536049) type PureSym1 (arg6989586621679536461 :: a6989586621679536049) = Pure arg6989586621679536461 data (<*>@#@$) :: forall a6989586621679536050 b6989586621679536051 f6989586621679536048. (~>) (f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) ((~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) :: (~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) (arg6989586621679536464 :: f6989586621679536048 a6989586621679536050) = (<*>) arg6989586621679536463 arg6989586621679536464 data LiftA2Sym0 :: forall a6989586621679536052 b6989586621679536053 c6989586621679536054 f6989586621679536048. (~>) ((~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) ((~>) (f6989586621679536048 a6989586621679536052) ((~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054))) data LiftA2Sym1 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) :: forall f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536052) ((~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054)) data LiftA2Sym2 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) (arg6989586621679536468 :: f6989586621679536048 a6989586621679536052) :: (~>) (f6989586621679536048 b6989586621679536053) (f6989586621679536048 c6989586621679536054) type LiftA2Sym3 (arg6989586621679536467 :: (~>) a6989586621679536052 ((~>) b6989586621679536053 c6989586621679536054)) (arg6989586621679536468 :: f6989586621679536048 a6989586621679536052) (arg6989586621679536469 :: f6989586621679536048 b6989586621679536053) = LiftA2 arg6989586621679536467 arg6989586621679536468 arg6989586621679536469 data (.@#@$) :: forall a6989586621679511793 b6989586621679511791 c6989586621679511792. (~>) ((~>) b6989586621679511791 c6989586621679511792) ((~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) :: forall a6989586621679511793. (~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) :: (~>) a6989586621679511793 c6989586621679511792 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) (a6989586621679511959 :: a6989586621679511793) = (:.) a6989586621679511957 a6989586621679511958 a6989586621679511959 data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679291660 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679291660 :: a3530822107858468865) (t6989586621679291661 :: [a3530822107858468865]) = '(:) t6989586621679291660 t6989586621679291661 -- | 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 data family. data family Sing :: k -> Type infixl 6 :%<>: infixl 5 :%$$: type SErrorMessage = (Sing :: PErrorMessage -> Type) -- | 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 (s6989586621681244495 :: Type). (~>) s6989586621681244495 (ErrorMessage' (s6989586621681244495 :: Type)) type TextSym1 (t6989586621681245281 :: s6989586621681244495) = 'Text t6989586621681245281 data ShowTypeSym0 :: forall (s6989586621681244495 :: Type) t6989586621681244496. (~>) t6989586621681244496 (ErrorMessage' (s6989586621681244495 :: Type)) type ShowTypeSym1 (t6989586621681245283 :: t6989586621681244496) = 'ShowType t6989586621681245283 data (:<>:@#@$) :: forall (s6989586621681244495 :: Type). (~>) (ErrorMessage' s6989586621681244495) ((~>) (ErrorMessage' s6989586621681244495) (ErrorMessage' (s6989586621681244495 :: Type))) infixl 6 :<>:@#@$ data (:<>:@#@$$) (t6989586621681245285 :: ErrorMessage' (s6989586621681244495 :: Type)) :: (~>) (ErrorMessage' s6989586621681244495) (ErrorMessage' (s6989586621681244495 :: Type)) infixl 6 :<>:@#@$$ type (:<>:@#@$$$) (t6989586621681245285 :: ErrorMessage' s6989586621681244495) (t6989586621681245286 :: ErrorMessage' s6989586621681244495) = '(:<>:) t6989586621681245285 t6989586621681245286 data (:$$:@#@$) :: forall (s6989586621681244495 :: Type). (~>) (ErrorMessage' s6989586621681244495) ((~>) (ErrorMessage' s6989586621681244495) (ErrorMessage' (s6989586621681244495 :: Type))) infixl 5 :$$:@#@$ data (:$$:@#@$$) (t6989586621681245289 :: ErrorMessage' (s6989586621681244495 :: Type)) :: (~>) (ErrorMessage' s6989586621681244495) (ErrorMessage' (s6989586621681244495 :: Type)) infixl 5 :$$:@#@$$ type (:$$:@#@$$$) (t6989586621681245289 :: ErrorMessage' s6989586621681244495) (t6989586621681245290 :: ErrorMessage' s6989586621681244495) = '(:$$:) t6989586621681245289 t6989586621681245290 data TypeErrorSym0 :: forall b6989586621681244485. (~>) PErrorMessage b6989586621681244485 type TypeErrorSym1 (a6989586621681244486 :: PErrorMessage) = TypeError a6989586621681244486 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 s6989586621681244495 (t6989586621681245289 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681244495). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:$$:@#@$$) t6989586621681245289) 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 s6989586621681244495 (t6989586621681245285 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681244495). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:<>:@#@$$) t6989586621681245285) 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.SingI (Data.Singletons.Internal.TyCon1 'Data.Singletons.TypeError.Text) instance Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 'Data.Singletons.TypeError.ShowType) instance Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon2 ('Data.Singletons.TypeError.:<>:)) instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 (('Data.Singletons.TypeError.:<>:) x)) instance Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon2 ('Data.Singletons.TypeError.:$$:)) instance Data.Singletons.Internal.SingI x => Data.Singletons.Internal.SingI (Data.Singletons.Internal.TyCon1 (('Data.Singletons.TypeError.:$$:) x)) 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 -- | The singleton kind-indexed data family. data family Sing :: k -> Type infixr 5 `SCons` type SBool = (Sing :: Bool -> Type) type SList = (Sing :: [a_11] -> Type) type SMaybe = (Sing :: Maybe a_11 -> Type) type SEither = (Sing :: Either a_aiWO b_aiWP -> Type) type SOrdering = (Sing :: Ordering -> Type) type STuple0 = (Sing :: () -> Type) type STuple2 = (Sing :: (a_11, b_12) -> Type) type STuple3 = (Sing :: (a_11, b_12, c_13) -> Type) type STuple4 = (Sing :: (a_11, b_12, c_13, d_14) -> Type) type STuple5 = (Sing :: (a_11, b_12, c_13, d_14, e_15) -> Type) type STuple6 = (Sing :: (a_11, b_12, c_13, d_14, e_15, f_16) -> Type) type STuple7 = (Sing :: (a_11, b_12, c_13, d_14, e_15, f_16, g_17) -> Type) -- | 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 PEq a_a1wCM => POrd (a_a1wCM :: Type) where { type family Compare (arg_a1wEi :: a_a1wCM) (arg_a1wEj :: a_a1wCM) :: Ordering; type family (<) (arg_a1wEm :: a_a1wCM) (arg_a1wEn :: a_a1wCM) :: Bool; type family (<=) (arg_a1wEq :: a_a1wCM) (arg_a1wEr :: a_a1wCM) :: Bool; type family (>) (arg_a1wEu :: a_a1wCM) (arg_a1wEv :: a_a1wCM) :: Bool; type family (>=) (arg_a1wEy :: a_a1wCM) (arg_a1wEz :: a_a1wCM) :: Bool; type family Max (arg_a1wEC :: a_a1wCM) (arg_a1wED :: a_a1wCM) :: a_a1wCM; type family Min (arg_a1wEG :: a_a1wCM) (arg_a1wEH :: a_a1wCM) :: a_a1wCM; type Compare a_a1wF2 a_a1wF3 = Apply (Apply Compare_6989586621679373674Sym0 a_a1wF2) a_a1wF3; type (<) a_a1wFk a_a1wFl = Apply (Apply TFHelper_6989586621679373692Sym0 a_a1wFk) a_a1wFl; type (<=) a_a1wFC a_a1wFD = Apply (Apply TFHelper_6989586621679373710Sym0 a_a1wFC) a_a1wFD; type (>) a_a1wFU a_a1wFV = Apply (Apply TFHelper_6989586621679373728Sym0 a_a1wFU) a_a1wFV; type (>=) a_a1wGc a_a1wGd = Apply (Apply TFHelper_6989586621679373746Sym0 a_a1wGc) a_a1wGd; type Max a_a1wGu a_a1wGv = Apply (Apply Max_6989586621679373764Sym0 a_a1wGu) a_a1wGv; type Min a_a1wGM a_a1wGN = Apply (Apply Min_6989586621679373782Sym0 a_a1wGM) a_a1wGN; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1wCM => SOrd a_a1wCM sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). SOrd a_a1wCM => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) sCompare :: forall (t_a1wH1 :: a_a1wCM) (t_a1wH2 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) ~ Apply (Apply Compare_6989586621679373674Sym0 t_a1wH1) t_a1wH2) => Sing t_a1wH1 -> Sing t_a1wH2 -> Sing (Apply (Apply CompareSym0 t_a1wH1) t_a1wH2 :: Ordering) (%<) :: forall (t_a1wH5 :: a_a1wCM) (t_a1wH6 :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) ~ Apply (Apply TFHelper_6989586621679373692Sym0 t_a1wH5) t_a1wH6) => Sing t_a1wH5 -> Sing t_a1wH6 -> Sing (Apply (Apply (<@#@$) t_a1wH5) t_a1wH6 :: Bool) (%<=) :: forall (t_a1wH9 :: a_a1wCM) (t_a1wHa :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) ~ Apply (Apply TFHelper_6989586621679373710Sym0 t_a1wH9) t_a1wHa) => Sing t_a1wH9 -> Sing t_a1wHa -> Sing (Apply (Apply (<=@#@$) t_a1wH9) t_a1wHa :: Bool) (%>) :: forall (t_a1wHd :: a_a1wCM) (t_a1wHe :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) ~ Apply (Apply TFHelper_6989586621679373728Sym0 t_a1wHd) t_a1wHe) => Sing t_a1wHd -> Sing t_a1wHe -> Sing (Apply (Apply (>@#@$) t_a1wHd) t_a1wHe :: Bool) (%>=) :: forall (t_a1wHh :: a_a1wCM) (t_a1wHi :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) ~ Apply (Apply TFHelper_6989586621679373746Sym0 t_a1wHh) t_a1wHi) => Sing t_a1wHh -> Sing t_a1wHi -> Sing (Apply (Apply (>=@#@$) t_a1wHh) t_a1wHi :: Bool) sMax :: forall (t_a1wHl :: a_a1wCM) (t_a1wHm :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) ~ Apply (Apply Max_6989586621679373764Sym0 t_a1wHl) t_a1wHm) => Sing t_a1wHl -> Sing t_a1wHm -> Sing (Apply (Apply MaxSym0 t_a1wHl) t_a1wHm :: a_a1wCM) sMin :: forall (t_a1wHp :: a_a1wCM) (t_a1wHq :: a_a1wCM). (SOrd a_a1wCM, (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) ~ Apply (Apply Min_6989586621679373782Sym0 t_a1wHp) t_a1wHq) => Sing t_a1wHp -> Sing t_a1wHq -> Sing (Apply (Apply MinSym0 t_a1wHp) t_a1wHq :: a_a1wCM) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= class SBounded a_a30wc sMinBound :: SBounded a_a30wc => Sing (MinBoundSym0 :: a_a30wc) sMaxBound :: SBounded a_a30wc => Sing (MaxBoundSym0 :: a_a30wc) class PBounded (a_a30wc :: Type) where { type family MinBound :: a_a30wc; type family MaxBound :: a_a30wc; } type MaxBoundSym0 = MaxBound type MinBoundSym0 = MinBound class SEnum a_a31C6 sToEnum :: forall (t_a31JI :: Nat). SEnum a_a31C6 => Sing t_a31JI -> Sing (Apply ToEnumSym0 t_a31JI :: a_a31C6) sFromEnum :: forall (t_a31JK :: a_a31C6). SEnum a_a31C6 => Sing t_a31JK -> Sing (Apply FromEnumSym0 t_a31JK :: Nat) sEnumFromTo :: forall (t_a31JM :: a_a31C6) (t_a31JN :: a_a31C6). SEnum a_a31C6 => Sing t_a31JM -> Sing t_a31JN -> Sing (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) sEnumFromThenTo :: forall (t_a31JQ :: a_a31C6) (t_a31JR :: a_a31C6) (t_a31JS :: a_a31C6). SEnum a_a31C6 => Sing t_a31JQ -> Sing t_a31JR -> Sing t_a31JS -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) sEnumFromTo :: forall (t_a31JM :: a_a31C6) (t_a31JN :: a_a31C6). (SEnum a_a31C6, (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) ~ Apply (Apply EnumFromTo_6989586621679731316Sym0 t_a31JM) t_a31JN) => Sing t_a31JM -> Sing t_a31JN -> Sing (Apply (Apply EnumFromToSym0 t_a31JM) t_a31JN :: [a_a31C6]) sEnumFromThenTo :: forall (t_a31JQ :: a_a31C6) (t_a31JR :: a_a31C6) (t_a31JS :: a_a31C6). (SEnum a_a31C6, (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679731332Sym0 t_a31JQ) t_a31JR) t_a31JS) => Sing t_a31JQ -> Sing t_a31JR -> Sing t_a31JS -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a31JQ) t_a31JR) t_a31JS :: [a_a31C6]) class PEnum (a_a31C6 :: Type) where { type family ToEnum (arg_a31GK :: Nat) :: a_a31C6; type family FromEnum (arg_a31GM :: a_a31C6) :: Nat; type family EnumFromTo (arg_a31GO :: a_a31C6) (arg_a31GP :: a_a31C6) :: [a_a31C6]; type family EnumFromThenTo (arg_a31GS :: a_a31C6) (arg_a31GT :: a_a31C6) (arg_a31GU :: a_a31C6) :: [a_a31C6]; type Succ a_a31H9 = Apply Succ_6989586621679731296Sym0 a_a31H9; type Pred a_a31Hi = Apply Pred_6989586621679731305Sym0 a_a31Hi; type EnumFromTo a_a31Hs a_a31Ht = Apply (Apply EnumFromTo_6989586621679731316Sym0 a_a31Hs) a_a31Ht; type EnumFromThenTo a_a31HH a_a31HI a_a31HJ = Apply (Apply (Apply EnumFromThenTo_6989586621679731332Sym0 a_a31HH) a_a31HI) a_a31HJ; } data EnumFromThenToSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 ((~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982])) data EnumFromThenToSym1 (arg6989586621679731278 :: a6989586621679730982) :: (~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982]) data EnumFromThenToSym2 (arg6989586621679731278 :: a6989586621679730982) (arg6989586621679731279 :: a6989586621679730982) :: (~>) a6989586621679730982 [a6989586621679730982] type EnumFromThenToSym3 (arg6989586621679731278 :: a6989586621679730982) (arg6989586621679731279 :: a6989586621679730982) (arg6989586621679731280 :: a6989586621679730982) = EnumFromThenTo arg6989586621679731278 arg6989586621679731279 arg6989586621679731280 data EnumFromToSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 ((~>) a6989586621679730982 [a6989586621679730982]) data EnumFromToSym1 (arg6989586621679731274 :: a6989586621679730982) :: (~>) a6989586621679730982 [a6989586621679730982] type EnumFromToSym2 (arg6989586621679731274 :: a6989586621679730982) (arg6989586621679731275 :: a6989586621679730982) = EnumFromTo arg6989586621679731274 arg6989586621679731275 data FromEnumSym0 :: forall a6989586621679730982. (~>) a6989586621679730982 Nat type FromEnumSym1 (arg6989586621679731272 :: a6989586621679730982) = FromEnum arg6989586621679731272 data ToEnumSym0 :: forall a6989586621679730982. (~>) Nat a6989586621679730982 type ToEnumSym1 (arg6989586621679731270 :: Nat) = ToEnum arg6989586621679731270 -- | Exponentiation of type-level naturals. type family (^) (a :: Nat) (b :: Nat) :: Nat infixr 8 ^ -- | The singleton analogue of '(TN.^)' for Nats. (%^) :: Sing a -> Sing b -> Sing (a ^ b) infixr 8 %^ class PShow (a_a5chP :: Type) where { type family ShowsPrec (arg_a5cNh :: Nat) (arg_a5cNi :: a_a5chP) (arg_a5cNj :: Symbol) :: Symbol; type family Show_ (arg_a5cNn :: a_a5chP) :: Symbol; type family ShowList (arg_a5cNp :: [a_a5chP]) (arg_a5cNq :: Symbol) :: Symbol; type ShowsPrec a_a5cNB a_a5cNC a_a5cND = Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 a_a5cNB) a_a5cNC) a_a5cND; type Show_ a_a5cNM = Apply Show__6989586621680250647Sym0 a_a5cNM; type ShowList a_a5cNW a_a5cNX = Apply (Apply ShowList_6989586621680250658Sym0 a_a5cNW) a_a5cNX; } class SShow a_a5chP sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). SShow a_a5chP => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). SShow a_a5chP => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). SShow a_a5chP => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) sShowsPrec :: forall (t_a5cRq :: Nat) (t_a5cRr :: a_a5chP) (t_a5cRs :: Symbol). (SShow a_a5chP, (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680250638Sym0 t_a5cRq) t_a5cRr) t_a5cRs) => Sing t_a5cRq -> Sing t_a5cRr -> Sing t_a5cRs -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5cRq) t_a5cRr) t_a5cRs :: Symbol) sShow_ :: forall (t_a5cRw :: a_a5chP). (SShow a_a5chP, (Apply Show_Sym0 t_a5cRw :: Symbol) ~ Apply Show__6989586621680250647Sym0 t_a5cRw) => Sing t_a5cRw -> Sing (Apply Show_Sym0 t_a5cRw :: Symbol) sShowList :: forall (t_a5cRy :: [a_a5chP]) (t_a5cRz :: Symbol). (SShow a_a5chP, (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: Symbol) ~ Apply (Apply ShowList_6989586621680250658Sym0 t_a5cRy) t_a5cRz) => Sing t_a5cRy -> Sing t_a5cRz -> Sing (Apply (Apply ShowListSym0 t_a5cRy) t_a5cRz :: 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_a5cN9 :: a_a5chA) (a_a5cNa :: Symbol) :: Symbol sShows :: forall a_a5chA (t_a5cR1 :: a_a5chA) (t_a5cR2 :: Symbol). SShow a_a5chA => Sing t_a5cR1 -> Sing t_a5cR2 -> Sing (Apply (Apply ShowsSym0 t_a5cR1) t_a5cR2 :: Symbol) type family ShowChar (a_a5cMd :: Symbol) (a_a5cMe :: Symbol) :: Symbol sShowChar :: forall (t_a5cQH :: Symbol) (t_a5cQI :: Symbol). Sing t_a5cQH -> Sing t_a5cQI -> Sing (Apply (Apply ShowCharSym0 t_a5cQH) t_a5cQI :: Symbol) type family ShowString (a_a5cLY :: Symbol) (a_a5cLZ :: Symbol) :: Symbol sShowString :: forall (t_a5cQB :: Symbol) (t_a5cQC :: Symbol). Sing t_a5cQB -> Sing t_a5cQC -> Sing (Apply (Apply ShowStringSym0 t_a5cQB) t_a5cQC :: Symbol) type family ShowParen (a_a5cMj :: Bool) (a_a5cMk :: (~>) Symbol Symbol) (a_a5cMl :: Symbol) :: Symbol sShowParen :: forall (t_a5cQL :: Bool) (t_a5cQM :: (~>) Symbol Symbol) (t_a5cQN :: Symbol). Sing t_a5cQL -> Sing t_a5cQM -> Sing t_a5cQN -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5cQL) t_a5cQM) t_a5cQN :: Symbol) class PSemigroup (a_a3jHE :: Type) where { type family (<>) (arg_a3jPt :: a_a3jHE) (arg_a3jPu :: a_a3jHE) :: a_a3jHE; type Sconcat a_a3jPO = Apply Sconcat_6989586621679801025Sym0 a_a3jPO; } infixr 6 <> class SSemigroup a_a3jHE (%<>) :: forall (t_a3jTh :: a_a3jHE) (t_a3jTi :: a_a3jHE). SSemigroup a_a3jHE => Sing t_a3jTh -> Sing t_a3jTi -> Sing (Apply (Apply (<>@#@$) t_a3jTh) t_a3jTi :: a_a3jHE) infixr 6 %<> class PSemigroup a_a5tZ0 => PMonoid (a_a5tZ0 :: Type) where { type family Mempty :: a_a5tZ0; type family Mappend (arg_a5u5d :: a_a5tZ0) (arg_a5u5e :: a_a5tZ0) :: a_a5tZ0; type family Mconcat (arg_a5u5h :: [a_a5tZ0]) :: a_a5tZ0; type Mappend a_a5u5t a_a5u5u = Apply (Apply Mappend_6989586621680317093Sym0 a_a5u5t) a_a5u5u; type Mconcat a_a5u5E = Apply Mconcat_6989586621680317103Sym0 a_a5u5E; } class SSemigroup a_a5tZ0 => SMonoid a_a5tZ0 sMempty :: SMonoid a_a5tZ0 => Sing (MemptySym0 :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). SMonoid a_a5tZ0 => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). SMonoid a_a5tZ0 => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) sMappend :: forall (t_a5u6y :: a_a5tZ0) (t_a5u6z :: a_a5tZ0). (SMonoid a_a5tZ0, (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) ~ Apply (Apply Mappend_6989586621680317093Sym0 t_a5u6y) t_a5u6z) => Sing t_a5u6y -> Sing t_a5u6z -> Sing (Apply (Apply MappendSym0 t_a5u6y) t_a5u6z :: a_a5tZ0) sMconcat :: forall (t_a5u6C :: [a_a5tZ0]). (SMonoid a_a5tZ0, (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) ~ Apply Mconcat_6989586621680317103Sym0 t_a5u6C) => Sing t_a5u6C -> Sing (Apply MconcatSym0 t_a5u6C :: a_a5tZ0) class PFunctor (f_a2cTV :: Type -> Type) where { type family Fmap (arg_a2d0h :: (~>) a_a2cTW b_a2cTX) (arg_a2d0i :: f_a2cTV a_a2cTW) :: f_a2cTV b_a2cTX; type family (<$) (arg_a2d0l :: a_a2cTY) (arg_a2d0m :: f_a2cTV b_a2cTZ) :: f_a2cTV a_a2cTY; type (<$) a_a2d0z a_a2d0A = Apply (Apply TFHelper_6989586621679536457Sym0 a_a2d0z) a_a2d0A; } infixl 4 <$ class SFunctor (f_a2cTV :: Type -> Type) sFmap :: forall a_a2cTW b_a2cTX (t_a2d4I :: (~>) a_a2cTW b_a2cTX) (t_a2d4J :: f_a2cTV a_a2cTW). SFunctor f_a2cTV => Sing t_a2d4I -> Sing t_a2d4J -> Sing (Apply (Apply FmapSym0 t_a2d4I) t_a2d4J :: f_a2cTV b_a2cTX) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). SFunctor f_a2cTV => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) (%<$) :: forall a_a2cTY b_a2cTZ (t_a2d4M :: a_a2cTY) (t_a2d4N :: f_a2cTV b_a2cTZ). (SFunctor f_a2cTV, (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) ~ Apply (Apply TFHelper_6989586621679536457Sym0 t_a2d4M) t_a2d4N) => Sing t_a2d4M -> Sing t_a2d4N -> Sing (Apply (Apply (<$@#@$) t_a2d4M) t_a2d4N :: f_a2cTV a_a2cTY) infixl 4 %<$ type family (<$>) (a_a2UYr :: (~>) a_a2UX9 b_a2UXa) (a_a2UYs :: f_a2UX8 a_a2UX9) :: f_a2UX8 b_a2UXa infixl 4 <$> (%<$>) :: forall f_a2UX8 a_a2UX9 b_a2UXa (t_a2V02 :: (~>) a_a2UX9 b_a2UXa) (t_a2V03 :: f_a2UX8 a_a2UX9). SFunctor f_a2UX8 => Sing t_a2V02 -> Sing t_a2V03 -> Sing (Apply (Apply (<$>@#@$) t_a2V02) t_a2V03 :: f_a2UX8 b_a2UXa) infixl 4 %<$> class PFunctor f_a2cU0 => PApplicative (f_a2cU0 :: Type -> Type) where { type family Pure (arg_a2d0F :: a_a2cU1) :: f_a2cU0 a_a2cU1; type family (<*>) (arg_a2d0H :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (arg_a2d0I :: f_a2cU0 a_a2cU2) :: f_a2cU0 b_a2cU3; type family (*>) (arg_a2d0R :: f_a2cU0 a_a2cU7) (arg_a2d0S :: f_a2cU0 b_a2cU8) :: f_a2cU0 b_a2cU8; type family (<*) (arg_a2d0V :: f_a2cU0 a_a2cU9) (arg_a2d0W :: f_a2cU0 b_a2cUa) :: f_a2cU0 a_a2cU9; type (<*>) a_a2d19 a_a2d1a = Apply (Apply TFHelper_6989586621679536493Sym0 a_a2d19) a_a2d1a; type LiftA2 a_a2d1q a_a2d1r a_a2d1s = Apply (Apply (Apply LiftA2_6989586621679536511Sym0 a_a2d1q) a_a2d1r) a_a2d1s; type (*>) a_a2d1E a_a2d1F = Apply (Apply TFHelper_6989586621679536524Sym0 a_a2d1E) a_a2d1F; type (<*) a_a2d1U a_a2d1V = Apply (Apply TFHelper_6989586621679536540Sym0 a_a2d1U) a_a2d1V; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2cU0 => SApplicative (f_a2cU0 :: Type -> Type) sPure :: forall a_a2cU1 (t_a2d4S :: a_a2cU1). SApplicative f_a2cU0 => Sing t_a2d4S -> Sing (Apply PureSym0 t_a2d4S :: f_a2cU0 a_a2cU1) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). SApplicative f_a2cU0 => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). SApplicative f_a2cU0 => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). SApplicative f_a2cU0 => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) (%<*>) :: forall a_a2cU2 b_a2cU3 (t_a2d4U :: f_a2cU0 ((~>) a_a2cU2 b_a2cU3)) (t_a2d4V :: f_a2cU0 a_a2cU2). (SApplicative f_a2cU0, (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) ~ Apply (Apply TFHelper_6989586621679536493Sym0 t_a2d4U) t_a2d4V) => Sing t_a2d4U -> Sing t_a2d4V -> Sing (Apply (Apply (<*>@#@$) t_a2d4U) t_a2d4V :: f_a2cU0 b_a2cU3) (%*>) :: forall a_a2cU7 b_a2cU8 (t_a2d54 :: f_a2cU0 a_a2cU7) (t_a2d55 :: f_a2cU0 b_a2cU8). (SApplicative f_a2cU0, (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) ~ Apply (Apply TFHelper_6989586621679536524Sym0 t_a2d54) t_a2d55) => Sing t_a2d54 -> Sing t_a2d55 -> Sing (Apply (Apply (*>@#@$) t_a2d54) t_a2d55 :: f_a2cU0 b_a2cU8) (%<*) :: forall a_a2cU9 b_a2cUa (t_a2d58 :: f_a2cU0 a_a2cU9) (t_a2d59 :: f_a2cU0 b_a2cUa). (SApplicative f_a2cU0, (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) ~ Apply (Apply TFHelper_6989586621679536540Sym0 t_a2d58) t_a2d59) => Sing t_a2d58 -> Sing t_a2d59 -> Sing (Apply (Apply (<*@#@$) t_a2d58) t_a2d59 :: f_a2cU0 a_a2cU9) infixl 4 %<*> infixl 4 %*> infixl 4 %<* class PApplicative m_a2cUo => PMonad (m_a2cUo :: Type -> Type) where { type family (>>=) (arg_a2d20 :: m_a2cUo a_a2cUp) (arg_a2d21 :: (~>) a_a2cUp (m_a2cUo b_a2cUq)) :: m_a2cUo b_a2cUq; type family (>>) (arg_a2d24 :: m_a2cUo a_a2cUr) (arg_a2d25 :: m_a2cUo b_a2cUs) :: m_a2cUo b_a2cUs; type family Return (arg_a2d28 :: a_a2cUt) :: m_a2cUo a_a2cUt; type family Fail (arg_a2d2a :: Symbol) :: m_a2cUo a_a2cUu; type (>>) a_a2d2s a_a2d2t = Apply (Apply TFHelper_6989586621679536574Sym0 a_a2d2s) a_a2d2t; type Return a_a2d2D = Apply Return_6989586621679536584Sym0 a_a2d2D; type Fail a_a2d2K = Apply Fail_6989586621679536591Sym0 a_a2d2K; } infixl 1 >>= infixl 1 >> class SApplicative m_a2cUo => SMonad (m_a2cUo :: Type -> Type) (%>>=) :: forall a_a2cUp b_a2cUq (t_a2d5j :: m_a2cUo a_a2cUp) (t_a2d5k :: (~>) a_a2cUp (m_a2cUo b_a2cUq)). SMonad m_a2cUo => Sing t_a2d5j -> Sing t_a2d5k -> Sing (Apply (Apply (>>=@#@$) t_a2d5j) t_a2d5k :: m_a2cUo b_a2cUq) (%>>) :: forall a_a2cUr b_a2cUs (t_a2d5n :: m_a2cUo a_a2cUr) (t_a2d5o :: m_a2cUo b_a2cUs). SMonad m_a2cUo => Sing t_a2d5n -> Sing t_a2d5o -> Sing (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) sReturn :: forall a_a2cUt (t_a2d5r :: a_a2cUt). SMonad m_a2cUo => Sing t_a2d5r -> Sing (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) sFail :: forall a_a2cUu (t_a2d5t :: Symbol). SMonad m_a2cUo => Sing t_a2d5t -> Sing (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) (%>>) :: forall a_a2cUr b_a2cUs (t_a2d5n :: m_a2cUo a_a2cUr) (t_a2d5o :: m_a2cUo b_a2cUs). (SMonad m_a2cUo, (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) ~ Apply (Apply TFHelper_6989586621679536574Sym0 t_a2d5n) t_a2d5o) => Sing t_a2d5n -> Sing t_a2d5o -> Sing (Apply (Apply (>>@#@$) t_a2d5n) t_a2d5o :: m_a2cUo b_a2cUs) sReturn :: forall a_a2cUt (t_a2d5r :: a_a2cUt). (SMonad m_a2cUo, (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) ~ Apply Return_6989586621679536584Sym0 t_a2d5r) => Sing t_a2d5r -> Sing (Apply ReturnSym0 t_a2d5r :: m_a2cUo a_a2cUt) sFail :: forall a_a2cUu (t_a2d5t :: Symbol). (SMonad m_a2cUo, (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) ~ Apply Fail_6989586621679536591Sym0 t_a2d5t) => Sing t_a2d5t -> Sing (Apply FailSym0 t_a2d5t :: m_a2cUo a_a2cUu) infixl 1 %>>= infixl 1 %>> type family MapM_ (a_a5ZOR :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (a_a5ZOS :: t_a5ZFb a_a5ZFd) :: m_a5ZFc () sMapM_ :: forall t_a5ZFb m_a5ZFc a_a5ZFd b_a5ZFe (t_a60aT :: (~>) a_a5ZFd (m_a5ZFc b_a5ZFe)) (t_a60aU :: t_a5ZFb a_a5ZFd). (SFoldable t_a5ZFb, SMonad m_a5ZFc) => Sing t_a60aT -> Sing t_a60aU -> Sing (Apply (Apply MapM_Sym0 t_a60aT) t_a60aU :: m_a5ZFc ()) type family Sequence_ (a_a5ZOJ :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)) :: m_a5ZF2 () sSequence_ :: forall t_a5ZF1 m_a5ZF2 a_a5ZF3 (t_a60aP :: t_a5ZF1 (m_a5ZF2 a_a5ZF3)). (SFoldable t_a5ZF1, SMonad m_a5ZF2) => Sing t_a60aP -> Sing (Apply Sequence_Sym0 t_a60aP :: m_a5ZF2 ()) type family (=<<) (a_a2cZw :: (~>) a_a2cT9 (m_a2cT8 b_a2cTa)) (a_a2cZx :: m_a2cT8 a_a2cT9) :: m_a2cT8 b_a2cTa infixr 1 =<< (%=<<) :: forall m_a2cT8 a_a2cT9 b_a2cTa (t_a2d42 :: (~>) a_a2cT9 (m_a2cT8 b_a2cTa)) (t_a2d43 :: m_a2cT8 a_a2cT9). SMonad m_a2cT8 => Sing t_a2d42 -> Sing t_a2d43 -> Sing (Apply (Apply (=<<@#@$) t_a2d42) t_a2d43 :: m_a2cT8 b_a2cTa) infixr 1 %=<< class PFoldable (t_a5ZG6 :: Type -> Type) where { type family FoldMap (arg_a5ZQb :: (~>) a_a5ZG9 m_a5ZG8) (arg_a5ZQc :: t_a5ZG6 a_a5ZG9) :: m_a5ZG8; type family Foldr (arg_a5ZQf :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (arg_a5ZQg :: b_a5ZGb) (arg_a5ZQh :: t_a5ZG6 a_a5ZGa) :: b_a5ZGb; type family Foldl (arg_a5ZQr :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (arg_a5ZQs :: b_a5ZGe) (arg_a5ZQt :: t_a5ZG6 a_a5ZGf) :: b_a5ZGe; type family Foldr1 (arg_a5ZQD :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (arg_a5ZQE :: t_a5ZG6 a_a5ZGi) :: a_a5ZGi; type family Foldl1 (arg_a5ZQH :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (arg_a5ZQI :: t_a5ZG6 a_a5ZGj) :: a_a5ZGj; type family Elem (arg_a5ZQR :: a_a5ZGn) (arg_a5ZQS :: t_a5ZG6 a_a5ZGn) :: Bool; type family Maximum (arg_a5ZQV :: t_a5ZG6 a_a5ZGo) :: a_a5ZGo; type family Minimum (arg_a5ZQX :: t_a5ZG6 a_a5ZGp) :: a_a5ZGp; type family Sum (arg_a5ZQZ :: t_a5ZG6 a_a5ZGq) :: a_a5ZGq; type family Product (arg_a5ZR1 :: t_a5ZG6 a_a5ZGr) :: a_a5ZGr; type Fold a_a5ZR8 = Apply Fold_6989586621680439211Sym0 a_a5ZR8; type FoldMap a_a5ZRk a_a5ZRl = Apply (Apply FoldMap_6989586621680439224Sym0 a_a5ZRk) a_a5ZRl; type Foldr a_a5ZRH a_a5ZRI a_a5ZRJ = Apply (Apply (Apply Foldr_6989586621680439248Sym0 a_a5ZRH) a_a5ZRI) a_a5ZRJ; type Foldr' a_a5ZSb a_a5ZSc a_a5ZSd = Apply (Apply (Apply Foldr'_6989586621680439278Sym0 a_a5ZSb) a_a5ZSc) a_a5ZSd; type Foldl a_a5ZSA a_a5ZSB a_a5ZSC = Apply (Apply (Apply Foldl_6989586621680439303Sym0 a_a5ZSA) a_a5ZSB) a_a5ZSC; type Foldl' a_a5ZT4 a_a5ZT5 a_a5ZT6 = Apply (Apply (Apply Foldl'_6989586621680439333Sym0 a_a5ZT4) a_a5ZT5) a_a5ZT6; type Foldr1 a_a5ZTv a_a5ZTw = Apply (Apply Foldr1_6989586621680439359Sym0 a_a5ZTv) a_a5ZTw; type Foldl1 a_a5ZTU a_a5ZTV = Apply (Apply Foldl1_6989586621680439384Sym0 a_a5ZTU) a_a5ZTV; type ToList a_a5ZU5 = Apply ToList_6989586621680439394Sym0 a_a5ZU5; type Null a_a5ZUq = Apply Null_6989586621680439415Sym0 a_a5ZUq; type Length a_a5ZUM = Apply Length_6989586621680439437Sym0 a_a5ZUM; type Elem a_a5ZV0 a_a5ZV1 = Apply (Apply Elem_6989586621680439452Sym0 a_a5ZV0) a_a5ZV1; type Maximum a_a5ZVf = Apply Maximum_6989586621680439466Sym0 a_a5ZVf; type Minimum a_a5ZVs = Apply Minimum_6989586621680439479Sym0 a_a5ZVs; type Sum a_a5ZVF = Apply Sum_6989586621680439492Sym0 a_a5ZVF; type Product a_a5ZVS = Apply Product_6989586621680439505Sym0 a_a5ZVS; } class SFoldable (t_a5ZG6 :: Type -> Type) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). SFoldable t_a5ZG6 => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). SFoldable t_a5ZG6 => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). SFoldable t_a5ZG6 => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). SFoldable t_a5ZG6 => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) sFoldMap :: forall m_a5ZG8 a_a5ZG9 (t_a60c2 :: (~>) a_a5ZG9 m_a5ZG8) (t_a60c3 :: t_a5ZG6 a_a5ZG9). (SFoldable t_a5ZG6, (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) ~ Apply (Apply FoldMap_6989586621680439224Sym0 t_a60c2) t_a60c3, SMonoid m_a5ZG8) => Sing t_a60c2 -> Sing t_a60c3 -> Sing (Apply (Apply FoldMapSym0 t_a60c2) t_a60c3 :: m_a5ZG8) sFoldr :: forall a_a5ZGa b_a5ZGb (t_a60c6 :: (~>) a_a5ZGa ((~>) b_a5ZGb b_a5ZGb)) (t_a60c7 :: b_a5ZGb) (t_a60c8 :: t_a5ZG6 a_a5ZGa). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) ~ Apply (Apply (Apply Foldr_6989586621680439248Sym0 t_a60c6) t_a60c7) t_a60c8) => Sing t_a60c6 -> Sing t_a60c7 -> Sing t_a60c8 -> Sing (Apply (Apply (Apply FoldrSym0 t_a60c6) t_a60c7) t_a60c8 :: b_a5ZGb) sFoldl :: forall b_a5ZGe a_a5ZGf (t_a60ci :: (~>) b_a5ZGe ((~>) a_a5ZGf b_a5ZGe)) (t_a60cj :: b_a5ZGe) (t_a60ck :: t_a5ZG6 a_a5ZGf). (SFoldable t_a5ZG6, (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) ~ Apply (Apply (Apply Foldl_6989586621680439303Sym0 t_a60ci) t_a60cj) t_a60ck) => Sing t_a60ci -> Sing t_a60cj -> Sing t_a60ck -> Sing (Apply (Apply (Apply FoldlSym0 t_a60ci) t_a60cj) t_a60ck :: b_a5ZGe) sFoldr1 :: forall a_a5ZGi (t_a60cu :: (~>) a_a5ZGi ((~>) a_a5ZGi a_a5ZGi)) (t_a60cv :: t_a5ZG6 a_a5ZGi). (SFoldable t_a5ZG6, (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) ~ Apply (Apply Foldr1_6989586621680439359Sym0 t_a60cu) t_a60cv) => Sing t_a60cu -> Sing t_a60cv -> Sing (Apply (Apply Foldr1Sym0 t_a60cu) t_a60cv :: a_a5ZGi) sFoldl1 :: forall a_a5ZGj (t_a60cy :: (~>) a_a5ZGj ((~>) a_a5ZGj a_a5ZGj)) (t_a60cz :: t_a5ZG6 a_a5ZGj). (SFoldable t_a5ZG6, (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) ~ Apply (Apply Foldl1_6989586621680439384Sym0 t_a60cy) t_a60cz) => Sing t_a60cy -> Sing t_a60cz -> Sing (Apply (Apply Foldl1Sym0 t_a60cy) t_a60cz :: a_a5ZGj) sElem :: forall a_a5ZGn (t_a60cI :: a_a5ZGn) (t_a60cJ :: t_a5ZG6 a_a5ZGn). (SFoldable t_a5ZG6, (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) ~ Apply (Apply Elem_6989586621680439452Sym0 t_a60cI) t_a60cJ, SEq a_a5ZGn) => Sing t_a60cI -> Sing t_a60cJ -> Sing (Apply (Apply ElemSym0 t_a60cI) t_a60cJ :: Bool) sMaximum :: forall a_a5ZGo (t_a60cM :: t_a5ZG6 a_a5ZGo). (SFoldable t_a5ZG6, (Apply MaximumSym0 t_a60cM :: a_a5ZGo) ~ Apply Maximum_6989586621680439466Sym0 t_a60cM, SOrd a_a5ZGo) => Sing t_a60cM -> Sing (Apply MaximumSym0 t_a60cM :: a_a5ZGo) sMinimum :: forall a_a5ZGp (t_a60cO :: t_a5ZG6 a_a5ZGp). (SFoldable t_a5ZG6, (Apply MinimumSym0 t_a60cO :: a_a5ZGp) ~ Apply Minimum_6989586621680439479Sym0 t_a60cO, SOrd a_a5ZGp) => Sing t_a60cO -> Sing (Apply MinimumSym0 t_a60cO :: a_a5ZGp) sSum :: forall a_a5ZGq (t_a60cQ :: t_a5ZG6 a_a5ZGq). (SFoldable t_a5ZG6, (Apply SumSym0 t_a60cQ :: a_a5ZGq) ~ Apply Sum_6989586621680439492Sym0 t_a60cQ, SNum a_a5ZGq) => Sing t_a60cQ -> Sing (Apply SumSym0 t_a60cQ :: a_a5ZGq) sProduct :: forall a_a5ZGr (t_a60cS :: t_a5ZG6 a_a5ZGr). (SFoldable t_a5ZG6, (Apply ProductSym0 t_a60cS :: a_a5ZGr) ~ Apply Product_6989586621680439505Sym0 t_a60cS, SNum a_a5ZGr) => Sing t_a60cS -> Sing (Apply ProductSym0 t_a60cS :: a_a5ZGr) class (PFunctor t_a7eNp, PFoldable t_a7eNp) => PTraversable (t_a7eNp :: Type -> Type) where { type family Traverse (arg_a7eNB :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (arg_a7eNC :: t_a7eNp a_a7eNr) :: f_a7eNq (t_a7eNp b_a7eNs); type family SequenceA (arg_a7eNF :: t_a7eNp (f_a7eNt a_a7eNu)) :: f_a7eNt (t_a7eNp a_a7eNu); type family MapM (arg_a7eNH :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (arg_a7eNI :: t_a7eNp a_a7eNw) :: m_a7eNv (t_a7eNp b_a7eNx); type family Sequence (arg_a7eNL :: t_a7eNp (m_a7eNy a_a7eNz)) :: m_a7eNy (t_a7eNp a_a7eNz); type Traverse a_a7eNV a_a7eNW = Apply (Apply Traverse_6989586621680735001Sym0 a_a7eNV) a_a7eNW; type SequenceA a_a7eO6 = Apply SequenceA_6989586621680735011Sym0 a_a7eO6; type MapM a_a7eOk a_a7eOl = Apply (Apply MapM_6989586621680735026Sym0 a_a7eOk) a_a7eOl; type Sequence a_a7eOv = Apply Sequence_6989586621680735036Sym0 a_a7eOv; } class (SFunctor t_a7eNp, SFoldable t_a7eNp) => STraversable (t_a7eNp :: Type -> Type) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) sTraverse :: forall f_a7eNq a_a7eNr b_a7eNs (t_a7eOz :: (~>) a_a7eNr (f_a7eNq b_a7eNs)) (t_a7eOA :: t_a7eNp a_a7eNr). (STraversable t_a7eNp, (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) ~ Apply (Apply Traverse_6989586621680735001Sym0 t_a7eOz) t_a7eOA, SApplicative f_a7eNq) => Sing t_a7eOz -> Sing t_a7eOA -> Sing (Apply (Apply TraverseSym0 t_a7eOz) t_a7eOA :: f_a7eNq (t_a7eNp b_a7eNs)) sSequenceA :: forall f_a7eNt a_a7eNu (t_a7eOD :: t_a7eNp (f_a7eNt a_a7eNu)). (STraversable t_a7eNp, (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) ~ Apply SequenceA_6989586621680735011Sym0 t_a7eOD, SApplicative f_a7eNt) => Sing t_a7eOD -> Sing (Apply SequenceASym0 t_a7eOD :: f_a7eNt (t_a7eNp a_a7eNu)) sMapM :: forall m_a7eNv a_a7eNw b_a7eNx (t_a7eOF :: (~>) a_a7eNw (m_a7eNv b_a7eNx)) (t_a7eOG :: t_a7eNp a_a7eNw). (STraversable t_a7eNp, (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) ~ Apply (Apply MapM_6989586621680735026Sym0 t_a7eOF) t_a7eOG, SMonad m_a7eNv) => Sing t_a7eOF -> Sing t_a7eOG -> Sing (Apply (Apply MapMSym0 t_a7eOF) t_a7eOG :: m_a7eNv (t_a7eNp b_a7eNx)) sSequence :: forall m_a7eNy a_a7eNz (t_a7eOJ :: t_a7eNp (m_a7eNy a_a7eNz)). (STraversable t_a7eNp, (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) ~ Apply Sequence_6989586621680735036Sym0 t_a7eOJ, SMonad m_a7eNy) => Sing t_a7eOJ -> Sing (Apply SequenceSym0 t_a7eOJ :: m_a7eNy (t_a7eNp a_a7eNz)) type family Id (a_a26DZ :: a_a26AQ) :: a_a26AQ sId :: forall a_a26AQ (t_a26Fc :: a_a26AQ). Sing t_a26Fc -> Sing (Apply IdSym0 t_a26Fc :: a_a26AQ) type family Const (a_a26DK :: a_a26AO) (a_a26DL :: b_a26AP) :: a_a26AO sConst :: forall a_a26AO b_a26AP (t_a26F4 :: a_a26AO) (t_a26F5 :: b_a26AP). Sing t_a26F4 -> Sing t_a26F5 -> Sing (Apply (Apply ConstSym0 t_a26F4) t_a26F5 :: a_a26AO) type family (:.) (a_a26Dr :: (~>) b_a26AL c_a26AM) (a_a26Ds :: (~>) a_a26AN b_a26AL) (a_a26Dt :: a_a26AN) :: c_a26AM infixr 9 :. (%.) :: forall b_a26AL c_a26AM a_a26AN (t_a26EY :: (~>) b_a26AL c_a26AM) (t_a26EZ :: (~>) a_a26AN b_a26AL) (t_a26F0 :: a_a26AN). Sing t_a26EY -> Sing t_a26EZ -> Sing t_a26F0 -> Sing (Apply (Apply (Apply (.@#@$) t_a26EY) t_a26EZ) t_a26F0 :: c_a26AM) infixr 9 %. type family ($) (a_a26Dc :: (~>) a_a26AF b_a26AG) (a_a26Dd :: a_a26AF) :: b_a26AG infixr 0 $ (%$) :: forall a_a26AF b_a26AG (t_a26EO :: (~>) a_a26AF b_a26AG) (t_a26EP :: a_a26AF). Sing t_a26EO -> Sing t_a26EP -> Sing (Apply (Apply ($@#@$) t_a26EO) t_a26EP :: b_a26AG) infixr 0 %$ type family ($!) (a_a26D3 :: (~>) a_a26AD b_a26AE) (a_a26D4 :: a_a26AD) :: b_a26AE infixr 0 $! (%$!) :: forall a_a26AD b_a26AE (t_a26EK :: (~>) a_a26AD b_a26AE) (t_a26EL :: a_a26AD). Sing t_a26EK -> Sing t_a26EL -> Sing (Apply (Apply ($!@#@$) t_a26EK) t_a26EL :: b_a26AE) infixr 0 %$! type family Flip (a_a26Di :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (a_a26Dj :: b_a26AJ) (a_a26Dk :: a_a26AI) :: c_a26AK sFlip :: forall a_a26AI b_a26AJ c_a26AK (t_a26ES :: (~>) a_a26AI ((~>) b_a26AJ c_a26AK)) (t_a26ET :: b_a26AJ) (t_a26EU :: a_a26AI). Sing t_a26ES -> Sing t_a26ET -> Sing t_a26EU -> Sing (Apply (Apply (Apply FlipSym0 t_a26ES) t_a26ET) t_a26EU :: c_a26AK) type family AsTypeOf (a_a26DT :: a_a26AH) (a_a26DU :: a_a26AH) :: a_a26AH sAsTypeOf :: forall a_a26AH (t_a26F8 :: a_a26AH) (t_a26F9 :: a_a26AH). Sing t_a26F8 -> Sing t_a26F9 -> Sing (Apply (Apply AsTypeOfSym0 t_a26F8) t_a26F9 :: a_a26AH) type family Seq (a_a26Cy :: a_a26AA) (a_a26Cz :: b_a26AB) :: b_a26AB infixr 0 `Seq` sSeq :: forall a_a26AA b_a26AB (t_a26EA :: a_a26AA) (t_a26EB :: b_a26AB). Sing t_a26EA -> Sing t_a26EB -> Sing (Apply (Apply SeqSym0 t_a26EA) t_a26EB :: b_a26AB) infixr 0 `sSeq` type family Map (a_a26Ea :: (~>) a_a26AS b_a26AT) (a_a26Eb :: [a_a26AS]) :: [b_a26AT] sMap :: forall a_a26AS b_a26AT (t_a26Fi :: (~>) a_a26AS b_a26AT) (t_a26Fj :: [a_a26AS]). Sing t_a26Fi -> Sing t_a26Fj -> Sing (Apply (Apply MapSym0 t_a26Fi) t_a26Fj :: [b_a26AT]) type family (++) (a_a26E2 :: [a_a26AR]) (a_a26E3 :: [a_a26AR]) :: [a_a26AR] infixr 5 ++ (%++) :: forall a_a26AR (t_a26Fe :: [a_a26AR]) (t_a26Ff :: [a_a26AR]). Sing t_a26Fe -> Sing t_a26Ff -> Sing (Apply (Apply (++@#@$) t_a26Fe) t_a26Ff :: [a_a26AR]) infixr 5 %++ type family Filter (a_a3TJ4 :: (~>) a_a3Rfb Bool) (a_a3TJ5 :: [a_a3Rfb]) :: [a_a3Rfb] sFilter :: forall a_a3Rfb (t_a3U1H :: (~>) a_a3Rfb Bool) (t_a3U1I :: [a_a3Rfb]). Sing t_a3U1H -> Sing t_a3U1I -> Sing (Apply (Apply FilterSym0 t_a3U1H) t_a3U1I :: [a_a3Rfb]) type family Head (a_a3U0m :: [a_a3RgD]) :: a_a3RgD sHead :: forall a_a3RgD (t_a3U5V :: [a_a3RgD]). Sing t_a3U5V -> Sing (Apply HeadSym0 t_a3U5V :: a_a3RgD) type family Last (a_a3U0h :: [a_a3RgC]) :: a_a3RgC sLast :: forall a_a3RgC (t_a3U5T :: [a_a3RgC]). Sing t_a3U5T -> Sing (Apply LastSym0 t_a3U5T :: a_a3RgC) type family Tail (a_a3U0e :: [a_a3RgB]) :: [a_a3RgB] sTail :: forall a_a3RgB (t_a3U5R :: [a_a3RgB]). Sing t_a3U5R -> Sing (Apply TailSym0 t_a3U5R :: [a_a3RgB]) type family Init (a_a3U00 :: [a_a3RgA]) :: [a_a3RgA] sInit :: forall a_a3RgA (t_a3U5P :: [a_a3RgA]). Sing t_a3U5P -> Sing (Apply InitSym0 t_a3U5P :: [a_a3RgA]) type family Null (arg_a5ZQN :: t_a5ZG6 a_a5ZGl) :: Bool sNull :: forall a_a5ZGl (t_a60cE :: t_a5ZG6 a_a5ZGl). SFoldable t_a5ZG6 => Sing t_a60cE -> Sing (Apply NullSym0 t_a60cE :: Bool) type family Reverse (a_a3TZf :: [a_a3Rgy]) :: [a_a3Rgy] sReverse :: forall a_a3Rgy (t_a3U5D :: [a_a3Rgy]). Sing t_a3U5D -> Sing (Apply ReverseSym0 t_a3U5D :: [a_a3Rgy]) type family And (a_a5ZNW :: t_a5ZEP Bool) :: Bool sAnd :: forall t_a5ZEP (t_a60aD :: t_a5ZEP Bool). SFoldable t_a5ZEP => Sing t_a60aD -> Sing (Apply AndSym0 t_a60aD :: Bool) type family Or (a_a5ZNN :: t_a5ZEO Bool) :: Bool sOr :: forall t_a5ZEO (t_a60aB :: t_a5ZEO Bool). SFoldable t_a5ZEO => Sing t_a60aB -> Sing (Apply OrSym0 t_a60aB :: Bool) type family Any (a_a5ZNA :: (~>) a_a5ZEN Bool) (a_a5ZNB :: t_a5ZEM a_a5ZEN) :: Bool sAny :: forall t_a5ZEM a_a5ZEN (t_a60ax :: (~>) a_a5ZEN Bool) (t_a60ay :: t_a5ZEM a_a5ZEN). SFoldable t_a5ZEM => Sing t_a60ax -> Sing t_a60ay -> Sing (Apply (Apply AnySym0 t_a60ax) t_a60ay :: Bool) type family All (a_a5ZNn :: (~>) a_a5ZEL Bool) (a_a5ZNo :: t_a5ZEK a_a5ZEL) :: Bool sAll :: forall t_a5ZEK a_a5ZEL (t_a60at :: (~>) a_a5ZEL Bool) (t_a60au :: t_a5ZEK a_a5ZEL). SFoldable t_a5ZEK => Sing t_a60at -> Sing t_a60au -> Sing (Apply (Apply AllSym0 t_a60at) t_a60au :: Bool) type family Concat (a_a5ZOl :: t_a5ZET [a_a5ZEU]) :: [a_a5ZEU] sConcat :: forall t_a5ZET a_a5ZEU (t_a60aJ :: t_a5ZET [a_a5ZEU]). SFoldable t_a5ZET => Sing t_a60aJ -> Sing (Apply ConcatSym0 t_a60aJ :: [a_a5ZEU]) type family ConcatMap (a_a5ZO5 :: (~>) a_a5ZER [b_a5ZES]) (a_a5ZO6 :: t_a5ZEQ a_a5ZER) :: [b_a5ZES] sConcatMap :: forall t_a5ZEQ a_a5ZER b_a5ZES (t_a60aF :: (~>) a_a5ZER [b_a5ZES]) (t_a60aG :: t_a5ZEQ a_a5ZER). SFoldable t_a5ZEQ => Sing t_a60aF -> Sing t_a60aG -> Sing (Apply (Apply ConcatMapSym0 t_a60aF) t_a60aG :: [b_a5ZES]) type family Scanl (a_a3TTj :: (~>) b_a3Rgg ((~>) a_a3Rgh b_a3Rgg)) (a_a3TTk :: b_a3Rgg) (a_a3TTl :: [a_a3Rgh]) :: [b_a3Rgg] sScanl :: forall b_a3Rgg a_a3Rgh (t_a3U4b :: (~>) b_a3Rgg ((~>) a_a3Rgh b_a3Rgg)) (t_a3U4c :: b_a3Rgg) (t_a3U4d :: [a_a3Rgh]). Sing t_a3U4b -> Sing t_a3U4c -> Sing t_a3U4d -> Sing (Apply (Apply (Apply ScanlSym0 t_a3U4b) t_a3U4c) t_a3U4d :: [b_a3Rgg]) type family Scanl1 (a_a3TTx :: (~>) a_a3Rgf ((~>) a_a3Rgf a_a3Rgf)) (a_a3TTy :: [a_a3Rgf]) :: [a_a3Rgf] sScanl1 :: forall a_a3Rgf (t_a3U4h :: (~>) a_a3Rgf ((~>) a_a3Rgf a_a3Rgf)) (t_a3U4i :: [a_a3Rgf]). Sing t_a3U4h -> Sing t_a3U4i -> Sing (Apply (Apply Scanl1Sym0 t_a3U4h) t_a3U4i :: [a_a3Rgf]) type family Scanr (a_a3TSY :: (~>) a_a3Rgd ((~>) b_a3Rge b_a3Rge)) (a_a3TSZ :: b_a3Rge) (a_a3TT0 :: [a_a3Rgd]) :: [b_a3Rge] sScanr :: forall a_a3Rgd b_a3Rge (t_a3U45 :: (~>) a_a3Rgd ((~>) b_a3Rge b_a3Rge)) (t_a3U46 :: b_a3Rge) (t_a3U47 :: [a_a3Rgd]). Sing t_a3U45 -> Sing t_a3U46 -> Sing t_a3U47 -> Sing (Apply (Apply (Apply ScanrSym0 t_a3U45) t_a3U46) t_a3U47 :: [b_a3Rge]) type family Scanr1 (a_a3TSA :: (~>) a_a3Rgc ((~>) a_a3Rgc a_a3Rgc)) (a_a3TSB :: [a_a3Rgc]) :: [a_a3Rgc] sScanr1 :: forall a_a3Rgc (t_a3U41 :: (~>) a_a3Rgc ((~>) a_a3Rgc a_a3Rgc)) (t_a3U42 :: [a_a3Rgc]). Sing t_a3U41 -> Sing t_a3U42 -> Sing (Apply (Apply Scanr1Sym0 t_a3U41) t_a3U42 :: [a_a3Rgc]) type family Replicate (a_a3TEK :: Nat) (a_a3TEL :: a_a3ReI) :: [a_a3ReI] sReplicate :: forall a_a3ReI (t_a3U0L :: Nat) (t_a3U0M :: a_a3ReI). Sing t_a3U0L -> Sing t_a3U0M -> Sing (Apply (Apply ReplicateSym0 t_a3U0L) t_a3U0M :: [a_a3ReI]) type family Take (a_a3TGi :: Nat) (a_a3TGj :: [a_a3ReY]) :: [a_a3ReY] sTake :: forall a_a3ReY (t_a3U1d :: Nat) (t_a3U1e :: [a_a3ReY]). Sing t_a3U1d -> Sing t_a3U1e -> Sing (Apply (Apply TakeSym0 t_a3U1d) t_a3U1e :: [a_a3ReY]) type family Drop (a_a3TG4 :: Nat) (a_a3TG5 :: [a_a3ReX]) :: [a_a3ReX] sDrop :: forall a_a3ReX (t_a3U19 :: Nat) (t_a3U1a :: [a_a3ReX]). Sing t_a3U19 -> Sing t_a3U1a -> Sing (Apply (Apply DropSym0 t_a3U19) t_a3U1a :: [a_a3ReX]) type family SplitAt (a_a3TGw :: Nat) (a_a3TGx :: [a_a3ReW]) :: ([a_a3ReW], [a_a3ReW]) sSplitAt :: forall a_a3ReW (t_a3U1h :: Nat) (t_a3U1i :: [a_a3ReW]). Sing t_a3U1h -> Sing t_a3U1i -> Sing (Apply (Apply SplitAtSym0 t_a3U1h) t_a3U1i :: ([a_a3ReW], [a_a3ReW])) type family TakeWhile (a_a3TIQ :: (~>) a_a3Rf3 Bool) (a_a3TIR :: [a_a3Rf3]) :: [a_a3Rf3] sTakeWhile :: forall a_a3Rf3 (t_a3U1D :: (~>) a_a3Rf3 Bool) (t_a3U1E :: [a_a3Rf3]). Sing t_a3U1D -> Sing t_a3U1E -> Sing (Apply (Apply TakeWhileSym0 t_a3U1D) t_a3U1E :: [a_a3Rf3]) type family Span (a_a3THj :: (~>) a_a3Rf0 Bool) (a_a3THk :: [a_a3Rf0]) :: ([a_a3Rf0], [a_a3Rf0]) sSpan :: forall a_a3Rf0 (t_a3U1p :: (~>) a_a3Rf0 Bool) (t_a3U1q :: [a_a3Rf0]). Sing t_a3U1p -> Sing t_a3U1q -> Sing (Apply (Apply SpanSym0 t_a3U1p) t_a3U1q :: ([a_a3Rf0], [a_a3Rf0])) type family Break (a_a3TGC :: (~>) a_a3ReZ Bool) (a_a3TGD :: [a_a3ReZ]) :: ([a_a3ReZ], [a_a3ReZ]) sBreak :: forall a_a3ReZ (t_a3U1l :: (~>) a_a3ReZ Bool) (t_a3U1m :: [a_a3ReZ]). Sing t_a3U1l -> Sing t_a3U1m -> Sing (Apply (Apply BreakSym0 t_a3U1l) t_a3U1m :: ([a_a3ReZ], [a_a3ReZ])) type family NotElem (a_a5ZMr :: a_a5ZEF) (a_a5ZMs :: t_a5ZEE a_a5ZEF) :: Bool sNotElem :: forall t_a5ZEE a_a5ZEF (t_a60ah :: a_a5ZEF) (t_a60ai :: t_a5ZEE a_a5ZEF). (SFoldable t_a5ZEE, SEq a_a5ZEF) => Sing t_a60ah -> Sing t_a60ai -> Sing (Apply (Apply NotElemSym0 t_a60ah) t_a60ai :: Bool) type family Lookup (a_a3TFN :: a_a3ReO) (a_a3TFO :: [(a_a3ReO, b_a3ReP)]) :: Maybe b_a3ReP sLookup :: forall a_a3ReO b_a3ReP (t_a3U15 :: a_a3ReO) (t_a3U16 :: [(a_a3ReO, b_a3ReP)]). SEq a_a3ReO => Sing t_a3U15 -> Sing t_a3U16 -> Sing (Apply (Apply LookupSym0 t_a3U15) t_a3U16 :: Maybe b_a3ReP) type family Zip (a_a3TOr :: [a_a3RfV]) (a_a3TOs :: [b_a3RfW]) :: [(a_a3RfV, b_a3RfW)] sZip :: forall a_a3RfV b_a3RfW (t_a3U39 :: [a_a3RfV]) (t_a3U3a :: [b_a3RfW]). Sing t_a3U39 -> Sing t_a3U3a -> Sing (Apply (Apply ZipSym0 t_a3U39) t_a3U3a :: [(a_a3RfV, b_a3RfW)]) type family Zip3 (a_a3TOf :: [a_a3RfS]) (a_a3TOg :: [b_a3RfT]) (a_a3TOh :: [c_a3RfU]) :: [(a_a3RfS, b_a3RfT, c_a3RfU)] sZip3 :: forall a_a3RfS b_a3RfT c_a3RfU (t_a3U33 :: [a_a3RfS]) (t_a3U34 :: [b_a3RfT]) (t_a3U35 :: [c_a3RfU]). Sing t_a3U33 -> Sing t_a3U34 -> Sing t_a3U35 -> Sing (Apply (Apply (Apply Zip3Sym0 t_a3U33) t_a3U34) t_a3U35 :: [(a_a3RfS, b_a3RfT, c_a3RfU)]) type family ZipWith (a_a3TO4 :: (~>) a_a3RfP ((~>) b_a3RfQ c_a3RfR)) (a_a3TO5 :: [a_a3RfP]) (a_a3TO6 :: [b_a3RfQ]) :: [c_a3RfR] sZipWith :: forall a_a3RfP b_a3RfQ c_a3RfR (t_a3U2X :: (~>) a_a3RfP ((~>) b_a3RfQ c_a3RfR)) (t_a3U2Y :: [a_a3RfP]) (t_a3U2Z :: [b_a3RfQ]). Sing t_a3U2X -> Sing t_a3U2Y -> Sing t_a3U2Z -> Sing (Apply (Apply (Apply ZipWithSym0 t_a3U2X) t_a3U2Y) t_a3U2Z :: [c_a3RfR]) type family ZipWith3 (a_a3TNP :: (~>) a_a3RfL ((~>) b_a3RfM ((~>) c_a3RfN d_a3RfO))) (a_a3TNQ :: [a_a3RfL]) (a_a3TNR :: [b_a3RfM]) (a_a3TNS :: [c_a3RfN]) :: [d_a3RfO] sZipWith3 :: forall a_a3RfL b_a3RfM c_a3RfN d_a3RfO (t_a3U2P :: (~>) a_a3RfL ((~>) b_a3RfM ((~>) c_a3RfN d_a3RfO))) (t_a3U2Q :: [a_a3RfL]) (t_a3U2R :: [b_a3RfM]) (t_a3U2S :: [c_a3RfN]). Sing t_a3U2P -> Sing t_a3U2Q -> Sing t_a3U2R -> Sing t_a3U2S -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a3U2P) t_a3U2Q) t_a3U2R) t_a3U2S :: [d_a3RfO]) type family Unzip (a_a3TNw :: [(a_a3RfJ, b_a3RfK)]) :: ([a_a3RfJ], [b_a3RfK]) sUnzip :: forall a_a3RfJ b_a3RfK (t_a3U2N :: [(a_a3RfJ, b_a3RfK)]). Sing t_a3U2N -> Sing (Apply UnzipSym0 t_a3U2N :: ([a_a3RfJ], [b_a3RfK])) type family Unzip3 (a_a3TNb :: [(a_a3RfG, b_a3RfH, c_a3RfI)]) :: ([a_a3RfG], [b_a3RfH], [c_a3RfI]) sUnzip3 :: forall a_a3RfG b_a3RfH c_a3RfI (t_a3U2L :: [(a_a3RfG, b_a3RfH, c_a3RfI)]). Sing t_a3U2L -> Sing (Apply Unzip3Sym0 t_a3U2L :: ([a_a3RfG], [b_a3RfH], [c_a3RfI])) type family Unlines (a_a3TLr :: [Symbol]) :: Symbol sUnlines :: forall (t_a3U2B :: [Symbol]). Sing t_a3U2B -> Sing (Apply UnlinesSym0 t_a3U2B :: Symbol) type family Unwords (a_a3TLg :: [Symbol]) :: Symbol sUnwords :: forall (t_a3U2z :: [Symbol]). Sing t_a3U2z -> Sing (Apply UnwordsSym0 t_a3U2z :: Symbol) type family Maybe_ (a_a1ZGF :: b_a1ZGn) (a_a1ZGG :: (~>) a_a1ZGo b_a1ZGn) (a_a1ZGH :: Maybe a_a1ZGo) :: b_a1ZGn sMaybe_ :: forall b_a1ZGn a_a1ZGo (t_a1ZGO :: b_a1ZGn) (t_a1ZGP :: (~>) a_a1ZGo b_a1ZGn) (t_a1ZGQ :: Maybe a_a1ZGo). Sing t_a1ZGO -> Sing t_a1ZGP -> Sing t_a1ZGQ -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a1ZGO) t_a1ZGP) t_a1ZGQ :: b_a1ZGn) type family Either_ (a_a5UtI :: (~>) a_a5Ut8 c_a5Ut9) (a_a5UtJ :: (~>) b_a5Uta c_a5Ut9) (a_a5UtK :: Either a_a5Ut8 b_a5Uta) :: c_a5Ut9 sEither_ :: forall a_a5Ut8 c_a5Ut9 b_a5Uta (t_a5UtS :: (~>) a_a5Ut8 c_a5Ut9) (t_a5UtT :: (~>) b_a5Uta c_a5Ut9) (t_a5UtU :: Either a_a5Ut8 b_a5Uta). Sing t_a5UtS -> Sing t_a5UtT -> Sing t_a5UtU -> Sing (Apply (Apply (Apply Either_Sym0 t_a5UtS) t_a5UtT) t_a5UtU :: c_a5Ut9) type family Fst (a_a1qed :: (a_a1qcF, b_a1qcG)) :: a_a1qcF sFst :: forall a_a1qcF b_a1qcG (t_a1qew :: (a_a1qcF, b_a1qcG)). Sing t_a1qew -> Sing (Apply FstSym0 t_a1qew :: a_a1qcF) type family Snd (a_a1qea :: (a_a1qcD, b_a1qcE)) :: b_a1qcE sSnd :: forall a_a1qcD b_a1qcE (t_a1qeu :: (a_a1qcD, b_a1qcE)). Sing t_a1qeu -> Sing (Apply SndSym0 t_a1qeu :: b_a1qcE) type family Curry (a_a1qe1 :: (~>) (a_a1qcA, b_a1qcB) c_a1qcC) (a_a1qe2 :: a_a1qcA) (a_a1qe3 :: b_a1qcB) :: c_a1qcC sCurry :: forall a_a1qcA b_a1qcB c_a1qcC (t_a1qeo :: (~>) (a_a1qcA, b_a1qcB) c_a1qcC) (t_a1qep :: a_a1qcA) (t_a1qeq :: b_a1qcB). Sing t_a1qeo -> Sing t_a1qep -> Sing t_a1qeq -> Sing (Apply (Apply (Apply CurrySym0 t_a1qeo) t_a1qep) t_a1qeq :: c_a1qcC) type family Uncurry (a_a1qeg :: (~>) a_a1qcx ((~>) b_a1qcy c_a1qcz)) (a_a1qeh :: (a_a1qcx, b_a1qcy)) :: c_a1qcz sUncurry :: forall a_a1qcx b_a1qcy c_a1qcz (t_a1qey :: (~>) a_a1qcx ((~>) b_a1qcy c_a1qcz)) (t_a1qez :: (a_a1qcx, b_a1qcy)). Sing t_a1qey -> Sing t_a1qez -> Sing (Apply (Apply UncurrySym0 t_a1qey) t_a1qez :: c_a1qcz) -- | (Kind) This is the kind of type-level symbols. Declared here because -- class IP needs it data Symbol either_ :: (a_a5Ut8 -> c_a5Ut9) -> (b_a5Uta -> c_a5Ut9) -> Either a_a5Ut8 b_a5Uta -> c_a5Ut9 maybe_ :: b_a1ZGn -> (a_a1ZGo -> b_a1ZGn) -> Maybe a_a1ZGo -> b_a1ZGn bool_ :: a_a1rUg -> a_a1rUg -> Bool -> a_a1rUg -- | 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 (a6989586621679356688 :: Bool) = Not a6989586621679356688 data (&&@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 3 &&@#@$ data (&&@#@$$) (a6989586621679356147 :: Bool) :: (~>) Bool Bool infixr 3 &&@#@$$ type (&&@#@$$$) (a6989586621679356147 :: Bool) (b6989586621679356148 :: Bool) = (&&) a6989586621679356147 b6989586621679356148 data (||@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 2 ||@#@$ data (||@#@$$) (a6989586621679356388 :: Bool) :: (~>) Bool Bool infixr 2 ||@#@$$ type (||@#@$$$) (a6989586621679356388 :: Bool) (b6989586621679356389 :: Bool) = (||) a6989586621679356388 b6989586621679356389 type OtherwiseSym0 = Otherwise type NothingSym0 = 'Nothing data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type)) type JustSym1 (t6989586621679291637 :: a3530822107858468865) = 'Just t6989586621679291637 data Maybe_Sym0 :: forall a6989586621679485232 b6989586621679485231. (~>) b6989586621679485231 ((~>) ((~>) a6989586621679485232 b6989586621679485231) ((~>) (Maybe a6989586621679485232) b6989586621679485231)) data Maybe_Sym1 (a6989586621679485249 :: b6989586621679485231) :: forall a6989586621679485232. (~>) ((~>) a6989586621679485232 b6989586621679485231) ((~>) (Maybe a6989586621679485232) b6989586621679485231) data Maybe_Sym2 (a6989586621679485249 :: b6989586621679485231) (a6989586621679485250 :: (~>) a6989586621679485232 b6989586621679485231) :: (~>) (Maybe a6989586621679485232) b6989586621679485231 type Maybe_Sym3 (a6989586621679485249 :: b6989586621679485231) (a6989586621679485250 :: (~>) a6989586621679485232 b6989586621679485231) (a6989586621679485251 :: Maybe a6989586621679485232) = Maybe_ a6989586621679485249 a6989586621679485250 a6989586621679485251 data LeftSym0 :: forall (a6989586621679082630 :: Type) (b6989586621679082631 :: Type). (~>) a6989586621679082630 (Either (a6989586621679082630 :: Type) (b6989586621679082631 :: Type)) type LeftSym1 (t6989586621679291704 :: a6989586621679082630) = 'Left t6989586621679291704 data RightSym0 :: forall (a6989586621679082630 :: Type) (b6989586621679082631 :: Type). (~>) b6989586621679082631 (Either (a6989586621679082630 :: Type) (b6989586621679082631 :: Type)) type RightSym1 (t6989586621679291706 :: b6989586621679082631) = 'Right t6989586621679291706 data Either_Sym0 :: forall a6989586621680418502 b6989586621680418504 c6989586621680418503. (~>) ((~>) a6989586621680418502 c6989586621680418503) ((~>) ((~>) b6989586621680418504 c6989586621680418503) ((~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503)) data Either_Sym1 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) :: forall b6989586621680418504. (~>) ((~>) b6989586621680418504 c6989586621680418503) ((~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503) data Either_Sym2 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) (a6989586621680418539 :: (~>) b6989586621680418504 c6989586621680418503) :: (~>) (Either a6989586621680418502 b6989586621680418504) c6989586621680418503 type Either_Sym3 (a6989586621680418538 :: (~>) a6989586621680418502 c6989586621680418503) (a6989586621680418539 :: (~>) b6989586621680418504 c6989586621680418503) (a6989586621680418540 :: Either a6989586621680418502 b6989586621680418504) = Either_ a6989586621680418538 a6989586621680418539 a6989586621680418540 type Tuple0Sym0 = '() data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type))) data Tuple2Sym1 (t6989586621679291753 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679291753 :: a3530822107858468865) (t6989586621679291754 :: b3530822107858468866) = '(t6989586621679291753, t6989586621679291754) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679291784 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679291784 :: (a3530822107858468865 :: Type)) (t6989586621679291785 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679291784 :: a3530822107858468865) (t6989586621679291785 :: b3530822107858468866) (t6989586621679291786 :: c3530822107858468867) = '(t6989586621679291784, t6989586621679291785, t6989586621679291786) 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 (t6989586621679291831 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679291831 :: (a3530822107858468865 :: Type)) (t6989586621679291832 :: (b3530822107858468866 :: Type)) (t6989586621679291833 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679291831 :: a3530822107858468865) (t6989586621679291832 :: b3530822107858468866) (t6989586621679291833 :: c3530822107858468867) (t6989586621679291834 :: d3530822107858468868) = '(t6989586621679291831, t6989586621679291832, t6989586621679291833, t6989586621679291834) 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 (t6989586621679291896 :: (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 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679291896 :: (a3530822107858468865 :: Type)) (t6989586621679291897 :: (b3530822107858468866 :: Type)) (t6989586621679291898 :: (c3530822107858468867 :: Type)) (t6989586621679291899 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679291896 :: a3530822107858468865) (t6989586621679291897 :: b3530822107858468866) (t6989586621679291898 :: c3530822107858468867) (t6989586621679291899 :: d3530822107858468868) (t6989586621679291900 :: e3530822107858468869) = '(t6989586621679291896, t6989586621679291897, t6989586621679291898, t6989586621679291899, t6989586621679291900) 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 (t6989586621679291981 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (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 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679291981 :: (a3530822107858468865 :: Type)) (t6989586621679291982 :: (b3530822107858468866 :: Type)) (t6989586621679291983 :: (c3530822107858468867 :: Type)) (t6989586621679291984 :: (d3530822107858468868 :: Type)) (t6989586621679291985 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679291981 :: a3530822107858468865) (t6989586621679291982 :: b3530822107858468866) (t6989586621679291983 :: c3530822107858468867) (t6989586621679291984 :: d3530822107858468868) (t6989586621679291985 :: e3530822107858468869) (t6989586621679291986 :: f3530822107858468870) = '(t6989586621679291981, t6989586621679291982, t6989586621679291983, t6989586621679291984, t6989586621679291985, t6989586621679291986) 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 (t6989586621679292088 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (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 (t6989586621679292088 :: (a3530822107858468865 :: Type)) (t6989586621679292089 :: (b3530822107858468866 :: Type)) (t6989586621679292090 :: (c3530822107858468867 :: Type)) (t6989586621679292091 :: (d3530822107858468868 :: Type)) (t6989586621679292092 :: (e3530822107858468869 :: Type)) (t6989586621679292093 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679292088 :: a3530822107858468865) (t6989586621679292089 :: b3530822107858468866) (t6989586621679292090 :: c3530822107858468867) (t6989586621679292091 :: d3530822107858468868) (t6989586621679292092 :: e3530822107858468869) (t6989586621679292093 :: f3530822107858468870) (t6989586621679292094 :: g3530822107858468871) = '(t6989586621679292088, t6989586621679292089, t6989586621679292090, t6989586621679292091, t6989586621679292092, t6989586621679292093, t6989586621679292094) data FstSym0 :: forall a6989586621679348849 b6989586621679348850. (~>) (a6989586621679348849, b6989586621679348850) a6989586621679348849 type FstSym1 (a6989586621679348945 :: (a6989586621679348849, b6989586621679348850)) = Fst a6989586621679348945 data SndSym0 :: forall a6989586621679348847 b6989586621679348848. (~>) (a6989586621679348847, b6989586621679348848) b6989586621679348848 type SndSym1 (a6989586621679348942 :: (a6989586621679348847, b6989586621679348848)) = Snd a6989586621679348942 data CurrySym0 :: forall a6989586621679348844 b6989586621679348845 c6989586621679348846. (~>) ((~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) ((~>) a6989586621679348844 ((~>) b6989586621679348845 c6989586621679348846)) data CurrySym1 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) :: (~>) a6989586621679348844 ((~>) b6989586621679348845 c6989586621679348846) data CurrySym2 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) (a6989586621679348934 :: a6989586621679348844) :: (~>) b6989586621679348845 c6989586621679348846 type CurrySym3 (a6989586621679348933 :: (~>) (a6989586621679348844, b6989586621679348845) c6989586621679348846) (a6989586621679348934 :: a6989586621679348844) (a6989586621679348935 :: b6989586621679348845) = Curry a6989586621679348933 a6989586621679348934 a6989586621679348935 data UncurrySym0 :: forall a6989586621679348841 b6989586621679348842 c6989586621679348843. (~>) ((~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) ((~>) (a6989586621679348841, b6989586621679348842) c6989586621679348843) data UncurrySym1 (a6989586621679348948 :: (~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) :: (~>) (a6989586621679348841, b6989586621679348842) c6989586621679348843 type UncurrySym2 (a6989586621679348948 :: (~>) a6989586621679348841 ((~>) b6989586621679348842 c6989586621679348843)) (a6989586621679348949 :: (a6989586621679348841, b6989586621679348842)) = Uncurry a6989586621679348948 a6989586621679348949 data ErrorSym0 :: forall k06989586621679458997 k6989586621679458996. (~>) k06989586621679458997 k6989586621679458996 type ErrorSym1 (str6989586621679458998 :: k06989586621679458997) = Error str6989586621679458998 data ErrorWithoutStackTraceSym0 :: forall k06989586621679460047 k6989586621679460046. (~>) k06989586621679460047 k6989586621679460046 type ErrorWithoutStackTraceSym1 (str6989586621679460048 :: k06989586621679460047) = ErrorWithoutStackTrace str6989586621679460048 type UndefinedSym0 = Undefined type LTSym0 = 'LT type EQSym0 = 'EQ type GTSym0 = 'GT data CompareSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Ordering) data CompareSym1 (arg6989586621679373626 :: a6989586621679373532) :: (~>) a6989586621679373532 Ordering type CompareSym2 (arg6989586621679373626 :: a6989586621679373532) (arg6989586621679373627 :: a6989586621679373532) = Compare arg6989586621679373626 arg6989586621679373627 data (<@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 <@#@$ data (<@#@$$) (arg6989586621679373630 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 <@#@$$ type (<@#@$$$) (arg6989586621679373630 :: a6989586621679373532) (arg6989586621679373631 :: a6989586621679373532) = (<) arg6989586621679373630 arg6989586621679373631 data (<=@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 <=@#@$ data (<=@#@$$) (arg6989586621679373634 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 <=@#@$$ type (<=@#@$$$) (arg6989586621679373634 :: a6989586621679373532) (arg6989586621679373635 :: a6989586621679373532) = (<=) arg6989586621679373634 arg6989586621679373635 data (>@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679373638 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679373638 :: a6989586621679373532) (arg6989586621679373639 :: a6989586621679373532) = (>) arg6989586621679373638 arg6989586621679373639 data (>=@#@$) :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 Bool) infix 4 >=@#@$ data (>=@#@$$) (arg6989586621679373642 :: a6989586621679373532) :: (~>) a6989586621679373532 Bool infix 4 >=@#@$$ type (>=@#@$$$) (arg6989586621679373642 :: a6989586621679373532) (arg6989586621679373643 :: a6989586621679373532) = (>=) arg6989586621679373642 arg6989586621679373643 data MaxSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 a6989586621679373532) data MaxSym1 (arg6989586621679373646 :: a6989586621679373532) :: (~>) a6989586621679373532 a6989586621679373532 type MaxSym2 (arg6989586621679373646 :: a6989586621679373532) (arg6989586621679373647 :: a6989586621679373532) = Max arg6989586621679373646 arg6989586621679373647 data MinSym0 :: forall a6989586621679373532. (~>) a6989586621679373532 ((~>) a6989586621679373532 a6989586621679373532) data MinSym1 (arg6989586621679373650 :: a6989586621679373532) :: (~>) a6989586621679373532 a6989586621679373532 type MinSym2 (arg6989586621679373650 :: a6989586621679373532) (arg6989586621679373651 :: a6989586621679373532) = Min arg6989586621679373650 arg6989586621679373651 data (^@#@$) :: (~>) Nat ((~>) Nat Nat) infixr 8 ^@#@$ data (^@#@$$) (a3530822107858468865 :: Nat) :: (~>) Nat Nat infixr 8 ^@#@$$ type (^@#@$$$) (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = (^) a3530822107858468865 b3530822107858468866 data ShowsPrecSym0 :: forall a6989586621680248665. (~>) Nat ((~>) a6989586621680248665 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680250615 :: Nat) :: forall a6989586621680248665. (~>) a6989586621680248665 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680250615 :: Nat) (arg6989586621680250616 :: a6989586621680248665) (arg6989586621680250617 :: Symbol) = ShowsPrec arg6989586621680250615 arg6989586621680250616 arg6989586621680250617 data Show_Sym0 :: forall a6989586621680248665. (~>) a6989586621680248665 Symbol type Show_Sym1 (arg6989586621680250621 :: a6989586621680248665) = Show_ arg6989586621680250621 data ShowListSym0 :: forall a6989586621680248665. (~>) [a6989586621680248665] ((~>) Symbol Symbol) data ShowListSym1 (arg6989586621680250623 :: [a6989586621680248665]) :: (~>) Symbol Symbol type ShowListSym2 (arg6989586621680250623 :: [a6989586621680248665]) (arg6989586621680250624 :: Symbol) = ShowList arg6989586621680250623 arg6989586621680250624 data ShowsSym0 :: forall a6989586621680248650. (~>) a6989586621680248650 ((~>) Symbol Symbol) data ShowsSym1 (a6989586621680250607 :: a6989586621680248650) :: (~>) Symbol Symbol type ShowsSym2 (a6989586621680250607 :: a6989586621680248650) (a6989586621680250608 :: Symbol) = Shows a6989586621680250607 a6989586621680250608 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680250549 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680250549 :: Symbol) (a6989586621680250550 :: Symbol) = ShowChar a6989586621680250549 a6989586621680250550 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680250534 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680250534 :: Symbol) (a6989586621680250535 :: Symbol) = ShowString a6989586621680250534 a6989586621680250535 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680250555 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680250555 :: Bool) (a6989586621680250556 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data (<>@#@$) :: forall a6989586621679800518. (~>) a6989586621679800518 ((~>) a6989586621679800518 a6989586621679800518) infixr 6 <>@#@$ data (<>@#@$$) (arg6989586621679801003 :: a6989586621679800518) :: (~>) a6989586621679800518 a6989586621679800518 infixr 6 <>@#@$$ type (<>@#@$$$) (arg6989586621679801003 :: a6989586621679800518) (arg6989586621679801004 :: a6989586621679800518) = (<>) arg6989586621679801003 arg6989586621679801004 type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680316690. (~>) a6989586621680316690 ((~>) a6989586621680316690 a6989586621680316690) data MappendSym1 (arg6989586621680317075 :: a6989586621680316690) :: (~>) a6989586621680316690 a6989586621680316690 type MappendSym2 (arg6989586621680317075 :: a6989586621680316690) (arg6989586621680317076 :: a6989586621680316690) = Mappend arg6989586621680317075 arg6989586621680317076 data MconcatSym0 :: forall a6989586621680316690. (~>) [a6989586621680316690] a6989586621680316690 type MconcatSym1 (arg6989586621680317079 :: [a6989586621680316690]) = Mconcat arg6989586621680317079 data FmapSym0 :: forall a6989586621679536044 b6989586621679536045 f6989586621679536043. (~>) ((~>) a6989586621679536044 b6989586621679536045) ((~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045)) data FmapSym1 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) :: forall f6989586621679536043. (~>) (f6989586621679536043 a6989586621679536044) (f6989586621679536043 b6989586621679536045) type FmapSym2 (arg6989586621679536437 :: (~>) a6989586621679536044 b6989586621679536045) (arg6989586621679536438 :: f6989586621679536043 a6989586621679536044) = Fmap arg6989586621679536437 arg6989586621679536438 data (<$@#@$) :: forall a6989586621679536046 b6989586621679536047 f6989586621679536043. (~>) a6989586621679536046 ((~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679536441 :: a6989586621679536046) :: forall b6989586621679536047 f6989586621679536043. (~>) (f6989586621679536043 b6989586621679536047) (f6989586621679536043 a6989586621679536046) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679536441 :: a6989586621679536046) (arg6989586621679536442 :: f6989586621679536043 b6989586621679536047) = (<$) arg6989586621679536441 arg6989586621679536442 data (<$>@#@$) :: forall a6989586621679705379 b6989586621679705380 f6989586621679705378. (~>) ((~>) a6989586621679705379 b6989586621679705380) ((~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) :: forall f6989586621679705378. (~>) (f6989586621679705378 a6989586621679705379) (f6989586621679705378 b6989586621679705380) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679705459 :: (~>) a6989586621679705379 b6989586621679705380) (a6989586621679705460 :: f6989586621679705378 a6989586621679705379) = (<$>) a6989586621679705459 a6989586621679705460 data PureSym0 :: forall a6989586621679536049 f6989586621679536048. (~>) a6989586621679536049 (f6989586621679536048 a6989586621679536049) type PureSym1 (arg6989586621679536461 :: a6989586621679536049) = Pure arg6989586621679536461 data (<*>@#@$) :: forall a6989586621679536050 b6989586621679536051 f6989586621679536048. (~>) (f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) ((~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) :: (~>) (f6989586621679536048 a6989586621679536050) (f6989586621679536048 b6989586621679536051) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679536463 :: f6989586621679536048 ((~>) a6989586621679536050 b6989586621679536051)) (arg6989586621679536464 :: f6989586621679536048 a6989586621679536050) = (<*>) arg6989586621679536463 arg6989586621679536464 data (*>@#@$) :: forall a6989586621679536055 b6989586621679536056 f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536055) ((~>) (f6989586621679536048 b6989586621679536056) (f6989586621679536048 b6989586621679536056)) infixl 4 *>@#@$ data (*>@#@$$) (arg6989586621679536473 :: f6989586621679536048 a6989586621679536055) :: forall b6989586621679536056. (~>) (f6989586621679536048 b6989586621679536056) (f6989586621679536048 b6989586621679536056) infixl 4 *>@#@$$ type (*>@#@$$$) (arg6989586621679536473 :: f6989586621679536048 a6989586621679536055) (arg6989586621679536474 :: f6989586621679536048 b6989586621679536056) = (*>) arg6989586621679536473 arg6989586621679536474 data (<*@#@$) :: forall a6989586621679536057 b6989586621679536058 f6989586621679536048. (~>) (f6989586621679536048 a6989586621679536057) ((~>) (f6989586621679536048 b6989586621679536058) (f6989586621679536048 a6989586621679536057)) infixl 4 <*@#@$ data (<*@#@$$) (arg6989586621679536477 :: f6989586621679536048 a6989586621679536057) :: forall b6989586621679536058. (~>) (f6989586621679536048 b6989586621679536058) (f6989586621679536048 a6989586621679536057) infixl 4 <*@#@$$ type (<*@#@$$$) (arg6989586621679536477 :: f6989586621679536048 a6989586621679536057) (arg6989586621679536478 :: f6989586621679536048 b6989586621679536058) = (<*) arg6989586621679536477 arg6989586621679536478 data (>>=@#@$) :: forall a6989586621679536073 b6989586621679536074 m6989586621679536072. (~>) (m6989586621679536072 a6989586621679536073) ((~>) ((~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) (m6989586621679536072 b6989586621679536074)) infixl 1 >>=@#@$ data (>>=@#@$$) (arg6989586621679536544 :: m6989586621679536072 a6989586621679536073) :: forall b6989586621679536074. (~>) ((~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) (m6989586621679536072 b6989586621679536074) infixl 1 >>=@#@$$ type (>>=@#@$$$) (arg6989586621679536544 :: m6989586621679536072 a6989586621679536073) (arg6989586621679536545 :: (~>) a6989586621679536073 (m6989586621679536072 b6989586621679536074)) = (>>=) arg6989586621679536544 arg6989586621679536545 data (>>@#@$) :: forall a6989586621679536075 b6989586621679536076 m6989586621679536072. (~>) (m6989586621679536072 a6989586621679536075) ((~>) (m6989586621679536072 b6989586621679536076) (m6989586621679536072 b6989586621679536076)) infixl 1 >>@#@$ data (>>@#@$$) (arg6989586621679536548 :: m6989586621679536072 a6989586621679536075) :: forall b6989586621679536076. (~>) (m6989586621679536072 b6989586621679536076) (m6989586621679536072 b6989586621679536076) infixl 1 >>@#@$$ type (>>@#@$$$) (arg6989586621679536548 :: m6989586621679536072 a6989586621679536075) (arg6989586621679536549 :: m6989586621679536072 b6989586621679536076) = (>>) arg6989586621679536548 arg6989586621679536549 data ReturnSym0 :: forall a6989586621679536077 m6989586621679536072. (~>) a6989586621679536077 (m6989586621679536072 a6989586621679536077) type ReturnSym1 (arg6989586621679536552 :: a6989586621679536077) = Return arg6989586621679536552 data FailSym0 :: forall a6989586621679536078 m6989586621679536072. (~>) Symbol (m6989586621679536072 a6989586621679536078) type FailSym1 (arg6989586621679536554 :: Symbol) = Fail arg6989586621679536554 data MapM_Sym0 :: forall a6989586621680438471 b6989586621680438472 m6989586621680438470 t6989586621680438469. (~>) ((~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) ((~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ())) data MapM_Sym1 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) :: forall t6989586621680438469. (~>) (t6989586621680438469 a6989586621680438471) (m6989586621680438470 ()) type MapM_Sym2 (a6989586621680439069 :: (~>) a6989586621680438471 (m6989586621680438470 b6989586621680438472)) (a6989586621680439070 :: t6989586621680438469 a6989586621680438471) = MapM_ a6989586621680439069 a6989586621680439070 data Sequence_Sym0 :: forall a6989586621680438461 m6989586621680438460 t6989586621680438459. (~>) (t6989586621680438459 (m6989586621680438460 a6989586621680438461)) (m6989586621680438460 ()) type Sequence_Sym1 (a6989586621680439061 :: t6989586621680438459 (m6989586621680438460 a6989586621680438461)) = Sequence_ a6989586621680439061 data (=<<@#@$) :: forall a6989586621679535995 b6989586621679535996 m6989586621679535994. (~>) ((~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) ((~>) (m6989586621679535994 a6989586621679535995) (m6989586621679535994 b6989586621679535996)) infixr 1 =<<@#@$ data (=<<@#@$$) (a6989586621679536390 :: (~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) :: (~>) (m6989586621679535994 a6989586621679535995) (m6989586621679535994 b6989586621679535996) infixr 1 =<<@#@$$ type (=<<@#@$$$) (a6989586621679536390 :: (~>) a6989586621679535995 (m6989586621679535994 b6989586621679535996)) (a6989586621679536391 :: m6989586621679535994 a6989586621679535995) = (=<<) a6989586621679536390 a6989586621679536391 data ElemSym0 :: forall a6989586621680438543 t6989586621680438526. (~>) a6989586621680438543 ((~>) (t6989586621680438526 a6989586621680438543) Bool) data ElemSym1 (arg6989586621680439193 :: a6989586621680438543) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438543) Bool type ElemSym2 (arg6989586621680439193 :: a6989586621680438543) (arg6989586621680439194 :: t6989586621680438526 a6989586621680438543) = Elem arg6989586621680439193 arg6989586621680439194 data FoldMapSym0 :: forall a6989586621680438529 m6989586621680438528 t6989586621680438526. (~>) ((~>) a6989586621680438529 m6989586621680438528) ((~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528) data FoldMapSym1 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438529) m6989586621680438528 type FoldMapSym2 (arg6989586621680439151 :: (~>) a6989586621680438529 m6989586621680438528) (arg6989586621680439152 :: t6989586621680438526 a6989586621680438529) = FoldMap arg6989586621680439151 arg6989586621680439152 data FoldrSym0 :: forall a6989586621680438530 b6989586621680438531 t6989586621680438526. (~>) ((~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) ((~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531)) data FoldrSym1 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) :: forall t6989586621680438526. (~>) b6989586621680438531 ((~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531) data FoldrSym2 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438530) b6989586621680438531 type FoldrSym3 (arg6989586621680439155 :: (~>) a6989586621680438530 ((~>) b6989586621680438531 b6989586621680438531)) (arg6989586621680439156 :: b6989586621680438531) (arg6989586621680439157 :: t6989586621680438526 a6989586621680438530) = Foldr arg6989586621680439155 arg6989586621680439156 arg6989586621680439157 data FoldlSym0 :: forall a6989586621680438535 b6989586621680438534 t6989586621680438526. (~>) ((~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) ((~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534)) data FoldlSym1 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) :: forall t6989586621680438526. (~>) b6989586621680438534 ((~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534) data FoldlSym2 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438535) b6989586621680438534 type FoldlSym3 (arg6989586621680439167 :: (~>) b6989586621680438534 ((~>) a6989586621680438535 b6989586621680438534)) (arg6989586621680439168 :: b6989586621680438534) (arg6989586621680439169 :: t6989586621680438526 a6989586621680438535) = Foldl arg6989586621680439167 arg6989586621680439168 arg6989586621680439169 data Foldr1Sym0 :: forall a6989586621680438538 t6989586621680438526. (~>) ((~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) ((~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538) data Foldr1Sym1 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438538) a6989586621680438538 type Foldr1Sym2 (arg6989586621680439179 :: (~>) a6989586621680438538 ((~>) a6989586621680438538 a6989586621680438538)) (arg6989586621680439180 :: t6989586621680438526 a6989586621680438538) = Foldr1 arg6989586621680439179 arg6989586621680439180 data Foldl1Sym0 :: forall a6989586621680438539 t6989586621680438526. (~>) ((~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) ((~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539) data Foldl1Sym1 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) :: forall t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438539) a6989586621680438539 type Foldl1Sym2 (arg6989586621680439183 :: (~>) a6989586621680438539 ((~>) a6989586621680438539 a6989586621680438539)) (arg6989586621680439184 :: t6989586621680438526 a6989586621680438539) = Foldl1 arg6989586621680439183 arg6989586621680439184 data MaximumSym0 :: forall a6989586621680438544 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438544) a6989586621680438544 type MaximumSym1 (arg6989586621680439197 :: t6989586621680438526 a6989586621680438544) = Maximum arg6989586621680439197 data MinimumSym0 :: forall a6989586621680438545 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438545) a6989586621680438545 type MinimumSym1 (arg6989586621680439199 :: t6989586621680438526 a6989586621680438545) = Minimum arg6989586621680439199 data SumSym0 :: forall a6989586621680438546 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438546) a6989586621680438546 type SumSym1 (arg6989586621680439201 :: t6989586621680438526 a6989586621680438546) = Sum arg6989586621680439201 data ProductSym0 :: forall a6989586621680438547 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438547) a6989586621680438547 type ProductSym1 (arg6989586621680439203 :: t6989586621680438526 a6989586621680438547) = Product arg6989586621680439203 data TraverseSym0 :: forall a6989586621680734969 b6989586621680734970 f6989586621680734968 t6989586621680734967. (~>) ((~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) ((~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970))) data TraverseSym1 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734969) (f6989586621680734968 (t6989586621680734967 b6989586621680734970)) type TraverseSym2 (arg6989586621680734979 :: (~>) a6989586621680734969 (f6989586621680734968 b6989586621680734970)) (arg6989586621680734980 :: t6989586621680734967 a6989586621680734969) = Traverse arg6989586621680734979 arg6989586621680734980 data SequenceASym0 :: forall a6989586621680734972 f6989586621680734971 t6989586621680734967. (~>) (t6989586621680734967 (f6989586621680734971 a6989586621680734972)) (f6989586621680734971 (t6989586621680734967 a6989586621680734972)) type SequenceASym1 (arg6989586621680734983 :: t6989586621680734967 (f6989586621680734971 a6989586621680734972)) = SequenceA arg6989586621680734983 data MapMSym0 :: forall a6989586621680734974 b6989586621680734975 m6989586621680734973 t6989586621680734967. (~>) ((~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) ((~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975))) data MapMSym1 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) :: forall t6989586621680734967. (~>) (t6989586621680734967 a6989586621680734974) (m6989586621680734973 (t6989586621680734967 b6989586621680734975)) type MapMSym2 (arg6989586621680734985 :: (~>) a6989586621680734974 (m6989586621680734973 b6989586621680734975)) (arg6989586621680734986 :: t6989586621680734967 a6989586621680734974) = MapM arg6989586621680734985 arg6989586621680734986 data SequenceSym0 :: forall a6989586621680734977 m6989586621680734976 t6989586621680734967. (~>) (t6989586621680734967 (m6989586621680734976 a6989586621680734977)) (m6989586621680734976 (t6989586621680734967 a6989586621680734977)) type SequenceSym1 (arg6989586621680734989 :: t6989586621680734967 (m6989586621680734976 a6989586621680734977)) = Sequence arg6989586621680734989 data IdSym0 :: forall a6989586621679511796. (~>) a6989586621679511796 a6989586621679511796 type IdSym1 (a6989586621679511991 :: a6989586621679511796) = Id a6989586621679511991 data ConstSym0 :: forall a6989586621679511794 b6989586621679511795. (~>) a6989586621679511794 ((~>) b6989586621679511795 a6989586621679511794) data ConstSym1 (a6989586621679511976 :: a6989586621679511794) :: forall b6989586621679511795. (~>) b6989586621679511795 a6989586621679511794 type ConstSym2 (a6989586621679511976 :: a6989586621679511794) (a6989586621679511977 :: b6989586621679511795) = Const a6989586621679511976 a6989586621679511977 data (.@#@$) :: forall a6989586621679511793 b6989586621679511791 c6989586621679511792. (~>) ((~>) b6989586621679511791 c6989586621679511792) ((~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) :: forall a6989586621679511793. (~>) ((~>) a6989586621679511793 b6989586621679511791) ((~>) a6989586621679511793 c6989586621679511792) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679511957 :: (~>) b6989586621679511791 c6989586621679511792) (a6989586621679511958 :: (~>) a6989586621679511793 b6989586621679511791) :: (~>) a6989586621679511793 c6989586621679511792 infixr 9 .@#@$$$ data ($@#@$) :: forall a6989586621679511785 b6989586621679511786. (~>) ((~>) a6989586621679511785 b6989586621679511786) ((~>) a6989586621679511785 b6989586621679511786) infixr 0 $@#@$ data ($@#@$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) :: (~>) a6989586621679511785 b6989586621679511786 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679511942 :: (~>) a6989586621679511785 b6989586621679511786) (a6989586621679511943 :: a6989586621679511785) = ($) a6989586621679511942 a6989586621679511943 data ($!@#@$) :: forall a6989586621679511783 b6989586621679511784. (~>) ((~>) a6989586621679511783 b6989586621679511784) ((~>) a6989586621679511783 b6989586621679511784) infixr 0 $!@#@$ data ($!@#@$$) (a6989586621679511933 :: (~>) a6989586621679511783 b6989586621679511784) :: (~>) a6989586621679511783 b6989586621679511784 infixr 0 $!@#@$$ type ($!@#@$$$) (a6989586621679511933 :: (~>) a6989586621679511783 b6989586621679511784) (a6989586621679511934 :: a6989586621679511783) = ($!) a6989586621679511933 a6989586621679511934 data FlipSym0 :: forall a6989586621679511788 b6989586621679511789 c6989586621679511790. (~>) ((~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) ((~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790)) data FlipSym1 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) :: (~>) b6989586621679511789 ((~>) a6989586621679511788 c6989586621679511790) data FlipSym2 (a6989586621679511948 :: (~>) a6989586621679511788 ((~>) b6989586621679511789 c6989586621679511790)) (a6989586621679511949 :: b6989586621679511789) :: (~>) a6989586621679511788 c6989586621679511790 data AsTypeOfSym0 :: forall a6989586621679511787. (~>) a6989586621679511787 ((~>) a6989586621679511787 a6989586621679511787) data AsTypeOfSym1 (a6989586621679511985 :: a6989586621679511787) :: (~>) a6989586621679511787 a6989586621679511787 type AsTypeOfSym2 (a6989586621679511985 :: a6989586621679511787) (a6989586621679511986 :: a6989586621679511787) = AsTypeOf a6989586621679511985 a6989586621679511986 data SeqSym0 :: forall a6989586621679511780 b6989586621679511781. (~>) a6989586621679511780 ((~>) b6989586621679511781 b6989586621679511781) infixr 0 `SeqSym0` data SeqSym1 (a6989586621679511902 :: a6989586621679511780) :: forall b6989586621679511781. (~>) b6989586621679511781 b6989586621679511781 infixr 0 `SeqSym1` type SeqSym2 (a6989586621679511902 :: a6989586621679511780) (a6989586621679511903 :: b6989586621679511781) = Seq a6989586621679511902 a6989586621679511903 data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679291660 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679291660 :: a3530822107858468865) (t6989586621679291661 :: [a3530822107858468865]) = '(:) t6989586621679291660 t6989586621679291661 type NilSym0 = '[] data MapSym0 :: forall a6989586621679511798 b6989586621679511799. (~>) ((~>) a6989586621679511798 b6989586621679511799) ((~>) [a6989586621679511798] [b6989586621679511799]) data MapSym1 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) :: (~>) [a6989586621679511798] [b6989586621679511799] type MapSym2 (a6989586621679512002 :: (~>) a6989586621679511798 b6989586621679511799) (a6989586621679512003 :: [a6989586621679511798]) = Map a6989586621679512002 a6989586621679512003 data ReverseSym0 :: forall a6989586621679929534. (~>) [a6989586621679929534] [a6989586621679929534] type ReverseSym1 (a6989586621679939993 :: [a6989586621679929534]) = Reverse a6989586621679939993 data (++@#@$$) (a6989586621679511994 :: [a6989586621679511797]) :: (~>) [a6989586621679511797] [a6989586621679511797] infixr 5 ++@#@$$ data (++@#@$) :: forall a6989586621679511797. (~>) [a6989586621679511797] ((~>) [a6989586621679511797] [a6989586621679511797]) infixr 5 ++@#@$ data FilterSym0 :: forall a6989586621679929449. (~>) ((~>) a6989586621679929449 Bool) ((~>) [a6989586621679929449] [a6989586621679929449]) data FilterSym1 (a6989586621679938990 :: (~>) a6989586621679929449 Bool) :: (~>) [a6989586621679929449] [a6989586621679929449] type FilterSym2 (a6989586621679938990 :: (~>) a6989586621679929449 Bool) (a6989586621679938991 :: [a6989586621679929449]) = Filter a6989586621679938990 a6989586621679938991 data HeadSym0 :: forall a6989586621679929539. (~>) [a6989586621679929539] a6989586621679929539 type HeadSym1 (a6989586621679940062 :: [a6989586621679929539]) = Head a6989586621679940062 data LastSym0 :: forall a6989586621679929538. (~>) [a6989586621679929538] a6989586621679929538 type LastSym1 (a6989586621679940057 :: [a6989586621679929538]) = Last a6989586621679940057 data TailSym0 :: forall a6989586621679929537. (~>) [a6989586621679929537] [a6989586621679929537] type TailSym1 (a6989586621679940054 :: [a6989586621679929537]) = Tail a6989586621679940054 data InitSym0 :: forall a6989586621679929536. (~>) [a6989586621679929536] [a6989586621679929536] type InitSym1 (a6989586621679940040 :: [a6989586621679929536]) = Init a6989586621679940040 data NullSym0 :: forall a6989586621680438541 t6989586621680438526. (~>) (t6989586621680438526 a6989586621680438541) Bool type NullSym1 (arg6989586621680439189 :: t6989586621680438526 a6989586621680438541) = Null arg6989586621680439189 data ConcatSym0 :: forall a6989586621680438452 t6989586621680438451. (~>) (t6989586621680438451 [a6989586621680438452]) [a6989586621680438452] type ConcatSym1 (a6989586621680439037 :: t6989586621680438451 [a6989586621680438452]) = Concat a6989586621680439037 data ConcatMapSym0 :: forall a6989586621680438449 b6989586621680438450 t6989586621680438448. (~>) ((~>) a6989586621680438449 [b6989586621680438450]) ((~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450]) data ConcatMapSym1 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) :: forall t6989586621680438448. (~>) (t6989586621680438448 a6989586621680438449) [b6989586621680438450] type ConcatMapSym2 (a6989586621680439021 :: (~>) a6989586621680438449 [b6989586621680438450]) (a6989586621680439022 :: t6989586621680438448 a6989586621680438449) = ConcatMap a6989586621680439021 a6989586621680439022 data AndSym0 :: forall t6989586621680438447. (~>) (t6989586621680438447 Bool) Bool type AndSym1 (a6989586621680439012 :: t6989586621680438447 Bool) = And a6989586621680439012 data OrSym0 :: forall t6989586621680438446. (~>) (t6989586621680438446 Bool) Bool type OrSym1 (a6989586621680439003 :: t6989586621680438446 Bool) = Or a6989586621680439003 data AnySym0 :: forall a6989586621680438445 t6989586621680438444. (~>) ((~>) a6989586621680438445 Bool) ((~>) (t6989586621680438444 a6989586621680438445) Bool) data AnySym1 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) :: forall t6989586621680438444. (~>) (t6989586621680438444 a6989586621680438445) Bool type AnySym2 (a6989586621680438990 :: (~>) a6989586621680438445 Bool) (a6989586621680438991 :: t6989586621680438444 a6989586621680438445) = Any a6989586621680438990 a6989586621680438991 data AllSym0 :: forall a6989586621680438443 t6989586621680438442. (~>) ((~>) a6989586621680438443 Bool) ((~>) (t6989586621680438442 a6989586621680438443) Bool) data AllSym1 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) :: forall t6989586621680438442. (~>) (t6989586621680438442 a6989586621680438443) Bool type AllSym2 (a6989586621680438977 :: (~>) a6989586621680438443 Bool) (a6989586621680438978 :: t6989586621680438442 a6989586621680438443) = All a6989586621680438977 a6989586621680438978 data ScanlSym0 :: forall a6989586621679929517 b6989586621679929516. (~>) ((~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) ((~>) b6989586621679929516 ((~>) [a6989586621679929517] [b6989586621679929516])) data ScanlSym1 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) :: (~>) b6989586621679929516 ((~>) [a6989586621679929517] [b6989586621679929516]) data ScanlSym2 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) (a6989586621679939626 :: b6989586621679929516) :: (~>) [a6989586621679929517] [b6989586621679929516] type ScanlSym3 (a6989586621679939625 :: (~>) b6989586621679929516 ((~>) a6989586621679929517 b6989586621679929516)) (a6989586621679939626 :: b6989586621679929516) (a6989586621679939627 :: [a6989586621679929517]) = Scanl a6989586621679939625 a6989586621679939626 a6989586621679939627 data Scanl1Sym0 :: forall a6989586621679929515. (~>) ((~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) ((~>) [a6989586621679929515] [a6989586621679929515]) data Scanl1Sym1 (a6989586621679939639 :: (~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) :: (~>) [a6989586621679929515] [a6989586621679929515] type Scanl1Sym2 (a6989586621679939639 :: (~>) a6989586621679929515 ((~>) a6989586621679929515 a6989586621679929515)) (a6989586621679939640 :: [a6989586621679929515]) = Scanl1 a6989586621679939639 a6989586621679939640 data ScanrSym0 :: forall a6989586621679929513 b6989586621679929514. (~>) ((~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) ((~>) b6989586621679929514 ((~>) [a6989586621679929513] [b6989586621679929514])) data ScanrSym1 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) :: (~>) b6989586621679929514 ((~>) [a6989586621679929513] [b6989586621679929514]) data ScanrSym2 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) (a6989586621679939605 :: b6989586621679929514) :: (~>) [a6989586621679929513] [b6989586621679929514] type ScanrSym3 (a6989586621679939604 :: (~>) a6989586621679929513 ((~>) b6989586621679929514 b6989586621679929514)) (a6989586621679939605 :: b6989586621679929514) (a6989586621679939606 :: [a6989586621679929513]) = Scanr a6989586621679939604 a6989586621679939605 a6989586621679939606 data Scanr1Sym0 :: forall a6989586621679929512. (~>) ((~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) ((~>) [a6989586621679929512] [a6989586621679929512]) data Scanr1Sym1 (a6989586621679939580 :: (~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) :: (~>) [a6989586621679929512] [a6989586621679929512] type Scanr1Sym2 (a6989586621679939580 :: (~>) a6989586621679929512 ((~>) a6989586621679929512 a6989586621679929512)) (a6989586621679939581 :: [a6989586621679929512]) = Scanr1 a6989586621679939580 a6989586621679939581 data ReplicateSym0 :: forall a6989586621679929420. (~>) Nat ((~>) a6989586621679929420 [a6989586621679929420]) data ReplicateSym1 (a6989586621679938722 :: Nat) :: forall a6989586621679929420. (~>) a6989586621679929420 [a6989586621679929420] type ReplicateSym2 (a6989586621679938722 :: Nat) (a6989586621679938723 :: a6989586621679929420) = Replicate a6989586621679938722 a6989586621679938723 data TakeSym0 :: forall a6989586621679929436. (~>) Nat ((~>) [a6989586621679929436] [a6989586621679929436]) data TakeSym1 (a6989586621679938818 :: Nat) :: forall a6989586621679929436. (~>) [a6989586621679929436] [a6989586621679929436] type TakeSym2 (a6989586621679938818 :: Nat) (a6989586621679938819 :: [a6989586621679929436]) = Take a6989586621679938818 a6989586621679938819 data DropSym0 :: forall a6989586621679929435. (~>) Nat ((~>) [a6989586621679929435] [a6989586621679929435]) data DropSym1 (a6989586621679938804 :: Nat) :: forall a6989586621679929435. (~>) [a6989586621679929435] [a6989586621679929435] type DropSym2 (a6989586621679938804 :: Nat) (a6989586621679938805 :: [a6989586621679929435]) = Drop a6989586621679938804 a6989586621679938805 data SplitAtSym0 :: forall a6989586621679929434. (~>) Nat ((~>) [a6989586621679929434] ([a6989586621679929434], [a6989586621679929434])) data SplitAtSym1 (a6989586621679938832 :: Nat) :: forall a6989586621679929434. (~>) [a6989586621679929434] ([a6989586621679929434], [a6989586621679929434]) type SplitAtSym2 (a6989586621679938832 :: Nat) (a6989586621679938833 :: [a6989586621679929434]) = SplitAt a6989586621679938832 a6989586621679938833 data TakeWhileSym0 :: forall a6989586621679929441. (~>) ((~>) a6989586621679929441 Bool) ((~>) [a6989586621679929441] [a6989586621679929441]) data TakeWhileSym1 (a6989586621679938976 :: (~>) a6989586621679929441 Bool) :: (~>) [a6989586621679929441] [a6989586621679929441] type TakeWhileSym2 (a6989586621679938976 :: (~>) a6989586621679929441 Bool) (a6989586621679938977 :: [a6989586621679929441]) = TakeWhile a6989586621679938976 a6989586621679938977 data DropWhileSym0 :: forall a6989586621679929440. (~>) ((~>) a6989586621679929440 Bool) ((~>) [a6989586621679929440] [a6989586621679929440]) data DropWhileSym1 (a6989586621679938958 :: (~>) a6989586621679929440 Bool) :: (~>) [a6989586621679929440] [a6989586621679929440] type DropWhileSym2 (a6989586621679938958 :: (~>) a6989586621679929440 Bool) (a6989586621679938959 :: [a6989586621679929440]) = DropWhile a6989586621679938958 a6989586621679938959 data DropWhileEndSym0 :: forall a6989586621679929439. (~>) ((~>) a6989586621679929439 Bool) ((~>) [a6989586621679929439] [a6989586621679929439]) data DropWhileEndSym1 (a6989586621679940014 :: (~>) a6989586621679929439 Bool) :: (~>) [a6989586621679929439] [a6989586621679929439] type DropWhileEndSym2 (a6989586621679940014 :: (~>) a6989586621679929439 Bool) (a6989586621679940015 :: [a6989586621679929439]) = DropWhileEnd a6989586621679940014 a6989586621679940015 data SpanSym0 :: forall a6989586621679929438. (~>) ((~>) a6989586621679929438 Bool) ((~>) [a6989586621679929438] ([a6989586621679929438], [a6989586621679929438])) data SpanSym1 (a6989586621679938881 :: (~>) a6989586621679929438 Bool) :: (~>) [a6989586621679929438] ([a6989586621679929438], [a6989586621679929438]) type SpanSym2 (a6989586621679938881 :: (~>) a6989586621679929438 Bool) (a6989586621679938882 :: [a6989586621679929438]) = Span a6989586621679938881 a6989586621679938882 data BreakSym0 :: forall a6989586621679929437. (~>) ((~>) a6989586621679929437 Bool) ((~>) [a6989586621679929437] ([a6989586621679929437], [a6989586621679929437])) data BreakSym1 (a6989586621679938838 :: (~>) a6989586621679929437 Bool) :: (~>) [a6989586621679929437] ([a6989586621679929437], [a6989586621679929437]) type BreakSym2 (a6989586621679938838 :: (~>) a6989586621679929437 Bool) (a6989586621679938839 :: [a6989586621679929437]) = Break a6989586621679938838 a6989586621679938839 data NotElemSym0 :: forall a6989586621680438437 t6989586621680438436. (~>) a6989586621680438437 ((~>) (t6989586621680438436 a6989586621680438437) Bool) data NotElemSym1 (a6989586621680438919 :: a6989586621680438437) :: forall t6989586621680438436. (~>) (t6989586621680438436 a6989586621680438437) Bool type NotElemSym2 (a6989586621680438919 :: a6989586621680438437) (a6989586621680438920 :: t6989586621680438436 a6989586621680438437) = NotElem a6989586621680438919 a6989586621680438920 data ZipSym0 :: forall a6989586621679929495 b6989586621679929496. (~>) [a6989586621679929495] ((~>) [b6989586621679929496] [(a6989586621679929495, b6989586621679929496)]) data ZipSym1 (a6989586621679939323 :: [a6989586621679929495]) :: forall b6989586621679929496. (~>) [b6989586621679929496] [(a6989586621679929495, b6989586621679929496)] type ZipSym2 (a6989586621679939323 :: [a6989586621679929495]) (a6989586621679939324 :: [b6989586621679929496]) = Zip a6989586621679939323 a6989586621679939324 data Zip3Sym0 :: forall a6989586621679929492 b6989586621679929493 c6989586621679929494. (~>) [a6989586621679929492] ((~>) [b6989586621679929493] ((~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)])) data Zip3Sym1 (a6989586621679939311 :: [a6989586621679929492]) :: forall b6989586621679929493 c6989586621679929494. (~>) [b6989586621679929493] ((~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)]) data Zip3Sym2 (a6989586621679939311 :: [a6989586621679929492]) (a6989586621679939312 :: [b6989586621679929493]) :: forall c6989586621679929494. (~>) [c6989586621679929494] [(a6989586621679929492, b6989586621679929493, c6989586621679929494)] type Zip3Sym3 (a6989586621679939311 :: [a6989586621679929492]) (a6989586621679939312 :: [b6989586621679929493]) (a6989586621679939313 :: [c6989586621679929494]) = Zip3 a6989586621679939311 a6989586621679939312 a6989586621679939313 data ZipWithSym0 :: forall a6989586621679929489 b6989586621679929490 c6989586621679929491. (~>) ((~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) ((~>) [a6989586621679929489] ((~>) [b6989586621679929490] [c6989586621679929491])) data ZipWithSym1 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) :: (~>) [a6989586621679929489] ((~>) [b6989586621679929490] [c6989586621679929491]) data ZipWithSym2 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) (a6989586621679939301 :: [a6989586621679929489]) :: (~>) [b6989586621679929490] [c6989586621679929491] type ZipWithSym3 (a6989586621679939300 :: (~>) a6989586621679929489 ((~>) b6989586621679929490 c6989586621679929491)) (a6989586621679939301 :: [a6989586621679929489]) (a6989586621679939302 :: [b6989586621679929490]) = ZipWith a6989586621679939300 a6989586621679939301 a6989586621679939302 data ZipWith3Sym0 :: forall a6989586621679929485 b6989586621679929486 c6989586621679929487 d6989586621679929488. (~>) ((~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) ((~>) [a6989586621679929485] ((~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488]))) data ZipWith3Sym1 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) :: (~>) [a6989586621679929485] ((~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488])) data ZipWith3Sym2 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) (a6989586621679939286 :: [a6989586621679929485]) :: (~>) [b6989586621679929486] ((~>) [c6989586621679929487] [d6989586621679929488]) data ZipWith3Sym3 (a6989586621679939285 :: (~>) a6989586621679929485 ((~>) b6989586621679929486 ((~>) c6989586621679929487 d6989586621679929488))) (a6989586621679939286 :: [a6989586621679929485]) (a6989586621679939287 :: [b6989586621679929486]) :: (~>) [c6989586621679929487] [d6989586621679929488] data UnzipSym0 :: forall a6989586621679929483 b6989586621679929484. (~>) [(a6989586621679929483, b6989586621679929484)] ([a6989586621679929483], [b6989586621679929484]) type UnzipSym1 (a6989586621679939266 :: [(a6989586621679929483, b6989586621679929484)]) = Unzip a6989586621679939266 data UnlinesSym0 :: (~>) [Symbol] Symbol type UnlinesSym1 (a6989586621679939137 :: [Symbol]) = Unlines a6989586621679939137 data UnwordsSym0 :: (~>) [Symbol] Symbol type UnwordsSym1 (a6989586621679939126 :: [Symbol]) = Unwords a6989586621679939126 -- | 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 instance Sing (a :: *) where
--     SNat :: Sing Nat
--     SBool :: Sing Bool
--     SMaybe :: Sing a -> Sing (Maybe a)
--   
-- -- 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]