-- 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 -- | 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_a1rS8 :: Void) :: a_a1rS5 sAbsurd :: forall a_a1rS5 (t_a1rSe :: Void). Sing t_a1rSe -> Sing (Apply AbsurdSym0 t_a1rSe :: a_a1rS5) data AbsurdSym0 :: forall a6989586621679355261. (~>) Void a6989586621679355261 type AbsurdSym1 (a6989586621679355264 :: Void) = Absurd a6989586621679355264 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_a1s6S :: (a_a1s5k, b_a1s5l)) :: a_a1s5k sFst :: forall a_a1s5k b_a1s5l (t_a1s7b :: (a_a1s5k, b_a1s5l)). Sing t_a1s7b -> Sing (Apply FstSym0 t_a1s7b :: a_a1s5k) type family Snd (a_a1s6P :: (a_a1s5i, b_a1s5j)) :: b_a1s5j sSnd :: forall a_a1s5i b_a1s5j (t_a1s79 :: (a_a1s5i, b_a1s5j)). Sing t_a1s79 -> Sing (Apply SndSym0 t_a1s79 :: b_a1s5j) type family Curry (a_a1s6G :: (~>) (a_a1s5f, b_a1s5g) c_a1s5h) (a_a1s6H :: a_a1s5f) (a_a1s6I :: b_a1s5g) :: c_a1s5h sCurry :: forall a_a1s5f b_a1s5g c_a1s5h (t_a1s73 :: (~>) (a_a1s5f, b_a1s5g) c_a1s5h) (t_a1s74 :: a_a1s5f) (t_a1s75 :: b_a1s5g). Sing t_a1s73 -> Sing t_a1s74 -> Sing t_a1s75 -> Sing (Apply (Apply (Apply CurrySym0 t_a1s73) t_a1s74) t_a1s75 :: c_a1s5h) type family Uncurry (a_a1s6V :: (~>) a_a1s5c ((~>) b_a1s5d c_a1s5e)) (a_a1s6W :: (a_a1s5c, b_a1s5d)) :: c_a1s5e sUncurry :: forall a_a1s5c b_a1s5d c_a1s5e (t_a1s7d :: (~>) a_a1s5c ((~>) b_a1s5d c_a1s5e)) (t_a1s7e :: (a_a1s5c, b_a1s5d)). Sing t_a1s7d -> Sing t_a1s7e -> Sing (Apply (Apply UncurrySym0 t_a1s7d) t_a1s7e :: c_a1s5e) type family Swap (a_a1s6C :: (a_a1s5a, b_a1s5b)) :: (b_a1s5b, a_a1s5a) sSwap :: forall a_a1s5a b_a1s5b (t_a1s71 :: (a_a1s5a, b_a1s5b)). Sing t_a1s71 -> Sing (Apply SwapSym0 t_a1s71 :: (b_a1s5b, a_a1s5a)) type Tuple0Sym0 = '() data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type))) data Tuple2Sym1 (t6989586621679299010 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679299010 :: a3530822107858468865) (t6989586621679299011 :: b3530822107858468866) = '(t6989586621679299010, t6989586621679299011) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679299041 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679299041 :: (a3530822107858468865 :: Type)) (t6989586621679299042 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679299041 :: a3530822107858468865) (t6989586621679299042 :: b3530822107858468866) (t6989586621679299043 :: c3530822107858468867) = '(t6989586621679299041, t6989586621679299042, t6989586621679299043) 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 (t6989586621679299088 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) (t6989586621679299090 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679299088 :: a3530822107858468865) (t6989586621679299089 :: b3530822107858468866) (t6989586621679299090 :: c3530822107858468867) (t6989586621679299091 :: d3530822107858468868) = '(t6989586621679299088, t6989586621679299089, t6989586621679299090, t6989586621679299091) 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 (t6989586621679299153 :: (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 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) (t6989586621679299156 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679299153 :: a3530822107858468865) (t6989586621679299154 :: b3530822107858468866) (t6989586621679299155 :: c3530822107858468867) (t6989586621679299156 :: d3530822107858468868) (t6989586621679299157 :: e3530822107858468869) = '(t6989586621679299153, t6989586621679299154, t6989586621679299155, t6989586621679299156, t6989586621679299157) 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 (t6989586621679299238 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) (t6989586621679299242 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679299238 :: a3530822107858468865) (t6989586621679299239 :: b3530822107858468866) (t6989586621679299240 :: c3530822107858468867) (t6989586621679299241 :: d3530822107858468868) (t6989586621679299242 :: e3530822107858468869) (t6989586621679299243 :: f3530822107858468870) = '(t6989586621679299238, t6989586621679299239, t6989586621679299240, t6989586621679299241, t6989586621679299242, t6989586621679299243) 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 (t6989586621679299345 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (e3530822107858468869 :: Type)) (t6989586621679299350 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679299345 :: a3530822107858468865) (t6989586621679299346 :: b3530822107858468866) (t6989586621679299347 :: c3530822107858468867) (t6989586621679299348 :: d3530822107858468868) (t6989586621679299349 :: e3530822107858468869) (t6989586621679299350 :: f3530822107858468870) (t6989586621679299351 :: g3530822107858468871) = '(t6989586621679299345, t6989586621679299346, t6989586621679299347, t6989586621679299348, t6989586621679299349, t6989586621679299350, t6989586621679299351) data FstSym0 :: forall a6989586621679356082 b6989586621679356083. (~>) (a6989586621679356082, b6989586621679356083) a6989586621679356082 type FstSym1 (a6989586621679356178 :: (a6989586621679356082, b6989586621679356083)) = Fst a6989586621679356178 data SndSym0 :: forall a6989586621679356080 b6989586621679356081. (~>) (a6989586621679356080, b6989586621679356081) b6989586621679356081 type SndSym1 (a6989586621679356175 :: (a6989586621679356080, b6989586621679356081)) = Snd a6989586621679356175 data CurrySym0 :: forall a6989586621679356077 b6989586621679356078 c6989586621679356079. (~>) ((~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) ((~>) a6989586621679356077 ((~>) b6989586621679356078 c6989586621679356079)) data CurrySym1 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) :: (~>) a6989586621679356077 ((~>) b6989586621679356078 c6989586621679356079) data CurrySym2 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) (a6989586621679356167 :: a6989586621679356077) :: (~>) b6989586621679356078 c6989586621679356079 type CurrySym3 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) (a6989586621679356167 :: a6989586621679356077) (a6989586621679356168 :: b6989586621679356078) = Curry a6989586621679356166 a6989586621679356167 a6989586621679356168 data UncurrySym0 :: forall a6989586621679356074 b6989586621679356075 c6989586621679356076. (~>) ((~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) ((~>) (a6989586621679356074, b6989586621679356075) c6989586621679356076) data UncurrySym1 (a6989586621679356181 :: (~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) :: (~>) (a6989586621679356074, b6989586621679356075) c6989586621679356076 type UncurrySym2 (a6989586621679356181 :: (~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) (a6989586621679356182 :: (a6989586621679356074, b6989586621679356075)) = Uncurry a6989586621679356181 a6989586621679356182 data SwapSym0 :: forall a6989586621679356072 b6989586621679356073. (~>) (a6989586621679356072, b6989586621679356073) (b6989586621679356073, a6989586621679356072) type SwapSym1 (a6989586621679356162 :: (a6989586621679356072, b6989586621679356073)) = Swap a6989586621679356162 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Tuple.UncurrySym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Tuple.UncurrySym0 instance forall a6989586621679356074 b6989586621679356075 c6989586621679356076 (a6989586621679356181 :: a6989586621679356074 Data.Singletons.Internal.~> (b6989586621679356075 Data.Singletons.Internal.~> c6989586621679356076)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.UncurrySym1 a6989586621679356181) 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 a6989586621679356077 b6989586621679356078 c6989586621679356079 (a6989586621679356166 :: (a6989586621679356077, b6989586621679356078) Data.Singletons.Internal.~> c6989586621679356079). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym1 a6989586621679356166) 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 a6989586621679356077 b6989586621679356078 c6989586621679356079 (a6989586621679356167 :: (a6989586621679356077, b6989586621679356078) Data.Singletons.Internal.~> c6989586621679356079) (a6989586621679356166 :: a6989586621679356077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Tuple.CurrySym2 a6989586621679356167 a6989586621679356166) 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 s6989586621679361084 data ΣSym1 (s6989586621679361084 :: Type) t6989586621679361085 type ΣSym2 (s6989586621679361084 :: Type) (t6989586621679361085 :: (~>) s6989586621679361084 Type) = Σ s6989586621679361084 t6989586621679361085 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_a1tMz -> a_a1tMz -> Bool -> a_a1tMz type family Bool_ (a_a1tMF :: a_a1tMz) (a_a1tMG :: a_a1tMz) (a_a1tMH :: Bool) :: a_a1tMz sBool_ :: forall a_a1tMz (t_a1tMP :: a_a1tMz) (t_a1tMQ :: a_a1tMz) (t_a1tMR :: Bool). Sing t_a1tMP -> Sing t_a1tMQ -> Sing t_a1tMR -> Sing (Apply (Apply (Apply Bool_Sym0 t_a1tMP) t_a1tMQ) t_a1tMR :: a_a1tMz) type family Otherwise :: Bool sOtherwise :: Sing (OtherwiseSym0 :: Bool) type TrueSym0 = 'True type FalseSym0 = 'False data NotSym0 :: (~>) Bool Bool type NotSym1 (a6989586621679363899 :: Bool) = Not a6989586621679363899 data (&&@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 3 &&@#@$ data (&&@#@$$) (a6989586621679363358 :: Bool) :: (~>) Bool Bool infixr 3 &&@#@$$ type (&&@#@$$$) (a6989586621679363358 :: Bool) (b6989586621679363359 :: Bool) = (&&) a6989586621679363358 b6989586621679363359 data (||@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 2 ||@#@$ data (||@#@$$) (a6989586621679363599 :: Bool) :: (~>) Bool Bool infixr 2 ||@#@$$ type (||@#@$$$) (a6989586621679363599 :: Bool) (b6989586621679363600 :: Bool) = (||) a6989586621679363599 b6989586621679363600 data Bool_Sym0 :: forall a6989586621679362607. (~>) a6989586621679362607 ((~>) a6989586621679362607 ((~>) Bool a6989586621679362607)) data Bool_Sym1 (a6989586621679362613 :: a6989586621679362607) :: (~>) a6989586621679362607 ((~>) Bool a6989586621679362607) data Bool_Sym2 (a6989586621679362613 :: a6989586621679362607) (a6989586621679362614 :: a6989586621679362607) :: (~>) Bool a6989586621679362607 type Bool_Sym3 (a6989586621679362613 :: a6989586621679362607) (a6989586621679362614 :: a6989586621679362607) (a6989586621679362615 :: Bool) = Bool_ a6989586621679362613 a6989586621679362614 a6989586621679362615 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.||@#@$$) a6989586621679363599) 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.&&@#@$$) a6989586621679363358) 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 a6989586621679362607 (a6989586621679362613 :: a6989586621679362607). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym1 a6989586621679362613) instance forall a (d :: a). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Bool.Bool_Sym1 d) instance forall a6989586621679362607 (a6989586621679362614 :: a6989586621679362607) (a6989586621679362613 :: a6989586621679362607). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Bool.Bool_Sym2 a6989586621679362614 a6989586621679362613) 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 a6989586621679366522. (~>) a6989586621679366522 ((~>) a6989586621679366522 Bool) infix 4 ==@#@$ data (==@#@$$) (x6989586621679366523 :: a6989586621679366522) :: (~>) a6989586621679366522 Bool infix 4 ==@#@$$ type (==@#@$$$) (x6989586621679366523 :: a6989586621679366522) (y6989586621679366524 :: a6989586621679366522) = (==) x6989586621679366523 y6989586621679366524 data (/=@#@$) :: forall a6989586621679366522. (~>) a6989586621679366522 ((~>) a6989586621679366522 Bool) infix 4 /=@#@$ data (/=@#@$$) (x6989586621679366525 :: a6989586621679366522) :: (~>) a6989586621679366522 Bool infix 4 /=@#@$$ type (/=@#@$$$) (x6989586621679366525 :: a6989586621679366522) (y6989586621679366526 :: a6989586621679366522) = (/=) x6989586621679366525 y6989586621679366526 data DefaultEqSym0 :: forall k6989586621679366516. (~>) k6989586621679366516 ((~>) k6989586621679366516 Bool) data DefaultEqSym1 (a6989586621679366517 :: k6989586621679366516) :: (~>) k6989586621679366516 Bool type DefaultEqSym2 (a6989586621679366517 :: k6989586621679366516) (b6989586621679366518 :: k6989586621679366516) = DefaultEq a6989586621679366517 b6989586621679366518 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 k6989586621679366516 (a6989586621679366517 :: k6989586621679366516). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.DefaultEqSym1 a6989586621679366517) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq./=@#@$) instance forall a6989586621679366522 (x6989586621679366525 :: a6989586621679366522). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq./=@#@$$) x6989586621679366525) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Eq.==@#@$) instance forall a6989586621679366522 (x6989586621679366523 :: a6989586621679366522). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Eq.==@#@$$) x6989586621679366523) -- | 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_a1yuv => POrd (a_a1yuv :: Type) where { type family Compare (arg_a1yw1 :: a_a1yuv) (arg_a1yw2 :: a_a1yuv) :: Ordering; type family (<) (arg_a1yw5 :: a_a1yuv) (arg_a1yw6 :: a_a1yuv) :: Bool; type family (<=) (arg_a1yw9 :: a_a1yuv) (arg_a1ywa :: a_a1yuv) :: Bool; type family (>) (arg_a1ywd :: a_a1yuv) (arg_a1ywe :: a_a1yuv) :: Bool; type family (>=) (arg_a1ywh :: a_a1yuv) (arg_a1ywi :: a_a1yuv) :: Bool; type family Max (arg_a1ywl :: a_a1yuv) (arg_a1ywm :: a_a1yuv) :: a_a1yuv; type family Min (arg_a1ywp :: a_a1yuv) (arg_a1ywq :: a_a1yuv) :: a_a1yuv; type Compare a_a1ywL a_a1ywM = Apply (Apply Compare_6989586621679380849Sym0 a_a1ywL) a_a1ywM; type (<) a_a1yx3 a_a1yx4 = Apply (Apply TFHelper_6989586621679380867Sym0 a_a1yx3) a_a1yx4; type (<=) a_a1yxl a_a1yxm = Apply (Apply TFHelper_6989586621679380885Sym0 a_a1yxl) a_a1yxm; type (>) a_a1yxD a_a1yxE = Apply (Apply TFHelper_6989586621679380903Sym0 a_a1yxD) a_a1yxE; type (>=) a_a1yxV a_a1yxW = Apply (Apply TFHelper_6989586621679380921Sym0 a_a1yxV) a_a1yxW; type Max a_a1yyd a_a1yye = Apply (Apply Max_6989586621679380939Sym0 a_a1yyd) a_a1yye; type Min a_a1yyv a_a1yyw = Apply (Apply Min_6989586621679380957Sym0 a_a1yyv) a_a1yyw; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1yuv => SOrd a_a1yuv sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) ~ Apply (Apply Compare_6989586621679380849Sym0 t_a1yyK) t_a1yyL) => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) ~ Apply (Apply TFHelper_6989586621679380867Sym0 t_a1yyO) t_a1yyP) => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) ~ Apply (Apply TFHelper_6989586621679380885Sym0 t_a1yyS) t_a1yyT) => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) ~ Apply (Apply TFHelper_6989586621679380903Sym0 t_a1yyW) t_a1yyX) => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) ~ Apply (Apply TFHelper_6989586621679380921Sym0 t_a1yz0) t_a1yz1) => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) ~ Apply (Apply Max_6989586621679380939Sym0 t_a1yz4) t_a1yz5) => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) ~ Apply (Apply Min_6989586621679380957Sym0 t_a1yz8) t_a1yz9) => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= type family Comparing (a_a1yvS :: (~>) b_a1yul a_a1yuk) (a_a1yvT :: b_a1yul) (a_a1yvU :: b_a1yul) :: Ordering sComparing :: forall a_a1yuk b_a1yul (t_a1yyB :: (~>) b_a1yul a_a1yuk) (t_a1yyC :: b_a1yul) (t_a1yyD :: b_a1yul). SOrd a_a1yuk => Sing t_a1yyB -> Sing t_a1yyC -> Sing t_a1yyD -> Sing (Apply (Apply (Apply ComparingSym0 t_a1yyB) t_a1yyC) t_a1yyD :: Ordering) thenCmp :: Ordering -> Ordering -> Ordering type family ThenCmp (a_a1BdW :: Ordering) (a_a1BdX :: Ordering) :: Ordering sThenCmp :: forall (t_a1Be1 :: Ordering) (t_a1Be2 :: Ordering). Sing t_a1Be1 -> Sing t_a1Be2 -> Sing (Apply (Apply ThenCmpSym0 t_a1Be1) t_a1Be2 :: Ordering) -- | The singleton kind-indexed data family. data family Sing :: k -> Type type SOrdering = (Sing :: Ordering -> Type) type SDown = (Sing :: Down a_alyd -> Type) data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering) data ThenCmpSym1 (a6989586621679391212 :: Ordering) :: (~>) Ordering Ordering type ThenCmpSym2 (a6989586621679391212 :: Ordering) (a6989586621679391213 :: Ordering) = ThenCmp a6989586621679391212 a6989586621679391213 type LTSym0 = 'LT type EQSym0 = 'EQ type GTSym0 = 'GT data CompareSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Ordering) data CompareSym1 (arg6989586621679380801 :: a6989586621679380707) :: (~>) a6989586621679380707 Ordering type CompareSym2 (arg6989586621679380801 :: a6989586621679380707) (arg6989586621679380802 :: a6989586621679380707) = Compare arg6989586621679380801 arg6989586621679380802 data (<@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 <@#@$ data (<@#@$$) (arg6989586621679380805 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 <@#@$$ type (<@#@$$$) (arg6989586621679380805 :: a6989586621679380707) (arg6989586621679380806 :: a6989586621679380707) = (<) arg6989586621679380805 arg6989586621679380806 data (<=@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 <=@#@$ data (<=@#@$$) (arg6989586621679380809 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 <=@#@$$ type (<=@#@$$$) (arg6989586621679380809 :: a6989586621679380707) (arg6989586621679380810 :: a6989586621679380707) = (<=) arg6989586621679380809 arg6989586621679380810 data (>@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679380813 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679380813 :: a6989586621679380707) (arg6989586621679380814 :: a6989586621679380707) = (>) arg6989586621679380813 arg6989586621679380814 data (>=@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 >=@#@$ data (>=@#@$$) (arg6989586621679380817 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 >=@#@$$ type (>=@#@$$$) (arg6989586621679380817 :: a6989586621679380707) (arg6989586621679380818 :: a6989586621679380707) = (>=) arg6989586621679380817 arg6989586621679380818 data MaxSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 a6989586621679380707) data MaxSym1 (arg6989586621679380821 :: a6989586621679380707) :: (~>) a6989586621679380707 a6989586621679380707 type MaxSym2 (arg6989586621679380821 :: a6989586621679380707) (arg6989586621679380822 :: a6989586621679380707) = Max arg6989586621679380821 arg6989586621679380822 data MinSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 a6989586621679380707) data MinSym1 (arg6989586621679380825 :: a6989586621679380707) :: (~>) a6989586621679380707 a6989586621679380707 type MinSym2 (arg6989586621679380825 :: a6989586621679380707) (arg6989586621679380826 :: a6989586621679380707) = Min arg6989586621679380825 arg6989586621679380826 data ComparingSym0 :: forall a6989586621679380696 b6989586621679380697. (~>) ((~>) b6989586621679380697 a6989586621679380696) ((~>) b6989586621679380697 ((~>) b6989586621679380697 Ordering)) data ComparingSym1 (a6989586621679380792 :: (~>) b6989586621679380697 a6989586621679380696) :: (~>) b6989586621679380697 ((~>) b6989586621679380697 Ordering) data ComparingSym2 (a6989586621679380792 :: (~>) b6989586621679380697 a6989586621679380696) (a6989586621679380793 :: b6989586621679380697) :: (~>) b6989586621679380697 Ordering type ComparingSym3 (a6989586621679380792 :: (~>) b6989586621679380697 a6989586621679380696) (a6989586621679380793 :: b6989586621679380697) (a6989586621679380794 :: b6989586621679380697) = Comparing a6989586621679380792 a6989586621679380793 a6989586621679380794 data DownSym0 :: forall (a6989586621679092637 :: Type). (~>) a6989586621679092637 (Down (a6989586621679092637 :: Type)) type DownSym1 (t6989586621679389894 :: a6989586621679092637) = 'Down t6989586621679389894 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679392129Sym0 instance Data.Singletons.Prelude.Ord.POrd () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679392129Sym1 a6989586621679392127) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679392119Sym0 instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679392119Sym1 a6989586621679392117) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679392109Sym0 instance Data.Singletons.Prelude.Ord.POrd GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679392109Sym1 a6989586621679392107) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679392097Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Functor.Identity.Identity a) instance forall a6989586621679086884 (a6989586621679392095 :: Data.Functor.Identity.Identity a6989586621679086884). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679392097Sym1 a6989586621679392095) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679392064Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f, g) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 g3530822107858468871 (a6989586621679392062 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870, g3530822107858468871)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679392064Sym1 a6989586621679392062) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391979Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e, f) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 f3530822107858468870 (a6989586621679391977 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869, f3530822107858468870)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391979Sym1 a6989586621679391977) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391905Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d, e) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 e3530822107858468869 (a6989586621679391903 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868, e3530822107858468869)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391905Sym1 a6989586621679391903) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391842Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c, d) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 d3530822107858468868 (a6989586621679391840 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867, d3530822107858468868)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391842Sym1 a6989586621679391840) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391790Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b, c) instance forall a3530822107858468865 b3530822107858468866 c3530822107858468867 (a6989586621679391788 :: (a3530822107858468865, b3530822107858468866, c3530822107858468867)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391790Sym1 a6989586621679391788) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391749Sym0 instance Data.Singletons.Prelude.Ord.POrd (a, b) instance forall a3530822107858468865 b3530822107858468866 (a6989586621679391747 :: (a3530822107858468865, b3530822107858468866)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391749Sym1 a6989586621679391747) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391721Sym0 instance Data.Singletons.Prelude.Ord.POrd Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391721Sym1 a6989586621679391719) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391707Sym0 instance Data.Singletons.Prelude.Ord.POrd (GHC.Base.NonEmpty a) instance forall a6989586621679070336 (a6989586621679391705 :: GHC.Base.NonEmpty a6989586621679070336). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391707Sym1 a6989586621679391705) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391678Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Either.Either a b) instance forall a6989586621679089135 b6989586621679089136 (a6989586621679391676 :: Data.Either.Either a6989586621679089135 b6989586621679089136). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391678Sym1 a6989586621679391676) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391632Sym0 instance Data.Singletons.Prelude.Ord.POrd [a] instance forall a3530822107858468865 (a6989586621679391630 :: [a3530822107858468865]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391632Sym1 a6989586621679391630) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679391598Sym0 instance Data.Singletons.Prelude.Ord.POrd (GHC.Maybe.Maybe a) instance forall a3530822107858468865 (a6989586621679391596 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679391598Sym1 a6989586621679391596) 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 a6989586621679391212) 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_6989586621679390407Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Ord.Down a) instance forall a6989586621679390379 (a6989586621679390405 :: Data.Ord.Down a6989586621679390379). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679390407Sym1 a6989586621679390405) 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 b6989586621679380697 a6989586621679380696 (a6989586621679380792 :: b6989586621679380697 Data.Singletons.Internal.~> a6989586621679380696). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym1 a6989586621679380792) instance forall b6989586621679380697 a6989586621679380696 (a6989586621679380793 :: b6989586621679380697 Data.Singletons.Internal.~> a6989586621679380696) (a6989586621679380792 :: b6989586621679380697). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.ComparingSym2 a6989586621679380793 a6989586621679380792) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380859Scrutinee_6989586621679380729Sym0 instance forall k1 (x6989586621679380857 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380859Scrutinee_6989586621679380729Sym1 x6989586621679380857) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380877Scrutinee_6989586621679380731Sym0 instance forall k1 (x6989586621679380875 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380877Scrutinee_6989586621679380731Sym1 x6989586621679380875) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380895Scrutinee_6989586621679380733Sym0 instance forall k1 (x6989586621679380893 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380895Scrutinee_6989586621679380733Sym1 x6989586621679380893) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380913Scrutinee_6989586621679380735Sym0 instance forall k1 (x6989586621679380911 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380913Scrutinee_6989586621679380735Sym1 x6989586621679380911) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<@#@$) instance forall a6989586621679380707 (arg6989586621679380805 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<@#@$$) arg6989586621679380805) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380840Scrutinee_6989586621679380727Sym0 instance forall k1 (x6989586621679380833 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380840Scrutinee_6989586621679380727Sym1 x6989586621679380833) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380931Scrutinee_6989586621679380737Sym0 instance forall k1 (x6989586621679380929 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380931Scrutinee_6989586621679380737Sym1 x6989586621679380929) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380949Scrutinee_6989586621679380739Sym0 instance forall k1 (x6989586621679380947 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380949Scrutinee_6989586621679380739Sym1 x6989586621679380947) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>@#@$) instance forall a6989586621679380707 (arg6989586621679380813 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>@#@$$) arg6989586621679380813) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.>=@#@$) instance forall a6989586621679380707 (arg6989586621679380817 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.>=@#@$$) arg6989586621679380817) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MaxSym0 instance forall a6989586621679380707 (arg6989586621679380821 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MaxSym1 arg6989586621679380821) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.MinSym0 instance forall a6989586621679380707 (arg6989586621679380825 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.MinSym1 arg6989586621679380825) instance forall a6989586621679380707 (arg6989586621679380801 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.CompareSym1 arg6989586621679380801) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.CompareSym0 instance forall a6989586621679380707 (arg6989586621679380809 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Ord.<=@#@$$) arg6989586621679380809) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.<=@#@$) instance forall a6989586621679380707 (a6989586621679380847 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Compare_6989586621679380849Sym1 a6989586621679380847) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Compare_6989586621679380849Sym0 instance forall a6989586621679380707 (a6989586621679380865 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679380867Sym1 a6989586621679380865) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679380867Sym0 instance forall a6989586621679380707 (a6989586621679380883 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679380885Sym1 a6989586621679380883) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679380885Sym0 instance forall a6989586621679380707 (a6989586621679380901 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679380903Sym1 a6989586621679380901) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679380903Sym0 instance forall a6989586621679380707 (a6989586621679380919 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.TFHelper_6989586621679380921Sym1 a6989586621679380919) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.TFHelper_6989586621679380921Sym0 instance forall a6989586621679380707 (a6989586621679380937 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Max_6989586621679380939Sym1 a6989586621679380937) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Max_6989586621679380939Sym0 instance forall a6989586621679380707 (a6989586621679380955 :: a6989586621679380707). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Min_6989586621679380957Sym1 a6989586621679380955) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Min_6989586621679380957Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Ord.Let6989586621679380835Scrutinee_6989586621679380725Sym0 instance forall k1 (x6989586621679380833 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Ord.Let6989586621679380835Scrutinee_6989586621679380725Sym1 x6989586621679380833) -- | 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 type 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! type ShowSing k = (forall z. Show (Sing (z :: k)) :: Constraint) 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 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_a20nV :: Nat) (a_a20nW :: Nat) :: (Nat, Nat) sDivMod :: Sing x -> Sing y -> Sing (DivMod x y) type family Quot (a_a20nP :: Nat) (a_a20nQ :: Nat) :: Nat infixl 7 `Quot` sQuot :: Sing x -> Sing y -> Sing (Quot x y) infixl 7 `sQuot` type family Rem (a_a20nF :: Nat) (a_a20nG :: Nat) :: Nat infixl 7 `Rem` sRem :: Sing x -> Sing y -> Sing (Rem x y) infixl 7 `sRem` type family QuotRem (a_a20o5 :: Nat) (a_a20o6 :: Nat) :: (Nat, Nat) sQuotRem :: Sing x -> Sing y -> Sing (QuotRem x y) data ErrorSym0 :: forall k06989586621679468164 k6989586621679468163. (~>) k06989586621679468164 k6989586621679468163 type ErrorSym1 (str6989586621679468165 :: k06989586621679468164) = Error str6989586621679468165 data ErrorWithoutStackTraceSym0 :: forall k06989586621679469214 k6989586621679469213. (~>) k06989586621679469214 k6989586621679469213 type ErrorWithoutStackTraceSym1 (str6989586621679469215 :: k06989586621679469214) = ErrorWithoutStackTrace str6989586621679469215 type UndefinedSym0 = Undefined data KnownNatSym0 :: (~>) Nat Constraint type KnownNatSym1 (n6989586621679468419 :: Nat) = KnownNat n6989586621679468419 data KnownSymbolSym0 :: (~>) Symbol Constraint type KnownSymbolSym1 (n6989586621679468359 :: Symbol) = KnownSymbol n6989586621679468359 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 (a6989586621679487931 :: Nat) :: (~>) Nat (Nat, Nat) type DivModSym2 (a6989586621679487931 :: Nat) (a6989586621679487932 :: Nat) = DivMod a6989586621679487931 a6989586621679487932 data QuotSym0 :: (~>) Nat ((~>) Nat Nat) infixl 7 `QuotSym0` data QuotSym1 (a6989586621679487925 :: Nat) :: (~>) Nat Nat infixl 7 `QuotSym1` type QuotSym2 (a6989586621679487925 :: Nat) (a6989586621679487926 :: Nat) = Quot a6989586621679487925 a6989586621679487926 data RemSym0 :: (~>) Nat ((~>) Nat Nat) infixl 7 `RemSym0` data RemSym1 (a6989586621679487915 :: Nat) :: (~>) Nat Nat infixl 7 `RemSym1` type RemSym2 (a6989586621679487915 :: Nat) (a6989586621679487916 :: Nat) = Rem a6989586621679487915 a6989586621679487916 data QuotRemSym0 :: (~>) Nat ((~>) Nat (Nat, Nat)) data QuotRemSym1 (a6989586621679487941 :: Nat) :: (~>) Nat (Nat, Nat) type QuotRemSym2 (a6989586621679487941 :: Nat) (a6989586621679487942 :: Nat) = QuotRem a6989586621679487941 a6989586621679487942 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotRemSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotRemSym1 a6989586621679487941) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.DivModSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.DivModSym1 a6989586621679487931) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.QuotSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.QuotSym1 a6989586621679487925) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.TypeLits.RemSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.TypeLits.RemSym1 a6989586621679487915) 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_a224a -> (a_a224b -> b_a224a) -> Maybe a_a224b -> b_a224a type family Maybe_ (a_a224s :: b_a224a) (a_a224t :: (~>) a_a224b b_a224a) (a_a224u :: Maybe a_a224b) :: b_a224a sMaybe_ :: forall b_a224a a_a224b (t_a224B :: b_a224a) (t_a224C :: (~>) a_a224b b_a224a) (t_a224D :: Maybe a_a224b). Sing t_a224B -> Sing t_a224C -> Sing t_a224D -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a224B) t_a224C) t_a224D :: b_a224a) type family IsJust (a_a22uw :: Maybe a_a22re) :: Bool sIsJust :: forall a_a22re (t_a22uQ :: Maybe a_a22re). Sing t_a22uQ -> Sing (Apply IsJustSym0 t_a22uQ :: Bool) type family IsNothing (a_a22uu :: Maybe a_a22rd) :: Bool sIsNothing :: forall a_a22rd (t_a22uO :: Maybe a_a22rd). Sing t_a22uO -> Sing (Apply IsNothingSym0 t_a22uO :: Bool) type family FromJust (a_a22ur :: Maybe a_a22rc) :: a_a22rc sFromJust :: forall a_a22rc (t_a22uM :: Maybe a_a22rc). Sing t_a22uM -> Sing (Apply FromJustSym0 t_a22uM :: a_a22rc) type family FromMaybe (a_a22uh :: a_a22rb) (a_a22ui :: Maybe a_a22rb) :: a_a22rb sFromMaybe :: forall a_a22rb (t_a22uI :: a_a22rb) (t_a22uJ :: Maybe a_a22rb). Sing t_a22uI -> Sing t_a22uJ -> Sing (Apply (Apply FromMaybeSym0 t_a22uI) t_a22uJ :: a_a22rb) type family ListToMaybe (a_a22ub :: [a_a22r9]) :: Maybe a_a22r9 sListToMaybe :: forall a_a22r9 (t_a22uE :: [a_a22r9]). Sing t_a22uE -> Sing (Apply ListToMaybeSym0 t_a22uE :: Maybe a_a22r9) type family MaybeToList (a_a22ue :: Maybe a_a22ra) :: [a_a22ra] sMaybeToList :: forall a_a22ra (t_a22uG :: Maybe a_a22ra). Sing t_a22uG -> Sing (Apply MaybeToListSym0 t_a22uG :: [a_a22ra]) type family CatMaybes (a_a22u6 :: [Maybe a_a22r8]) :: [a_a22r8] sCatMaybes :: forall a_a22r8 (t_a22uC :: [Maybe a_a22r8]). Sing t_a22uC -> Sing (Apply CatMaybesSym0 t_a22uC :: [a_a22r8]) type family MapMaybe (a_a22tN :: (~>) a_a22r6 (Maybe b_a22r7)) (a_a22tO :: [a_a22r6]) :: [b_a22r7] sMapMaybe :: forall a_a22r6 b_a22r7 (t_a22uy :: (~>) a_a22r6 (Maybe b_a22r7)) (t_a22uz :: [a_a22r6]). Sing t_a22uy -> Sing t_a22uz -> Sing (Apply (Apply MapMaybeSym0 t_a22uy) t_a22uz :: [b_a22r7]) type NothingSym0 = 'Nothing data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type)) type JustSym1 (t6989586621679298894 :: a3530822107858468865) = 'Just t6989586621679298894 data Maybe_Sym0 :: forall a6989586621679494395 b6989586621679494394. (~>) b6989586621679494394 ((~>) ((~>) a6989586621679494395 b6989586621679494394) ((~>) (Maybe a6989586621679494395) b6989586621679494394)) data Maybe_Sym1 (a6989586621679494412 :: b6989586621679494394) :: forall a6989586621679494395. (~>) ((~>) a6989586621679494395 b6989586621679494394) ((~>) (Maybe a6989586621679494395) b6989586621679494394) data Maybe_Sym2 (a6989586621679494412 :: b6989586621679494394) (a6989586621679494413 :: (~>) a6989586621679494395 b6989586621679494394) :: (~>) (Maybe a6989586621679494395) b6989586621679494394 type Maybe_Sym3 (a6989586621679494412 :: b6989586621679494394) (a6989586621679494413 :: (~>) a6989586621679494395 b6989586621679494394) (a6989586621679494414 :: Maybe a6989586621679494395) = Maybe_ a6989586621679494412 a6989586621679494413 a6989586621679494414 data IsJustSym0 :: forall a6989586621679495824. (~>) (Maybe a6989586621679495824) Bool type IsJustSym1 (a6989586621679496028 :: Maybe a6989586621679495824) = IsJust a6989586621679496028 data IsNothingSym0 :: forall a6989586621679495823. (~>) (Maybe a6989586621679495823) Bool type IsNothingSym1 (a6989586621679496026 :: Maybe a6989586621679495823) = IsNothing a6989586621679496026 data FromJustSym0 :: forall a6989586621679495822. (~>) (Maybe a6989586621679495822) a6989586621679495822 type FromJustSym1 (a6989586621679496023 :: Maybe a6989586621679495822) = FromJust a6989586621679496023 data FromMaybeSym0 :: forall a6989586621679495821. (~>) a6989586621679495821 ((~>) (Maybe a6989586621679495821) a6989586621679495821) data FromMaybeSym1 (a6989586621679496013 :: a6989586621679495821) :: (~>) (Maybe a6989586621679495821) a6989586621679495821 type FromMaybeSym2 (a6989586621679496013 :: a6989586621679495821) (a6989586621679496014 :: Maybe a6989586621679495821) = FromMaybe a6989586621679496013 a6989586621679496014 data ListToMaybeSym0 :: forall a6989586621679495819. (~>) [a6989586621679495819] (Maybe a6989586621679495819) type ListToMaybeSym1 (a6989586621679496007 :: [a6989586621679495819]) = ListToMaybe a6989586621679496007 data MaybeToListSym0 :: forall a6989586621679495820. (~>) (Maybe a6989586621679495820) [a6989586621679495820] type MaybeToListSym1 (a6989586621679496010 :: Maybe a6989586621679495820) = MaybeToList a6989586621679496010 data CatMaybesSym0 :: forall a6989586621679495818. (~>) [Maybe a6989586621679495818] [a6989586621679495818] type CatMaybesSym1 (a6989586621679496002 :: [Maybe a6989586621679495818]) = CatMaybes a6989586621679496002 data MapMaybeSym0 :: forall a6989586621679495816 b6989586621679495817. (~>) ((~>) a6989586621679495816 (Maybe b6989586621679495817)) ((~>) [a6989586621679495816] [b6989586621679495817]) data MapMaybeSym1 (a6989586621679495983 :: (~>) a6989586621679495816 (Maybe b6989586621679495817)) :: (~>) [a6989586621679495816] [b6989586621679495817] type MapMaybeSym2 (a6989586621679495983 :: (~>) a6989586621679495816 (Maybe b6989586621679495817)) (a6989586621679495984 :: [a6989586621679495816]) = MapMaybe a6989586621679495983 a6989586621679495984 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 a6989586621679495821 (a6989586621679496013 :: a6989586621679495821). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.FromMaybeSym1 a6989586621679496013) 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.Let6989586621679495990RsSym0 instance forall k a6989586621679495816 k1 (f6989586621679495987 :: a6989586621679495816 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679495990RsSym1 f6989586621679495987) instance forall k a6989586621679495816 k1 (x6989586621679495988 :: a6989586621679495816 Data.Singletons.Internal.~> GHC.Maybe.Maybe k1) (f6989586621679495987 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679495990RsSym2 x6989586621679495988 f6989586621679495987) instance forall a6989586621679495816 b6989586621679495817 (a6989586621679495983 :: a6989586621679495816 Data.Singletons.Internal.~> GHC.Maybe.Maybe b6989586621679495817). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.MapMaybeSym1 a6989586621679495983) 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.Let6989586621679495994Scrutinee_6989586621679495851Sym0 instance forall k1 k2 k3 (f6989586621679495987 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679495994Scrutinee_6989586621679495851Sym1 f6989586621679495987) instance forall k1 k2 k3 (x6989586621679495988 :: k2 Data.Singletons.Internal.~> k3) (f6989586621679495987 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Let6989586621679495994Scrutinee_6989586621679495851Sym2 x6989586621679495988 f6989586621679495987) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Maybe.Maybe_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Maybe.Maybe_Sym0 instance forall a6989586621679494395 b6989586621679494394 (a6989586621679494412 :: b6989586621679494394). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym1 a6989586621679494412) instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Maybe.Maybe_Sym1 d) instance forall a6989586621679494395 b6989586621679494394 (a6989586621679494413 :: b6989586621679494394) (a6989586621679494412 :: a6989586621679494395 Data.Singletons.Internal.~> b6989586621679494394). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Maybe.Maybe_Sym2 a6989586621679494413 a6989586621679494412) 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_a255v :: Type) where { type family (+) (arg_a255P :: a_a255v) (arg_a255Q :: a_a255v) :: a_a255v; type family (-) (arg_a255T :: a_a255v) (arg_a255U :: a_a255v) :: a_a255v; type family (*) (arg_a255X :: a_a255v) (arg_a255Y :: a_a255v) :: a_a255v; type family Negate (arg_a2561 :: a_a255v) :: a_a255v; type family Abs (arg_a2563 :: a_a255v) :: a_a255v; type family Signum (arg_a2565 :: a_a255v) :: a_a255v; type family FromInteger (arg_a2567 :: Nat) :: a_a255v; type (-) a_a256f a_a256g = Apply (Apply TFHelper_6989586621679506057Sym0 a_a256f) a_a256g; type Negate a_a256o = Apply Negate_6989586621679506065Sym0 a_a256o; } infixl 6 + infixl 7 * infixl 6 - class SNum a_a255v (%+) :: forall (t_a257N :: a_a255v) (t_a257O :: a_a255v). SNum a_a255v => Sing t_a257N -> Sing t_a257O -> Sing (Apply (Apply (+@#@$) t_a257N) t_a257O :: a_a255v) (%-) :: forall (t_a257R :: a_a255v) (t_a257S :: a_a255v). SNum a_a255v => Sing t_a257R -> Sing t_a257S -> Sing (Apply (Apply (-@#@$) t_a257R) t_a257S :: a_a255v) (%*) :: forall (t_a257V :: a_a255v) (t_a257W :: a_a255v). SNum a_a255v => Sing t_a257V -> Sing t_a257W -> Sing (Apply (Apply (*@#@$) t_a257V) t_a257W :: a_a255v) sNegate :: forall (t_a257Z :: a_a255v). SNum a_a255v => Sing t_a257Z -> Sing (Apply NegateSym0 t_a257Z :: a_a255v) sAbs :: forall (t_a2581 :: a_a255v). SNum a_a255v => Sing t_a2581 -> Sing (Apply AbsSym0 t_a2581 :: a_a255v) sSignum :: forall (t_a2583 :: a_a255v). SNum a_a255v => Sing t_a2583 -> Sing (Apply SignumSym0 t_a2583 :: a_a255v) sFromInteger :: forall (t_a2585 :: Nat). SNum a_a255v => Sing t_a2585 -> Sing (Apply FromIntegerSym0 t_a2585 :: a_a255v) (%-) :: forall (t_a257R :: a_a255v) (t_a257S :: a_a255v). (SNum a_a255v, (Apply (Apply (-@#@$) t_a257R) t_a257S :: a_a255v) ~ Apply (Apply TFHelper_6989586621679506057Sym0 t_a257R) t_a257S) => Sing t_a257R -> Sing t_a257S -> Sing (Apply (Apply (-@#@$) t_a257R) t_a257S :: a_a255v) sNegate :: forall (t_a257Z :: a_a255v). (SNum a_a255v, (Apply NegateSym0 t_a257Z :: a_a255v) ~ Apply Negate_6989586621679506065Sym0 t_a257Z) => Sing t_a257Z -> Sing (Apply NegateSym0 t_a257Z :: a_a255v) infixl 6 %+ infixl 6 %- infixl 7 %* type family Subtract (a_a26vA :: a_a26vw) (a_a26vB :: a_a26vw) :: a_a26vw sSubtract :: forall a_a26vw (t_a26vG :: a_a26vw) (t_a26vH :: a_a26vw). SNum a_a26vw => Sing t_a26vG -> Sing t_a26vH -> Sing (Apply (Apply SubtractSym0 t_a26vG) t_a26vH :: a_a26vw) data (+@#@$) :: forall a6989586621679506009. (~>) a6989586621679506009 ((~>) a6989586621679506009 a6989586621679506009) infixl 6 +@#@$ data (+@#@$$) (arg6989586621679506029 :: a6989586621679506009) :: (~>) a6989586621679506009 a6989586621679506009 infixl 6 +@#@$$ type (+@#@$$$) (arg6989586621679506029 :: a6989586621679506009) (arg6989586621679506030 :: a6989586621679506009) = (+) arg6989586621679506029 arg6989586621679506030 data (-@#@$) :: forall a6989586621679506009. (~>) a6989586621679506009 ((~>) a6989586621679506009 a6989586621679506009) infixl 6 -@#@$ data (-@#@$$) (arg6989586621679506033 :: a6989586621679506009) :: (~>) a6989586621679506009 a6989586621679506009 infixl 6 -@#@$$ type (-@#@$$$) (arg6989586621679506033 :: a6989586621679506009) (arg6989586621679506034 :: a6989586621679506009) = (-) arg6989586621679506033 arg6989586621679506034 data (*@#@$) :: forall a6989586621679506009. (~>) a6989586621679506009 ((~>) a6989586621679506009 a6989586621679506009) infixl 7 *@#@$ data (*@#@$$) (arg6989586621679506037 :: a6989586621679506009) :: (~>) a6989586621679506009 a6989586621679506009 infixl 7 *@#@$$ type (*@#@$$$) (arg6989586621679506037 :: a6989586621679506009) (arg6989586621679506038 :: a6989586621679506009) = (*) arg6989586621679506037 arg6989586621679506038 data NegateSym0 :: forall a6989586621679506009. (~>) a6989586621679506009 a6989586621679506009 type NegateSym1 (arg6989586621679506041 :: a6989586621679506009) = Negate arg6989586621679506041 data AbsSym0 :: forall a6989586621679506009. (~>) a6989586621679506009 a6989586621679506009 type AbsSym1 (arg6989586621679506043 :: a6989586621679506009) = Abs arg6989586621679506043 data SignumSym0 :: forall a6989586621679506009. (~>) a6989586621679506009 a6989586621679506009 type SignumSym1 (arg6989586621679506045 :: a6989586621679506009) = Signum arg6989586621679506045 data FromIntegerSym0 :: forall a6989586621679506009. (~>) Nat a6989586621679506009 type FromIntegerSym1 (arg6989586621679506047 :: Nat) = FromInteger arg6989586621679506047 data SubtractSym0 :: forall a6989586621679511466. (~>) a6989586621679511466 ((~>) a6989586621679511466 a6989586621679511466) data SubtractSym1 (a6989586621679511470 :: a6989586621679511466) :: (~>) a6989586621679511466 a6989586621679511466 type SubtractSym2 (a6989586621679511470 :: a6989586621679511466) (a6989586621679511471 :: a6989586621679511466) = Subtract a6989586621679511470 a6989586621679511471 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 a6989586621679511466 (a6989586621679511470 :: a6989586621679511466). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.SubtractSym1 a6989586621679511470) 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_6989586621679506148Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Ord.Down a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Signum_6989586621679506141Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Abs_6989586621679506134Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679506127Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679506119Sym0 instance forall a6989586621679506009 (a6989586621679506117 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679506119Sym1 a6989586621679506117) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679506107Sym0 instance forall a6989586621679506009 (a6989586621679506105 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679506107Sym1 a6989586621679506105) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679506095Sym0 instance forall a6989586621679506009 (a6989586621679506093 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679506095Sym1 a6989586621679506093) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.*@#@$) instance forall a6989586621679506009 (arg6989586621679506037 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.*@#@$$) arg6989586621679506037) 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 a6989586621679506009 (arg6989586621679506029 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.+@#@$$) arg6989586621679506029) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.+@#@$) instance forall a6989586621679506009 (arg6989586621679506033 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Num.-@#@$$) arg6989586621679506033) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.-@#@$) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.NegateSym0 instance forall a6989586621679506009 (a6989586621679506055 :: a6989586621679506009). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Num.TFHelper_6989586621679506057Sym1 a6989586621679506055) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.TFHelper_6989586621679506057Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Num.Negate_6989586621679506065Sym0 -- | 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_a291w :: (~>) a_a28Y9 ((~>) b_a28Ya b_a28Ya)) (a_a291x :: b_a28Ya) (a_a291y :: [a_a28Y9]) :: b_a28Ya sFoldr :: forall a_a28Y9 b_a28Ya (t_a292B :: (~>) a_a28Y9 ((~>) b_a28Ya b_a28Ya)) (t_a292C :: b_a28Ya) (t_a292D :: [a_a28Y9]). Sing t_a292B -> Sing t_a292C -> Sing t_a292D -> Sing (Apply (Apply (Apply FoldrSym0 t_a292B) t_a292C) t_a292D :: b_a28Ya) type family Map (a_a291p :: (~>) a_a28Y7 b_a28Y8) (a_a291q :: [a_a28Y7]) :: [b_a28Y8] sMap :: forall a_a28Y7 b_a28Y8 (t_a292x :: (~>) a_a28Y7 b_a28Y8) (t_a292y :: [a_a28Y7]). Sing t_a292x -> Sing t_a292y -> Sing (Apply (Apply MapSym0 t_a292x) t_a292y :: [b_a28Y8]) type family (++) (a_a291h :: [a_a28Y6]) (a_a291i :: [a_a28Y6]) :: [a_a28Y6] infixr 5 ++ (%++) :: forall a_a28Y6 (t_a292t :: [a_a28Y6]) (t_a292u :: [a_a28Y6]). Sing t_a292t -> Sing t_a292u -> Sing (Apply (Apply (++@#@$) t_a292t) t_a292u :: [a_a28Y6]) infixr 5 %++ type family Otherwise :: Bool sOtherwise :: Sing (OtherwiseSym0 :: Bool) type family Id (a_a291e :: a_a28Y5) :: a_a28Y5 sId :: forall a_a28Y5 (t_a292r :: a_a28Y5). Sing t_a292r -> Sing (Apply IdSym0 t_a292r :: a_a28Y5) type family Const (a_a290Z :: a_a28Y3) (a_a2910 :: b_a28Y4) :: a_a28Y3 sConst :: forall a_a28Y3 b_a28Y4 (t_a292j :: a_a28Y3) (t_a292k :: b_a28Y4). Sing t_a292j -> Sing t_a292k -> Sing (Apply (Apply ConstSym0 t_a292j) t_a292k :: a_a28Y3) type family (:.) (a_a290G :: (~>) b_a28Y0 c_a28Y1) (a_a290H :: (~>) a_a28Y2 b_a28Y0) (a_a290I :: a_a28Y2) :: c_a28Y1 infixr 9 :. (%.) :: forall b_a28Y0 c_a28Y1 a_a28Y2 (t_a292d :: (~>) b_a28Y0 c_a28Y1) (t_a292e :: (~>) a_a28Y2 b_a28Y0) (t_a292f :: a_a28Y2). Sing t_a292d -> Sing t_a292e -> Sing t_a292f -> Sing (Apply (Apply (Apply (.@#@$) t_a292d) t_a292e) t_a292f :: c_a28Y1) infixr 9 %. type family ($) (a_a290r :: (~>) a_a28XU b_a28XV) (a_a290s :: a_a28XU) :: b_a28XV infixr 0 $ type family ($!) (a_a290i :: (~>) a_a28XS b_a28XT) (a_a290j :: a_a28XS) :: b_a28XT infixr 0 $! (%$) :: forall a_a28XU b_a28XV (t_a2923 :: (~>) a_a28XU b_a28XV) (t_a2924 :: a_a28XU). Sing t_a2923 -> Sing t_a2924 -> Sing (Apply (Apply ($@#@$) t_a2923) t_a2924 :: b_a28XV) infixr 0 %$ (%$!) :: forall a_a28XS b_a28XT (t_a291Z :: (~>) a_a28XS b_a28XT) (t_a2920 :: a_a28XS). Sing t_a291Z -> Sing t_a2920 -> Sing (Apply (Apply ($!@#@$) t_a291Z) t_a2920 :: b_a28XT) infixr 0 %$! type family Until (a_a28ZS :: (~>) a_a28XR Bool) (a_a28ZT :: (~>) a_a28XR a_a28XR) (a_a28ZU :: a_a28XR) :: a_a28XR sUntil :: forall a_a28XR (t_a291T :: (~>) a_a28XR Bool) (t_a291U :: (~>) a_a28XR a_a28XR) (t_a291V :: a_a28XR). Sing t_a291T -> Sing t_a291U -> Sing t_a291V -> Sing (Apply (Apply (Apply UntilSym0 t_a291T) t_a291U) t_a291V :: a_a28XR) type family Flip (a_a290x :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (a_a290y :: b_a28XY) (a_a290z :: a_a28XX) :: c_a28XZ sFlip :: forall a_a28XX b_a28XY c_a28XZ (t_a2927 :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (t_a2928 :: b_a28XY) (t_a2929 :: a_a28XX). Sing t_a2927 -> Sing t_a2928 -> Sing t_a2929 -> Sing (Apply (Apply (Apply FlipSym0 t_a2927) t_a2928) t_a2929 :: c_a28XZ) type family AsTypeOf (a_a2918 :: a_a28XW) (a_a2919 :: a_a28XW) :: a_a28XW sAsTypeOf :: forall a_a28XW (t_a292n :: a_a28XW) (t_a292o :: a_a28XW). Sing t_a292n -> Sing t_a292o -> Sing (Apply (Apply AsTypeOfSym0 t_a292n) t_a292o :: a_a28XW) type family Seq (a_a28ZN :: a_a28XP) (a_a28ZO :: b_a28XQ) :: b_a28XQ infixr 0 `Seq` sSeq :: forall a_a28XP b_a28XQ (t_a291P :: a_a28XP) (t_a291Q :: b_a28XQ). Sing t_a291P -> Sing t_a291Q -> Sing (Apply (Apply SeqSym0 t_a291P) t_a291Q :: b_a28XQ) infixr 0 `sSeq` data FoldrSym0 :: forall a6989586621679520929 b6989586621679520930. (~>) ((~>) a6989586621679520929 ((~>) b6989586621679520930 b6989586621679520930)) ((~>) b6989586621679520930 ((~>) [a6989586621679520929] b6989586621679520930)) data FoldrSym1 (a6989586621679521138 :: (~>) a6989586621679520929 ((~>) b6989586621679520930 b6989586621679520930)) :: (~>) b6989586621679520930 ((~>) [a6989586621679520929] b6989586621679520930) data FoldrSym2 (a6989586621679521138 :: (~>) a6989586621679520929 ((~>) b6989586621679520930 b6989586621679520930)) (a6989586621679521139 :: b6989586621679520930) :: (~>) [a6989586621679520929] b6989586621679520930 type FoldrSym3 (a6989586621679521138 :: (~>) a6989586621679520929 ((~>) b6989586621679520930 b6989586621679520930)) (a6989586621679521139 :: b6989586621679520930) (a6989586621679521140 :: [a6989586621679520929]) = Foldr a6989586621679521138 a6989586621679521139 a6989586621679521140 data MapSym0 :: forall a6989586621679520927 b6989586621679520928. (~>) ((~>) a6989586621679520927 b6989586621679520928) ((~>) [a6989586621679520927] [b6989586621679520928]) data MapSym1 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) :: (~>) [a6989586621679520927] [b6989586621679520928] type MapSym2 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) (a6989586621679521132 :: [a6989586621679520927]) = Map a6989586621679521131 a6989586621679521132 data (++@#@$) :: forall a6989586621679520926. (~>) [a6989586621679520926] ((~>) [a6989586621679520926] [a6989586621679520926]) infixr 5 ++@#@$ data (++@#@$$) (a6989586621679521123 :: [a6989586621679520926]) :: (~>) [a6989586621679520926] [a6989586621679520926] infixr 5 ++@#@$$ type (++@#@$$$) (a6989586621679521123 :: [a6989586621679520926]) (a6989586621679521124 :: [a6989586621679520926]) = (++) a6989586621679521123 a6989586621679521124 type OtherwiseSym0 = Otherwise data IdSym0 :: forall a6989586621679520925. (~>) a6989586621679520925 a6989586621679520925 type IdSym1 (a6989586621679521120 :: a6989586621679520925) = Id a6989586621679521120 data ConstSym0 :: forall a6989586621679520923 b6989586621679520924. (~>) a6989586621679520923 ((~>) b6989586621679520924 a6989586621679520923) data ConstSym1 (a6989586621679521105 :: a6989586621679520923) :: forall b6989586621679520924. (~>) b6989586621679520924 a6989586621679520923 type ConstSym2 (a6989586621679521105 :: a6989586621679520923) (a6989586621679521106 :: b6989586621679520924) = Const a6989586621679521105 a6989586621679521106 data (.@#@$) :: forall a6989586621679520922 b6989586621679520920 c6989586621679520921. (~>) ((~>) b6989586621679520920 c6989586621679520921) ((~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) :: forall a6989586621679520922. (~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) :: (~>) a6989586621679520922 c6989586621679520921 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) (a6989586621679521088 :: a6989586621679520922) = (:.) a6989586621679521086 a6989586621679521087 a6989586621679521088 data ($@#@$) :: forall a6989586621679520914 b6989586621679520915. (~>) ((~>) a6989586621679520914 b6989586621679520915) ((~>) a6989586621679520914 b6989586621679520915) infixr 0 $@#@$ data ($@#@$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) :: (~>) a6989586621679520914 b6989586621679520915 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) (a6989586621679521072 :: a6989586621679520914) = ($) a6989586621679521071 a6989586621679521072 data ($!@#@$) :: forall a6989586621679520912 b6989586621679520913. (~>) ((~>) a6989586621679520912 b6989586621679520913) ((~>) a6989586621679520912 b6989586621679520913) infixr 0 $!@#@$ data ($!@#@$$) (a6989586621679521062 :: (~>) a6989586621679520912 b6989586621679520913) :: (~>) a6989586621679520912 b6989586621679520913 infixr 0 $!@#@$$ type ($!@#@$$$) (a6989586621679521062 :: (~>) a6989586621679520912 b6989586621679520913) (a6989586621679521063 :: a6989586621679520912) = ($!) a6989586621679521062 a6989586621679521063 data UntilSym0 :: forall a6989586621679520911. (~>) ((~>) a6989586621679520911 Bool) ((~>) ((~>) a6989586621679520911 a6989586621679520911) ((~>) a6989586621679520911 a6989586621679520911)) data UntilSym1 (a6989586621679521036 :: (~>) a6989586621679520911 Bool) :: (~>) ((~>) a6989586621679520911 a6989586621679520911) ((~>) a6989586621679520911 a6989586621679520911) data UntilSym2 (a6989586621679521036 :: (~>) a6989586621679520911 Bool) (a6989586621679521037 :: (~>) a6989586621679520911 a6989586621679520911) :: (~>) a6989586621679520911 a6989586621679520911 type UntilSym3 (a6989586621679521036 :: (~>) a6989586621679520911 Bool) (a6989586621679521037 :: (~>) a6989586621679520911 a6989586621679520911) (a6989586621679521038 :: a6989586621679520911) = Until a6989586621679521036 a6989586621679521037 a6989586621679521038 data FlipSym0 :: forall a6989586621679520917 b6989586621679520918 c6989586621679520919. (~>) ((~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) ((~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919)) data FlipSym1 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) :: (~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919) data FlipSym2 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) (a6989586621679521078 :: b6989586621679520918) :: (~>) a6989586621679520917 c6989586621679520919 type FlipSym3 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) (a6989586621679521078 :: b6989586621679520918) (a6989586621679521079 :: a6989586621679520917) = Flip a6989586621679521077 a6989586621679521078 a6989586621679521079 data AsTypeOfSym0 :: forall a6989586621679520916. (~>) a6989586621679520916 ((~>) a6989586621679520916 a6989586621679520916) data AsTypeOfSym1 (a6989586621679521114 :: a6989586621679520916) :: (~>) a6989586621679520916 a6989586621679520916 type AsTypeOfSym2 (a6989586621679521114 :: a6989586621679520916) (a6989586621679521115 :: a6989586621679520916) = AsTypeOf a6989586621679521114 a6989586621679521115 data SeqSym0 :: forall a6989586621679520909 b6989586621679520910. (~>) a6989586621679520909 ((~>) b6989586621679520910 b6989586621679520910) infixr 0 `SeqSym0` data SeqSym1 (a6989586621679521031 :: a6989586621679520909) :: forall b6989586621679520910. (~>) b6989586621679520910 b6989586621679520910 infixr 0 `SeqSym1` type SeqSym2 (a6989586621679521031 :: a6989586621679520909) (a6989586621679521032 :: b6989586621679520910) = Seq a6989586621679521031 a6989586621679521032 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.FoldrSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Base.FoldrSym0 instance forall a6989586621679520929 b6989586621679520930 (a6989586621679521138 :: a6989586621679520929 Data.Singletons.Internal.~> (b6989586621679520930 Data.Singletons.Internal.~> b6989586621679520930)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym1 a6989586621679521138) 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 a6989586621679520929 b6989586621679520930 (a6989586621679521139 :: a6989586621679520929 Data.Singletons.Internal.~> (b6989586621679520930 Data.Singletons.Internal.~> b6989586621679520930)) (a6989586621679521138 :: b6989586621679520930). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FoldrSym2 a6989586621679521139 a6989586621679521138) 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 a6989586621679520927 b6989586621679520928 (a6989586621679521131 :: a6989586621679520927 Data.Singletons.Internal.~> b6989586621679520928). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.MapSym1 a6989586621679521131) 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 a6989586621679520926 (a6989586621679521123 :: [a6989586621679520926]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.++@#@$$) a6989586621679521123) 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 a6989586621679520916 (a6989586621679521114 :: a6989586621679520916). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.AsTypeOfSym1 a6989586621679521114) 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 b6989586621679520924 a6989586621679520923 (a6989586621679521105 :: a6989586621679520923). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.ConstSym1 a6989586621679521105) 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 a6989586621679520922 b6989586621679520920 c6989586621679520921 (a6989586621679521086 :: b6989586621679520920 Data.Singletons.Internal.~> c6989586621679520921). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base..@#@$$) a6989586621679521086) 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 a6989586621679520922 b6989586621679520920 c6989586621679520921 (a6989586621679521087 :: b6989586621679520920 Data.Singletons.Internal.~> c6989586621679520921) (a6989586621679521086 :: a6989586621679520922 Data.Singletons.Internal.~> b6989586621679520920). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621679521087 Data.Singletons.Prelude.Base..@#@$$$ a6989586621679521086) 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 a6989586621679520917 b6989586621679520918 c6989586621679520919 (a6989586621679521077 :: a6989586621679520917 Data.Singletons.Internal.~> (b6989586621679520918 Data.Singletons.Internal.~> c6989586621679520919)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym1 a6989586621679521077) 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 a6989586621679520917 b6989586621679520918 c6989586621679520919 (a6989586621679521078 :: a6989586621679520917 Data.Singletons.Internal.~> (b6989586621679520918 Data.Singletons.Internal.~> c6989586621679520919)) (a6989586621679521077 :: b6989586621679520918). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.FlipSym2 a6989586621679521078 a6989586621679521077) 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 a6989586621679520914 b6989586621679520915 (a6989586621679521071 :: a6989586621679520914 Data.Singletons.Internal.~> b6989586621679520915). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$@#@$$) a6989586621679521071) 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 a6989586621679520912 b6989586621679520913 (a6989586621679521062 :: a6989586621679520912 Data.Singletons.Internal.~> b6989586621679520913). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Base.$!@#@$$) a6989586621679521062) 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 a6989586621679520911 (a6989586621679521036 :: a6989586621679520911 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym1 a6989586621679521036) 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 a6989586621679520911 (a6989586621679521037 :: a6989586621679520911 Data.Singletons.Internal.~> GHC.Types.Bool) (a6989586621679521036 :: a6989586621679520911 Data.Singletons.Internal.~> a6989586621679520911). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.UntilSym2 a6989586621679521037 a6989586621679521036) 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 b6989586621679520910 a6989586621679520909 (a6989586621679521031 :: a6989586621679520909). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.SeqSym1 a6989586621679521031) 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.Let6989586621679521149GoSym0 instance forall k1 k2 k3 (k6989586621679521146 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521149GoSym1 k6989586621679521146) instance forall k1 k2 k3 (z6989586621679521147 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (k6989586621679521146 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521149GoSym2 z6989586621679521147 k6989586621679521146) instance forall k1 k2 k3 (a_69895866216795211446989586621679521148 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (z6989586621679521147 :: k3) (k6989586621679521146 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521149GoSym3 a_69895866216795211446989586621679521148 z6989586621679521147 k6989586621679521146) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Lambda_6989586621679521097Sym0 instance forall k2 k3 k4 k5 (f6989586621679521094 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679521097Sym1 f6989586621679521094) instance forall k2 k3 k4 k5 (g6989586621679521095 :: k4 Data.Singletons.Internal.~> k5) (f6989586621679521094 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679521097Sym2 g6989586621679521095 f6989586621679521094) instance forall k2 k3 k4 k5 (a_69895866216795210926989586621679521096 :: k4 Data.Singletons.Internal.~> k5) (g6989586621679521095 :: k3 Data.Singletons.Internal.~> k4) (f6989586621679521094 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Lambda_6989586621679521097Sym3 a_69895866216795210926989586621679521096 g6989586621679521095 f6989586621679521094) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679521068VxSym0 instance forall k1 k2 (f6989586621679521066 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521068VxSym1 f6989586621679521066) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679521047GoSym0 instance forall k1 k2 (p6989586621679521044 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521047GoSym1 p6989586621679521044) instance forall k1 k2 (f6989586621679521045 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621679521044 :: k2 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521047GoSym2 f6989586621679521045 p6989586621679521044) instance forall k1 k2 (a_69895866216795210426989586621679521046 :: k2 Data.Singletons.Internal.~> GHC.Types.Bool) (f6989586621679521045 :: k2 Data.Singletons.Internal.~> k2) (p6989586621679521044 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521047GoSym3 a_69895866216795210426989586621679521046 f6989586621679521045 p6989586621679521044) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Base.Let6989586621679521054Scrutinee_6989586621679520973Sym0 instance forall k1 k2 k3 k4 (p6989586621679521044 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521054Scrutinee_6989586621679520973Sym1 p6989586621679521044) instance forall k1 k2 k3 k4 (f6989586621679521045 :: k3 Data.Singletons.Internal.~> k4) (p6989586621679521044 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521054Scrutinee_6989586621679520973Sym2 f6989586621679521045 p6989586621679521044) instance forall k1 k2 k3 k4 (x6989586621679521053 :: k3 Data.Singletons.Internal.~> k4) (f6989586621679521045 :: k2) (p6989586621679521044 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Base.Let6989586621679521054Scrutinee_6989586621679520973Sym3 x6989586621679521053 f6989586621679521045 p6989586621679521044) -- | Defines the promoted and singled versions of the Functor type -- class. module Data.Singletons.Prelude.Functor class PFunctor (f_a2fgq :: Type -> Type) where { type family Fmap (arg_a2fmM :: (~>) a_a2fgr b_a2fgs) (arg_a2fmN :: f_a2fgq a_a2fgr) :: f_a2fgq b_a2fgs; type family (<$) (arg_a2fmQ :: a_a2fgt) (arg_a2fmR :: f_a2fgq b_a2fgu) :: f_a2fgq a_a2fgt; type (<$) a_a2fn4 a_a2fn5 = Apply (Apply TFHelper_6989586621679545540Sym0 a_a2fn4) a_a2fn5; } infixl 4 <$ class SFunctor (f_a2fgq :: Type -> Type) sFmap :: forall a_a2fgr b_a2fgs (t_a2frd :: (~>) a_a2fgr b_a2fgs) (t_a2fre :: f_a2fgq a_a2fgr). SFunctor f_a2fgq => Sing t_a2frd -> Sing t_a2fre -> Sing (Apply (Apply FmapSym0 t_a2frd) t_a2fre :: f_a2fgq b_a2fgs) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). SFunctor f_a2fgq => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). (SFunctor f_a2fgq, (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) ~ Apply (Apply TFHelper_6989586621679545540Sym0 t_a2frh) t_a2fri) => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) infixl 4 %<$ type family ($>) (a_a2XlG :: f_a2Xkr a_a2Xks) (a_a2XlH :: b_a2Xkt) :: f_a2Xkr b_a2Xkt infixl 4 $> (%$>) :: forall f_a2Xkr a_a2Xks b_a2Xkt (t_a2Xnn :: f_a2Xkr a_a2Xks) (t_a2Xno :: b_a2Xkt). SFunctor f_a2Xkr => Sing t_a2Xnn -> Sing t_a2Xno -> Sing (Apply (Apply ($>@#@$) t_a2Xnn) t_a2Xno :: f_a2Xkr b_a2Xkt) infixl 4 %$> type family (<$>) (a_a2XlQ :: (~>) a_a2Xky b_a2Xkz) (a_a2XlR :: f_a2Xkx a_a2Xky) :: f_a2Xkx b_a2Xkz infixl 4 <$> (%<$>) :: forall f_a2Xkx a_a2Xky b_a2Xkz (t_a2Xnr :: (~>) a_a2Xky b_a2Xkz) (t_a2Xns :: f_a2Xkx a_a2Xky). SFunctor f_a2Xkx => Sing t_a2Xnr -> Sing t_a2Xns -> Sing (Apply (Apply (<$>@#@$) t_a2Xnr) t_a2Xns :: f_a2Xkx b_a2Xkz) infixl 4 %<$> type family (<&>) (a_a2XlW :: f_a2Xku a_a2Xkv) (a_a2XlX :: (~>) a_a2Xkv b_a2Xkw) :: f_a2Xku b_a2Xkw infixl 1 <&> (%<&>) :: forall f_a2Xku a_a2Xkv b_a2Xkw (t_a2Xnv :: f_a2Xku a_a2Xkv) (t_a2Xnw :: (~>) a_a2Xkv b_a2Xkw). SFunctor f_a2Xku => Sing t_a2Xnv -> Sing t_a2Xnw -> Sing (Apply (Apply (<&>@#@$) t_a2Xnv) t_a2Xnw :: f_a2Xku b_a2Xkw) infixl 1 %<&> type family Void (a_a2Xlz :: f_a2Xkp a_a2Xkq) :: f_a2Xkp () sVoid :: forall f_a2Xkp a_a2Xkq (t_a2Xnl :: f_a2Xkp a_a2Xkq). SFunctor f_a2Xkp => Sing t_a2Xnl -> Sing (Apply VoidSym0 t_a2Xnl :: f_a2Xkp ()) data FmapSym0 :: forall a6989586621679545127 b6989586621679545128 f6989586621679545126. (~>) ((~>) a6989586621679545127 b6989586621679545128) ((~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128)) data FmapSym1 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) :: forall f6989586621679545126. (~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128) type FmapSym2 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) (arg6989586621679545521 :: f6989586621679545126 a6989586621679545127) = Fmap arg6989586621679545520 arg6989586621679545521 data (<$@#@$) :: forall a6989586621679545129 b6989586621679545130 f6989586621679545126. (~>) a6989586621679545129 ((~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679545524 :: a6989586621679545129) :: forall b6989586621679545130 f6989586621679545126. (~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679545524 :: a6989586621679545129) (arg6989586621679545525 :: f6989586621679545126 b6989586621679545130) = (<$) arg6989586621679545524 arg6989586621679545525 data ($>@#@$) :: forall a6989586621679714512 b6989586621679714513 f6989586621679714511. (~>) (f6989586621679714511 a6989586621679714512) ((~>) b6989586621679714513 (f6989586621679714511 b6989586621679714513)) infixl 4 $>@#@$ data ($>@#@$$) (a6989586621679714588 :: f6989586621679714511 a6989586621679714512) :: forall b6989586621679714513. (~>) b6989586621679714513 (f6989586621679714511 b6989586621679714513) infixl 4 $>@#@$$ type ($>@#@$$$) (a6989586621679714588 :: f6989586621679714511 a6989586621679714512) (a6989586621679714589 :: b6989586621679714513) = ($>) a6989586621679714588 a6989586621679714589 data (<$>@#@$) :: forall a6989586621679714518 b6989586621679714519 f6989586621679714517. (~>) ((~>) a6989586621679714518 b6989586621679714519) ((~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) :: forall f6989586621679714517. (~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) (a6989586621679714599 :: f6989586621679714517 a6989586621679714518) = (<$>) a6989586621679714598 a6989586621679714599 data (<&>@#@$) :: forall a6989586621679714515 b6989586621679714516 f6989586621679714514. (~>) (f6989586621679714514 a6989586621679714515) ((~>) ((~>) a6989586621679714515 b6989586621679714516) (f6989586621679714514 b6989586621679714516)) infixl 1 <&>@#@$ data (<&>@#@$$) (a6989586621679714604 :: f6989586621679714514 a6989586621679714515) :: forall b6989586621679714516. (~>) ((~>) a6989586621679714515 b6989586621679714516) (f6989586621679714514 b6989586621679714516) infixl 1 <&>@#@$$ type (<&>@#@$$$) (a6989586621679714604 :: f6989586621679714514 a6989586621679714515) (a6989586621679714605 :: (~>) a6989586621679714515 b6989586621679714516) = (<&>) a6989586621679714604 a6989586621679714605 data VoidSym0 :: forall a6989586621679714510 f6989586621679714509. (~>) (f6989586621679714509 a6989586621679714510) (f6989586621679714509 ()) type VoidSym1 (a6989586621679714581 :: f6989586621679714509 a6989586621679714510) = Void a6989586621679714581 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679714687Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Ord.Down instance forall b6989586621679545130 a6989586621679545129 (a6989586621679714685 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679714687Sym1 a6989586621679714685) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679714678Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Ord.Down instance forall k1 k2 k3 (_z_69895866216797145736989586621679714676 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714678Sym1 _z_69895866216797145736989586621679714676) instance forall k1 k2 k3 (a_69895866216797145796989586621679714677 :: k3) (_z_69895866216797145736989586621679714676 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714678Sym2 a_69895866216797145796989586621679714677 _z_69895866216797145736989586621679714676) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679714668Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621679714666 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679714668Sym1 a6989586621679714666) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.TFHelper_6989586621679714656Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor ((,) a) instance forall a6989586621679714527 b6989586621679545130 a6989586621679545129 (a6989586621679714654 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.TFHelper_6989586621679714656Sym1 a6989586621679714654) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679714646Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor ((,) a) instance forall k1 k2 k3 k4 (_z_69895866216797145516989586621679714635 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714646Sym1 _z_69895866216797145516989586621679714635) instance forall k1 k2 k3 k4 (a_69895866216797145636989586621679714636 :: k4) (_z_69895866216797145516989586621679714635 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714646Sym2 a_69895866216797145636989586621679714636 _z_69895866216797145516989586621679714635) instance forall k1 k2 k3 k4 (a_69895866216797145656989586621679714637 :: k4) (a_69895866216797145636989586621679714636 :: k3) (_z_69895866216797145516989586621679714635 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714646Sym3 a_69895866216797145656989586621679714637 a_69895866216797145636989586621679714636 _z_69895866216797145516989586621679714635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679714638Sym0 instance forall k1 k2 k3 k4 (_z_69895866216797145516989586621679714635 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714638Sym1 _z_69895866216797145516989586621679714635) instance forall k1 k2 k3 k4 (a_69895866216797145636989586621679714636 :: k4) (_z_69895866216797145516989586621679714635 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714638Sym2 a_69895866216797145636989586621679714636 _z_69895866216797145516989586621679714635) instance forall k1 k2 k3 k4 (a_69895866216797145656989586621679714637 :: k4) (a_69895866216797145636989586621679714636 :: k3) (_z_69895866216797145516989586621679714635 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714638Sym3 a_69895866216797145656989586621679714637 a_69895866216797145636989586621679714636 _z_69895866216797145516989586621679714635) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Fmap_6989586621679714627Sym0 instance forall a6989586621679714527 a6989586621679545127 b6989586621679545128 (a6989586621679714625 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Fmap_6989586621679714627Sym1 a6989586621679714625) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Functor.Lambda_6989586621679714617Sym0 instance forall k1 k2 k3 k4 (_f_69895866216797145496989586621679714614 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714617Sym1 _f_69895866216797145496989586621679714614) instance forall k1 k2 k3 k4 (a_69895866216797145556989586621679714615 :: k4) (_f_69895866216797145496989586621679714614 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714617Sym2 a_69895866216797145556989586621679714615 _f_69895866216797145496989586621679714614) instance forall k1 k2 k3 k4 (a_69895866216797145576989586621679714616 :: k4) (a_69895866216797145556989586621679714615 :: k3) (_f_69895866216797145496989586621679714614 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Functor.Lambda_6989586621679714617Sym3 a_69895866216797145576989586621679714616 a_69895866216797145556989586621679714615 _f_69895866216797145496989586621679714614) 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 b6989586621679714516 (f6989586621679714514 :: * -> *) a6989586621679714515 (a6989586621679714604 :: f6989586621679714514 a6989586621679714515). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<&>@#@$$) a6989586621679714604) 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 (f6989586621679714517 :: * -> *) a6989586621679714518 b6989586621679714519 (a6989586621679714598 :: a6989586621679714518 Data.Singletons.Internal.~> b6989586621679714519). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.<$>@#@$$) a6989586621679714598) 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 b6989586621679714513 (f6989586621679714511 :: * -> *) a6989586621679714512 (a6989586621679714588 :: f6989586621679714511 a6989586621679714512). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Functor.$>@#@$$) a6989586621679714588) 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_a291e :: a_a28Y5) :: a_a28Y5 sId :: forall a_a28Y5 (t_a292r :: a_a28Y5). Sing t_a292r -> Sing (Apply IdSym0 t_a292r :: a_a28Y5) type family Const (a_a290Z :: a_a28Y3) (a_a2910 :: b_a28Y4) :: a_a28Y3 sConst :: forall a_a28Y3 b_a28Y4 (t_a292j :: a_a28Y3) (t_a292k :: b_a28Y4). Sing t_a292j -> Sing t_a292k -> Sing (Apply (Apply ConstSym0 t_a292j) t_a292k :: a_a28Y3) type family (:.) (a_a290G :: (~>) b_a28Y0 c_a28Y1) (a_a290H :: (~>) a_a28Y2 b_a28Y0) (a_a290I :: a_a28Y2) :: c_a28Y1 infixr 9 :. (%.) :: forall b_a28Y0 c_a28Y1 a_a28Y2 (t_a292d :: (~>) b_a28Y0 c_a28Y1) (t_a292e :: (~>) a_a28Y2 b_a28Y0) (t_a292f :: a_a28Y2). Sing t_a292d -> Sing t_a292e -> Sing t_a292f -> Sing (Apply (Apply (Apply (.@#@$) t_a292d) t_a292e) t_a292f :: c_a28Y1) infixr 9 %. type family Flip (a_a290x :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (a_a290y :: b_a28XY) (a_a290z :: a_a28XX) :: c_a28XZ sFlip :: forall a_a28XX b_a28XY c_a28XZ (t_a2927 :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (t_a2928 :: b_a28XY) (t_a2929 :: a_a28XX). Sing t_a2927 -> Sing t_a2928 -> Sing t_a2929 -> Sing (Apply (Apply (Apply FlipSym0 t_a2927) t_a2928) t_a2929 :: c_a28XZ) type family ($) (a_a290r :: (~>) a_a28XU b_a28XV) (a_a290s :: a_a28XU) :: b_a28XV infixr 0 $ (%$) :: forall a_a28XU b_a28XV (t_a2923 :: (~>) a_a28XU b_a28XV) (t_a2924 :: a_a28XU). Sing t_a2923 -> Sing t_a2924 -> Sing (Apply (Apply ($@#@$) t_a2923) t_a2924 :: b_a28XV) infixr 0 %$ type family (&) (a_a31da :: a_a31cX) (a_a31db :: (~>) a_a31cX b_a31cY) :: b_a31cY infixl 1 & (%&) :: forall a_a31cX b_a31cY (t_a31dI :: a_a31cX) (t_a31dJ :: (~>) a_a31cX b_a31cY). Sing t_a31dI -> Sing t_a31dJ -> Sing (Apply (Apply (&@#@$) t_a31dI) t_a31dJ :: b_a31cY) infixl 1 %& type family On (a_a31dg :: (~>) b_a31cZ ((~>) b_a31cZ c_a31d0)) (a_a31dh :: (~>) a_a31d1 b_a31cZ) (a_a31di :: a_a31d1) (a_a31dj :: a_a31d1) :: c_a31d0 infixl 0 `On` sOn :: forall b_a31cZ c_a31d0 a_a31d1 (t_a31dM :: (~>) b_a31cZ ((~>) b_a31cZ c_a31d0)) (t_a31dN :: (~>) a_a31d1 b_a31cZ) (t_a31dO :: a_a31d1) (t_a31dP :: a_a31d1). Sing t_a31dM -> Sing t_a31dN -> Sing t_a31dO -> Sing t_a31dP -> Sing (Apply (Apply (Apply (Apply OnSym0 t_a31dM) t_a31dN) t_a31dO) t_a31dP :: c_a31d0) infixl 0 `sOn` data IdSym0 :: forall a6989586621679520925. (~>) a6989586621679520925 a6989586621679520925 type IdSym1 (a6989586621679521120 :: a6989586621679520925) = Id a6989586621679521120 data ConstSym0 :: forall a6989586621679520923 b6989586621679520924. (~>) a6989586621679520923 ((~>) b6989586621679520924 a6989586621679520923) data ConstSym1 (a6989586621679521105 :: a6989586621679520923) :: forall b6989586621679520924. (~>) b6989586621679520924 a6989586621679520923 type ConstSym2 (a6989586621679521105 :: a6989586621679520923) (a6989586621679521106 :: b6989586621679520924) = Const a6989586621679521105 a6989586621679521106 data (.@#@$) :: forall a6989586621679520922 b6989586621679520920 c6989586621679520921. (~>) ((~>) b6989586621679520920 c6989586621679520921) ((~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) :: forall a6989586621679520922. (~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) :: (~>) a6989586621679520922 c6989586621679520921 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) (a6989586621679521088 :: a6989586621679520922) = (:.) a6989586621679521086 a6989586621679521087 a6989586621679521088 data FlipSym0 :: forall a6989586621679520917 b6989586621679520918 c6989586621679520919. (~>) ((~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) ((~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919)) data FlipSym1 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) :: (~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919) data FlipSym2 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) (a6989586621679521078 :: b6989586621679520918) :: (~>) a6989586621679520917 c6989586621679520919 type FlipSym3 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) (a6989586621679521078 :: b6989586621679520918) (a6989586621679521079 :: a6989586621679520917) = Flip a6989586621679521077 a6989586621679521078 a6989586621679521079 data ($@#@$) :: forall a6989586621679520914 b6989586621679520915. (~>) ((~>) a6989586621679520914 b6989586621679520915) ((~>) a6989586621679520914 b6989586621679520915) infixr 0 $@#@$ data ($@#@$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) :: (~>) a6989586621679520914 b6989586621679520915 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) (a6989586621679521072 :: a6989586621679520914) = ($) a6989586621679521071 a6989586621679521072 data (&@#@$) :: forall a6989586621679729423 b6989586621679729424. (~>) a6989586621679729423 ((~>) ((~>) a6989586621679729423 b6989586621679729424) b6989586621679729424) infixl 1 &@#@$ data (&@#@$$) (a6989586621679729436 :: a6989586621679729423) :: forall b6989586621679729424. (~>) ((~>) a6989586621679729423 b6989586621679729424) b6989586621679729424 infixl 1 &@#@$$ type (&@#@$$$) (a6989586621679729436 :: a6989586621679729423) (a6989586621679729437 :: (~>) a6989586621679729423 b6989586621679729424) = (&) a6989586621679729436 a6989586621679729437 data OnSym0 :: forall a6989586621679729427 b6989586621679729425 c6989586621679729426. (~>) ((~>) b6989586621679729425 ((~>) b6989586621679729425 c6989586621679729426)) ((~>) ((~>) a6989586621679729427 b6989586621679729425) ((~>) a6989586621679729427 ((~>) a6989586621679729427 c6989586621679729426))) infixl 0 `OnSym0` data OnSym1 (a6989586621679729442 :: (~>) b6989586621679729425 ((~>) b6989586621679729425 c6989586621679729426)) :: forall a6989586621679729427. (~>) ((~>) a6989586621679729427 b6989586621679729425) ((~>) a6989586621679729427 ((~>) a6989586621679729427 c6989586621679729426)) infixl 0 `OnSym1` data OnSym2 (a6989586621679729442 :: (~>) b6989586621679729425 ((~>) b6989586621679729425 c6989586621679729426)) (a6989586621679729443 :: (~>) a6989586621679729427 b6989586621679729425) :: (~>) a6989586621679729427 ((~>) a6989586621679729427 c6989586621679729426) infixl 0 `OnSym2` data OnSym3 (a6989586621679729442 :: (~>) b6989586621679729425 ((~>) b6989586621679729425 c6989586621679729426)) (a6989586621679729443 :: (~>) a6989586621679729427 b6989586621679729425) (a6989586621679729444 :: a6989586621679729427) :: (~>) a6989586621679729427 c6989586621679729426 infixl 0 `OnSym3` type OnSym4 (a6989586621679729442 :: (~>) b6989586621679729425 ((~>) b6989586621679729425 c6989586621679729426)) (a6989586621679729443 :: (~>) a6989586621679729427 b6989586621679729425) (a6989586621679729444 :: a6989586621679729427) (a6989586621679729445 :: a6989586621679729427) = On a6989586621679729442 a6989586621679729443 a6989586621679729444 a6989586621679729445 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Function.OnSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Function.OnSym0 instance forall a6989586621679729427 b6989586621679729425 c6989586621679729426 (a6989586621679729442 :: b6989586621679729425 Data.Singletons.Internal.~> (b6989586621679729425 Data.Singletons.Internal.~> c6989586621679729426)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym1 a6989586621679729442) 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 a6989586621679729427 b6989586621679729425 c6989586621679729426 (a6989586621679729443 :: b6989586621679729425 Data.Singletons.Internal.~> (b6989586621679729425 Data.Singletons.Internal.~> c6989586621679729426)) (a6989586621679729442 :: a6989586621679729427 Data.Singletons.Internal.~> b6989586621679729425). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym2 a6989586621679729443 a6989586621679729442) 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 a6989586621679729427 b6989586621679729425 c6989586621679729426 (a6989586621679729444 :: b6989586621679729425 Data.Singletons.Internal.~> (b6989586621679729425 Data.Singletons.Internal.~> c6989586621679729426)) (a6989586621679729443 :: a6989586621679729427 Data.Singletons.Internal.~> b6989586621679729425) (a6989586621679729442 :: a6989586621679729427). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.OnSym3 a6989586621679729444 a6989586621679729443 a6989586621679729442) 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 b6989586621679729424 a6989586621679729423 (a6989586621679729436 :: a6989586621679729423). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Function.&@#@$$) a6989586621679729436) 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_6989586621679729458Sym0 instance forall k2 k3 k4 k5 k6 (ty6989586621679729454 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679729458Sym1 ty6989586621679729454) instance forall k2 k3 k4 k5 k6 (f6989586621679729455 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (ty6989586621679729454 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679729458Sym2 f6989586621679729455 ty6989586621679729454) instance forall k2 k3 k4 k5 k6 (a_69895866216797294506989586621679729456 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (f6989586621679729455 :: k4 Data.Singletons.Internal.~> k5) (ty6989586621679729454 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679729458Sym3 a_69895866216797294506989586621679729456 f6989586621679729455 ty6989586621679729454) instance forall k2 k3 k4 k5 k6 (a_69895866216797294526989586621679729457 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (a_69895866216797294506989586621679729456 :: k4 Data.Singletons.Internal.~> k5) (f6989586621679729455 :: k3) (ty6989586621679729454 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679729458Sym4 a_69895866216797294526989586621679729457 a_69895866216797294506989586621679729456 f6989586621679729455 ty6989586621679729454) instance forall k2 k3 k4 k5 k6 (t6989586621679729462 :: k5 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> k6)) (a_69895866216797294526989586621679729457 :: k4 Data.Singletons.Internal.~> k5) (a_69895866216797294506989586621679729456 :: k3) (f6989586621679729455 :: k2) (ty6989586621679729454 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Function.Lambda_6989586621679729458Sym5 t6989586621679729462 a_69895866216797294526989586621679729457 a_69895866216797294506989586621679729456 f6989586621679729455 ty6989586621679729454) -- | Defines the promoted and singleton version of Bounded, PBounded -- and SBounded module Data.Singletons.Prelude.Enum class PBounded (a_a32ST :: Type) where { type family MinBound :: a_a32ST; type family MaxBound :: a_a32ST; } class SBounded a_a32ST sMinBound :: SBounded a_a32ST => Sing (MinBoundSym0 :: a_a32ST) sMaxBound :: SBounded a_a32ST => Sing (MaxBoundSym0 :: a_a32ST) class PEnum (a_a33YN :: Type) where { type family Succ (arg_a343n :: a_a33YN) :: a_a33YN; type family Pred (arg_a343p :: a_a33YN) :: a_a33YN; type family ToEnum (arg_a343r :: Nat) :: a_a33YN; type family FromEnum (arg_a343t :: a_a33YN) :: Nat; type family EnumFromTo (arg_a343v :: a_a33YN) (arg_a343w :: a_a33YN) :: [a_a33YN]; type family EnumFromThenTo (arg_a343z :: a_a33YN) (arg_a343A :: a_a33YN) (arg_a343B :: a_a33YN) :: [a_a33YN]; type Succ a_a343Q = Apply Succ_6989586621679740391Sym0 a_a343Q; type Pred a_a343Z = Apply Pred_6989586621679740400Sym0 a_a343Z; type EnumFromTo a_a3449 a_a344a = Apply (Apply EnumFromTo_6989586621679740411Sym0 a_a3449) a_a344a; type EnumFromThenTo a_a344o a_a344p a_a344q = Apply (Apply (Apply EnumFromThenTo_6989586621679740427Sym0 a_a344o) a_a344p) a_a344q; } class SEnum a_a33YN sSucc :: forall (t_a346l :: a_a33YN). SEnum a_a33YN => Sing t_a346l -> Sing (Apply SuccSym0 t_a346l :: a_a33YN) sPred :: forall (t_a346n :: a_a33YN). SEnum a_a33YN => Sing t_a346n -> Sing (Apply PredSym0 t_a346n :: a_a33YN) sToEnum :: forall (t_a346p :: Nat). SEnum a_a33YN => Sing t_a346p -> Sing (Apply ToEnumSym0 t_a346p :: a_a33YN) sFromEnum :: forall (t_a346r :: a_a33YN). SEnum a_a33YN => Sing t_a346r -> Sing (Apply FromEnumSym0 t_a346r :: Nat) sEnumFromTo :: forall (t_a346t :: a_a33YN) (t_a346u :: a_a33YN). SEnum a_a33YN => Sing t_a346t -> Sing t_a346u -> Sing (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) sEnumFromThenTo :: forall (t_a346x :: a_a33YN) (t_a346y :: a_a33YN) (t_a346z :: a_a33YN). SEnum a_a33YN => Sing t_a346x -> Sing t_a346y -> Sing t_a346z -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) sSucc :: forall (t_a346l :: a_a33YN). (SEnum a_a33YN, (Apply SuccSym0 t_a346l :: a_a33YN) ~ Apply Succ_6989586621679740391Sym0 t_a346l) => Sing t_a346l -> Sing (Apply SuccSym0 t_a346l :: a_a33YN) sPred :: forall (t_a346n :: a_a33YN). (SEnum a_a33YN, (Apply PredSym0 t_a346n :: a_a33YN) ~ Apply Pred_6989586621679740400Sym0 t_a346n) => Sing t_a346n -> Sing (Apply PredSym0 t_a346n :: a_a33YN) sEnumFromTo :: forall (t_a346t :: a_a33YN) (t_a346u :: a_a33YN). (SEnum a_a33YN, (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) ~ Apply (Apply EnumFromTo_6989586621679740411Sym0 t_a346t) t_a346u) => Sing t_a346t -> Sing t_a346u -> Sing (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) sEnumFromThenTo :: forall (t_a346x :: a_a33YN) (t_a346y :: a_a33YN) (t_a346z :: a_a33YN). (SEnum a_a33YN, (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679740427Sym0 t_a346x) t_a346y) t_a346z) => Sing t_a346x -> Sing t_a346y -> Sing t_a346z -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) type MinBoundSym0 = MinBound type MaxBoundSym0 = MaxBound data SuccSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 a6989586621679740077 type SuccSym1 (arg6989586621679740361 :: a6989586621679740077) = Succ arg6989586621679740361 data PredSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 a6989586621679740077 type PredSym1 (arg6989586621679740363 :: a6989586621679740077) = Pred arg6989586621679740363 data ToEnumSym0 :: forall a6989586621679740077. (~>) Nat a6989586621679740077 type ToEnumSym1 (arg6989586621679740365 :: Nat) = ToEnum arg6989586621679740365 data FromEnumSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 Nat type FromEnumSym1 (arg6989586621679740367 :: a6989586621679740077) = FromEnum arg6989586621679740367 data EnumFromToSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077]) data EnumFromToSym1 (arg6989586621679740369 :: a6989586621679740077) :: (~>) a6989586621679740077 [a6989586621679740077] type EnumFromToSym2 (arg6989586621679740369 :: a6989586621679740077) (arg6989586621679740370 :: a6989586621679740077) = EnumFromTo arg6989586621679740369 arg6989586621679740370 data EnumFromThenToSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 ((~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077])) data EnumFromThenToSym1 (arg6989586621679740373 :: a6989586621679740077) :: (~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077]) data EnumFromThenToSym2 (arg6989586621679740373 :: a6989586621679740077) (arg6989586621679740374 :: a6989586621679740077) :: (~>) a6989586621679740077 [a6989586621679740077] type EnumFromThenToSym3 (arg6989586621679740373 :: a6989586621679740077) (arg6989586621679740374 :: a6989586621679740077) (arg6989586621679740375 :: a6989586621679740077) = EnumFromThenTo arg6989586621679740373 arg6989586621679740374 arg6989586621679740375 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679764010Sym0 instance Data.Singletons.Prelude.Enum.PEnum () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679764004Sym0 instance Data.Singletons.Prelude.Enum.SEnum () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679763993Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679763987Sym0 instance Data.Singletons.Prelude.Enum.SEnum GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679763969Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679763963Sym0 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_6989586621679740494Sym0 instance Data.Singletons.Prelude.Enum.PEnum GHC.Types.Nat instance forall a6989586621679740077 (a6989586621679740491 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679740494Sym1 a6989586621679740491) instance forall a6989586621679740077 (a6989586621679740492 :: a6989586621679740077) (a6989586621679740491 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679740494Sym2 a6989586621679740492 a6989586621679740491) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679740472Sym0 instance forall a6989586621679740077 (a6989586621679740470 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679740472Sym1 a6989586621679740470) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.FromEnum_6989586621679740457Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.ToEnum_6989586621679740450Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679740443Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679740436Sym0 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 a6989586621679740077 (arg6989586621679740369 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromToSym1 arg6989586621679740369) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromToSym0 instance forall a6989586621679740077 (arg6989586621679740374 :: a6989586621679740077) (arg6989586621679740373 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym2 arg6989586621679740374 arg6989586621679740373) instance forall a6989586621679740077 (arg6989586621679740373 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenToSym1 arg6989586621679740373) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenToSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Succ_6989586621679740391Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Pred_6989586621679740400Sym0 instance forall a6989586621679740077 (a6989586621679740409 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679740411Sym1 a6989586621679740409) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromTo_6989586621679740411Sym0 instance forall a6989586621679740077 (a6989586621679740425 :: a6989586621679740077) (a6989586621679740424 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679740427Sym2 a6989586621679740425 a6989586621679740424) instance forall a6989586621679740077 (a6989586621679740424 :: a6989586621679740077). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679740427Sym1 a6989586621679740424) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.EnumFromThenTo_6989586621679740427Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Lambda_6989586621679740384Sym0 instance forall k1 k2 (a_69895866216797403796989586621679740383 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Lambda_6989586621679740384Sym1 a_69895866216797403796989586621679740383) 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 a6989586621679740330) 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 a6989586621679740312) 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 a6989586621679740313 a6989586621679740312) 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 a6989586621679740255) 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 a6989586621679740256 a6989586621679740255) 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 a6989586621679740198) 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 a6989586621679740199 a6989586621679740198) 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.Let6989586621679740340GoSym0 instance forall k1 k2 k3 k4 (x06989586621679740338 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740340GoSym1 x06989586621679740338) instance forall k1 k2 k3 k4 (y6989586621679740339 :: k4) (x06989586621679740338 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740340GoSym2 y6989586621679740339 x06989586621679740338) instance forall k1 k2 k3 k4 (arg_69895866216797401106989586621679740334 :: k4) (y6989586621679740339 :: k3) (x06989586621679740338 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740340GoSym3 arg_69895866216797401106989586621679740334 y6989586621679740339 x06989586621679740338) instance forall k1 k2 k3 k4 (arg_69895866216797401126989586621679740335 :: k4) (arg_69895866216797401106989586621679740334 :: k3) (y6989586621679740339 :: k2) (x06989586621679740338 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740340GoSym4 arg_69895866216797401126989586621679740335 arg_69895866216797401106989586621679740334 y6989586621679740339 x06989586621679740338) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740348Scrutinee_6989586621679740114Sym0 instance forall k1 k2 k3 k4 (x06989586621679740338 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740348Scrutinee_6989586621679740114Sym1 x06989586621679740338) instance forall k1 k2 k3 k4 (y6989586621679740339 :: k4) (x06989586621679740338 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740348Scrutinee_6989586621679740114Sym2 y6989586621679740339 x06989586621679740338) instance forall k1 k2 k3 k4 (x6989586621679740347 :: k4) (y6989586621679740339 :: k3) (x06989586621679740338 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740348Scrutinee_6989586621679740114Sym3 x6989586621679740347 y6989586621679740339 x06989586621679740338) instance forall k1 k2 k3 k4 (arg_69895866216797401106989586621679740334 :: k4) (x6989586621679740347 :: k3) (y6989586621679740339 :: k3) (x06989586621679740338 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740348Scrutinee_6989586621679740114Sym4 arg_69895866216797401106989586621679740334 x6989586621679740347 y6989586621679740339 x06989586621679740338) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym0 instance forall k1 k2 k3 k4 (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym1 x16989586621679740266) instance forall k1 k2 k3 k4 (x26989586621679740267 :: k4) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym2 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (y6989586621679740268 :: k4) (x26989586621679740267 :: k4) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym3 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k4) (x26989586621679740267 :: k4) (x16989586621679740266 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym4 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (arg_69895866216797401246989586621679740262 :: k4) (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k4) (x26989586621679740267 :: k3) (x16989586621679740266 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym5 arg_69895866216797401246989586621679740262 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (arg_69895866216797401266989586621679740263 :: k4) (arg_69895866216797401246989586621679740262 :: k4) (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k3) (x26989586621679740267 :: k2) (x16989586621679740266 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Go_upSym6 arg_69895866216797401266989586621679740263 arg_69895866216797401246989586621679740262 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym0 instance forall k1 k2 k3 k4 (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym1 x16989586621679740266) instance forall k1 k2 k3 k4 (x26989586621679740267 :: k4) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym2 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (y6989586621679740268 :: k4) (x26989586621679740267 :: k4) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym3 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k4) (x26989586621679740267 :: k4) (x16989586621679740266 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym4 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 (arg_69895866216797401246989586621679740262 :: k4) (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k4) (x26989586621679740267 :: k3) (x16989586621679740266 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281Y'Sym5 arg_69895866216797401246989586621679740262 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym0 instance forall k1 k2 k3 k4 k5 (x16989586621679740266 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym1 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (x26989586621679740267 :: k5) (x16989586621679740266 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym2 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (y6989586621679740268 :: k5) (x26989586621679740267 :: k5) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym3 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401226989586621679740261 :: k5) (y6989586621679740268 :: k5) (x26989586621679740267 :: k4) (x16989586621679740266 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym4 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401246989586621679740262 :: k5) (arg_69895866216797401226989586621679740261 :: k5) (y6989586621679740268 :: k4) (x26989586621679740267 :: k3) (x16989586621679740266 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740281DeltaSym5 arg_69895866216797401246989586621679740262 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym0 instance forall k1 k2 k3 k4 k5 (x16989586621679740266 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym1 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (x26989586621679740267 :: k5) (x16989586621679740266 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym2 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (y6989586621679740268 :: k5) (x26989586621679740267 :: k4) (x16989586621679740266 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym3 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401226989586621679740261 :: k5) (y6989586621679740268 :: k4) (x26989586621679740267 :: k5) (x16989586621679740266 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym4 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401246989586621679740262 :: k5) (arg_69895866216797401226989586621679740261 :: k4) (y6989586621679740268 :: k5) (x26989586621679740267 :: k3) (x16989586621679740266 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740271Scrutinee_6989586621679740128Sym5 arg_69895866216797401246989586621679740262 arg_69895866216797401226989586621679740261 y6989586621679740268 x26989586621679740267 x16989586621679740266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym0 instance forall k1 k2 k3 k4 (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym1 x16989586621679740209) instance forall k1 k2 k3 k4 (x26989586621679740210 :: k4) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym2 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (y6989586621679740211 :: k4) (x26989586621679740210 :: k4) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym3 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k4) (x26989586621679740210 :: k4) (x16989586621679740209 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym4 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (arg_69895866216797401346989586621679740205 :: k4) (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k4) (x26989586621679740210 :: k3) (x16989586621679740209 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym5 arg_69895866216797401346989586621679740205 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (arg_69895866216797401366989586621679740206 :: k4) (arg_69895866216797401346989586621679740205 :: k4) (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k3) (x26989586621679740210 :: k2) (x16989586621679740209 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Go_dnSym6 arg_69895866216797401366989586621679740206 arg_69895866216797401346989586621679740205 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym0 instance forall k1 k2 k3 k4 (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym1 x16989586621679740209) instance forall k1 k2 k3 k4 (x26989586621679740210 :: k4) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym2 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (y6989586621679740211 :: k4) (x26989586621679740210 :: k4) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym3 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k4) (x26989586621679740210 :: k4) (x16989586621679740209 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym4 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 (arg_69895866216797401346989586621679740205 :: k4) (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k4) (x26989586621679740210 :: k3) (x16989586621679740209 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224Y'Sym5 arg_69895866216797401346989586621679740205 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym0 instance forall k1 k2 k3 k4 k5 (x16989586621679740209 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym1 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (x26989586621679740210 :: k5) (x16989586621679740209 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym2 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (y6989586621679740211 :: k5) (x26989586621679740210 :: k5) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym3 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401326989586621679740204 :: k5) (y6989586621679740211 :: k5) (x26989586621679740210 :: k4) (x16989586621679740209 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym4 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401346989586621679740205 :: k5) (arg_69895866216797401326989586621679740204 :: k5) (y6989586621679740211 :: k4) (x26989586621679740210 :: k3) (x16989586621679740209 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740224DeltaSym5 arg_69895866216797401346989586621679740205 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym0 instance forall k1 k2 k3 k4 k5 (x16989586621679740209 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym1 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (x26989586621679740210 :: k5) (x16989586621679740209 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym2 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (y6989586621679740211 :: k5) (x26989586621679740210 :: k4) (x16989586621679740209 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym3 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401326989586621679740204 :: k5) (y6989586621679740211 :: k4) (x26989586621679740210 :: k5) (x16989586621679740209 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym4 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) instance forall k1 k2 k3 k4 k5 (arg_69895866216797401346989586621679740205 :: k5) (arg_69895866216797401326989586621679740204 :: k4) (y6989586621679740211 :: k5) (x26989586621679740210 :: k3) (x16989586621679740209 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Enum.Let6989586621679740214Scrutinee_6989586621679740138Sym5 arg_69895866216797401346989586621679740205 arg_69895866216797401326989586621679740204 y6989586621679740211 x26989586621679740210 x16989586621679740209) 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_a5fo8 :: Type) where { type family ShowsPrec (arg_a5fTA :: Nat) (arg_a5fTB :: a_a5fo8) (arg_a5fTC :: Symbol) :: Symbol; type family Show_ (arg_a5fTG :: a_a5fo8) :: Symbol; type family ShowList (arg_a5fTI :: [a_a5fo8]) (arg_a5fTJ :: Symbol) :: Symbol; type ShowsPrec a_a5fTU a_a5fTV a_a5fTW = Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 a_a5fTU) a_a5fTV) a_a5fTW; type Show_ a_a5fU5 = Apply Show__6989586621680262570Sym0 a_a5fU5; type ShowList a_a5fUf a_a5fUg = Apply (Apply ShowList_6989586621680262581Sym0 a_a5fUf) a_a5fUg; } class SShow a_a5fo8 sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). SShow a_a5fo8 => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). SShow a_a5fo8 => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). SShow a_a5fo8 => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). (SShow a_a5fo8, (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 t_a5fXJ) t_a5fXK) t_a5fXL) => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). (SShow a_a5fo8, (Apply Show_Sym0 t_a5fXP :: Symbol) ~ Apply Show__6989586621680262570Sym0 t_a5fXP) => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). (SShow a_a5fo8, (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) ~ Apply (Apply ShowList_6989586621680262581Sym0 t_a5fXR) t_a5fXS) => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: 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_a5fTs :: a_a5fnT) (a_a5fTt :: Symbol) :: Symbol sShows :: forall a_a5fnT (t_a5fXk :: a_a5fnT) (t_a5fXl :: Symbol). SShow a_a5fnT => Sing t_a5fXk -> Sing t_a5fXl -> Sing (Apply (Apply ShowsSym0 t_a5fXk) t_a5fXl :: Symbol) type family ShowListWith (a_a5fT8 :: (~>) a_a5fnS ((~>) Symbol Symbol)) (a_a5fT9 :: [a_a5fnS]) (a_a5fTa :: Symbol) :: Symbol sShowListWith :: forall a_a5fnS (t_a5fXe :: (~>) a_a5fnS ((~>) Symbol Symbol)) (t_a5fXf :: [a_a5fnS]) (t_a5fXg :: Symbol). Sing t_a5fXe -> Sing t_a5fXf -> Sing t_a5fXg -> Sing (Apply (Apply (Apply ShowListWithSym0 t_a5fXe) t_a5fXf) t_a5fXg :: Symbol) type family ShowChar (a_a5fSw :: Symbol) (a_a5fSx :: Symbol) :: Symbol sShowChar :: forall (t_a5fX0 :: Symbol) (t_a5fX1 :: Symbol). Sing t_a5fX0 -> Sing t_a5fX1 -> Sing (Apply (Apply ShowCharSym0 t_a5fX0) t_a5fX1 :: Symbol) type family ShowString (a_a5fSh :: Symbol) (a_a5fSi :: Symbol) :: Symbol sShowString :: forall (t_a5fWU :: Symbol) (t_a5fWV :: Symbol). Sing t_a5fWU -> Sing t_a5fWV -> Sing (Apply (Apply ShowStringSym0 t_a5fWU) t_a5fWV :: Symbol) type family ShowParen (a_a5fSC :: Bool) (a_a5fSD :: (~>) Symbol Symbol) (a_a5fSE :: Symbol) :: Symbol sShowParen :: forall (t_a5fX4 :: Bool) (t_a5fX5 :: (~>) Symbol Symbol) (t_a5fX6 :: Symbol). Sing t_a5fX4 -> Sing t_a5fX5 -> Sing t_a5fX6 -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5fX4) t_a5fX5) t_a5fX6 :: Symbol) type family ShowSpace (a_a5fS4 :: Symbol) :: Symbol sShowSpace :: forall (t_a5fWS :: Symbol). Sing t_a5fWS -> Sing (Apply ShowSpaceSym0 t_a5fWS :: Symbol) type family ShowCommaSpace (a_a5fSp :: Symbol) :: Symbol sShowCommaSpace :: forall (t_a5fWY :: Symbol). Sing t_a5fWY -> Sing (Apply ShowCommaSpaceSym0 t_a5fWY :: Symbol) type family AppPrec :: Nat sAppPrec :: Sing (AppPrecSym0 :: Nat) type family AppPrec1 :: Nat sAppPrec1 :: Sing (AppPrec1Sym0 :: Nat) data ShowsPrecSym0 :: forall a6989586621680260588. (~>) Nat ((~>) a6989586621680260588 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680262538 :: Nat) :: forall a6989586621680260588. (~>) a6989586621680260588 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) (arg6989586621680262540 :: Symbol) = ShowsPrec arg6989586621680262538 arg6989586621680262539 arg6989586621680262540 data Show_Sym0 :: forall a6989586621680260588. (~>) a6989586621680260588 Symbol type Show_Sym1 (arg6989586621680262544 :: a6989586621680260588) = Show_ arg6989586621680262544 data ShowListSym0 :: forall a6989586621680260588. (~>) [a6989586621680260588] ((~>) Symbol Symbol) data ShowListSym1 (arg6989586621680262546 :: [a6989586621680260588]) :: (~>) Symbol Symbol type ShowListSym2 (arg6989586621680262546 :: [a6989586621680260588]) (arg6989586621680262547 :: Symbol) = ShowList arg6989586621680262546 arg6989586621680262547 data ShowsSym0 :: forall a6989586621680260573. (~>) a6989586621680260573 ((~>) Symbol Symbol) data ShowsSym1 (a6989586621680262530 :: a6989586621680260573) :: (~>) Symbol Symbol type ShowsSym2 (a6989586621680262530 :: a6989586621680260573) (a6989586621680262531 :: Symbol) = Shows a6989586621680262530 a6989586621680262531 data ShowListWithSym0 :: forall a6989586621680260572. (~>) ((~>) a6989586621680260572 ((~>) Symbol Symbol)) ((~>) [a6989586621680260572] ((~>) Symbol Symbol)) data ShowListWithSym1 (a6989586621680262510 :: (~>) a6989586621680260572 ((~>) Symbol Symbol)) :: (~>) [a6989586621680260572] ((~>) Symbol Symbol) data ShowListWithSym2 (a6989586621680262510 :: (~>) a6989586621680260572 ((~>) Symbol Symbol)) (a6989586621680262511 :: [a6989586621680260572]) :: (~>) Symbol Symbol type ShowListWithSym3 (a6989586621680262510 :: (~>) a6989586621680260572 ((~>) Symbol Symbol)) (a6989586621680262511 :: [a6989586621680260572]) (a6989586621680262512 :: Symbol) = ShowListWith a6989586621680262510 a6989586621680262511 a6989586621680262512 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680262472 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680262472 :: Symbol) (a6989586621680262473 :: Symbol) = ShowChar a6989586621680262472 a6989586621680262473 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680262457 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680262457 :: Symbol) (a6989586621680262458 :: Symbol) = ShowString a6989586621680262457 a6989586621680262458 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680262478 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680262478 :: Bool) (a6989586621680262479 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data ShowSpaceSym0 :: (~>) Symbol Symbol type ShowSpaceSym1 (a6989586621680262444 :: Symbol) = ShowSpace a6989586621680262444 data ShowCommaSpaceSym0 :: (~>) Symbol Symbol type ShowCommaSpaceSym1 (a6989586621680262465 :: Symbol) = ShowCommaSpace a6989586621680262465 type AppPrecSym0 = AppPrec type AppPrec1Sym0 = AppPrec1 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280875Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280875Sym1 a6989586621680280872) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280875Sym2 a6989586621680280873 a6989586621680280872) instance Data.Singletons.Prelude.Show.SShow Data.Void.Void instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280847Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Ordering instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280847Sym1 a6989586621680280844) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280847Sym2 a6989586621680280845 a6989586621680280844) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280820Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Bool instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280820Sym1 a6989586621680280817) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280820Sym2 a6989586621680280818 a6989586621680280817) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280794Sym0 instance Data.Singletons.Prelude.Show.PShow (GHC.Base.NonEmpty a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280794Sym1 a6989586621680280791) instance forall a6989586621679070336 (a6989586621680280792 :: GHC.Types.Nat) (a6989586621680280791 :: GHC.Base.NonEmpty a6989586621679070336). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280794Sym2 a6989586621680280792 a6989586621680280791) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280760Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Either.Either a b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280760Sym1 a6989586621680280757) instance forall a6989586621679089135 b6989586621679089136 (a6989586621680280758 :: GHC.Types.Nat) (a6989586621680280757 :: Data.Either.Either a6989586621679089135 b6989586621679089136). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280760Sym2 a6989586621680280758 a6989586621680280757) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280706Sym0 instance Data.Singletons.Prelude.Show.PShow (GHC.Maybe.Maybe a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280706Sym1 a6989586621680280703) instance forall a3530822107858468865 (a6989586621680280704 :: GHC.Types.Nat) (a6989586621680280703 :: GHC.Maybe.Maybe a3530822107858468865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280706Sym2 a6989586621680280704 a6989586621680280703) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280669Sym0 instance Data.Singletons.Prelude.Show.PShow () instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280669Sym1 a6989586621680280666) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680280669Sym2 a6989586621680280667 a6989586621680280666) 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 a6989586621680280057) 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_6989586621680262737Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f, g) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262737Sym1 a6989586621680262734) instance forall a6989586621680260655 b6989586621680260656 c6989586621680260657 d6989586621680260658 e6989586621680260659 f6989586621680260660 g6989586621680260661 (a6989586621680262735 :: GHC.Types.Nat) (a6989586621680262734 :: (a6989586621680260655, b6989586621680260656, c6989586621680260657, d6989586621680260658, e6989586621680260659, f6989586621680260660, g6989586621680260661)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262737Sym2 a6989586621680262735 a6989586621680262734) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262715Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e, f) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262715Sym1 a6989586621680262712) instance forall a6989586621680260642 b6989586621680260643 c6989586621680260644 d6989586621680260645 e6989586621680260646 f6989586621680260647 (a6989586621680262713 :: GHC.Types.Nat) (a6989586621680262712 :: (a6989586621680260642, b6989586621680260643, c6989586621680260644, d6989586621680260645, e6989586621680260646, f6989586621680260647)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262715Sym2 a6989586621680262713 a6989586621680262712) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262694Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d, e) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262694Sym1 a6989586621680262691) instance forall a6989586621680260631 b6989586621680260632 c6989586621680260633 d6989586621680260634 e6989586621680260635 (a6989586621680262692 :: GHC.Types.Nat) (a6989586621680262691 :: (a6989586621680260631, b6989586621680260632, c6989586621680260633, d6989586621680260634, e6989586621680260635)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262694Sym2 a6989586621680262692 a6989586621680262691) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262674Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c, d) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262674Sym1 a6989586621680262671) instance forall a6989586621680260622 b6989586621680260623 c6989586621680260624 d6989586621680260625 (a6989586621680262672 :: GHC.Types.Nat) (a6989586621680262671 :: (a6989586621680260622, b6989586621680260623, c6989586621680260624, d6989586621680260625)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262674Sym2 a6989586621680262672 a6989586621680262671) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262655Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b, c) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262655Sym1 a6989586621680262652) instance forall a6989586621680260615 b6989586621680260616 c6989586621680260617 (a6989586621680262653 :: GHC.Types.Nat) (a6989586621680262652 :: (a6989586621680260615, b6989586621680260616, c6989586621680260617)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262655Sym2 a6989586621680262653 a6989586621680262652) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262637Sym0 instance Data.Singletons.Prelude.Show.PShow (a, b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262637Sym1 a6989586621680262634) instance forall a6989586621680260610 b6989586621680260611 (a6989586621680262635 :: GHC.Types.Nat) (a6989586621680262634 :: (a6989586621680260610, b6989586621680260611)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262637Sym2 a6989586621680262635 a6989586621680262634) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262620Sym0 instance Data.Singletons.Prelude.Show.PShow GHC.Types.Symbol instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262620Sym1 a6989586621680262617) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262620Sym2 a6989586621680262618 a6989586621680262617) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262600Sym0 instance Data.Singletons.Prelude.Show.PShow [a] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262600Sym1 a6989586621680262597) instance forall a6989586621680260606 (a6989586621680262598 :: GHC.Types.Nat) (a6989586621680262597 :: [a6989586621680260606]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262600Sym2 a6989586621680262598 a6989586621680262597) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListSym0 instance forall a6989586621680260588 (arg6989586621680262546 :: [a6989586621680260588]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListSym1 arg6989586621680262546) instance forall a6989586621680260573 (a6989586621680262530 :: a6989586621680260573). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsSym1 a6989586621680262530) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsSym0 instance forall a6989586621680260588 (arg6989586621680262539 :: GHC.Types.Nat) (arg6989586621680262538 :: a6989586621680260588). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym2 arg6989586621680262539 arg6989586621680262538) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrecSym1 arg6989586621680262538) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrecSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show_Sym0 instance forall a6989586621680260588 (a6989586621680262559 :: GHC.Types.Nat) (a6989586621680262558 :: a6989586621680260588). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262561Sym2 a6989586621680262559 a6989586621680262558) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262561Sym1 a6989586621680262558) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowsPrec_6989586621680262561Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Show__6989586621680262570Sym0 instance forall a6989586621680260588 (a6989586621680262579 :: [a6989586621680260588]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowList_6989586621680262581Sym1 a6989586621680262579) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowList_6989586621680262581Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.ShowListWithSym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Show.ShowListWithSym0 instance forall a6989586621680260572 (a6989586621680262510 :: a6989586621680260572 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym1 a6989586621680262510) 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 a6989586621680260572 (a6989586621680262511 :: a6989586621680260572 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (a6989586621680262510 :: [a6989586621680260572]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.ShowListWithSym2 a6989586621680262511 a6989586621680262510) 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 a6989586621680262492) 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 a6989586621680262478) 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 a6989586621680262479 a6989586621680262478) 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_6989586621680262500Sym0 instance forall k1 a6989586621679520922 c6989586621679520921 k2 (ss6989586621680262498 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680262500Sym1 ss6989586621680262498) instance forall a6989586621679520922 c6989586621679520921 k1 k2 (a_69895866216802624966989586621680262499 :: k2) (ss6989586621680262498 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680262500Sym2 a_69895866216802624966989586621680262499 ss6989586621680262498) instance forall a6989586621679520922 c6989586621679520921 k1 k2 (t6989586621680262504 :: k2) (a_69895866216802624966989586621680262499 :: k1) (ss6989586621680262498 :: GHC.Types.Symbol Data.Singletons.Internal.~> c6989586621679520921). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680262500Sym3 t6989586621680262504 a_69895866216802624966989586621680262499 ss6989586621680262498) 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 a6989586621680262472) 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 a6989586621680262457) 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.Let6989586621680262521ShowlSym0 instance forall k1 k2 k3 (showx6989586621680262517 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680262521ShowlSym1 showx6989586621680262517) instance forall k1 k2 k3 (x6989586621680262518 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (showx6989586621680262517 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680262521ShowlSym2 x6989586621680262518 showx6989586621680262517) instance forall k1 k2 k3 (xs6989586621680262519 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (x6989586621680262518 :: k2) (showx6989586621680262517 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680262521ShowlSym3 xs6989586621680262519 x6989586621680262518 showx6989586621680262517) instance forall k1 k2 k3 (s6989586621680262520 :: k3 Data.Singletons.Internal.~> (GHC.Types.Symbol Data.Singletons.Internal.~> GHC.Types.Symbol)) (xs6989586621680262519 :: k2) (x6989586621680262518 :: k1) (showx6989586621680262517 :: GHC.Types.Symbol). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Let6989586621680262521ShowlSym4 s6989586621680262520 xs6989586621680262519 x6989586621680262518 showx6989586621680262517) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Show.Lambda_6989586621680262447Sym0 instance forall k (a_69895866216802624426989586621680262446 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Show.Lambda_6989586621680262447Sym1 a_69895866216802624426989586621680262446) -- | Defines the promoted version of Monoid, PMonoid, and the -- singleton version, SMonoid. module Data.Singletons.Prelude.Monoid class PSemigroup a_a5xk1 => PMonoid (a_a5xk1 :: Type) where { type family Mempty :: a_a5xk1; type family Mappend (arg_a5xqe :: a_a5xk1) (arg_a5xqf :: a_a5xk1) :: a_a5xk1; type family Mconcat (arg_a5xqi :: [a_a5xk1]) :: a_a5xk1; type Mappend a_a5xqu a_a5xqv = Apply (Apply Mappend_6989586621680329928Sym0 a_a5xqu) a_a5xqv; type Mconcat a_a5xqF = Apply Mconcat_6989586621680329938Sym0 a_a5xqF; } class SSemigroup a_a5xk1 => SMonoid a_a5xk1 sMempty :: SMonoid a_a5xk1 => Sing (MemptySym0 :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). SMonoid a_a5xk1 => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). SMonoid a_a5xk1 => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). (SMonoid a_a5xk1, (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) ~ Apply (Apply Mappend_6989586621680329928Sym0 t_a5xrz) t_a5xrA) => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). (SMonoid a_a5xk1, (Apply MconcatSym0 t_a5xrD :: a_a5xk1) ~ Apply Mconcat_6989586621680329938Sym0 t_a5xrD) => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) -- | The singleton kind-indexed data family. data family Sing :: k -> Type type family GetDual (a_a3oMT :: Dual a_ak37) :: a_ak37 type family GetAll (a_a3oN7 :: All) :: Bool type family GetAny (a_a3oNl :: Any) :: Bool type family GetSum (a_a3oNC :: Sum a_ak2S) :: a_ak2S type family GetProduct (a_a3oNT :: Product a_ak2X) :: a_ak2X type family GetFirst (a_a5yl7 :: First a_ak3A) :: Maybe a_ak3A type family GetLast (a_a5yls :: Last a_ak3v) :: Maybe a_ak3v type SDual = (Sing :: Dual a_ak37 -> Type) type SAll = (Sing :: All -> Type) type SAny = (Sing :: Any -> Type) type SSum = (Sing :: Sum a_ak2S -> Type) type SProduct = (Sing :: Product a_ak2X -> Type) type SFirst = (Sing :: First a_ak3A -> Type) type SLast = (Sing :: Last a_ak3v -> Type) type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680329525. (~>) a6989586621680329525 ((~>) a6989586621680329525 a6989586621680329525) data MappendSym1 (arg6989586621680329910 :: a6989586621680329525) :: (~>) a6989586621680329525 a6989586621680329525 type MappendSym2 (arg6989586621680329910 :: a6989586621680329525) (arg6989586621680329911 :: a6989586621680329525) = Mappend arg6989586621680329910 arg6989586621680329911 data MconcatSym0 :: forall a6989586621680329525. (~>) [a6989586621680329525] a6989586621680329525 type MconcatSym1 (arg6989586621680329914 :: [a6989586621680329525]) = Mconcat arg6989586621680329914 data DualSym0 :: forall (a6989586621679086865 :: Type). (~>) a6989586621679086865 (Dual (a6989586621679086865 :: Type)) type DualSym1 (t6989586621679820066 :: a6989586621679086865) = 'Dual t6989586621679820066 data GetDualSym0 :: forall a6989586621679086865. (~>) (Dual a6989586621679086865) a6989586621679086865 type GetDualSym1 (a6989586621679820063 :: Dual a6989586621679086865) = GetDual a6989586621679820063 data AllSym0 :: (~>) Bool All type AllSym1 (t6989586621679820080 :: Bool) = 'All t6989586621679820080 data GetAllSym0 :: (~>) All Bool type GetAllSym1 (a6989586621679820077 :: All) = GetAll a6989586621679820077 data AnySym0 :: (~>) Bool Any type AnySym1 (t6989586621679820094 :: Bool) = 'Any t6989586621679820094 data GetAnySym0 :: (~>) Any Bool type GetAnySym1 (a6989586621679820091 :: Any) = GetAny a6989586621679820091 data SumSym0 :: forall (a6989586621679086850 :: Type). (~>) a6989586621679086850 (Sum (a6989586621679086850 :: Type)) type SumSym1 (t6989586621679820111 :: a6989586621679086850) = 'Sum t6989586621679820111 data GetSumSym0 :: forall a6989586621679086850. (~>) (Sum a6989586621679086850) a6989586621679086850 type GetSumSym1 (a6989586621679820108 :: Sum a6989586621679086850) = GetSum a6989586621679820108 data ProductSym0 :: forall (a6989586621679086855 :: Type). (~>) a6989586621679086855 (Product (a6989586621679086855 :: Type)) type ProductSym1 (t6989586621679820128 :: a6989586621679086855) = 'Product t6989586621679820128 data GetProductSym0 :: forall a6989586621679086855. (~>) (Product a6989586621679086855) a6989586621679086855 type GetProductSym1 (a6989586621679820125 :: Product a6989586621679086855) = GetProduct a6989586621679820125 data FirstSym0 :: forall (a6989586621679086894 :: Type). (~>) (Maybe a6989586621679086894) (First (a6989586621679086894 :: Type)) type FirstSym1 (t6989586621680333440 :: Maybe a6989586621679086894) = 'First t6989586621680333440 data GetFirstSym0 :: forall a6989586621679086894. (~>) (First a6989586621679086894) (Maybe a6989586621679086894) type GetFirstSym1 (a6989586621680333437 :: First a6989586621679086894) = GetFirst a6989586621680333437 data LastSym0 :: forall (a6989586621679086889 :: Type). (~>) (Maybe a6989586621679086889) (Last (a6989586621679086889 :: Type)) type LastSym1 (t6989586621680333461 :: Maybe a6989586621679086889) = 'Last t6989586621680333461 data GetLastSym0 :: forall a6989586621679086889. (~>) (Last a6989586621679086889) (Maybe a6989586621679086889) type GetLastSym1 (a6989586621680333458 :: Last a6989586621679086889) = GetLast a6989586621680333458 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339718Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.Last a) instance forall a6989586621680339384 (a6989586621680339716 :: Data.Monoid.Last a6989586621680339384). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339718Sym1 a6989586621680339716) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680339714BSym0 instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339704Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.Last instance forall b6989586621679545157 a6989586621679545156 (a6989586621680339702 :: Data.Monoid.Last a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339704Sym1 a6989586621680339702) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680339687Sym0 instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.Last instance forall k1 a k (a6989586621680339685 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680339687Sym1 a6989586621680339685) instance forall k1 a k (k6989586621680339686 :: k) (a6989586621680339685 :: k1 Data.Singletons.Internal.~> Data.Monoid.Last a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680339687Sym2 k6989586621680339686 a6989586621680339685) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680339690Scrutinee_6989586621680339395Sym0 instance forall k1 k2 k3 (a6989586621680339685 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680339690Scrutinee_6989586621680339395Sym1 a6989586621680339685) instance forall k1 k2 k3 (k6989586621680339686 :: k3) (a6989586621680339685 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680339690Scrutinee_6989586621680339395Sym2 k6989586621680339686 a6989586621680339685) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339677Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.Last instance forall b6989586621679545130 a6989586621679545129 (a6989586621680339675 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339677Sym1 a6989586621680339675) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680339665Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680339663 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680339665Sym1 a6989586621680339663) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339653Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.Last instance forall a6989586621679545133 b6989586621679545134 (a6989586621680339651 :: Data.Monoid.Last (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339653Sym1 a6989586621680339651) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680339642Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339630Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Monoid.First a) instance forall a6989586621680339374 (a6989586621680339628 :: Data.Monoid.First a6989586621680339374). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339630Sym1 a6989586621680339628) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680339626ASym0 instance Data.Singletons.Prelude.Semigroup.Internal.SSemigroup (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339616Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Monoid.First instance forall b6989586621679545157 a6989586621679545156 (a6989586621680339614 :: Data.Monoid.First a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339616Sym1 a6989586621680339614) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Lambda_6989586621680339599Sym0 instance Data.Singletons.Prelude.Monad.Internal.SMonad Data.Monoid.First instance forall k1 a k (a6989586621680339597 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680339599Sym1 a6989586621680339597) instance forall k1 a k (k6989586621680339598 :: k) (a6989586621680339597 :: k1 Data.Singletons.Internal.~> Data.Monoid.First a). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Lambda_6989586621680339599Sym2 k6989586621680339598 a6989586621680339597) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Let6989586621680339602Scrutinee_6989586621680339388Sym0 instance forall k1 k2 k3 (a6989586621680339597 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680339602Scrutinee_6989586621680339388Sym1 a6989586621680339597) instance forall k1 k2 k3 (k6989586621680339598 :: k3) (a6989586621680339597 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Let6989586621680339602Scrutinee_6989586621680339388Sym2 k6989586621680339598 a6989586621680339597) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339589Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Monoid.First instance forall b6989586621679545130 a6989586621679545129 (a6989586621680339587 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339589Sym1 a6989586621680339587) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Fmap_6989586621680339577Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680339575 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Fmap_6989586621680339577Sym1 a6989586621680339575) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339565Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Monoid.First instance forall a6989586621679545133 b6989586621679545134 (a6989586621680339563 :: Data.Monoid.First (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.TFHelper_6989586621680339565Sym1 a6989586621680339563) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Pure_6989586621680339554Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mappend_6989586621680339544Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Ord.Down a) instance forall a6989586621680339365 (a6989586621680339542 :: Data.Ord.Down a6989586621680339365). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Mappend_6989586621680339544Sym1 a6989586621680339542) 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_6989586621680336397Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680336397Sym1 a6989586621680336394) instance forall a6989586621679086889 (a6989586621680336395 :: GHC.Types.Nat) (a6989586621680336394 :: Data.Monoid.Last a6989586621679086889). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680336397Sym2 a6989586621680336395 a6989586621680336394) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680336368Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Monoid.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680336368Sym1 a6989586621680336365) instance forall a6989586621679086894 (a6989586621680336366 :: GHC.Types.Nat) (a6989586621680336365 :: Data.Monoid.First a6989586621679086894). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.ShowsPrec_6989586621680336368Sym2 a6989586621680336366 a6989586621680336365) 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_6989586621680335104Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.Last a) instance forall a6989586621679086889 (a6989586621680335102 :: Data.Monoid.Last a6989586621679086889). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680335104Sym1 a6989586621680335102) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Compare_6989586621680335083Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Monoid.First a) instance forall a6989586621679086894 (a6989586621680335081 :: Data.Monoid.First a6989586621679086894). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Compare_6989586621680335083Sym1 a6989586621680335081) 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_6989586621680329976Sym0 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_6989586621680329961Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid [a] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MconcatSym0 instance forall a6989586621680329525 (arg6989586621680329910 :: a6989586621680329525). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.MappendSym1 arg6989586621680329910) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.MappendSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mconcat_6989586621680329938Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monoid.Mappend_6989586621680329928Sym0 instance forall a6989586621680329525 (a6989586621680329926 :: a6989586621680329525). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monoid.Mappend_6989586621680329928Sym1 a6989586621680329926) -- | 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_akDJ b_akDK -> Type) either_ :: (a_a5YaD -> c_a5YaE) -> (b_a5YaF -> c_a5YaE) -> Either a_a5YaD b_a5YaF -> c_a5YaE type family Either_ (a_a5Ybd :: (~>) a_a5YaD c_a5YaE) (a_a5Ybe :: (~>) b_a5YaF c_a5YaE) (a_a5Ybf :: Either a_a5YaD b_a5YaF) :: c_a5YaE sEither_ :: forall a_a5YaD c_a5YaE b_a5YaF (t_a5Ybn :: (~>) a_a5YaD c_a5YaE) (t_a5Ybo :: (~>) b_a5YaF c_a5YaE) (t_a5Ybp :: Either a_a5YaD b_a5YaF). Sing t_a5Ybn -> Sing t_a5Ybo -> Sing t_a5Ybp -> Sing (Apply (Apply (Apply Either_Sym0 t_a5Ybn) t_a5Ybo) t_a5Ybp :: c_a5YaE) type family Lefts (a_a5YEL :: [Either a_a5Yyt b_a5Yyu]) :: [a_a5Yyt] sLefts :: forall a_a5Yyt b_a5Yyu (t_a5YEY :: [Either a_a5Yyt b_a5Yyu]). Sing t_a5YEY -> Sing (Apply LeftsSym0 t_a5YEY :: [a_a5Yyt]) type family Rights (a_a5YEG :: [Either a_a5Yyr b_a5Yys]) :: [b_a5Yys] sRights :: forall a_a5Yyr b_a5Yys (t_a5YEW :: [Either a_a5Yyr b_a5Yys]). Sing t_a5YEW -> Sing (Apply RightsSym0 t_a5YEW :: [b_a5Yys]) type family PartitionEithers (a_a5YEm :: [Either a_a5Yyp b_a5Yyq]) :: ([a_a5Yyp], [b_a5Yyq]) sPartitionEithers :: forall a_a5Yyp b_a5Yyq (t_a5YEU :: [Either a_a5Yyp b_a5Yyq]). Sing t_a5YEU -> Sing (Apply PartitionEithersSym0 t_a5YEU :: ([a_a5Yyp], [b_a5Yyq])) type family IsLeft (a_a5YEi :: Either a_a5Yyn b_a5Yyo) :: Bool sIsLeft :: forall a_a5Yyn b_a5Yyo (t_a5YES :: Either a_a5Yyn b_a5Yyo). Sing t_a5YES -> Sing (Apply IsLeftSym0 t_a5YES :: Bool) type family IsRight (a_a5YEg :: Either a_a5Yyl b_a5Yym) :: Bool sIsRight :: forall a_a5Yyl b_a5Yym (t_a5YEQ :: Either a_a5Yyl b_a5Yym). Sing t_a5YEQ -> Sing (Apply IsRightSym0 t_a5YEQ :: Bool) data LeftSym0 :: forall (a6989586621679089135 :: Type) (b6989586621679089136 :: Type). (~>) a6989586621679089135 (Either (a6989586621679089135 :: Type) (b6989586621679089136 :: Type)) type LeftSym1 (t6989586621679298961 :: a6989586621679089135) = 'Left t6989586621679298961 data RightSym0 :: forall (a6989586621679089135 :: Type) (b6989586621679089136 :: Type). (~>) b6989586621679089136 (Either (a6989586621679089135 :: Type) (b6989586621679089136 :: Type)) type RightSym1 (t6989586621679298963 :: b6989586621679089136) = 'Right t6989586621679298963 data Either_Sym0 :: forall a6989586621680432731 b6989586621680432733 c6989586621680432732. (~>) ((~>) a6989586621680432731 c6989586621680432732) ((~>) ((~>) b6989586621680432733 c6989586621680432732) ((~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732)) data Either_Sym1 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) :: forall b6989586621680432733. (~>) ((~>) b6989586621680432733 c6989586621680432732) ((~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732) data Either_Sym2 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) (a6989586621680432768 :: (~>) b6989586621680432733 c6989586621680432732) :: (~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732 type Either_Sym3 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) (a6989586621680432768 :: (~>) b6989586621680432733 c6989586621680432732) (a6989586621680432769 :: Either a6989586621680432731 b6989586621680432733) = Either_ a6989586621680432767 a6989586621680432768 a6989586621680432769 data LeftsSym0 :: forall a6989586621680434209 b6989586621680434210. (~>) [Either a6989586621680434209 b6989586621680434210] [a6989586621680434209] type LeftsSym1 (a6989586621680434599 :: [Either a6989586621680434209 b6989586621680434210]) = Lefts a6989586621680434599 data RightsSym0 :: forall a6989586621680434207 b6989586621680434208. (~>) [Either a6989586621680434207 b6989586621680434208] [b6989586621680434208] type RightsSym1 (a6989586621680434594 :: [Either a6989586621680434207 b6989586621680434208]) = Rights a6989586621680434594 data IsLeftSym0 :: forall a6989586621680434203 b6989586621680434204. (~>) (Either a6989586621680434203 b6989586621680434204) Bool type IsLeftSym1 (a6989586621680434570 :: Either a6989586621680434203 b6989586621680434204) = IsLeft a6989586621680434570 data IsRightSym0 :: forall a6989586621680434201 b6989586621680434202. (~>) (Either a6989586621680434201 b6989586621680434202) Bool type IsRightSym1 (a6989586621680434568 :: Either a6989586621680434201 b6989586621680434202) = IsRight a6989586621680434568 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.Let6989586621680434577LeftSym0 instance forall k2 k3 k (a_69895866216804345726989586621680434576 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680434577LeftSym1 a_69895866216804345726989586621680434576) instance forall k2 k3 k (a6989586621680434586 :: k) (a_69895866216804345726989586621680434576 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680434577LeftSym2 a6989586621680434586 a_69895866216804345726989586621680434576) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Let6989586621680434577RightSym0 instance forall k2 k3 k (a_69895866216804345726989586621680434576 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680434577RightSym1 a_69895866216804345726989586621680434576) instance forall k2 k3 k (a6989586621680434578 :: k) (a_69895866216804345726989586621680434576 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Let6989586621680434577RightSym2 a6989586621680434578 a_69895866216804345726989586621680434576) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Either.Either_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Either.Either_Sym0 instance forall b6989586621680432733 a6989586621680432731 c6989586621680432732 (a6989586621680432767 :: a6989586621680432731 Data.Singletons.Internal.~> c6989586621680432732). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym1 a6989586621680432767) 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 b6989586621680432733 a6989586621680432731 c6989586621680432732 (a6989586621680432768 :: a6989586621680432731 Data.Singletons.Internal.~> c6989586621680432732) (a6989586621680432767 :: b6989586621680432733 Data.Singletons.Internal.~> c6989586621680432732). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Either.Either_Sym2 a6989586621680432768 a6989586621680432767) 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_a63n5 :: Type -> Type) where { type family Fold (arg_a63x8 :: t_a63n5 m_a63n6) :: m_a63n6; type family FoldMap (arg_a63xa :: (~>) a_a63n8 m_a63n7) (arg_a63xb :: t_a63n5 a_a63n8) :: m_a63n7; type family Foldr (arg_a63xe :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (arg_a63xf :: b_a63na) (arg_a63xg :: t_a63n5 a_a63n9) :: b_a63na; type family Foldr' (arg_a63xk :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (arg_a63xl :: b_a63nc) (arg_a63xm :: t_a63n5 a_a63nb) :: b_a63nc; type family Foldl (arg_a63xq :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (arg_a63xr :: b_a63nd) (arg_a63xs :: t_a63n5 a_a63ne) :: b_a63nd; type family Foldl' (arg_a63xw :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (arg_a63xx :: b_a63nf) (arg_a63xy :: t_a63n5 a_a63ng) :: b_a63nf; type family Foldr1 (arg_a63xC :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (arg_a63xD :: t_a63n5 a_a63nh) :: a_a63nh; type family Foldl1 (arg_a63xG :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (arg_a63xH :: t_a63n5 a_a63ni) :: a_a63ni; type family ToList (arg_a63xK :: t_a63n5 a_a63nj) :: [a_a63nj]; type family Null (arg_a63xM :: t_a63n5 a_a63nk) :: Bool; type family Length (arg_a63xO :: t_a63n5 a_a63nl) :: Nat; type family Elem (arg_a63xQ :: a_a63nm) (arg_a63xR :: t_a63n5 a_a63nm) :: Bool; type family Maximum (arg_a63xU :: t_a63n5 a_a63nn) :: a_a63nn; type family Minimum (arg_a63xW :: t_a63n5 a_a63no) :: a_a63no; type family Sum (arg_a63xY :: t_a63n5 a_a63np) :: a_a63np; type family Product (arg_a63y0 :: t_a63n5 a_a63nq) :: a_a63nq; type Fold a_a63y7 = Apply Fold_6989586621680453408Sym0 a_a63y7; type FoldMap a_a63yj a_a63yk = Apply (Apply FoldMap_6989586621680453421Sym0 a_a63yj) a_a63yk; type Foldr a_a63yG a_a63yH a_a63yI = Apply (Apply (Apply Foldr_6989586621680453445Sym0 a_a63yG) a_a63yH) a_a63yI; type Foldr' a_a63za a_a63zb a_a63zc = Apply (Apply (Apply Foldr'_6989586621680453475Sym0 a_a63za) a_a63zb) a_a63zc; type Foldl a_a63zz a_a63zA a_a63zB = Apply (Apply (Apply Foldl_6989586621680453500Sym0 a_a63zz) a_a63zA) a_a63zB; type Foldl' a_a63A3 a_a63A4 a_a63A5 = Apply (Apply (Apply Foldl'_6989586621680453530Sym0 a_a63A3) a_a63A4) a_a63A5; type Foldr1 a_a63Au a_a63Av = Apply (Apply Foldr1_6989586621680453556Sym0 a_a63Au) a_a63Av; type Foldl1 a_a63AT a_a63AU = Apply (Apply Foldl1_6989586621680453581Sym0 a_a63AT) a_a63AU; type ToList a_a63B4 = Apply ToList_6989586621680453591Sym0 a_a63B4; type Null a_a63Bp = Apply Null_6989586621680453612Sym0 a_a63Bp; type Length a_a63BL = Apply Length_6989586621680453634Sym0 a_a63BL; type Elem a_a63BZ a_a63C0 = Apply (Apply Elem_6989586621680453649Sym0 a_a63BZ) a_a63C0; type Maximum a_a63Ce = Apply Maximum_6989586621680453663Sym0 a_a63Ce; type Minimum a_a63Cr = Apply Minimum_6989586621680453676Sym0 a_a63Cr; type Sum a_a63CE = Apply Sum_6989586621680453689Sym0 a_a63CE; type Product a_a63CR = Apply Product_6989586621680453702Sym0 a_a63CR; } class SFoldable (t_a63n5 :: Type -> Type) sFold :: forall m_a63n6 (t_a63SZ :: t_a63n5 m_a63n6). (SFoldable t_a63n5, SMonoid m_a63n6) => Sing t_a63SZ -> Sing (Apply FoldSym0 t_a63SZ :: m_a63n6) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). SFoldable t_a63n5 => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldr' :: forall a_a63nb b_a63nc (t_a63Tb :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (t_a63Tc :: b_a63nc) (t_a63Td :: t_a63n5 a_a63nb). SFoldable t_a63n5 => Sing t_a63Tb -> Sing t_a63Tc -> Sing t_a63Td -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). SFoldable t_a63n5 => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldl' :: forall b_a63nf a_a63ng (t_a63Tn :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (t_a63To :: b_a63nf) (t_a63Tp :: t_a63n5 a_a63ng). SFoldable t_a63n5 => Sing t_a63Tn -> Sing t_a63To -> Sing t_a63Tp -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). SFoldable t_a63n5 => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). SFoldable t_a63n5 => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sToList :: forall a_a63nj (t_a63TB :: t_a63n5 a_a63nj). SFoldable t_a63n5 => Sing t_a63TB -> Sing (Apply ToListSym0 t_a63TB :: [a_a63nj]) sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). SFoldable t_a63n5 => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) sLength :: forall a_a63nl (t_a63TF :: t_a63n5 a_a63nl). SFoldable t_a63n5 => Sing t_a63TF -> Sing (Apply LengthSym0 t_a63TF :: Nat) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) sFold :: forall m_a63n6 (t_a63SZ :: t_a63n5 m_a63n6). (SFoldable t_a63n5, (Apply FoldSym0 t_a63SZ :: m_a63n6) ~ Apply Fold_6989586621680453408Sym0 t_a63SZ, SMonoid m_a63n6) => Sing t_a63SZ -> Sing (Apply FoldSym0 t_a63SZ :: m_a63n6) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) ~ Apply (Apply FoldMap_6989586621680453421Sym0 t_a63T1) t_a63T2, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). (SFoldable t_a63n5, (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) ~ Apply (Apply (Apply Foldr_6989586621680453445Sym0 t_a63T5) t_a63T6) t_a63T7) => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldr' :: forall a_a63nb b_a63nc (t_a63Tb :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (t_a63Tc :: b_a63nc) (t_a63Td :: t_a63n5 a_a63nb). (SFoldable t_a63n5, (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) ~ Apply (Apply (Apply Foldr'_6989586621680453475Sym0 t_a63Tb) t_a63Tc) t_a63Td) => Sing t_a63Tb -> Sing t_a63Tc -> Sing t_a63Td -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). (SFoldable t_a63n5, (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) ~ Apply (Apply (Apply Foldl_6989586621680453500Sym0 t_a63Th) t_a63Ti) t_a63Tj) => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldl' :: forall b_a63nf a_a63ng (t_a63Tn :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (t_a63To :: b_a63nf) (t_a63Tp :: t_a63n5 a_a63ng). (SFoldable t_a63n5, (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) ~ Apply (Apply (Apply Foldl'_6989586621680453530Sym0 t_a63Tn) t_a63To) t_a63Tp) => Sing t_a63Tn -> Sing t_a63To -> Sing t_a63Tp -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). (SFoldable t_a63n5, (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) ~ Apply (Apply Foldr1_6989586621680453556Sym0 t_a63Tt) t_a63Tu) => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). (SFoldable t_a63n5, (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) ~ Apply (Apply Foldl1_6989586621680453581Sym0 t_a63Tx) t_a63Ty) => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sToList :: forall a_a63nj (t_a63TB :: t_a63n5 a_a63nj). (SFoldable t_a63n5, (Apply ToListSym0 t_a63TB :: [a_a63nj]) ~ Apply ToList_6989586621680453591Sym0 t_a63TB) => Sing t_a63TB -> Sing (Apply ToListSym0 t_a63TB :: [a_a63nj]) sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). (SFoldable t_a63n5, (Apply NullSym0 t_a63TD :: Bool) ~ Apply Null_6989586621680453612Sym0 t_a63TD) => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) sLength :: forall a_a63nl (t_a63TF :: t_a63n5 a_a63nl). (SFoldable t_a63n5, (Apply LengthSym0 t_a63TF :: Nat) ~ Apply Length_6989586621680453634Sym0 t_a63TF) => Sing t_a63TF -> Sing (Apply LengthSym0 t_a63TF :: Nat) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) ~ Apply (Apply Elem_6989586621680453649Sym0 t_a63TH) t_a63TI, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, (Apply MaximumSym0 t_a63TL :: a_a63nn) ~ Apply Maximum_6989586621680453663Sym0 t_a63TL, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, (Apply MinimumSym0 t_a63TN :: a_a63no) ~ Apply Minimum_6989586621680453676Sym0 t_a63TN, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, (Apply SumSym0 t_a63TP :: a_a63np) ~ Apply Sum_6989586621680453689Sym0 t_a63TP, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, (Apply ProductSym0 t_a63TR :: a_a63nq) ~ Apply Product_6989586621680453702Sym0 t_a63TR, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) type family FoldrM (a_a63wM :: (~>) a_a63ms ((~>) b_a63mt (m_a63mr b_a63mt))) (a_a63wN :: b_a63mt) (a_a63wO :: t_a63mq a_a63ms) :: m_a63mr b_a63mt sFoldrM :: forall t_a63mq m_a63mr a_a63ms b_a63mt (t_a63Se :: (~>) a_a63ms ((~>) b_a63mt (m_a63mr b_a63mt))) (t_a63Sf :: b_a63mt) (t_a63Sg :: t_a63mq a_a63ms). (SFoldable t_a63mq, SMonad m_a63mr) => Sing t_a63Se -> Sing t_a63Sf -> Sing t_a63Sg -> Sing (Apply (Apply (Apply FoldrMSym0 t_a63Se) t_a63Sf) t_a63Sg :: m_a63mr b_a63mt) type family FoldlM (a_a63wq :: (~>) b_a63mo ((~>) a_a63mp (m_a63mn b_a63mo))) (a_a63wr :: b_a63mo) (a_a63ws :: t_a63mm a_a63mp) :: m_a63mn b_a63mo sFoldlM :: forall t_a63mm m_a63mn b_a63mo a_a63mp (t_a63S8 :: (~>) b_a63mo ((~>) a_a63mp (m_a63mn b_a63mo))) (t_a63S9 :: b_a63mo) (t_a63Sa :: t_a63mm a_a63mp). (SFoldable t_a63mm, SMonad m_a63mn) => Sing t_a63S8 -> Sing t_a63S9 -> Sing t_a63Sa -> Sing (Apply (Apply (Apply FoldlMSym0 t_a63S8) t_a63S9) t_a63Sa :: m_a63mn b_a63mo) type family Traverse_ (a_a63w8 :: (~>) a_a63mk (f_a63mj b_a63ml)) (a_a63w9 :: t_a63mi a_a63mk) :: f_a63mj () sTraverse_ :: forall t_a63mi f_a63mj a_a63mk b_a63ml (t_a63S0 :: (~>) a_a63mk (f_a63mj b_a63ml)) (t_a63S1 :: t_a63mi a_a63mk). (SFoldable t_a63mi, SApplicative f_a63mj) => Sing t_a63S0 -> Sing t_a63S1 -> Sing (Apply (Apply Traverse_Sym0 t_a63S0) t_a63S1 :: f_a63mj ()) type family For_ (a_a63wk :: t_a63me a_a63mg) (a_a63wl :: (~>) a_a63mg (f_a63mf b_a63mh)) :: f_a63mf () sFor_ :: forall t_a63me f_a63mf a_a63mg b_a63mh (t_a63S4 :: t_a63me a_a63mg) (t_a63S5 :: (~>) a_a63mg (f_a63mf b_a63mh)). (SFoldable t_a63me, SApplicative f_a63mf) => Sing t_a63S4 -> Sing t_a63S5 -> Sing (Apply (Apply For_Sym0 t_a63S4) t_a63S5 :: f_a63mf ()) type family SequenceA_ (a_a63vN :: t_a63m3 (f_a63m4 a_a63m5)) :: f_a63m4 () sSequenceA_ :: forall t_a63m3 f_a63m4 a_a63m5 (t_a63RQ :: t_a63m3 (f_a63m4 a_a63m5)). (SFoldable t_a63m3, SApplicative f_a63m4) => Sing t_a63RQ -> Sing (Apply SequenceA_Sym0 t_a63RQ :: f_a63m4 ()) type family Asum (a_a63vy :: t_a63lX (f_a63lY a_a63lZ)) :: f_a63lY a_a63lZ sAsum :: forall t_a63lX f_a63lY a_a63lZ (t_a63RK :: t_a63lX (f_a63lY a_a63lZ)). (SFoldable t_a63lX, SAlternative f_a63lY) => Sing t_a63RK -> Sing (Apply AsumSym0 t_a63RK :: f_a63lY a_a63lZ) type family MapM_ (a_a63vQ :: (~>) a_a63mc (m_a63mb b_a63md)) (a_a63vR :: t_a63ma a_a63mc) :: m_a63mb () sMapM_ :: forall t_a63ma m_a63mb a_a63mc b_a63md (t_a63RS :: (~>) a_a63mc (m_a63mb b_a63md)) (t_a63RT :: t_a63ma a_a63mc). (SFoldable t_a63ma, SMonad m_a63mb) => Sing t_a63RS -> Sing t_a63RT -> Sing (Apply (Apply MapM_Sym0 t_a63RS) t_a63RT :: m_a63mb ()) type family ForM_ (a_a63w2 :: t_a63m6 a_a63m8) (a_a63w3 :: (~>) a_a63m8 (m_a63m7 b_a63m9)) :: m_a63m7 () sForM_ :: forall t_a63m6 m_a63m7 a_a63m8 b_a63m9 (t_a63RW :: t_a63m6 a_a63m8) (t_a63RX :: (~>) a_a63m8 (m_a63m7 b_a63m9)). (SFoldable t_a63m6, SMonad m_a63m7) => Sing t_a63RW -> Sing t_a63RX -> Sing (Apply (Apply ForM_Sym0 t_a63RW) t_a63RX :: m_a63m7 ()) type family Sequence_ (a_a63vI :: t_a63m0 (m_a63m1 a_a63m2)) :: m_a63m1 () sSequence_ :: forall t_a63m0 m_a63m1 a_a63m2 (t_a63RO :: t_a63m0 (m_a63m1 a_a63m2)). (SFoldable t_a63m0, SMonad m_a63m1) => Sing t_a63RO -> Sing (Apply Sequence_Sym0 t_a63RO :: m_a63m1 ()) type family Msum (a_a63vD :: t_a63lU (m_a63lV a_a63lW)) :: m_a63lV a_a63lW sMsum :: forall t_a63lU m_a63lV a_a63lW (t_a63RM :: t_a63lU (m_a63lV a_a63lW)). (SFoldable t_a63lU, SMonadPlus m_a63lV) => Sing t_a63RM -> Sing (Apply MsumSym0 t_a63RM :: m_a63lV a_a63lW) type family Concat (a_a63vk :: t_a63lS [a_a63lT]) :: [a_a63lT] sConcat :: forall t_a63lS a_a63lT (t_a63RI :: t_a63lS [a_a63lT]). SFoldable t_a63lS => Sing t_a63RI -> Sing (Apply ConcatSym0 t_a63RI :: [a_a63lT]) type family ConcatMap (a_a63v4 :: (~>) a_a63lQ [b_a63lR]) (a_a63v5 :: t_a63lP a_a63lQ) :: [b_a63lR] sConcatMap :: forall t_a63lP a_a63lQ b_a63lR (t_a63RE :: (~>) a_a63lQ [b_a63lR]) (t_a63RF :: t_a63lP a_a63lQ). SFoldable t_a63lP => Sing t_a63RE -> Sing t_a63RF -> Sing (Apply (Apply ConcatMapSym0 t_a63RE) t_a63RF :: [b_a63lR]) type family And (a_a63uV :: t_a63lO Bool) :: Bool sAnd :: forall t_a63lO (t_a63RC :: t_a63lO Bool). SFoldable t_a63lO => Sing t_a63RC -> Sing (Apply AndSym0 t_a63RC :: Bool) type family Or (a_a63uM :: t_a63lN Bool) :: Bool sOr :: forall t_a63lN (t_a63RA :: t_a63lN Bool). SFoldable t_a63lN => Sing t_a63RA -> Sing (Apply OrSym0 t_a63RA :: Bool) type family Any (a_a63uz :: (~>) a_a63lM Bool) (a_a63uA :: t_a63lL a_a63lM) :: Bool sAny :: forall t_a63lL a_a63lM (t_a63Rw :: (~>) a_a63lM Bool) (t_a63Rx :: t_a63lL a_a63lM). SFoldable t_a63lL => Sing t_a63Rw -> Sing t_a63Rx -> Sing (Apply (Apply AnySym0 t_a63Rw) t_a63Rx :: Bool) type family All (a_a63um :: (~>) a_a63lK Bool) (a_a63un :: t_a63lJ a_a63lK) :: Bool sAll :: forall t_a63lJ a_a63lK (t_a63Rs :: (~>) a_a63lK Bool) (t_a63Rt :: t_a63lJ a_a63lK). SFoldable t_a63lJ => Sing t_a63Rs -> Sing t_a63Rt -> Sing (Apply (Apply AllSym0 t_a63Rs) t_a63Rt :: Bool) type family MaximumBy (a_a63tX :: (~>) a_a63lI ((~>) a_a63lI Ordering)) (a_a63tY :: t_a63lH a_a63lI) :: a_a63lI sMaximumBy :: forall t_a63lH a_a63lI (t_a63Ro :: (~>) a_a63lI ((~>) a_a63lI Ordering)) (t_a63Rp :: t_a63lH a_a63lI). SFoldable t_a63lH => Sing t_a63Ro -> Sing t_a63Rp -> Sing (Apply (Apply MaximumBySym0 t_a63Ro) t_a63Rp :: a_a63lI) type family MinimumBy (a_a63ty :: (~>) a_a63lG ((~>) a_a63lG Ordering)) (a_a63tz :: t_a63lF a_a63lG) :: a_a63lG sMinimumBy :: forall t_a63lF a_a63lG (t_a63Rk :: (~>) a_a63lG ((~>) a_a63lG Ordering)) (t_a63Rl :: t_a63lF a_a63lG). SFoldable t_a63lF => Sing t_a63Rk -> Sing t_a63Rl -> Sing (Apply (Apply MinimumBySym0 t_a63Rk) t_a63Rl :: a_a63lG) type family NotElem (a_a63tq :: a_a63lE) (a_a63tr :: t_a63lD a_a63lE) :: Bool sNotElem :: forall t_a63lD a_a63lE (t_a63Rg :: a_a63lE) (t_a63Rh :: t_a63lD a_a63lE). (SFoldable t_a63lD, SEq a_a63lE) => Sing t_a63Rg -> Sing t_a63Rh -> Sing (Apply (Apply NotElemSym0 t_a63Rg) t_a63Rh :: Bool) type family Find (a_a63sZ :: (~>) a_a63lC Bool) (a_a63t0 :: t_a63lB a_a63lC) :: Maybe a_a63lC sFind :: forall t_a63lB a_a63lC (t_a63Rc :: (~>) a_a63lC Bool) (t_a63Rd :: t_a63lB a_a63lC). SFoldable t_a63lB => Sing t_a63Rc -> Sing t_a63Rd -> Sing (Apply (Apply FindSym0 t_a63Rc) t_a63Rd :: Maybe a_a63lC) data FoldSym0 :: forall m6989586621680452724 t6989586621680452723. (~>) (t6989586621680452723 m6989586621680452724) m6989586621680452724 type FoldSym1 (arg6989586621680453346 :: t6989586621680452723 m6989586621680452724) = Fold arg6989586621680453346 data FoldMapSym0 :: forall a6989586621680452726 m6989586621680452725 t6989586621680452723. (~>) ((~>) a6989586621680452726 m6989586621680452725) ((~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725) data FoldMapSym1 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725 type FoldMapSym2 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) (arg6989586621680453349 :: t6989586621680452723 a6989586621680452726) = FoldMap arg6989586621680453348 arg6989586621680453349 data FoldrSym0 :: forall a6989586621680452727 b6989586621680452728 t6989586621680452723. (~>) ((~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) ((~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728)) data FoldrSym1 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) :: forall t6989586621680452723. (~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728) data FoldrSym2 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728 type FoldrSym3 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) (arg6989586621680453354 :: t6989586621680452723 a6989586621680452727) = Foldr arg6989586621680453352 arg6989586621680453353 arg6989586621680453354 data Foldr'Sym0 :: forall a6989586621680452729 b6989586621680452730 t6989586621680452723. (~>) ((~>) a6989586621680452729 ((~>) b6989586621680452730 b6989586621680452730)) ((~>) b6989586621680452730 ((~>) (t6989586621680452723 a6989586621680452729) b6989586621680452730)) data Foldr'Sym1 (arg6989586621680453358 :: (~>) a6989586621680452729 ((~>) b6989586621680452730 b6989586621680452730)) :: forall t6989586621680452723. (~>) b6989586621680452730 ((~>) (t6989586621680452723 a6989586621680452729) b6989586621680452730) data Foldr'Sym2 (arg6989586621680453358 :: (~>) a6989586621680452729 ((~>) b6989586621680452730 b6989586621680452730)) (arg6989586621680453359 :: b6989586621680452730) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452729) b6989586621680452730 type Foldr'Sym3 (arg6989586621680453358 :: (~>) a6989586621680452729 ((~>) b6989586621680452730 b6989586621680452730)) (arg6989586621680453359 :: b6989586621680452730) (arg6989586621680453360 :: t6989586621680452723 a6989586621680452729) = Foldr' arg6989586621680453358 arg6989586621680453359 arg6989586621680453360 data FoldlSym0 :: forall a6989586621680452732 b6989586621680452731 t6989586621680452723. (~>) ((~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) ((~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731)) data FoldlSym1 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) :: forall t6989586621680452723. (~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731) data FoldlSym2 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731 type FoldlSym3 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) (arg6989586621680453366 :: t6989586621680452723 a6989586621680452732) = Foldl arg6989586621680453364 arg6989586621680453365 arg6989586621680453366 data Foldl'Sym0 :: forall a6989586621680452734 b6989586621680452733 t6989586621680452723. (~>) ((~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) ((~>) b6989586621680452733 ((~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733)) data Foldl'Sym1 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) :: forall t6989586621680452723. (~>) b6989586621680452733 ((~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733) data Foldl'Sym2 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) (arg6989586621680453371 :: b6989586621680452733) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733 type Foldl'Sym3 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) (arg6989586621680453371 :: b6989586621680452733) (arg6989586621680453372 :: t6989586621680452723 a6989586621680452734) = Foldl' arg6989586621680453370 arg6989586621680453371 arg6989586621680453372 data Foldr1Sym0 :: forall a6989586621680452735 t6989586621680452723. (~>) ((~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) ((~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735) data Foldr1Sym1 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735 type Foldr1Sym2 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) (arg6989586621680453377 :: t6989586621680452723 a6989586621680452735) = Foldr1 arg6989586621680453376 arg6989586621680453377 data Foldl1Sym0 :: forall a6989586621680452736 t6989586621680452723. (~>) ((~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) ((~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736) data Foldl1Sym1 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736 type Foldl1Sym2 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) (arg6989586621680453381 :: t6989586621680452723 a6989586621680452736) = Foldl1 arg6989586621680453380 arg6989586621680453381 data ToListSym0 :: forall a6989586621680452737 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452737) [a6989586621680452737] type ToListSym1 (arg6989586621680453384 :: t6989586621680452723 a6989586621680452737) = ToList arg6989586621680453384 data NullSym0 :: forall a6989586621680452738 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452738) Bool type NullSym1 (arg6989586621680453386 :: t6989586621680452723 a6989586621680452738) = Null arg6989586621680453386 data LengthSym0 :: forall a6989586621680452739 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452739) Nat type LengthSym1 (arg6989586621680453388 :: t6989586621680452723 a6989586621680452739) = Length arg6989586621680453388 data ElemSym0 :: forall a6989586621680452740 t6989586621680452723. (~>) a6989586621680452740 ((~>) (t6989586621680452723 a6989586621680452740) Bool) data ElemSym1 (arg6989586621680453390 :: a6989586621680452740) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452740) Bool type ElemSym2 (arg6989586621680453390 :: a6989586621680452740) (arg6989586621680453391 :: t6989586621680452723 a6989586621680452740) = Elem arg6989586621680453390 arg6989586621680453391 data MaximumSym0 :: forall a6989586621680452741 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452741) a6989586621680452741 type MaximumSym1 (arg6989586621680453394 :: t6989586621680452723 a6989586621680452741) = Maximum arg6989586621680453394 data MinimumSym0 :: forall a6989586621680452742 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452742) a6989586621680452742 type MinimumSym1 (arg6989586621680453396 :: t6989586621680452723 a6989586621680452742) = Minimum arg6989586621680453396 data SumSym0 :: forall a6989586621680452743 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452743) a6989586621680452743 type SumSym1 (arg6989586621680453398 :: t6989586621680452723 a6989586621680452743) = Sum arg6989586621680453398 data ProductSym0 :: forall a6989586621680452744 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452744) a6989586621680452744 type ProductSym1 (arg6989586621680453400 :: t6989586621680452723 a6989586621680452744) = Product arg6989586621680453400 data FoldrMSym0 :: forall a6989586621680452684 b6989586621680452685 m6989586621680452683 t6989586621680452682. (~>) ((~>) a6989586621680452684 ((~>) b6989586621680452685 (m6989586621680452683 b6989586621680452685))) ((~>) b6989586621680452685 ((~>) (t6989586621680452682 a6989586621680452684) (m6989586621680452683 b6989586621680452685))) data FoldrMSym1 (a6989586621680453324 :: (~>) a6989586621680452684 ((~>) b6989586621680452685 (m6989586621680452683 b6989586621680452685))) :: forall t6989586621680452682. (~>) b6989586621680452685 ((~>) (t6989586621680452682 a6989586621680452684) (m6989586621680452683 b6989586621680452685)) data FoldrMSym2 (a6989586621680453324 :: (~>) a6989586621680452684 ((~>) b6989586621680452685 (m6989586621680452683 b6989586621680452685))) (a6989586621680453325 :: b6989586621680452685) :: forall t6989586621680452682. (~>) (t6989586621680452682 a6989586621680452684) (m6989586621680452683 b6989586621680452685) type FoldrMSym3 (a6989586621680453324 :: (~>) a6989586621680452684 ((~>) b6989586621680452685 (m6989586621680452683 b6989586621680452685))) (a6989586621680453325 :: b6989586621680452685) (a6989586621680453326 :: t6989586621680452682 a6989586621680452684) = FoldrM a6989586621680453324 a6989586621680453325 a6989586621680453326 data FoldlMSym0 :: forall a6989586621680452681 b6989586621680452680 m6989586621680452679 t6989586621680452678. (~>) ((~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) ((~>) b6989586621680452680 ((~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680))) data FoldlMSym1 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) :: forall t6989586621680452678. (~>) b6989586621680452680 ((~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680)) data FoldlMSym2 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) (a6989586621680453303 :: b6989586621680452680) :: forall t6989586621680452678. (~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680) type FoldlMSym3 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) (a6989586621680453303 :: b6989586621680452680) (a6989586621680453304 :: t6989586621680452678 a6989586621680452681) = FoldlM a6989586621680453302 a6989586621680453303 a6989586621680453304 data Traverse_Sym0 :: forall a6989586621680452676 b6989586621680452677 f6989586621680452675 t6989586621680452674. (~>) ((~>) a6989586621680452676 (f6989586621680452675 b6989586621680452677)) ((~>) (t6989586621680452674 a6989586621680452676) (f6989586621680452675 ())) data Traverse_Sym1 (a6989586621680453284 :: (~>) a6989586621680452676 (f6989586621680452675 b6989586621680452677)) :: forall t6989586621680452674. (~>) (t6989586621680452674 a6989586621680452676) (f6989586621680452675 ()) type Traverse_Sym2 (a6989586621680453284 :: (~>) a6989586621680452676 (f6989586621680452675 b6989586621680452677)) (a6989586621680453285 :: t6989586621680452674 a6989586621680452676) = Traverse_ a6989586621680453284 a6989586621680453285 data For_Sym0 :: forall a6989586621680452672 b6989586621680452673 f6989586621680452671 t6989586621680452670. (~>) (t6989586621680452670 a6989586621680452672) ((~>) ((~>) a6989586621680452672 (f6989586621680452671 b6989586621680452673)) (f6989586621680452671 ())) data For_Sym1 (a6989586621680453296 :: t6989586621680452670 a6989586621680452672) :: forall b6989586621680452673 f6989586621680452671. (~>) ((~>) a6989586621680452672 (f6989586621680452671 b6989586621680452673)) (f6989586621680452671 ()) type For_Sym2 (a6989586621680453296 :: t6989586621680452670 a6989586621680452672) (a6989586621680453297 :: (~>) a6989586621680452672 (f6989586621680452671 b6989586621680452673)) = For_ a6989586621680453296 a6989586621680453297 data SequenceA_Sym0 :: forall a6989586621680452661 f6989586621680452660 t6989586621680452659. (~>) (t6989586621680452659 (f6989586621680452660 a6989586621680452661)) (f6989586621680452660 ()) type SequenceA_Sym1 (a6989586621680453263 :: t6989586621680452659 (f6989586621680452660 a6989586621680452661)) = SequenceA_ a6989586621680453263 data AsumSym0 :: forall a6989586621680452655 f6989586621680452654 t6989586621680452653. (~>) (t6989586621680452653 (f6989586621680452654 a6989586621680452655)) (f6989586621680452654 a6989586621680452655) type AsumSym1 (a6989586621680453248 :: t6989586621680452653 (f6989586621680452654 a6989586621680452655)) = Asum a6989586621680453248 data MapM_Sym0 :: forall a6989586621680452668 b6989586621680452669 m6989586621680452667 t6989586621680452666. (~>) ((~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) ((~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ())) data MapM_Sym1 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) :: forall t6989586621680452666. (~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ()) type MapM_Sym2 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) (a6989586621680453267 :: t6989586621680452666 a6989586621680452668) = MapM_ a6989586621680453266 a6989586621680453267 data ForM_Sym0 :: forall a6989586621680452664 b6989586621680452665 m6989586621680452663 t6989586621680452662. (~>) (t6989586621680452662 a6989586621680452664) ((~>) ((~>) a6989586621680452664 (m6989586621680452663 b6989586621680452665)) (m6989586621680452663 ())) data ForM_Sym1 (a6989586621680453278 :: t6989586621680452662 a6989586621680452664) :: forall b6989586621680452665 m6989586621680452663. (~>) ((~>) a6989586621680452664 (m6989586621680452663 b6989586621680452665)) (m6989586621680452663 ()) type ForM_Sym2 (a6989586621680453278 :: t6989586621680452662 a6989586621680452664) (a6989586621680453279 :: (~>) a6989586621680452664 (m6989586621680452663 b6989586621680452665)) = ForM_ a6989586621680453278 a6989586621680453279 data Sequence_Sym0 :: forall a6989586621680452658 m6989586621680452657 t6989586621680452656. (~>) (t6989586621680452656 (m6989586621680452657 a6989586621680452658)) (m6989586621680452657 ()) type Sequence_Sym1 (a6989586621680453258 :: t6989586621680452656 (m6989586621680452657 a6989586621680452658)) = Sequence_ a6989586621680453258 data MsumSym0 :: forall a6989586621680452652 m6989586621680452651 t6989586621680452650. (~>) (t6989586621680452650 (m6989586621680452651 a6989586621680452652)) (m6989586621680452651 a6989586621680452652) type MsumSym1 (a6989586621680453253 :: t6989586621680452650 (m6989586621680452651 a6989586621680452652)) = Msum a6989586621680453253 data ConcatSym0 :: forall a6989586621680452649 t6989586621680452648. (~>) (t6989586621680452648 [a6989586621680452649]) [a6989586621680452649] type ConcatSym1 (a6989586621680453234 :: t6989586621680452648 [a6989586621680452649]) = Concat a6989586621680453234 data ConcatMapSym0 :: forall a6989586621680452646 b6989586621680452647 t6989586621680452645. (~>) ((~>) a6989586621680452646 [b6989586621680452647]) ((~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647]) data ConcatMapSym1 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) :: forall t6989586621680452645. (~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647] type ConcatMapSym2 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) (a6989586621680453219 :: t6989586621680452645 a6989586621680452646) = ConcatMap a6989586621680453218 a6989586621680453219 data AndSym0 :: forall t6989586621680452644. (~>) (t6989586621680452644 Bool) Bool type AndSym1 (a6989586621680453209 :: t6989586621680452644 Bool) = And a6989586621680453209 data OrSym0 :: forall t6989586621680452643. (~>) (t6989586621680452643 Bool) Bool type OrSym1 (a6989586621680453200 :: t6989586621680452643 Bool) = Or a6989586621680453200 data AnySym0 :: forall a6989586621680452642 t6989586621680452641. (~>) ((~>) a6989586621680452642 Bool) ((~>) (t6989586621680452641 a6989586621680452642) Bool) data AnySym1 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) :: forall t6989586621680452641. (~>) (t6989586621680452641 a6989586621680452642) Bool type AnySym2 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) (a6989586621680453188 :: t6989586621680452641 a6989586621680452642) = Any a6989586621680453187 a6989586621680453188 data AllSym0 :: forall a6989586621680452640 t6989586621680452639. (~>) ((~>) a6989586621680452640 Bool) ((~>) (t6989586621680452639 a6989586621680452640) Bool) data AllSym1 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) :: forall t6989586621680452639. (~>) (t6989586621680452639 a6989586621680452640) Bool type AllSym2 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) (a6989586621680453175 :: t6989586621680452639 a6989586621680452640) = All a6989586621680453174 a6989586621680453175 data MaximumBySym0 :: forall a6989586621680452638 t6989586621680452637. (~>) ((~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) ((~>) (t6989586621680452637 a6989586621680452638) a6989586621680452638) data MaximumBySym1 (a6989586621680453149 :: (~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) :: forall t6989586621680452637. (~>) (t6989586621680452637 a6989586621680452638) a6989586621680452638 type MaximumBySym2 (a6989586621680453149 :: (~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) (a6989586621680453150 :: t6989586621680452637 a6989586621680452638) = MaximumBy a6989586621680453149 a6989586621680453150 data MinimumBySym0 :: forall a6989586621680452636 t6989586621680452635. (~>) ((~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) ((~>) (t6989586621680452635 a6989586621680452636) a6989586621680452636) data MinimumBySym1 (a6989586621680453124 :: (~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) :: forall t6989586621680452635. (~>) (t6989586621680452635 a6989586621680452636) a6989586621680452636 type MinimumBySym2 (a6989586621680453124 :: (~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) (a6989586621680453125 :: t6989586621680452635 a6989586621680452636) = MinimumBy a6989586621680453124 a6989586621680453125 data NotElemSym0 :: forall a6989586621680452634 t6989586621680452633. (~>) a6989586621680452634 ((~>) (t6989586621680452633 a6989586621680452634) Bool) data NotElemSym1 (a6989586621680453116 :: a6989586621680452634) :: forall t6989586621680452633. (~>) (t6989586621680452633 a6989586621680452634) Bool type NotElemSym2 (a6989586621680453116 :: a6989586621680452634) (a6989586621680453117 :: t6989586621680452633 a6989586621680452634) = NotElem a6989586621680453116 a6989586621680453117 data FindSym0 :: forall a6989586621680452632 t6989586621680452631. (~>) ((~>) a6989586621680452632 Bool) ((~>) (t6989586621680452631 a6989586621680452632) (Maybe a6989586621680452632)) data FindSym1 (a6989586621680453089 :: (~>) a6989586621680452632 Bool) :: forall t6989586621680452631. (~>) (t6989586621680452631 a6989586621680452632) (Maybe a6989586621680452632) type FindSym2 (a6989586621680453089 :: (~>) a6989586621680452632 Bool) (a6989586621680453090 :: t6989586621680452631 a6989586621680452632) = Find a6989586621680453089 a6989586621680453090 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680535158Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.Last instance forall a6989586621680452727 b6989586621680452728 (a6989586621680535155 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535158Sym1 a6989586621680535155) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680535156 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680535155 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535158Sym2 a6989586621680535156 a6989586621680535155) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680535144Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.Last instance forall k1 k2 (t6989586621680452723 :: * -> *) a6989586621680452727 k3 (_f_69895866216805350086989586621680535141 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535144Sym1 _f_69895866216805350086989586621680535141) instance forall k1 (t6989586621680452723 :: * -> *) k2 a6989586621680452727 k3 (_z_69895866216805350106989586621680535142 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_f_69895866216805350086989586621680535141 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535144Sym2 _z_69895866216805350106989586621680535142 _f_69895866216805350086989586621680535141) instance forall (t6989586621680452723 :: * -> *) k1 k2 a6989586621680452727 k3 (a_69895866216805350306989586621680535143 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_z_69895866216805350106989586621680535142 :: k2) (_f_69895866216805350086989586621680535141 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535144Sym3 a_69895866216805350306989586621680535143 _z_69895866216805350106989586621680535142 _f_69895866216805350086989586621680535141) instance forall (t6989586621680452723 :: * -> *) k1 k2 a6989586621680452727 k3 (t6989586621680535148 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (a_69895866216805350306989586621680535143 :: k2) (_z_69895866216805350106989586621680535142 :: k1) (_f_69895866216805350086989586621680535141 :: t6989586621680452723 a6989586621680452727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535144Sym4 t6989586621680535148 a_69895866216805350306989586621680535143 _z_69895866216805350106989586621680535142 _f_69895866216805350086989586621680535141) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535131Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680535129 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535131Sym1 a6989586621680535129) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680535118Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Monoid.First instance forall a6989586621680452727 b6989586621680452728 (a6989586621680535115 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535118Sym1 a6989586621680535115) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680535116 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680535115 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535118Sym2 a6989586621680535116 a6989586621680535115) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680535104Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable Data.Monoid.First instance forall k1 k2 (t6989586621680452723 :: * -> *) a6989586621680452727 k3 (_f_69895866216805349746989586621680535101 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535104Sym1 _f_69895866216805349746989586621680535101) instance forall k1 (t6989586621680452723 :: * -> *) k2 a6989586621680452727 k3 (_z_69895866216805349766989586621680535102 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_f_69895866216805349746989586621680535101 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535104Sym2 _z_69895866216805349766989586621680535102 _f_69895866216805349746989586621680535101) instance forall (t6989586621680452723 :: * -> *) k1 k2 a6989586621680452727 k3 (a_69895866216805349966989586621680535103 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (_z_69895866216805349766989586621680535102 :: k2) (_f_69895866216805349746989586621680535101 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535104Sym3 a_69895866216805349966989586621680535103 _z_69895866216805349766989586621680535102 _f_69895866216805349746989586621680535101) instance forall (t6989586621680452723 :: * -> *) k1 k2 a6989586621680452727 k3 (t6989586621680535108 :: a6989586621680452727 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (a_69895866216805349966989586621680535103 :: k2) (_z_69895866216805349766989586621680535102 :: k1) (_f_69895866216805349746989586621680535101 :: t6989586621680452723 a6989586621680452727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535104Sym4 t6989586621680535108 a_69895866216805349966989586621680535103 _z_69895866216805349766989586621680535102 _f_69895866216805349746989586621680535101) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535091Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680535089 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535091Sym1 a6989586621680535089) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680535078Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable ((,) a) instance forall a6989586621680534921 a6989586621680452727 b6989586621680452728 (a6989586621680535075 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535078Sym1 a6989586621680535075) instance forall a6989586621680534921 a6989586621680452727 b6989586621680452728 (a6989586621680535076 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680535075 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680535078Sym2 a6989586621680535076 a6989586621680535075) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable ((,) a) instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216805349466989586621680535059 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym1 _f_69895866216805349466989586621680535059) instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216805349486989586621680535060 :: k6) (_f_69895866216805349466989586621680535059 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym2 _z_69895866216805349486989586621680535060 _f_69895866216805349466989586621680535059) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805349606989586621680535061 :: k6) (_z_69895866216805349486989586621680535060 :: k5) (_f_69895866216805349466989586621680535059 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym3 a_69895866216805349606989586621680535061 _z_69895866216805349486989586621680535060 _f_69895866216805349466989586621680535059) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216805349626989586621680535062 :: k6) (a_69895866216805349606989586621680535061 :: k5) (_z_69895866216805349486989586621680535060 :: k4) (_f_69895866216805349466989586621680535059 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym4 a_69895866216805349626989586621680535062 a_69895866216805349606989586621680535061 _z_69895866216805349486989586621680535060 _f_69895866216805349466989586621680535059) instance forall k1 k2 k3 k4 k5 k6 (t6989586621680535067 :: k6) (a_69895866216805349626989586621680535062 :: k5) (a_69895866216805349606989586621680535061 :: k4) (_z_69895866216805349486989586621680535060 :: k3) (_f_69895866216805349466989586621680535059 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535063Sym5 t6989586621680535067 a_69895866216805349626989586621680535062 a_69895866216805349606989586621680535061 _z_69895866216805349486989586621680535060 _f_69895866216805349466989586621680535059) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535049Sym0 instance forall a6989586621680534921 a6989586621680452726 m6989586621680452725 (a6989586621680535047 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680535049Sym1 a6989586621680535047) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680535039Sym0 instance forall k1 k2 k3 k4 k5 (_f_69895866216805349466989586621680535036 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535039Sym1 _f_69895866216805349466989586621680535036) instance forall k1 k2 k3 k4 k5 (a_69895866216805349526989586621680535037 :: k5) (_f_69895866216805349466989586621680535036 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535039Sym2 a_69895866216805349526989586621680535037 _f_69895866216805349466989586621680535036) instance forall k1 k2 k3 k4 k5 (a_69895866216805349546989586621680535038 :: k5) (a_69895866216805349526989586621680535037 :: k4) (_f_69895866216805349466989586621680535036 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680535039Sym3 a_69895866216805349546989586621680535038 a_69895866216805349526989586621680535037 _f_69895866216805349466989586621680535036) 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_6989586621680454587Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Product instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680454580Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680454573Sym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680454566Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680454560Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680454553Sym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680454546Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454539Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680454537 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454539Sym1 a6989586621680454537) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454527Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454524 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454527Sym1 a6989586621680454524) instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454525 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (a6989586621680454524 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454527Sym2 a6989586621680454525 a6989586621680454524) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680454504Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454501 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454504Sym1 a6989586621680454501) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454502 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680454501 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454504Sym2 a6989586621680454502 a6989586621680454501) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454488Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680454486 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454488Sym1 a6989586621680454486) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454476Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454473 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454476Sym1 a6989586621680454473) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454474 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680454473 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454476Sym2 a6989586621680454474 a6989586621680454473) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680454459Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454456 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454459Sym1 a6989586621680454456) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454457 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680454456 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454459Sym2 a6989586621680454457 a6989586621680454456) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680454443Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (a6989586621680454441 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680454443Sym1 a6989586621680454441) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454431Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680454429 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454431Sym1 a6989586621680454429) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680454420Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Sum instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680454413Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680454406Sym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680454399Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680454393Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680454386Sym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680454379Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454372Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680454370 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454372Sym1 a6989586621680454370) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454360Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454357 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454360Sym1 a6989586621680454357) instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454358 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (a6989586621680454357 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454360Sym2 a6989586621680454358 a6989586621680454357) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680454337Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454334 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454337Sym1 a6989586621680454334) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454335 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680454334 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454337Sym2 a6989586621680454335 a6989586621680454334) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454321Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680454319 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454321Sym1 a6989586621680454319) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454309Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454306 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454309Sym1 a6989586621680454306) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454307 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680454306 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454309Sym2 a6989586621680454307 a6989586621680454306) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680454292Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454289 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454292Sym1 a6989586621680454289) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454290 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680454289 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454292Sym2 a6989586621680454290 a6989586621680454289) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680454276Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (a6989586621680454274 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680454276Sym1 a6989586621680454274) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454264Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680454262 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454264Sym1 a6989586621680454262) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680454253Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Internal.Dual instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680454246Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680454239Sym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680454232Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680454226Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680454219Sym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680454212Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454205Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680454203 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454205Sym1 a6989586621680454203) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454193Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454190 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454193Sym1 a6989586621680454190) instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680454191 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (a6989586621680454190 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680454193Sym2 a6989586621680454191 a6989586621680454190) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680454170Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454167 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454170Sym1 a6989586621680454167) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454168 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680454167 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454170Sym2 a6989586621680454168 a6989586621680454167) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454154Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680454152 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680454154Sym1 a6989586621680454152) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454142Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454139 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454142Sym1 a6989586621680454139) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680454140 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680454139 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680454142Sym2 a6989586621680454140 a6989586621680454139) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680454125Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454122 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454125Sym1 a6989586621680454122) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680454123 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680454122 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680454125Sym2 a6989586621680454123 a6989586621680454122) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680454109Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (a6989586621680454107 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680454109Sym1 a6989586621680454107) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454097Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680454095 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454097Sym1 a6989586621680454095) instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680454086Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Either.Either a) instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680454077Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680454069Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454066 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454069Sym1 a6989586621680454066) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680454067 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680454066 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680454069Sym2 a6989586621680454067 a6989586621680454066) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454052Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680454050 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454052Sym1 a6989586621680454050) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680454041Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Base.NonEmpty instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680454033Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454024Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680454022 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680454024Sym1 a6989586621680454022) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454011Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680454009 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680454011Sym1 a6989586621680454009) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680453993 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym1 f6989586621680453993) instance forall k2 k3 k4 k5 k6 k7 (p6989586621680453994 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680453993 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym2 p6989586621680453994 f6989586621680453993) instance forall k2 k3 k4 k5 k6 k7 (ps6989586621680453995 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (p6989586621680453994 :: k4) (f6989586621680453993 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym3 ps6989586621680453995 p6989586621680453994 f6989586621680453993) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453997 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (ps6989586621680453995 :: k4) (p6989586621680453994 :: k3) (f6989586621680453993 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym4 a6989586621680453997 ps6989586621680453995 p6989586621680453994 f6989586621680453993) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453998 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680453997 :: k4) (ps6989586621680453995 :: k3) (p6989586621680453994 :: k2) (f6989586621680453993 :: k2 Data.Singletons.Internal.~> k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453996GoSym5 a6989586621680453998 a6989586621680453997 ps6989586621680453995 p6989586621680453994 f6989586621680453993) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453985Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680453983 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453985Sym1 a6989586621680453983) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680453971Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453968 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453971Sym1 a6989586621680453968) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453969 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680453968 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453971Sym2 a6989586621680453969 a6989586621680453968) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680453953Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453950 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453953Sym1 a6989586621680453950) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453951 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680453950 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453953Sym2 a6989586621680453951 a6989586621680453950) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680453937Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable [] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680453928Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680453919Sym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680453910Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680453901Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680453892Sym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680453883Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680453873Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680453871 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680453873Sym1 a6989586621680453871) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680453856Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453853 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453856Sym1 a6989586621680453853) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453854 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680453853 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453856Sym2 a6989586621680453854 a6989586621680453853) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453834Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680453832 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453834Sym1 a6989586621680453832) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453817Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680453814 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453817Sym1 a6989586621680453814) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680453815 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680453814 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453817Sym2 a6989586621680453815 a6989586621680453814) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680453794Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453791 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453794Sym1 a6989586621680453791) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453792 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680453791 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453794Sym2 a6989586621680453792 a6989586621680453791) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680453772Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (a6989586621680453770 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680453772Sym1 a6989586621680453770) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680453755Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable GHC.Maybe.Maybe instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453752 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453755Sym1 a6989586621680453752) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453753 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680453752 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453755Sym2 a6989586621680453753 a6989586621680453752) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680453737Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453734 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453737Sym1 a6989586621680453734) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453735 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680453734 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453737Sym2 a6989586621680453735 a6989586621680453734) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680453720Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680453718 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680453720Sym1 a6989586621680453718) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453095Scrutinee_6989586621680452982Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 (p6989586621680453093 :: a6989586621680452726 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453095Scrutinee_6989586621680452982Sym1 p6989586621680453093) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FindSym0 instance forall (t6989586621680452631 :: * -> *) a6989586621680452632 (a6989586621680453089 :: a6989586621680452632 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FindSym1 a6989586621680453089) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453180Scrutinee_6989586621680452976Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 (p6989586621680453178 :: a6989586621680452726 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453180Scrutinee_6989586621680452976Sym1 p6989586621680453178) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AllSym0 instance forall (t6989586621680452639 :: * -> *) a6989586621680452640 (a6989586621680453174 :: a6989586621680452640 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AllSym1 a6989586621680453174) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453193Scrutinee_6989586621680452974Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 (p6989586621680453191 :: a6989586621680452726 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453193Scrutinee_6989586621680452974Sym1 p6989586621680453191) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453203Scrutinee_6989586621680452972Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.OrSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453212Scrutinee_6989586621680452970Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AndSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453434Scrutinee_6989586621680452935Sym0 instance forall k (t6989586621680452723 :: * -> *) a6989586621680452726 a (f6989586621680453431 :: a6989586621680452726 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453434Scrutinee_6989586621680452935Sym1 f6989586621680453431) instance forall (t6989586621680452723 :: * -> *) k a6989586621680452726 a (z6989586621680453432 :: a6989586621680452726 Data.Singletons.Internal.~> (a Data.Singletons.Internal.~> a)) (f6989586621680453431 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453434Scrutinee_6989586621680452935Sym2 z6989586621680453432 f6989586621680453431) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453489Scrutinee_6989586621680452938Sym0 instance forall k (t6989586621680452723 :: * -> *) a6989586621680452726 a (f6989586621680453486 :: a Data.Singletons.Internal.~> (a6989586621680452726 Data.Singletons.Internal.~> a)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453489Scrutinee_6989586621680452938Sym1 f6989586621680453486) instance forall (t6989586621680452723 :: * -> *) k a6989586621680452726 a (z6989586621680453487 :: a Data.Singletons.Internal.~> (a6989586621680452726 Data.Singletons.Internal.~> a)) (f6989586621680453486 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453489Scrutinee_6989586621680452938Sym2 z6989586621680453487 f6989586621680453486) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453656Scrutinee_6989586621680452958Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453669Scrutinee_6989586621680452961Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453682Scrutinee_6989586621680452964Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453695Scrutinee_6989586621680452967Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatMapSym0 instance forall (t6989586621680452645 :: * -> *) a6989586621680452646 b6989586621680452647 (a6989586621680453218 :: a6989586621680452646 Data.Singletons.Internal.~> [b6989586621680452647]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ConcatMapSym1 a6989586621680453218) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680453224Sym0 instance forall k k1 (t6989586621680452723 :: * -> *) a6989586621680452727 (f6989586621680453222 :: k1 Data.Singletons.Internal.~> t6989586621680452723 a6989586621680452727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453224Sym1 f6989586621680453222) instance forall k k1 (t6989586621680452723 :: * -> *) a6989586621680452727 (xs6989586621680453223 :: k1 Data.Singletons.Internal.~> t6989586621680452723 a6989586621680452727) (f6989586621680453222 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453224Sym2 xs6989586621680453223 f6989586621680453222) instance forall k k1 (t6989586621680452723 :: * -> *) a6989586621680452727 (t6989586621680453228 :: k1 Data.Singletons.Internal.~> t6989586621680452723 a6989586621680452727) (xs6989586621680453223 :: k) (f6989586621680453222 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453224Sym3 t6989586621680453228 xs6989586621680453223 f6989586621680453222) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ConcatSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680453237Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 k (xs6989586621680453236 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453237Sym1 xs6989586621680453236) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 k (t6989586621680453241 :: k) (xs6989586621680453236 :: t6989586621680452723 a6989586621680452727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453237Sym2 t6989586621680453241 xs6989586621680453236) instance forall k (a6989586621680452652 :: k) (m6989586621680452651 :: k -> *) (t6989586621680452650 :: * -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MsumSym0 instance forall k (a6989586621680452655 :: k) (f6989586621680452654 :: k -> *) (t6989586621680452653 :: * -> *). 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 b6989586621680452665 (m6989586621680452663 :: * -> *) (t6989586621680452662 :: * -> *) a6989586621680452664 (a6989586621680453278 :: t6989586621680452662 a6989586621680452664). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ForM_Sym1 a6989586621680453278) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MapM_Sym0 instance forall (t6989586621680452666 :: * -> *) a6989586621680452668 (m6989586621680452667 :: * -> *) b6989586621680452669 (a6989586621680453266 :: a6989586621680452668 Data.Singletons.Internal.~> m6989586621680452667 b6989586621680452669). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MapM_Sym1 a6989586621680453266) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.For_Sym0 instance forall b6989586621680452673 (f6989586621680452671 :: * -> *) (t6989586621680452670 :: * -> *) a6989586621680452672 (a6989586621680453296 :: t6989586621680452670 a6989586621680452672). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.For_Sym1 a6989586621680453296) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Traverse_Sym0 instance forall (t6989586621680452674 :: * -> *) a6989586621680452676 (f6989586621680452675 :: * -> *) b6989586621680452677 (a6989586621680453284 :: a6989586621680452676 Data.Singletons.Internal.~> f6989586621680452675 b6989586621680452677). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Traverse_Sym1 a6989586621680453284) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlMSym0 instance forall (t6989586621680452678 :: * -> *) a6989586621680452681 (m6989586621680452679 :: * -> *) b6989586621680452680 (a6989586621680453302 :: b6989586621680452680 Data.Singletons.Internal.~> (a6989586621680452681 Data.Singletons.Internal.~> m6989586621680452679 b6989586621680452680)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym1 a6989586621680453302) instance forall (t6989586621680452678 :: * -> *) a6989586621680452681 (m6989586621680452679 :: * -> *) b6989586621680452680 (a6989586621680453303 :: b6989586621680452680 Data.Singletons.Internal.~> (a6989586621680452681 Data.Singletons.Internal.~> m6989586621680452679 b6989586621680452680)) (a6989586621680453302 :: b6989586621680452680). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlMSym2 a6989586621680453303 a6989586621680453302) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (arg6989586621680453358 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym1 arg6989586621680453358) instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (arg6989586621680453359 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (arg6989586621680453358 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'Sym2 arg6989586621680453359 arg6989586621680453358) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrMSym0 instance forall (t6989586621680452682 :: * -> *) a6989586621680452684 (m6989586621680452683 :: * -> *) b6989586621680452685 (a6989586621680453324 :: a6989586621680452684 Data.Singletons.Internal.~> (b6989586621680452685 Data.Singletons.Internal.~> m6989586621680452683 b6989586621680452685)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym1 a6989586621680453324) instance forall (t6989586621680452682 :: * -> *) a6989586621680452684 (m6989586621680452683 :: * -> *) b6989586621680452685 (a6989586621680453325 :: a6989586621680452684 Data.Singletons.Internal.~> (b6989586621680452685 Data.Singletons.Internal.~> m6989586621680452683 b6989586621680452685)) (a6989586621680453324 :: b6989586621680452685). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrMSym2 a6989586621680453325 a6989586621680453324) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (arg6989586621680453376 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1Sym1 arg6989586621680453376) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MinimumBySym0 instance forall (t6989586621680452635 :: * -> *) a6989586621680452636 (a6989586621680453124 :: a6989586621680452636 Data.Singletons.Internal.~> (a6989586621680452636 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MinimumBySym1 a6989586621680453124) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.MaximumBySym0 instance forall (t6989586621680452637 :: * -> *) a6989586621680452638 (a6989586621680453149 :: a6989586621680452638 Data.Singletons.Internal.~> (a6989586621680452638 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.MaximumBySym1 a6989586621680453149) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (arg6989586621680453380 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1Sym1 arg6989586621680453380) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToListSym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NullSym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.LengthSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.NotElemSym0 instance forall (t6989586621680452633 :: * -> *) a6989586621680452634 (a6989586621680453116 :: a6989586621680452634). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.NotElemSym1 a6989586621680453116) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ElemSym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (arg6989586621680453390 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.ElemSym1 arg6989586621680453390) 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 (t6989586621680452641 :: * -> *) a6989586621680452642 (a6989586621680453187 :: a6989586621680452642 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.AnySym1 a6989586621680453187) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.AnySym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (arg6989586621680453348 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMapSym1 arg6989586621680453348) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMapSym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (arg6989586621680453353 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (arg6989586621680453352 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym2 arg6989586621680453353 arg6989586621680453352) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (arg6989586621680453352 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldrSym1 arg6989586621680453352) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldrSym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (arg6989586621680453365 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (arg6989586621680453364 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym2 arg6989586621680453365 arg6989586621680453364) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (arg6989586621680453364 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldlSym1 arg6989586621680453364) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldlSym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (arg6989586621680453371 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (arg6989586621680453370 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym2 arg6989586621680453371 arg6989586621680453370) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (arg6989586621680453370 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'Sym1 arg6989586621680453370) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Fold_6989586621680453408Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452726 m6989586621680452725 (a6989586621680453419 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.FoldMap_6989586621680453421Sym1 a6989586621680453419) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.FoldMap_6989586621680453421Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453443 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680453442 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453445Sym2 a6989586621680453443 a6989586621680453442) instance forall (t6989586621680452723 :: * -> *) a6989586621680452727 b6989586621680452728 (a6989586621680453442 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr_6989586621680453445Sym1 a6989586621680453442) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr_6989586621680453445Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680453473 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (a6989586621680453472 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680453475Sym2 a6989586621680453473 a6989586621680453472) instance forall (t6989586621680452723 :: * -> *) a6989586621680452729 b6989586621680452730 (a6989586621680453472 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr'_6989586621680453475Sym1 a6989586621680453472) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr'_6989586621680453475Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453498 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680453497 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453500Sym2 a6989586621680453498 a6989586621680453497) instance forall (t6989586621680452723 :: * -> *) a6989586621680452732 b6989586621680452731 (a6989586621680453497 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl_6989586621680453500Sym1 a6989586621680453497) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl_6989586621680453500Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680453528 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680453527 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453530Sym2 a6989586621680453528 a6989586621680453527) instance forall (t6989586621680452723 :: * -> *) a6989586621680452734 b6989586621680452733 (a6989586621680453527 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453530Sym1 a6989586621680453527) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl'_6989586621680453530Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452735 (a6989586621680453554 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldr1_6989586621680453556Sym1 a6989586621680453554) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldr1_6989586621680453556Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452736 (a6989586621680453579 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453581Sym1 a6989586621680453579) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Foldl1_6989586621680453581Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.ToList_6989586621680453591Sym0 instance forall k (a6989586621680452738 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Null_6989586621680453612Sym0 instance forall k (a6989586621680452739 :: k) (t6989586621680452723 :: k -> *). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Length_6989586621680453634Sym0 instance forall (t6989586621680452723 :: * -> *) a6989586621680452740 (a6989586621680453647 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Elem_6989586621680453649Sym1 a6989586621680453647) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Elem_6989586621680453649Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Maximum_6989586621680453663Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Minimum_6989586621680453676Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Sum_6989586621680453689Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Product_6989586621680453702Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680453620Sym0 instance forall k1 k2 k3 (a_69895866216804536156989586621680453619 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453620Sym1 a_69895866216804536156989586621680453619) instance forall k1 k2 k3 (t6989586621680453628 :: k3) (a_69895866216804536156989586621680453619 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453620Sym2 t6989586621680453628 a_69895866216804536156989586621680453619) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680453599Sym0 instance forall k1 k2 k3 (a_69895866216804535946989586621680453598 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453599Sym1 a_69895866216804535946989586621680453598) instance forall k1 k2 k3 (t6989586621680453606 :: k3) (a_69895866216804535946989586621680453598 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453599Sym2 t6989586621680453606 a_69895866216804535946989586621680453598) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453566MfSym0 instance forall k k2 k3 (f6989586621680453564 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453566MfSym1 f6989586621680453564) instance forall k k2 k3 (xs6989586621680453565 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (f6989586621680453564 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453566MfSym2 xs6989586621680453565 f6989586621680453564) instance forall k k2 k3 (a6989586621680453567 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> k3)) (xs6989586621680453565 :: k) (f6989586621680453564 :: GHC.Maybe.Maybe k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453566MfSym3 a6989586621680453567 xs6989586621680453565 f6989586621680453564) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453541MfSym0 instance forall k k2 k3 (f6989586621680453539 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453541MfSym1 f6989586621680453539) instance forall k k2 k3 (xs6989586621680453540 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (f6989586621680453539 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453541MfSym2 xs6989586621680453540 f6989586621680453539) instance forall k k2 k3 (a6989586621680453542 :: k3 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> k3)) (xs6989586621680453540 :: k) (f6989586621680453539 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453541MfSym3 a6989586621680453542 xs6989586621680453540 f6989586621680453539) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680453511 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym1 f6989586621680453511) instance forall k2 k3 k4 k5 k6 k7 (z06989586621680453512 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680453511 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym2 z06989586621680453512 f6989586621680453511) instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680453513 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (z06989586621680453512 :: k4) (f6989586621680453511 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym3 xs6989586621680453513 z06989586621680453512 f6989586621680453511) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453515 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (xs6989586621680453513 :: k4) (z06989586621680453512 :: k3) (f6989586621680453511 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym4 a6989586621680453515 xs6989586621680453513 z06989586621680453512 f6989586621680453511) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453516 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680453515 :: k4) (xs6989586621680453513 :: k3) (z06989586621680453512 :: k6) (f6989586621680453511 :: k7 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453514F'Sym5 a6989586621680453516 a6989586621680453515 xs6989586621680453513 z06989586621680453512 f6989586621680453511) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680453456 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym1 f6989586621680453456) instance forall k2 k3 k4 k5 k6 k7 (z06989586621680453457 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680453456 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym2 z06989586621680453457 f6989586621680453456) instance forall k2 k3 k4 k5 k6 k7 (xs6989586621680453458 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (z06989586621680453457 :: k4) (f6989586621680453456 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym3 xs6989586621680453458 z06989586621680453457 f6989586621680453456) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453460 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (xs6989586621680453458 :: k4) (z06989586621680453457 :: k3) (f6989586621680453456 :: k7 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym4 a6989586621680453460 xs6989586621680453458 z06989586621680453457 f6989586621680453456) instance forall k2 k3 k4 k5 k6 k7 (a6989586621680453461 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (a6989586621680453460 :: k4) (xs6989586621680453458 :: k3) (z06989586621680453457 :: k7 Data.Singletons.Internal.~> k2) (f6989586621680453456 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453459F'Sym5 a6989586621680453461 a6989586621680453460 xs6989586621680453458 z06989586621680453457 f6989586621680453456) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym0 instance forall k2 k3 b6989586621679545157 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (f6989586621680453330 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym1 f6989586621680453330) instance forall k2 b6989586621679545157 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (z06989586621680453331 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (f6989586621680453330 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym2 z06989586621680453331 f6989586621680453330) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (xs6989586621680453332 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (z06989586621680453331 :: k3) (f6989586621680453330 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym3 xs6989586621680453332 z06989586621680453331 f6989586621680453330) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (a6989586621680453334 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (xs6989586621680453332 :: k3) (z06989586621680453331 :: k2) (f6989586621680453330 :: a6989586621679545156 Data.Singletons.Internal.~> m6989586621679545155 b6989586621679545157). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym4 a6989586621680453334 xs6989586621680453332 z06989586621680453331 f6989586621680453330) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (a6989586621680453335 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (a6989586621680453334 :: k3) (xs6989586621680453332 :: k2) (z06989586621680453331 :: a6989586621679545156 Data.Singletons.Internal.~> m6989586621679545155 b6989586621679545157) (f6989586621680453330 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453333F'Sym5 a6989586621680453335 a6989586621680453334 xs6989586621680453332 z06989586621680453331 f6989586621680453330) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym0 instance forall k2 k3 b6989586621679545157 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (f6989586621680453308 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym1 f6989586621680453308) instance forall k2 b6989586621679545157 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (z06989586621680453309 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (f6989586621680453308 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym2 z06989586621680453309 f6989586621680453308) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (xs6989586621680453310 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (z06989586621680453309 :: k3) (f6989586621680453308 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym3 xs6989586621680453310 z06989586621680453309 f6989586621680453308) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (a6989586621680453312 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (xs6989586621680453310 :: k3) (z06989586621680453309 :: k2) (f6989586621680453308 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym4 a6989586621680453312 xs6989586621680453310 z06989586621680453309 f6989586621680453308) instance forall b6989586621679545157 k2 k3 k4 k5 (m6989586621679545155 :: * -> *) a6989586621679545156 (a6989586621680453313 :: k4 Data.Singletons.Internal.~> (k5 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156)) (a6989586621680453312 :: k3) (xs6989586621680453310 :: k2) (z06989586621680453309 :: k5) (f6989586621680453308 :: a6989586621679545156 Data.Singletons.Internal.~> m6989586621679545155 b6989586621679545157). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453311F'Sym5 a6989586621680453313 a6989586621680453312 xs6989586621680453310 z06989586621680453309 f6989586621680453308) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453157Max'Sym0 instance forall k1 k2 (cmp6989586621680453155 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453157Max'Sym1 cmp6989586621680453155) instance forall k1 k2 (a_69895866216804531536989586621680453156 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680453155 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453157Max'Sym2 a_69895866216804531536989586621680453156 cmp6989586621680453155) instance forall k1 k2 (a6989586621680453158 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804531536989586621680453156 :: k1) (cmp6989586621680453155 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453157Max'Sym3 a6989586621680453158 a_69895866216804531536989586621680453156 cmp6989586621680453155) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453166Scrutinee_6989586621680452978Sym0 instance forall k2 k3 k4 k5 (cmp6989586621680453155 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453166Scrutinee_6989586621680452978Sym1 cmp6989586621680453155) instance forall k2 k3 k4 k5 (x6989586621680453164 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (cmp6989586621680453155 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453166Scrutinee_6989586621680452978Sym2 x6989586621680453164 cmp6989586621680453155) instance forall k2 k3 k4 k5 (y6989586621680453165 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (x6989586621680453164 :: k3) (cmp6989586621680453155 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453166Scrutinee_6989586621680452978Sym3 y6989586621680453165 x6989586621680453164 cmp6989586621680453155) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453132Min'Sym0 instance forall k1 k2 (cmp6989586621680453130 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453132Min'Sym1 cmp6989586621680453130) instance forall k1 k2 (a_69895866216804531286989586621680453131 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (cmp6989586621680453130 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453132Min'Sym2 a_69895866216804531286989586621680453131 cmp6989586621680453130) instance forall k1 k2 (a6989586621680453133 :: k2 Data.Singletons.Internal.~> (k2 Data.Singletons.Internal.~> GHC.Types.Ordering)) (a_69895866216804531286989586621680453131 :: k1) (cmp6989586621680453130 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453132Min'Sym3 a6989586621680453133 a_69895866216804531286989586621680453131 cmp6989586621680453130) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453141Scrutinee_6989586621680452980Sym0 instance forall k2 k3 k4 k5 (cmp6989586621680453130 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453141Scrutinee_6989586621680452980Sym1 cmp6989586621680453130) instance forall k2 k3 k4 k5 (x6989586621680453139 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (cmp6989586621680453130 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453141Scrutinee_6989586621680452980Sym2 x6989586621680453139 cmp6989586621680453130) instance forall k2 k3 k4 k5 (y6989586621680453140 :: k3 Data.Singletons.Internal.~> (k4 Data.Singletons.Internal.~> k5)) (x6989586621680453139 :: k3) (cmp6989586621680453130 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453141Scrutinee_6989586621680452980Sym3 y6989586621680453140 x6989586621680453139 cmp6989586621680453130) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Lambda_6989586621680453096Sym0 instance forall k a6989586621679086894 (p6989586621680453093 :: a6989586621679086894 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453096Sym1 p6989586621680453093) instance forall k a6989586621679086894 (y6989586621680453094 :: a6989586621679086894 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621680453093 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Lambda_6989586621680453096Sym2 y6989586621680453094 p6989586621680453093) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680453099Scrutinee_6989586621680452984Sym0 instance forall k1 k2 k3 (p6989586621680453093 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453099Scrutinee_6989586621680452984Sym1 p6989586621680453093) instance forall k1 k2 k3 (y6989586621680453094 :: k2 Data.Singletons.Internal.~> k3) (p6989586621680453093 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680453099Scrutinee_6989586621680452984Sym2 y6989586621680453094 p6989586621680453093) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MinInternal a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680444554Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MinInternal a) instance forall a6989586621680444474 (a6989586621680444552 :: Data.Singletons.Prelude.Foldable.MinInternal a6989586621680444474). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680444554Sym1 a6989586621680444552) 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.Let6989586621680444546Scrutinee_6989586621680444484Sym0 instance forall k1 (x6989586621680444539 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444546Scrutinee_6989586621680444484Sym1 x6989586621680444539) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680444541NSym0 instance forall k1 k (x6989586621680444539 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444541NSym1 x6989586621680444539) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680444541MSym0 instance forall k k1 (x6989586621680444539 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444541MSym1 x6989586621680444539) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Singletons.Prelude.Foldable.MaxInternal a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.TFHelper_6989586621680444527Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.MaxInternal a) instance forall a6989586621680444466 (a6989586621680444525 :: Data.Singletons.Prelude.Foldable.MaxInternal a6989586621680444466). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680444527Sym1 a6989586621680444525) 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.Let6989586621680444519Scrutinee_6989586621680444482Sym0 instance forall k1 (x6989586621680444512 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444519Scrutinee_6989586621680444482Sym1 x6989586621680444512) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680444514NSym0 instance forall k1 k (x6989586621680444512 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444514NSym1 x6989586621680444512) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Foldable.Let6989586621680444514MSym0 instance forall k k1 (x6989586621680444512 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.Let6989586621680444514MSym1 x6989586621680444512) 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_6989586621680443047Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Singletons.Prelude.Foldable.Endo a) instance forall a6989586621680443025 (a6989586621680443045 :: Data.Singletons.Prelude.Foldable.Endo a6989586621680443025). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Foldable.TFHelper_6989586621680443047Sym1 a6989586621680443045) 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_ak3q -> Type) type family RunIdentity (a_a1dl7 :: Identity a_ak3q) :: a_ak3q data IdentitySym0 :: forall (a6989586621679086884 :: Type). (~>) a6989586621679086884 (Identity (a6989586621679086884 :: Type)) type IdentitySym1 (t6989586621679299404 :: a6989586621679086884) = 'Identity t6989586621679299404 data RunIdentitySym0 :: forall a6989586621679086884. (~>) (Identity a6989586621679086884) a6989586621679086884 type RunIdentitySym1 (a6989586621679299401 :: Identity a6989586621679086884) = RunIdentity a6989586621679299401 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680679176Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Functor.Identity.Identity instance forall b6989586621679545157 a6989586621679545156 (a6989586621680679174 :: Data.Functor.Identity.Identity a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680679176Sym1 a6989586621680679174) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.LiftA2_6989586621680679163Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Functor.Identity.Identity instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680679160 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680679163Sym1 a6989586621680679160) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680679161 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680679160 :: Data.Functor.Identity.Identity a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.LiftA2_6989586621680679163Sym2 a6989586621680679161 a6989586621680679160) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680679147Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680679145 :: Data.Functor.Identity.Identity (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680679147Sym1 a6989586621680679145) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pure_6989586621680679136Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToList_6989586621680679127Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Functor.Identity.Identity instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Sum_6989586621680679120Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Product_6989586621680679113Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Null_6989586621680679106Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Minimum_6989586621680679100Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Maximum_6989586621680679093Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Length_6989586621680679086Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr1_6989586621680679079Sym0 instance forall a6989586621680452735 (a6989586621680679077 :: a6989586621680452735 Data.Singletons.Internal.~> (a6989586621680452735 Data.Singletons.Internal.~> a6989586621680452735)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr1_6989586621680679079Sym1 a6989586621680679077) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr'_6989586621680679067Sym0 instance forall a6989586621680452729 b6989586621680452730 (a6989586621680679064 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680679067Sym1 a6989586621680679064) instance forall a6989586621680452729 b6989586621680452730 (a6989586621680679065 :: a6989586621680452729 Data.Singletons.Internal.~> (b6989586621680452730 Data.Singletons.Internal.~> b6989586621680452730)) (a6989586621680679064 :: b6989586621680452730). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr'_6989586621680679067Sym2 a6989586621680679065 a6989586621680679064) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldr_6989586621680679044Sym0 instance forall a6989586621680452727 b6989586621680452728 (a6989586621680679041 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680679044Sym1 a6989586621680679041) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680679042 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680679041 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldr_6989586621680679044Sym2 a6989586621680679042 a6989586621680679041) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl1_6989586621680679028Sym0 instance forall a6989586621680452736 (a6989586621680679026 :: a6989586621680452736 Data.Singletons.Internal.~> (a6989586621680452736 Data.Singletons.Internal.~> a6989586621680452736)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl1_6989586621680679028Sym1 a6989586621680679026) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl'_6989586621680679016Sym0 instance forall a6989586621680452734 b6989586621680452733 (a6989586621680679013 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680679016Sym1 a6989586621680679013) instance forall a6989586621680452734 b6989586621680452733 (a6989586621680679014 :: b6989586621680452733 Data.Singletons.Internal.~> (a6989586621680452734 Data.Singletons.Internal.~> b6989586621680452733)) (a6989586621680679013 :: b6989586621680452733). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl'_6989586621680679016Sym2 a6989586621680679014 a6989586621680679013) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Foldl_6989586621680678999Sym0 instance forall a6989586621680452732 b6989586621680452731 (a6989586621680678996 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680678999Sym1 a6989586621680678996) instance forall a6989586621680452732 b6989586621680452731 (a6989586621680678997 :: b6989586621680452731 Data.Singletons.Internal.~> (a6989586621680452732 Data.Singletons.Internal.~> b6989586621680452731)) (a6989586621680678996 :: b6989586621680452731). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Foldl_6989586621680678999Sym2 a6989586621680678997 a6989586621680678996) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Elem_6989586621680678983Sym0 instance forall a6989586621680452740 (a6989586621680678981 :: a6989586621680452740). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Elem_6989586621680678983Sym1 a6989586621680678981) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FoldMap_6989586621680678971Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680678969 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.FoldMap_6989586621680678971Sym1 a6989586621680678969) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680678959Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Functor.Identity.Identity instance forall b6989586621679545130 a6989586621679545129 (a6989586621680678957 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680678959Sym1 a6989586621680678957) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Lambda_6989586621680678950Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Functor.Identity.Identity instance forall k1 k2 k3 (_z_69895866216806787706989586621680678948 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680678950Sym1 _z_69895866216806787706989586621680678948) instance forall k1 k2 k3 (a_69895866216806787766989586621680678949 :: k3) (_z_69895866216806787706989586621680678948 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Lambda_6989586621680678950Sym2 a_69895866216806787766989586621680678949 _z_69895866216806787706989586621680678948) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Fmap_6989586621680678940Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680678938 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.Fmap_6989586621680678940Sym1 a6989586621680678938) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680678927Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680678927Sym1 a6989586621680678924) instance forall a6989586621680678417 (a6989586621680678925 :: GHC.Types.Nat) (a6989586621680678924 :: Data.Functor.Identity.Identity a6989586621680678417). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.ShowsPrec_6989586621680678927Sym2 a6989586621680678925 a6989586621680678924) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680678909Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Identity.Identity a) instance forall a6989586621680678414 (a6989586621680678907 :: Data.Functor.Identity.Identity a6989586621680678414). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680678909Sym1 a6989586621680678907) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromInteger_6989586621680678898Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Signum_6989586621680678891Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Abs_6989586621680678884Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Negate_6989586621680678877Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680678869Sym0 instance forall a6989586621680678403 (a6989586621680678867 :: Data.Functor.Identity.Identity a6989586621680678403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680678869Sym1 a6989586621680678867) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680678857Sym0 instance forall a6989586621680678403 (a6989586621680678855 :: Data.Functor.Identity.Identity a6989586621680678403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680678857Sym1 a6989586621680678855) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.TFHelper_6989586621680678845Sym0 instance forall a6989586621680678403 (a6989586621680678843 :: Data.Functor.Identity.Identity a6989586621680678403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.TFHelper_6989586621680678845Sym1 a6989586621680678843) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Identity.Identity a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680678830Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Identity.Identity a) instance forall a6989586621680678392 (a6989586621680678827 :: Data.Functor.Identity.Identity a6989586621680678392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680678830Sym1 a6989586621680678827) instance forall a6989586621680678392 (a6989586621680678828 :: Data.Functor.Identity.Identity a6989586621680678392) (a6989586621680678827 :: Data.Functor.Identity.Identity a6989586621680678392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromThenTo_6989586621680678830Sym2 a6989586621680678828 a6989586621680678827) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680678814Sym0 instance forall a6989586621680678392 (a6989586621680678812 :: Data.Functor.Identity.Identity a6989586621680678392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Identity.EnumFromTo_6989586621680678814Sym1 a6989586621680678812) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.FromEnum_6989586621680678803Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.ToEnum_6989586621680678796Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Pred_6989586621680678789Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Identity.Succ_6989586621680678782Sym0 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_a78UM :: Const a_a78UK b_a78UL) :: a_a78UK data ConstSym0 :: forall (a6989586621679092839 :: Type) k6989586621679092838 (b6989586621679092840 :: k6989586621679092838). (~>) a6989586621679092839 (Const (a6989586621679092839 :: Type) (b6989586621679092840 :: k6989586621679092838)) type ConstSym1 (t6989586621680712043 :: a6989586621679092839) = 'Const t6989586621680712043 data GetConstSym0 :: forall a6989586621680712358 b6989586621680712359. (~>) (Const a6989586621680712358 b6989586621680712359) a6989586621680712358 type GetConstSym1 (x6989586621680712360 :: Const a6989586621680712358 b6989586621680712359) = GetConst x6989586621680712360 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_6989586621680714496Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Functor.Const.Const m) instance forall m6989586621680713763 a6989586621679545133 b6989586621679545134 (a6989586621680714494 :: Data.Functor.Const.Const m6989586621680713763 (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714496Sym1 a6989586621680714494) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.LiftA2_6989586621680714483Sym0 instance forall m6989586621680713763 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680714480 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680714483Sym1 a6989586621680714480) instance forall m6989586621680713763 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680714481 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680714480 :: Data.Functor.Const.Const m6989586621680713763 a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.LiftA2_6989586621680714483Sym2 a6989586621680714481 a6989586621680714480) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pure_6989586621680714469Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Foldr_6989586621680714461Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Functor.Const.Const m) instance forall m6989586621680713762 a6989586621680452727 b6989586621680452728 (a6989586621680714458 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680714461Sym1 a6989586621680714458) instance forall m6989586621680713762 a6989586621680452727 b6989586621680452728 (a6989586621680714459 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680714458 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Foldr_6989586621680714461Sym2 a6989586621680714459 a6989586621680714458) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680714447Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Functor.Const.Const m) instance forall k1 k2 k3 k4 k5 (_f_69895866216807141976989586621680714444 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714447Sym1 _f_69895866216807141976989586621680714444) instance forall k1 k2 k3 k4 k5 (_z_69895866216807141996989586621680714445 :: k5) (_f_69895866216807141976989586621680714444 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714447Sym2 _z_69895866216807141996989586621680714445 _f_69895866216807141976989586621680714444) instance forall k1 k2 k3 k4 k5 (a_69895866216807142096989586621680714446 :: k5) (_z_69895866216807141996989586621680714445 :: k4) (_f_69895866216807141976989586621680714444 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714447Sym3 a_69895866216807142096989586621680714446 _z_69895866216807141996989586621680714445 _f_69895866216807141976989586621680714444) instance forall k1 k2 k3 k4 k5 (t6989586621680714451 :: k5) (a_69895866216807142096989586621680714446 :: k4) (_z_69895866216807141996989586621680714445 :: k3) (_f_69895866216807141976989586621680714444 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714447Sym4 t6989586621680714451 a_69895866216807142096989586621680714446 _z_69895866216807141996989586621680714445 _f_69895866216807141976989586621680714444) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FoldMap_6989586621680714434Sym0 instance forall m6989586621680713762 a6989586621680452726 m6989586621680452725 (a6989586621680714432 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.FoldMap_6989586621680714434Sym1 a6989586621680714432) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680714425Sym0 instance forall k1 k2 k3 k4 (_f_69895866216807141976989586621680714423 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714425Sym1 _f_69895866216807141976989586621680714423) instance forall k1 k2 k3 k4 (a_69895866216807142036989586621680714424 :: k4) (_f_69895866216807141976989586621680714423 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714425Sym2 a_69895866216807142036989586621680714424 _f_69895866216807141976989586621680714423) instance forall a6989586621679545129 k (b6989586621679545130 :: k) m6989586621680713761. Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680714415Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Functor.Const.Const m) instance forall k (b6989586621679545130 :: k) m6989586621680713761 a6989586621679545129 (a6989586621680714413 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714415Sym1 a6989586621680714413) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680714406Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Functor.Const.Const m) instance forall k1 k2 k3 (_z_69895866216807141766989586621680714404 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714406Sym1 _z_69895866216807141766989586621680714404) instance forall k1 k2 k3 (a_69895866216807141846989586621680714405 :: k3) (_z_69895866216807141766989586621680714404 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714406Sym2 a_69895866216807141846989586621680714405 _z_69895866216807141766989586621680714404) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Fmap_6989586621680714396Sym0 instance forall m6989586621680713761 a6989586621679545127 b6989586621679545128 (a6989586621680714394 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Fmap_6989586621680714396Sym1 a6989586621680714394) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Lambda_6989586621680714387Sym0 instance forall k1 k2 k3 (_f_69895866216807141746989586621680714385 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714387Sym1 _f_69895866216807141746989586621680714385) instance forall k1 k2 k3 (a_69895866216807141806989586621680714386 :: k3) (_f_69895866216807141746989586621680714385 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Lambda_6989586621680714387Sym2 a_69895866216807141806989586621680714386 _f_69895866216807141746989586621680714385) instance forall a6989586621680713757 k (b6989586621680713758 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ShowsPrec_6989586621680714376Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Show.PShow (Data.Functor.Const.Const a b) instance forall a6989586621680713757 k (b6989586621680713758 :: k) (a6989586621680714373 :: GHC.Types.Nat). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680714376Sym1 a6989586621680714373) instance forall a6989586621680713757 k (b6989586621680713758 :: k) (a6989586621680714374 :: GHC.Types.Nat) (a6989586621680714373 :: Data.Functor.Const.Const a6989586621680713757 b6989586621680713758). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.ShowsPrec_6989586621680714376Sym2 a6989586621680714374 a6989586621680714373) instance forall a6989586621680713753 k (b6989586621680713754 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680714358Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Functor.Const.Const a b) instance forall a6989586621680713753 k (b6989586621680713754 :: k) (a6989586621680714356 :: Data.Functor.Const.Const a6989586621680713753 b6989586621680713754). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714358Sym1 a6989586621680714356) instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromInteger_6989586621680714347Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Num.PNum (Data.Functor.Const.Const a b) instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Signum_6989586621680714340Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Abs_6989586621680714333Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Negate_6989586621680714326Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680714318Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k) (a6989586621680714316 :: Data.Functor.Const.Const a6989586621680713741 b6989586621680713742). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714318Sym1 a6989586621680714316) instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680714306Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k) (a6989586621680714304 :: Data.Functor.Const.Const a6989586621680713741 b6989586621680713742). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714306Sym1 a6989586621680714304) instance forall a6989586621680713741 k (b6989586621680713742 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.TFHelper_6989586621680714294Sym0 instance forall a6989586621680713741 k (b6989586621680713742 :: k) (a6989586621680714292 :: Data.Functor.Const.Const a6989586621680713741 b6989586621680713742). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.TFHelper_6989586621680714294Sym1 a6989586621680714292) instance forall k a (b :: k). Data.Singletons.Prelude.Monoid.PMonoid (Data.Functor.Const.Const a b) instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680714279Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Enum.PEnum (Data.Functor.Const.Const a b) instance forall a6989586621680713728 k (b6989586621680713729 :: k) (a6989586621680714276 :: Data.Functor.Const.Const a6989586621680713728 b6989586621680713729). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680714279Sym1 a6989586621680714276) instance forall a6989586621680713728 k (b6989586621680713729 :: k) (a6989586621680714277 :: Data.Functor.Const.Const a6989586621680713728 b6989586621680713729) (a6989586621680714276 :: Data.Functor.Const.Const a6989586621680713728 b6989586621680713729). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromThenTo_6989586621680714279Sym2 a6989586621680714277 a6989586621680714276) instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.EnumFromTo_6989586621680714263Sym0 instance forall a6989586621680713728 k (b6989586621680713729 :: k) (a6989586621680714261 :: Data.Functor.Const.Const a6989586621680713728 b6989586621680713729). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.EnumFromTo_6989586621680714263Sym1 a6989586621680714261) instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.FromEnum_6989586621680714252Sym0 instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ToEnum_6989586621680714245Sym0 instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Pred_6989586621680714238Sym0 instance forall a6989586621680713728 k (b6989586621680713729 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Succ_6989586621680714231Sym0 instance forall a6989586621680713726 k (b6989586621680713727 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.Compare_6989586621680714223Sym0 instance forall k a (b :: k). Data.Singletons.Prelude.Ord.POrd (Data.Functor.Const.Const a b) instance forall a6989586621680713726 k (b6989586621680713727 :: k) (a6989586621680714221 :: Data.Functor.Const.Const a6989586621680713726 b6989586621680713727). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Const.Compare_6989586621680714223Sym1 a6989586621680714221) 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 a6989586621680712358 k (b6989586621680712359 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.GetConstSym0 instance forall a6989586621679092839 k6989586621679092838 (b6989586621679092840 :: k6989586621679092838). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Const.ConstSym0 instance forall a6989586621679092839 k6989586621679092838 (b6989586621679092840 :: k6989586621679092838). 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_a7iXU, PFoldable t_a7iXU) => PTraversable (t_a7iXU :: Type -> Type) where { type family Traverse (arg_a7iY6 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (arg_a7iY7 :: t_a7iXU a_a7iXW) :: f_a7iXV (t_a7iXU b_a7iXX); type family SequenceA (arg_a7iYa :: t_a7iXU (f_a7iXY a_a7iXZ)) :: f_a7iXY (t_a7iXU a_a7iXZ); type family MapM (arg_a7iYc :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (arg_a7iYd :: t_a7iXU a_a7iY1) :: m_a7iY0 (t_a7iXU b_a7iY2); type family Sequence (arg_a7iYg :: t_a7iXU (m_a7iY3 a_a7iY4)) :: m_a7iY3 (t_a7iXU a_a7iY4); type Traverse a_a7iYq a_a7iYr = Apply (Apply Traverse_6989586621680751028Sym0 a_a7iYq) a_a7iYr; type SequenceA a_a7iYB = Apply SequenceA_6989586621680751038Sym0 a_a7iYB; type MapM a_a7iYP a_a7iYQ = Apply (Apply MapM_6989586621680751053Sym0 a_a7iYP) a_a7iYQ; type Sequence a_a7iZ0 = Apply Sequence_6989586621680751063Sym0 a_a7iZ0; } class (SFunctor t_a7iXU, SFoldable t_a7iXU) => STraversable (t_a7iXU :: Type -> Type) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) ~ Apply (Apply Traverse_6989586621680751028Sym0 t_a7iZ4) t_a7iZ5, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) ~ Apply SequenceA_6989586621680751038Sym0 t_a7iZ8, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) ~ Apply (Apply MapM_6989586621680751053Sym0 t_a7iZa) t_a7iZb, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) ~ Apply Sequence_6989586621680751063Sym0 t_a7iZe, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) type family For (a_a7kz4 :: t_a7kpZ a_a7kq1) (a_a7kz5 :: (~>) a_a7kq1 (f_a7kq0 b_a7kq2)) :: f_a7kq0 (t_a7kpZ b_a7kq2) sFor :: forall t_a7kpZ f_a7kq0 a_a7kq1 b_a7kq2 (t_a7kIr :: t_a7kpZ a_a7kq1) (t_a7kIs :: (~>) a_a7kq1 (f_a7kq0 b_a7kq2)). (STraversable t_a7kpZ, SApplicative f_a7kq0) => Sing t_a7kIr -> Sing t_a7kIs -> Sing (Apply (Apply ForSym0 t_a7kIr) t_a7kIs :: f_a7kq0 (t_a7kpZ b_a7kq2)) type family ForM (a_a7kyU :: t_a7kpV a_a7kpX) (a_a7kyV :: (~>) a_a7kpX (m_a7kpW b_a7kpY)) :: m_a7kpW (t_a7kpV b_a7kpY) sForM :: forall t_a7kpV m_a7kpW a_a7kpX b_a7kpY (t_a7kIn :: t_a7kpV a_a7kpX) (t_a7kIo :: (~>) a_a7kpX (m_a7kpW b_a7kpY)). (STraversable t_a7kpV, SMonad m_a7kpW) => Sing t_a7kIn -> Sing t_a7kIo -> Sing (Apply (Apply ForMSym0 t_a7kIn) t_a7kIo :: m_a7kpW (t_a7kpV b_a7kpY)) type family MapAccumL (a_a7kyz :: (~>) a_a7kpS ((~>) b_a7kpT (a_a7kpS, c_a7kpU))) (a_a7kyA :: a_a7kpS) (a_a7kyB :: t_a7kpR b_a7kpT) :: (a_a7kpS, t_a7kpR c_a7kpU) sMapAccumL :: forall t_a7kpR a_a7kpS b_a7kpT c_a7kpU (t_a7kIh :: (~>) a_a7kpS ((~>) b_a7kpT (a_a7kpS, c_a7kpU))) (t_a7kIi :: a_a7kpS) (t_a7kIj :: t_a7kpR b_a7kpT). STraversable t_a7kpR => Sing t_a7kIh -> Sing t_a7kIi -> Sing t_a7kIj -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7kIh) t_a7kIi) t_a7kIj :: (a_a7kpS, t_a7kpR c_a7kpU)) type family MapAccumR (a_a7kyi :: (~>) a_a7kpO ((~>) b_a7kpP (a_a7kpO, c_a7kpQ))) (a_a7kyj :: a_a7kpO) (a_a7kyk :: t_a7kpN b_a7kpP) :: (a_a7kpO, t_a7kpN c_a7kpQ) sMapAccumR :: forall t_a7kpN a_a7kpO b_a7kpP c_a7kpQ (t_a7kIb :: (~>) a_a7kpO ((~>) b_a7kpP (a_a7kpO, c_a7kpQ))) (t_a7kIc :: a_a7kpO) (t_a7kId :: t_a7kpN b_a7kpP). STraversable t_a7kpN => Sing t_a7kIb -> Sing t_a7kIc -> Sing t_a7kId -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7kIb) t_a7kIc) t_a7kId :: (a_a7kpO, t_a7kpN c_a7kpQ)) type family FmapDefault (a_a7ky5 :: (~>) a_a7kpL b_a7kpM) (a_a7ky6 :: t_a7kpK a_a7kpL) :: t_a7kpK b_a7kpM sFmapDefault :: forall t_a7kpK a_a7kpL b_a7kpM (t_a7kI7 :: (~>) a_a7kpL b_a7kpM) (t_a7kI8 :: t_a7kpK a_a7kpL). STraversable t_a7kpK => Sing t_a7kI7 -> Sing t_a7kI8 -> Sing (Apply (Apply FmapDefaultSym0 t_a7kI7) t_a7kI8 :: t_a7kpK b_a7kpM) type family FoldMapDefault (a_a7kxK :: (~>) a_a7kpJ m_a7kpI) (a_a7kxL :: t_a7kpH a_a7kpJ) :: m_a7kpI sFoldMapDefault :: forall t_a7kpH m_a7kpI a_a7kpJ (t_a7kI3 :: (~>) a_a7kpJ m_a7kpI) (t_a7kI4 :: t_a7kpH a_a7kpJ). (STraversable t_a7kpH, SMonoid m_a7kpI) => Sing t_a7kI3 -> Sing t_a7kI4 -> Sing (Apply (Apply FoldMapDefaultSym0 t_a7kI3) t_a7kI4 :: m_a7kpI) data TraverseSym0 :: forall a6989586621680750996 b6989586621680750997 f6989586621680750995 t6989586621680750994. (~>) ((~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) ((~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997))) data TraverseSym1 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997)) type TraverseSym2 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) (arg6989586621680751007 :: t6989586621680750994 a6989586621680750996) = Traverse arg6989586621680751006 arg6989586621680751007 data SequenceASym0 :: forall a6989586621680750999 f6989586621680750998 t6989586621680750994. (~>) (t6989586621680750994 (f6989586621680750998 a6989586621680750999)) (f6989586621680750998 (t6989586621680750994 a6989586621680750999)) type SequenceASym1 (arg6989586621680751010 :: t6989586621680750994 (f6989586621680750998 a6989586621680750999)) = SequenceA arg6989586621680751010 data MapMSym0 :: forall a6989586621680751001 b6989586621680751002 m6989586621680751000 t6989586621680750994. (~>) ((~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) ((~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002))) data MapMSym1 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002)) type MapMSym2 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) (arg6989586621680751013 :: t6989586621680750994 a6989586621680751001) = MapM arg6989586621680751012 arg6989586621680751013 data SequenceSym0 :: forall a6989586621680751004 m6989586621680751003 t6989586621680750994. (~>) (t6989586621680750994 (m6989586621680751003 a6989586621680751004)) (m6989586621680751003 (t6989586621680750994 a6989586621680751004)) type SequenceSym1 (arg6989586621680751016 :: t6989586621680750994 (m6989586621680751003 a6989586621680751004)) = Sequence arg6989586621680751016 data ForSym0 :: forall a6989586621680756581 b6989586621680756582 f6989586621680756580 t6989586621680756579. (~>) (t6989586621680756579 a6989586621680756581) ((~>) ((~>) a6989586621680756581 (f6989586621680756580 b6989586621680756582)) (f6989586621680756580 (t6989586621680756579 b6989586621680756582))) data ForSym1 (a6989586621680757142 :: t6989586621680756579 a6989586621680756581) :: forall b6989586621680756582 f6989586621680756580. (~>) ((~>) a6989586621680756581 (f6989586621680756580 b6989586621680756582)) (f6989586621680756580 (t6989586621680756579 b6989586621680756582)) type ForSym2 (a6989586621680757142 :: t6989586621680756579 a6989586621680756581) (a6989586621680757143 :: (~>) a6989586621680756581 (f6989586621680756580 b6989586621680756582)) = For a6989586621680757142 a6989586621680757143 data ForMSym0 :: forall a6989586621680756577 b6989586621680756578 m6989586621680756576 t6989586621680756575. (~>) (t6989586621680756575 a6989586621680756577) ((~>) ((~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) (m6989586621680756576 (t6989586621680756575 b6989586621680756578))) data ForMSym1 (a6989586621680757132 :: t6989586621680756575 a6989586621680756577) :: forall b6989586621680756578 m6989586621680756576. (~>) ((~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) (m6989586621680756576 (t6989586621680756575 b6989586621680756578)) type ForMSym2 (a6989586621680757132 :: t6989586621680756575 a6989586621680756577) (a6989586621680757133 :: (~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) = ForM a6989586621680757132 a6989586621680757133 data MapAccumLSym0 :: forall a6989586621680756572 b6989586621680756573 c6989586621680756574 t6989586621680756571. (~>) ((~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) ((~>) a6989586621680756572 ((~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574))) data MapAccumLSym1 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) :: forall t6989586621680756571. (~>) a6989586621680756572 ((~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574)) data MapAccumLSym2 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) (a6989586621680757112 :: a6989586621680756572) :: forall t6989586621680756571. (~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574) type MapAccumLSym3 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) (a6989586621680757112 :: a6989586621680756572) (a6989586621680757113 :: t6989586621680756571 b6989586621680756573) = MapAccumL a6989586621680757111 a6989586621680757112 a6989586621680757113 data MapAccumRSym0 :: forall a6989586621680756568 b6989586621680756569 c6989586621680756570 t6989586621680756567. (~>) ((~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) ((~>) a6989586621680756568 ((~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570))) data MapAccumRSym1 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) :: forall t6989586621680756567. (~>) a6989586621680756568 ((~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570)) data MapAccumRSym2 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) (a6989586621680757095 :: a6989586621680756568) :: forall t6989586621680756567. (~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570) type MapAccumRSym3 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) (a6989586621680757095 :: a6989586621680756568) (a6989586621680757096 :: t6989586621680756567 b6989586621680756569) = MapAccumR a6989586621680757094 a6989586621680757095 a6989586621680757096 data FmapDefaultSym0 :: forall a6989586621680756565 b6989586621680756566 t6989586621680756564. (~>) ((~>) a6989586621680756565 b6989586621680756566) ((~>) (t6989586621680756564 a6989586621680756565) (t6989586621680756564 b6989586621680756566)) data FmapDefaultSym1 (a6989586621680757081 :: (~>) a6989586621680756565 b6989586621680756566) :: forall t6989586621680756564. (~>) (t6989586621680756564 a6989586621680756565) (t6989586621680756564 b6989586621680756566) type FmapDefaultSym2 (a6989586621680757081 :: (~>) a6989586621680756565 b6989586621680756566) (a6989586621680757082 :: t6989586621680756564 a6989586621680756565) = FmapDefault a6989586621680757081 a6989586621680757082 data FoldMapDefaultSym0 :: forall a6989586621680756563 m6989586621680756562 t6989586621680756561. (~>) ((~>) a6989586621680756563 m6989586621680756562) ((~>) (t6989586621680756561 a6989586621680756563) m6989586621680756562) data FoldMapDefaultSym1 (a6989586621680757060 :: (~>) a6989586621680756563 m6989586621680756562) :: forall t6989586621680756561. (~>) (t6989586621680756561 a6989586621680756563) m6989586621680756562 type FoldMapDefaultSym2 (a6989586621680757060 :: (~>) a6989586621680756563 m6989586621680756562) (a6989586621680757061 :: t6989586621680756561 a6989586621680756563) = FoldMapDefault a6989586621680757060 a6989586621680757061 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757694Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateR s) instance forall s6989586621680756622 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680757691 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757694Sym1 a6989586621680757691) instance forall s6989586621680756622 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680757692 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680757691 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680756622 a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757694Sym2 a6989586621680757692 a6989586621680757691) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757630Sym0 instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateR s) instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757627 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757630Sym1 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757628 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680757627 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757630Sym2 kx6989586621680757628 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757629 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (kx6989586621680757628 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680757627 :: k2 Data.Singletons.Internal.~> (k3, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757630Sym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757640Sym0 instance forall k2 k3 k4 k5 k6 (f6989586621680757627 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757640Sym1 f6989586621680757627) instance forall k2 k3 k4 k5 k6 (kx6989586621680757628 :: k6) (f6989586621680757627 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757640Sym2 kx6989586621680757628 f6989586621680757627) instance forall k2 k3 k4 k5 k6 (ky6989586621680757629 :: k6) (kx6989586621680757628 :: k4 Data.Singletons.Internal.~> k5) (f6989586621680757627 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757640Sym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633S''Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757627 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S''Sym1 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757628 :: k7) (f6989586621680757627 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S''Sym2 kx6989586621680757628 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757629 :: k7) (kx6989586621680757628 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680757627 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S''Sym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633XSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757627 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633XSym1 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757628 :: k7) (f6989586621680757627 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633XSym2 kx6989586621680757628 f6989586621680757627) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757629 :: k7) (kx6989586621680757628 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680757627 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633XSym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757634Sym0 instance forall k1 k2 k3 k4 (f6989586621680757627 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757634Sym1 f6989586621680757627) instance forall k1 k2 k3 k4 (kx6989586621680757628 :: k4) (f6989586621680757627 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757634Sym2 kx6989586621680757628 f6989586621680757627) instance forall k1 k2 k3 k4 (ky6989586621680757629 :: k4) (kx6989586621680757628 :: k3) (f6989586621680757627 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633X_6989586621680757634Sym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633S'Sym0 instance forall k1 k2 k3 k4 k5 (f6989586621680757627 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S'Sym1 f6989586621680757627) instance forall k1 k2 k3 k4 k5 (kx6989586621680757628 :: k5) (f6989586621680757627 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S'Sym2 kx6989586621680757628 f6989586621680757627) instance forall k1 k2 k3 k4 k5 (ky6989586621680757629 :: k5) (kx6989586621680757628 :: k4) (f6989586621680757627 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633S'Sym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757633YSym0 instance forall k1 k2 k3 k4 k5 (f6989586621680757627 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633YSym1 f6989586621680757627) instance forall k1 k2 k3 k4 k5 (kx6989586621680757628 :: k5) (f6989586621680757627 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633YSym2 kx6989586621680757628 f6989586621680757627) instance forall k1 k2 k3 k4 k5 (ky6989586621680757629 :: k5) (kx6989586621680757628 :: k4) (f6989586621680757627 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757633YSym3 ky6989586621680757629 kx6989586621680757628 f6989586621680757627) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680757617Sym0 instance forall s6989586621680756622 a6989586621679545133 b6989586621679545134 (a6989586621680757615 :: Data.Singletons.Prelude.Traversable.StateR s6989586621680756622 (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680757617Sym1 a6989586621680757615) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757561Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680757559 :: k3 Data.Singletons.Internal.~> (k4, k5 Data.Singletons.Internal.~> k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757561Sym1 kf6989586621680757559) instance forall k2 k3 k4 k5 k6 (kv6989586621680757560 :: k3 Data.Singletons.Internal.~> (k4, k5 Data.Singletons.Internal.~> k6)) (kf6989586621680757559 :: k2 Data.Singletons.Internal.~> (k3, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757561Sym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757571Sym0 instance forall k2 k3 k4 k5 (kf6989586621680757559 :: k4 Data.Singletons.Internal.~> k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757571Sym1 kf6989586621680757559) instance forall k2 k3 k4 k5 (kv6989586621680757560 :: k4 Data.Singletons.Internal.~> k5) (kf6989586621680757559 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757571Sym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564S''Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680757559 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564S''Sym1 kf6989586621680757559) instance forall k2 k3 k4 k5 k6 (kv6989586621680757560 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680757559 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564S''Sym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564FSym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680757559 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564FSym1 kf6989586621680757559) instance forall k2 k3 k4 k5 k6 (kv6989586621680757560 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680757559 :: k2 Data.Singletons.Internal.~> (k4, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564FSym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757565Sym0 instance forall k1 k2 k3 (kf6989586621680757559 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757565Sym1 kf6989586621680757559) instance forall k1 k2 k3 (kv6989586621680757560 :: k3) (kf6989586621680757559 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564X_6989586621680757565Sym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564S'Sym0 instance forall k1 k2 k3 k4 (kf6989586621680757559 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564S'Sym1 kf6989586621680757559) instance forall k1 k2 k3 k4 (kv6989586621680757560 :: k4) (kf6989586621680757559 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564S'Sym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757564VSym0 instance forall k1 k2 k3 k4 (kf6989586621680757559 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564VSym1 kf6989586621680757559) instance forall k1 k2 k3 k4 (kv6989586621680757560 :: k4) (kf6989586621680757559 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757564VSym2 kv6989586621680757560 kf6989586621680757559) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680757552Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757545Sym0 instance forall k2 k3 (x6989586621680757544 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757545Sym1 x6989586621680757544) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680757538Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateR s) instance forall s6989586621680756616 a6989586621679545127 b6989586621679545128 (a6989586621680757536 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680757538Sym1 a6989586621680757536) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757505Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateR s) instance forall k2 k k3 k4 (f6989586621680757503 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757505Sym1 f6989586621680757503) instance forall k2 k k3 k4 (k6989586621680757504 :: k3 Data.Singletons.Internal.~> k4) (f6989586621680757503 :: k2 Data.Singletons.Internal.~> (k, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757505Sym2 k6989586621680757504 f6989586621680757503) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757508X_6989586621680757509Sym0 instance forall k1 k2 k3 (f6989586621680757503 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508X_6989586621680757509Sym1 f6989586621680757503) instance forall k1 k2 k3 (k6989586621680757504 :: k3) (f6989586621680757503 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508X_6989586621680757509Sym2 k6989586621680757504 f6989586621680757503) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757508S'Sym0 instance forall k1 k2 k3 k4 (f6989586621680757503 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508S'Sym1 f6989586621680757503) instance forall k1 k2 k3 k4 (k6989586621680757504 :: k4) (f6989586621680757503 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508S'Sym2 k6989586621680757504 f6989586621680757503) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757508VSym0 instance forall k1 k2 k3 k4 (f6989586621680757503 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508VSym1 f6989586621680757503) instance forall k1 k2 k3 k4 (k6989586621680757504 :: k4) (f6989586621680757503 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757508VSym2 k6989586621680757504 f6989586621680757503) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757494Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative (Data.Singletons.Prelude.Traversable.StateL s) instance forall s6989586621680756598 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680757491 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757494Sym1 a6989586621680757491) instance forall s6989586621680756598 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680757492 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680757491 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680756598 a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.LiftA2_6989586621680757494Sym2 a6989586621680757492 a6989586621680757491) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757430Sym0 instance Data.Singletons.Prelude.Monad.Internal.SApplicative (Data.Singletons.Prelude.Traversable.StateL s) instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757427 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757430Sym1 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757428 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (f6989586621680757427 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757430Sym2 kx6989586621680757428 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757429 :: k5 Data.Singletons.Internal.~> (k6 Data.Singletons.Internal.~> k7)) (kx6989586621680757428 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680757427 :: k4 Data.Singletons.Internal.~> (k2, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757430Sym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757440Sym0 instance forall k2 k3 k4 k5 k6 (f6989586621680757427 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757440Sym1 f6989586621680757427) instance forall k2 k3 k4 k5 k6 (kx6989586621680757428 :: k6) (f6989586621680757427 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757440Sym2 kx6989586621680757428 f6989586621680757427) instance forall k2 k3 k4 k5 k6 (ky6989586621680757429 :: k6) (kx6989586621680757428 :: k3 Data.Singletons.Internal.~> (k4, k5)) (f6989586621680757427 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757440Sym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433S''Sym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757427 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S''Sym1 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757428 :: k7) (f6989586621680757427 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S''Sym2 kx6989586621680757428 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757429 :: k7) (kx6989586621680757428 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680757427 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S''Sym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433YSym0 instance forall k2 k3 k4 k5 k6 k7 (f6989586621680757427 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433YSym1 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (kx6989586621680757428 :: k7) (f6989586621680757427 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433YSym2 kx6989586621680757428 f6989586621680757427) instance forall k2 k3 k4 k5 k6 k7 (ky6989586621680757429 :: k7) (kx6989586621680757428 :: k4 Data.Singletons.Internal.~> (k5, k6)) (f6989586621680757427 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433YSym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757434Sym0 instance forall k1 k2 k3 k4 (f6989586621680757427 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757434Sym1 f6989586621680757427) instance forall k1 k2 k3 k4 (kx6989586621680757428 :: k4) (f6989586621680757427 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757434Sym2 kx6989586621680757428 f6989586621680757427) instance forall k1 k2 k3 k4 (ky6989586621680757429 :: k4) (kx6989586621680757428 :: k2 Data.Singletons.Internal.~> k3) (f6989586621680757427 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433X_6989586621680757434Sym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433S'Sym0 instance forall k1 k2 k3 k4 k5 (f6989586621680757427 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S'Sym1 f6989586621680757427) instance forall k1 k2 k3 k4 k5 (kx6989586621680757428 :: k5) (f6989586621680757427 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S'Sym2 kx6989586621680757428 f6989586621680757427) instance forall k1 k2 k3 k4 k5 (ky6989586621680757429 :: k5) (kx6989586621680757428 :: k2 Data.Singletons.Internal.~> (k3, k4)) (f6989586621680757427 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433S'Sym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757433XSym0 instance forall k1 k2 k3 k4 k5 (f6989586621680757427 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433XSym1 f6989586621680757427) instance forall k1 k2 k3 k4 k5 (kx6989586621680757428 :: k5) (f6989586621680757427 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433XSym2 kx6989586621680757428 f6989586621680757427) instance forall k1 k2 k3 k4 k5 (ky6989586621680757429 :: k5) (kx6989586621680757428 :: k2 Data.Singletons.Internal.~> (k3, k4)) (f6989586621680757427 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757433XSym3 ky6989586621680757429 kx6989586621680757428 f6989586621680757427) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TFHelper_6989586621680757417Sym0 instance forall s6989586621680756598 a6989586621679545133 b6989586621679545134 (a6989586621680757415 :: Data.Singletons.Prelude.Traversable.StateL s6989586621680756598 (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TFHelper_6989586621680757417Sym1 a6989586621680757415) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757361Sym0 instance forall k k2 k3 k4 k5 (kf6989586621680757359 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757361Sym1 kf6989586621680757359) instance forall k k2 k3 k4 k5 (kv6989586621680757360 :: k2 Data.Singletons.Internal.~> (k3, k4 Data.Singletons.Internal.~> k5)) (kf6989586621680757359 :: k3 Data.Singletons.Internal.~> (k, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757361Sym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757371Sym0 instance forall k2 k3 k4 k5 (kf6989586621680757359 :: k3 Data.Singletons.Internal.~> (k4, k5)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757371Sym1 kf6989586621680757359) instance forall k2 k3 k4 k5 (kv6989586621680757360 :: k3 Data.Singletons.Internal.~> (k4, k5)) (kf6989586621680757359 :: k4 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757371Sym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364S''Sym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680757359 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364S''Sym1 kf6989586621680757359) instance forall k2 k3 k4 k5 k6 (kv6989586621680757360 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680757359 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364S''Sym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364VSym0 instance forall k2 k3 k4 k5 k6 (kf6989586621680757359 :: k4 Data.Singletons.Internal.~> (k5, k6)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364VSym1 kf6989586621680757359) instance forall k2 k3 k4 k5 k6 (kv6989586621680757360 :: k4 Data.Singletons.Internal.~> (k5, k6)) (kf6989586621680757359 :: k5 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364VSym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757365Sym0 instance forall k1 k2 k3 (kf6989586621680757359 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757365Sym1 kf6989586621680757359) instance forall k1 k2 k3 (kv6989586621680757360 :: k2 Data.Singletons.Internal.~> k3) (kf6989586621680757359 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364X_6989586621680757365Sym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364S'Sym0 instance forall k1 k2 k3 k4 (kf6989586621680757359 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364S'Sym1 kf6989586621680757359) instance forall k1 k2 k3 k4 (kv6989586621680757360 :: k2 Data.Singletons.Internal.~> (k3, k4)) (kf6989586621680757359 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364S'Sym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757364FSym0 instance forall k1 k2 k3 k4 (kf6989586621680757359 :: k2 Data.Singletons.Internal.~> (k3, k4)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364FSym1 kf6989586621680757359) instance forall k1 k2 k3 k4 (kv6989586621680757360 :: k2 Data.Singletons.Internal.~> (k3, k4)) (kf6989586621680757359 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757364FSym2 kv6989586621680757360 kf6989586621680757359) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Pure_6989586621680757352Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757345Sym0 instance forall k2 k3 (x6989586621680757344 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757345Sym1 x6989586621680757344) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Fmap_6989586621680757338Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Singletons.Prelude.Traversable.StateL s) instance forall s6989586621680756592 a6989586621679545127 b6989586621679545128 (a6989586621680757336 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Fmap_6989586621680757338Sym1 a6989586621680757336) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Lambda_6989586621680757305Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Singletons.Prelude.Traversable.StateL s) instance forall k2 k k3 k4 (f6989586621680757303 :: k3 Data.Singletons.Internal.~> k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757305Sym1 f6989586621680757303) instance forall k2 k k3 k4 (k6989586621680757304 :: k3 Data.Singletons.Internal.~> k4) (f6989586621680757303 :: k2 Data.Singletons.Internal.~> (k, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Lambda_6989586621680757305Sym2 k6989586621680757304 f6989586621680757303) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757308X_6989586621680757309Sym0 instance forall k1 k2 k3 (f6989586621680757303 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308X_6989586621680757309Sym1 f6989586621680757303) instance forall k1 k2 k3 (k6989586621680757304 :: k3) (f6989586621680757303 :: k1 Data.Singletons.Internal.~> k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308X_6989586621680757309Sym2 k6989586621680757304 f6989586621680757303) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757308S'Sym0 instance forall k1 k2 k3 k4 (f6989586621680757303 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308S'Sym1 f6989586621680757303) instance forall k1 k2 k3 k4 (k6989586621680757304 :: k4) (f6989586621680757303 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308S'Sym2 k6989586621680757304 f6989586621680757303) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757308VSym0 instance forall k1 k2 k3 k4 (f6989586621680757303 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308VSym1 f6989586621680757303) instance forall k1 k2 k3 k4 (k6989586621680757304 :: k4) (f6989586621680757303 :: k1 Data.Singletons.Internal.~> (k2, k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757308VSym2 k6989586621680757304 f6989586621680757303) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757295Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Functor.Identity.Identity instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757293 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757295Sym1 a6989586621680757293) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757283Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.Last instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757281 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757283Sym1 a6989586621680757281) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757271Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Monoid.First instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757269 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757271Sym1 a6989586621680757269) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757259Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Product instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757257 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757259Sym1 a6989586621680757257) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757247Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Sum instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757245 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757247Sym1 a6989586621680757245) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757235Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Internal.Dual instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757233 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757235Sym1 a6989586621680757233) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757223Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Functor.Const.Const m) instance forall m6989586621680756591 a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757221 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757223Sym1 a6989586621680757221) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757211Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable ((,) a) instance forall a6989586621680756590 a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757209 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757211Sym1 a6989586621680757209) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757198Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Either.Either a) instance forall a6989586621680756589 a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757196 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757198Sym1 a6989586621680757196) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757184Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Base.NonEmpty instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757182 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757184Sym1 a6989586621680757182) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757171Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable [] instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757169 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757171Sym1 a6989586621680757169) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680757157Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable GHC.Maybe.Maybe instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680757155 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680757157Sym1 a6989586621680757155) 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 b6989586621680756582 (f6989586621680756580 :: * -> *) (t6989586621680756579 :: * -> *) a6989586621680756581 (a6989586621680757142 :: t6989586621680756579 a6989586621680756581). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForSym1 a6989586621680757142) 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 b6989586621680756578 (m6989586621680756576 :: * -> *) (t6989586621680756575 :: * -> *) a6989586621680756577 (a6989586621680757132 :: t6989586621680756575 a6989586621680756577). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.ForMSym1 a6989586621680757132) 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 (t6989586621680756571 :: * -> *) b6989586621680756573 a6989586621680756572 c6989586621680756574 (a6989586621680757111 :: a6989586621680756572 Data.Singletons.Internal.~> (b6989586621680756573 Data.Singletons.Internal.~> (a6989586621680756572, c6989586621680756574))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym1 a6989586621680757111) 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 (t6989586621680756571 :: * -> *) b6989586621680756573 a6989586621680756572 c6989586621680756574 (a6989586621680757112 :: a6989586621680756572 Data.Singletons.Internal.~> (b6989586621680756573 Data.Singletons.Internal.~> (a6989586621680756572, c6989586621680756574))) (a6989586621680757111 :: a6989586621680756572). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumLSym2 a6989586621680757112 a6989586621680757111) 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 (t6989586621680756567 :: * -> *) b6989586621680756569 a6989586621680756568 c6989586621680756570 (a6989586621680757094 :: a6989586621680756568 Data.Singletons.Internal.~> (b6989586621680756569 Data.Singletons.Internal.~> (a6989586621680756568, c6989586621680756570))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym1 a6989586621680757094) 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 (t6989586621680756567 :: * -> *) b6989586621680756569 a6989586621680756568 c6989586621680756570 (a6989586621680757095 :: a6989586621680756568 Data.Singletons.Internal.~> (b6989586621680756569 Data.Singletons.Internal.~> (a6989586621680756568, c6989586621680756570))) (a6989586621680757094 :: a6989586621680756568). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapAccumRSym2 a6989586621680757095 a6989586621680757094) 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 (t6989586621680756564 :: * -> *) a6989586621680756565 b6989586621680756566 (a6989586621680757081 :: a6989586621680756565 Data.Singletons.Internal.~> b6989586621680756566). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FmapDefaultSym1 a6989586621680757081) 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 (t6989586621680756561 :: * -> *) a6989586621680756563 m6989586621680756562 (a6989586621680757060 :: a6989586621680756563 Data.Singletons.Internal.~> m6989586621680756562). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.FoldMapDefaultSym1 a6989586621680757060) 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.Let6989586621680757120Scrutinee_6989586621680756655Sym0 instance forall k (t6989586621680750994 :: * -> *) a6989586621680750996 s b6989586621680750997 (f6989586621680757117 :: s Data.Singletons.Internal.~> (a6989586621680750996 Data.Singletons.Internal.~> (s, b6989586621680750997))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757120Scrutinee_6989586621680756655Sym1 f6989586621680757117) instance forall (t6989586621680750994 :: * -> *) k a6989586621680750996 s b6989586621680750997 (s6989586621680757118 :: s Data.Singletons.Internal.~> (a6989586621680750996 Data.Singletons.Internal.~> (s, b6989586621680750997))) (f6989586621680757117 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757120Scrutinee_6989586621680756655Sym2 s6989586621680757118 f6989586621680757117) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757103Scrutinee_6989586621680756659Sym0 instance forall k (t6989586621680750994 :: * -> *) a6989586621680750996 s b6989586621680750997 (f6989586621680757100 :: s Data.Singletons.Internal.~> (a6989586621680750996 Data.Singletons.Internal.~> (s, b6989586621680750997))). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757103Scrutinee_6989586621680756659Sym1 f6989586621680757100) instance forall (t6989586621680750994 :: * -> *) k a6989586621680750996 s b6989586621680750997 (s6989586621680757101 :: s Data.Singletons.Internal.~> (a6989586621680750996 Data.Singletons.Internal.~> (s, b6989586621680750997))) (f6989586621680757100 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757103Scrutinee_6989586621680756659Sym2 s6989586621680757101 f6989586621680757100) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757087Scrutinee_6989586621680756663Sym0 instance forall (t6989586621680750994 :: * -> *) a6989586621680750996 b6989586621680750997 (f6989586621680757085 :: a6989586621680750996 Data.Singletons.Internal.~> b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757087Scrutinee_6989586621680756663Sym1 f6989586621680757085) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757074Scrutinee_6989586621680756666Sym0 instance forall (t6989586621680750994 :: * -> *) a6989586621680750996 b6989586621679520920 (f6989586621680757064 :: a6989586621680750996 Data.Singletons.Internal.~> b6989586621679520920). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757074Scrutinee_6989586621680756666Sym1 f6989586621680757064) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Let6989586621680757066MkConstSym0 instance forall k1 m6989586621680756562 k2 (f6989586621680757064 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757066MkConstSym1 f6989586621680757064) instance forall m6989586621680756562 k1 k2 (x6989586621680757065 :: k2) (f6989586621680757064 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Let6989586621680757066MkConstSym2 x6989586621680757065 f6989586621680757064) 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 (t6989586621680750994 :: * -> *) a6989586621680751001 (m6989586621680751000 :: * -> *) b6989586621680751002 (arg6989586621680751012 :: a6989586621680751001 Data.Singletons.Internal.~> m6989586621680751000 b6989586621680751002). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapMSym1 arg6989586621680751012) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceSym0 instance forall (t6989586621680750994 :: * -> *) a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (arg6989586621680751006 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.TraverseSym1 arg6989586621680751006) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.TraverseSym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceASym0 instance forall (t6989586621680750994 :: * -> *) a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680751026 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.Traverse_6989586621680751028Sym1 a6989586621680751026) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Traverse_6989586621680751028Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.SequenceA_6989586621680751038Sym0 instance forall (t6989586621680750994 :: * -> *) a6989586621680751001 (m6989586621680751000 :: * -> *) b6989586621680751002 (a6989586621680751051 :: a6989586621680751001 Data.Singletons.Internal.~> m6989586621680751000 b6989586621680751002). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Traversable.MapM_6989586621680751053Sym1 a6989586621680751051) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.MapM_6989586621680751053Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Traversable.Sequence_6989586621680751063Sym0 -- | Defines the promoted version of Semigroup, PSemigroup, -- and the singleton version, SSemigroup. module Data.Singletons.Prelude.Semigroup class PSemigroup (a_a3mgl :: Type) where { type family (<>) (arg_a3moa :: a_a3mgl) (arg_a3mob :: a_a3mgl) :: a_a3mgl; type family Sconcat (arg_a3moe :: NonEmpty a_a3mgl) :: a_a3mgl; type Sconcat a_a3mov = Apply Sconcat_6989586621679810864Sym0 a_a3mov; } infixr 6 <> class SSemigroup a_a3mgl (%<>) :: forall (t_a3mrY :: a_a3mgl) (t_a3mrZ :: a_a3mgl). SSemigroup a_a3mgl => Sing t_a3mrY -> Sing t_a3mrZ -> Sing (Apply (Apply (<>@#@$) t_a3mrY) t_a3mrZ :: a_a3mgl) sSconcat :: forall (t_a3ms2 :: NonEmpty a_a3mgl). SSemigroup a_a3mgl => Sing t_a3ms2 -> Sing (Apply SconcatSym0 t_a3ms2 :: a_a3mgl) sSconcat :: forall (t_a3ms2 :: NonEmpty a_a3mgl). (SSemigroup a_a3mgl, (Apply SconcatSym0 t_a3ms2 :: a_a3mgl) ~ Apply Sconcat_6989586621679810864Sym0 t_a3ms2) => Sing t_a3ms2 -> Sing (Apply SconcatSym0 t_a3ms2 :: a_a3mgl) infixr 6 %<> -- | The singleton kind-indexed data family. data family Sing :: k -> Type type family GetMin (a_a3oOa :: Min a_adZe) :: a_adZe type family GetMax (a_a3oOr :: Max a_adZk) :: a_adZk type family GetFirst (a_a3oOI :: First a_adZy) :: a_adZy type family GetLast (a_a3oOZ :: Last a_adZE) :: a_adZE type family GetDual (a_a3oMT :: Dual a_ak37) :: a_ak37 type family GetAll (a_a3oN7 :: All) :: Bool type family GetAny (a_a3oNl :: Any) :: Bool type family GetSum (a_a3oNC :: Sum a_ak2S) :: a_ak2S type family GetProduct (a_a3oNT :: Product a_ak2X) :: a_ak2X type family GetOption (a_a3oMC :: Option a_adZQ) :: Maybe a_adZQ type SMin = (Sing :: Min a_adZe -> Type) type SMax = (Sing :: Max a_adZk -> Type) type SFirst = (Sing :: First a_adZy -> Type) type SLast = (Sing :: Last a_adZE -> Type) type SWrappedMonoid = (Sing :: WrappedMonoid m_adZK -> Type) type SDual = (Sing :: Dual a_ak37 -> Type) type SAll = (Sing :: All -> Type) type SAny = (Sing :: Any -> Type) type SSum = (Sing :: Sum a_ak2S -> Type) type SProduct = (Sing :: Product a_ak2X -> Type) type SOption = (Sing :: Option a_adZQ -> Type) type SArg = (Sing :: Arg a_adZr b_adZs -> Type) option_ :: b_a89Mf -> (a_a89Mg -> b_a89Mf) -> Option a_a89Mg -> b_a89Mf sOption_ :: forall b_a89Mf a_a89Mg (t_a89MA :: b_a89Mf) (t_a89MB :: (~>) a_a89Mg b_a89Mf) (t_a89MC :: Option a_a89Mg). Sing t_a89MA -> Sing t_a89MB -> Sing t_a89MC -> Sing (Apply (Apply (Apply Option_Sym0 t_a89MA) t_a89MB) t_a89MC :: b_a89Mf) type family Option_ (a_a89Mr :: b_a89Mf) (a_a89Ms :: (~>) a_a89Mg b_a89Mf) (a_a89Mt :: Option a_a89Mg) :: b_a89Mf data (<>@#@$) :: forall a6989586621679810357. (~>) a6989586621679810357 ((~>) a6989586621679810357 a6989586621679810357) infixr 6 <>@#@$ data (<>@#@$$) (arg6989586621679810842 :: a6989586621679810357) :: (~>) a6989586621679810357 a6989586621679810357 infixr 6 <>@#@$$ type (<>@#@$$$) (arg6989586621679810842 :: a6989586621679810357) (arg6989586621679810843 :: a6989586621679810357) = (<>) arg6989586621679810842 arg6989586621679810843 data SconcatSym0 :: forall a6989586621679810357. (~>) (NonEmpty a6989586621679810357) a6989586621679810357 type SconcatSym1 (arg6989586621679810846 :: NonEmpty a6989586621679810357) = Sconcat arg6989586621679810846 data MinSym0 :: forall (a6989586621679063560 :: Type). (~>) a6989586621679063560 (Min (a6989586621679063560 :: Type)) type MinSym1 (t6989586621679820145 :: a6989586621679063560) = 'Min t6989586621679820145 data GetMinSym0 :: forall a6989586621679063560. (~>) (Min a6989586621679063560) a6989586621679063560 type GetMinSym1 (a6989586621679820142 :: Min a6989586621679063560) = GetMin a6989586621679820142 data MaxSym0 :: forall (a6989586621679063566 :: Type). (~>) a6989586621679063566 (Max (a6989586621679063566 :: Type)) type MaxSym1 (t6989586621679820162 :: a6989586621679063566) = 'Max t6989586621679820162 data GetMaxSym0 :: forall a6989586621679063566. (~>) (Max a6989586621679063566) a6989586621679063566 type GetMaxSym1 (a6989586621679820159 :: Max a6989586621679063566) = GetMax a6989586621679820159 data FirstSym0 :: forall (a6989586621679063580 :: Type). (~>) a6989586621679063580 (First (a6989586621679063580 :: Type)) type FirstSym1 (t6989586621679820179 :: a6989586621679063580) = 'First t6989586621679820179 data GetFirstSym0 :: forall a6989586621679063580. (~>) (First a6989586621679063580) a6989586621679063580 type GetFirstSym1 (a6989586621679820176 :: First a6989586621679063580) = GetFirst a6989586621679820176 data LastSym0 :: forall (a6989586621679063586 :: Type). (~>) a6989586621679063586 (Last (a6989586621679063586 :: Type)) type LastSym1 (t6989586621679820196 :: a6989586621679063586) = 'Last t6989586621679820196 data GetLastSym0 :: forall a6989586621679063586. (~>) (Last a6989586621679063586) a6989586621679063586 type GetLastSym1 (a6989586621679820193 :: Last a6989586621679063586) = GetLast a6989586621679820193 data WrapMonoidSym0 :: forall (m6989586621679063592 :: Type). (~>) m6989586621679063592 (WrappedMonoid (m6989586621679063592 :: Type)) type WrapMonoidSym1 (t6989586621679820213 :: m6989586621679063592) = 'WrapMonoid t6989586621679820213 data UnwrapMonoidSym0 :: forall m6989586621679063592. (~>) (WrappedMonoid m6989586621679063592) m6989586621679063592 type UnwrapMonoidSym1 (a6989586621679820210 :: WrappedMonoid m6989586621679063592) = UnwrapMonoid a6989586621679820210 data DualSym0 :: forall (a6989586621679086865 :: Type). (~>) a6989586621679086865 (Dual (a6989586621679086865 :: Type)) type DualSym1 (t6989586621679820066 :: a6989586621679086865) = 'Dual t6989586621679820066 data GetDualSym0 :: forall a6989586621679086865. (~>) (Dual a6989586621679086865) a6989586621679086865 type GetDualSym1 (a6989586621679820063 :: Dual a6989586621679086865) = GetDual a6989586621679820063 data AllSym0 :: (~>) Bool All type AllSym1 (t6989586621679820080 :: Bool) = 'All t6989586621679820080 data GetAllSym0 :: (~>) All Bool type GetAllSym1 (a6989586621679820077 :: All) = GetAll a6989586621679820077 data AnySym0 :: (~>) Bool Any type AnySym1 (t6989586621679820094 :: Bool) = 'Any t6989586621679820094 data GetAnySym0 :: (~>) Any Bool type GetAnySym1 (a6989586621679820091 :: Any) = GetAny a6989586621679820091 data SumSym0 :: forall (a6989586621679086850 :: Type). (~>) a6989586621679086850 (Sum (a6989586621679086850 :: Type)) type SumSym1 (t6989586621679820111 :: a6989586621679086850) = 'Sum t6989586621679820111 data GetSumSym0 :: forall a6989586621679086850. (~>) (Sum a6989586621679086850) a6989586621679086850 type GetSumSym1 (a6989586621679820108 :: Sum a6989586621679086850) = GetSum a6989586621679820108 data ProductSym0 :: forall (a6989586621679086855 :: Type). (~>) a6989586621679086855 (Product (a6989586621679086855 :: Type)) type ProductSym1 (t6989586621679820128 :: a6989586621679086855) = 'Product t6989586621679820128 data GetProductSym0 :: forall a6989586621679086855. (~>) (Product a6989586621679086855) a6989586621679086855 type GetProductSym1 (a6989586621679820125 :: Product a6989586621679086855) = GetProduct a6989586621679820125 data OptionSym0 :: forall (a6989586621679063598 :: Type). (~>) (Maybe a6989586621679063598) (Option (a6989586621679063598 :: Type)) type OptionSym1 (t6989586621679820049 :: Maybe a6989586621679063598) = 'Option t6989586621679820049 data GetOptionSym0 :: forall a6989586621679063598. (~>) (Option a6989586621679063598) (Maybe a6989586621679063598) type GetOptionSym1 (a6989586621679820046 :: Option a6989586621679063598) = GetOption a6989586621679820046 data ArgSym0 :: forall (a6989586621679063573 :: Type) (b6989586621679063574 :: Type). (~>) a6989586621679063573 ((~>) b6989586621679063574 (Arg (a6989586621679063573 :: Type) (b6989586621679063574 :: Type))) data ArgSym1 (t6989586621680866677 :: (a6989586621679063573 :: Type)) :: forall (b6989586621679063574 :: Type). (~>) b6989586621679063574 (Arg (a6989586621679063573 :: Type) (b6989586621679063574 :: Type)) type ArgSym2 (t6989586621680866677 :: a6989586621679063573) (t6989586621680866678 :: b6989586621679063574) = 'Arg t6989586621680866677 t6989586621680866678 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Option_Sym0 instance Data.Singletons.Internal.SingI Data.Singletons.Prelude.Semigroup.Option_Sym0 instance forall a6989586621680954004 b6989586621680954003 (a6989586621680954015 :: b6989586621680954003). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym1 a6989586621680954015) instance forall b a (d :: b). Data.Singletons.Internal.SingI d => Data.Singletons.Internal.SingI (Data.Singletons.Prelude.Semigroup.Option_Sym1 d) instance forall a6989586621680954004 b6989586621680954003 (a6989586621680954016 :: b6989586621680954003) (a6989586621680954015 :: a6989586621680954004 Data.Singletons.Internal.~> b6989586621680954003). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Option_Sym2 a6989586621680954016 a6989586621680954015) 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_6989586621680886489Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Option instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680886487 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680886489Sym1 a6989586621680886487) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886477Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Option instance forall a6989586621680452726 m6989586621680452725 (a6989586621680886475 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886477Sym1 a6989586621680886475) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Option a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886463Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Option a) instance forall a6989586621680884461 (a6989586621680886461 :: Data.Semigroup.Option a6989586621680884461). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886463Sym1 a6989586621680886461) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886451Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Option instance forall b6989586621679545159 a6989586621679545158 (a6989586621680886449 :: Data.Semigroup.Option a6989586621679545158). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886451Sym1 a6989586621680886449) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886435Sym0 instance forall b6989586621679545157 a6989586621679545156 (a6989586621680886433 :: Data.Semigroup.Option a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886435Sym1 a6989586621680886433) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886423Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Option instance forall b6989586621679545130 a6989586621679545129 (a6989586621680886421 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886423Sym1 a6989586621680886421) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680886411Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680886409 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680886411Sym1 a6989586621680886409) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886399Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Option instance forall b6989586621679545139 a6989586621679545138 (a6989586621680886397 :: Data.Semigroup.Option a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886399Sym1 a6989586621680886397) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886387Sym0 instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680886384 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886387Sym1 a6989586621680886384) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680886385 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680886384 :: Data.Semigroup.Option a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886387Sym2 a6989586621680886385 a6989586621680886384) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886371Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680886369 :: Data.Semigroup.Option (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886371Sym1 a6989586621680886369) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680886360Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886352Sym0 instance Data.Singletons.Prelude.Monad.Internal.PAlternative Data.Semigroup.Option instance forall a6989586621679545210 (a6989586621680886350 :: Data.Semigroup.Option a6989586621679545210). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886352Sym1 a6989586621680886350) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680886348ASym0 instance Data.Singletons.Prelude.Monad.Internal.SAlternative Data.Semigroup.Option instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886335Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.WrappedMonoid a) instance forall a6989586621680884441 (a6989586621680886332 :: Data.Semigroup.WrappedMonoid a6989586621680884441). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886335Sym1 a6989586621680886332) instance forall a6989586621680884441 (a6989586621680886333 :: Data.Semigroup.WrappedMonoid a6989586621680884441) (a6989586621680886332 :: Data.Semigroup.WrappedMonoid a6989586621680884441). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886335Sym2 a6989586621680886333 a6989586621680886332) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680886319Sym0 instance forall a6989586621680884441 (a6989586621680886317 :: Data.Semigroup.WrappedMonoid a6989586621680884441). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680886319Sym1 a6989586621680886317) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680886308Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680886301Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680886292Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680886285Sym0 instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.WrappedMonoid m) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886275Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.WrappedMonoid m) instance forall m6989586621680884437 (a6989586621680886273 :: Data.Semigroup.WrappedMonoid m6989586621680884437). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886275Sym1 a6989586621680886273) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680886263Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Last instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680886261 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680886263Sym1 a6989586621680886261) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886250Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Last instance forall a6989586621680452727 b6989586621680452728 (a6989586621680886247 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886250Sym1 a6989586621680886247) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680886248 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680886247 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886250Sym2 a6989586621680886248 a6989586621680886247) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886234Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680886232 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886234Sym1 a6989586621680886232) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886222Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Last a) instance forall a6989586621680884435 (a6989586621680886220 :: Data.Semigroup.Last a6989586621680884435). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886222Sym1 a6989586621680886220) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886211Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Last instance forall b6989586621679545157 a6989586621679545156 (a6989586621680886209 :: Data.Semigroup.Last a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886211Sym1 a6989586621680886209) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886199Sym0 instance forall b6989586621679545159 a6989586621679545158 (a6989586621680886197 :: Data.Semigroup.Last a6989586621679545158). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886199Sym1 a6989586621680886197) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886183Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Last instance forall b6989586621679545130 a6989586621679545129 (a6989586621680886181 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886183Sym1 a6989586621680886181) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680886174Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Last instance forall k1 k2 k3 (_z_69895866216808849256989586621680886172 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680886174Sym1 _z_69895866216808849256989586621680886172) instance forall k1 k2 k3 (a_69895866216808849316989586621680886173 :: k3) (_z_69895866216808849256989586621680886172 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680886174Sym2 a_69895866216808849316989586621680886173 _z_69895866216808849256989586621680886172) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680886164Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680886162 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680886164Sym1 a6989586621680886162) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886151Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Last a) instance forall a6989586621680884424 (a6989586621680886148 :: Data.Semigroup.Last a6989586621680884424). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886151Sym1 a6989586621680886148) instance forall a6989586621680884424 (a6989586621680886149 :: Data.Semigroup.Last a6989586621680884424) (a6989586621680886148 :: Data.Semigroup.Last a6989586621680884424). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680886151Sym2 a6989586621680886149 a6989586621680886148) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680886135Sym0 instance forall a6989586621680884424 (a6989586621680886133 :: Data.Semigroup.Last a6989586621680884424). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680886135Sym1 a6989586621680886133) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680886124Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680886117Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680886108Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680886101Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886092Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Last instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680886089 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886092Sym1 a6989586621680886089) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680886090 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680886089 :: Data.Semigroup.Last a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680886092Sym2 a6989586621680886090 a6989586621680886089) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886076Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680886074 :: Data.Semigroup.Last (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886076Sym1 a6989586621680886074) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886064Sym0 instance forall b6989586621679545139 a6989586621679545138 (a6989586621680886062 :: Data.Semigroup.Last a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886064Sym1 a6989586621680886062) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886053Sym0 instance forall b6989586621679545141 a6989586621679545140 (a6989586621680886051 :: Data.Semigroup.Last a6989586621679545140). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680886053Sym1 a6989586621680886051) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680886043Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680886035Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.First instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680886033 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680886035Sym1 a6989586621680886033) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886022Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.First instance forall a6989586621680452727 b6989586621680452728 (a6989586621680886019 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886022Sym1 a6989586621680886019) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680886020 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680886019 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680886022Sym2 a6989586621680886020 a6989586621680886019) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886006Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680886004 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680886006Sym1 a6989586621680886004) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885994Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.First a) instance forall a6989586621680884414 (a6989586621680885992 :: Data.Semigroup.First a6989586621680884414). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885994Sym1 a6989586621680885992) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885983Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.First instance forall b6989586621679545157 a6989586621679545156 (a6989586621680885981 :: Data.Semigroup.First a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885983Sym1 a6989586621680885981) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885971Sym0 instance forall b6989586621679545159 a6989586621679545158 (a6989586621680885969 :: Data.Semigroup.First a6989586621679545158). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885971Sym1 a6989586621680885969) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885955Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.First instance forall b6989586621679545130 a6989586621679545129 (a6989586621680885953 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885955Sym1 a6989586621680885953) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885946Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.First instance forall k1 k2 k3 (_z_69895866216808848916989586621680885944 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885946Sym1 _z_69895866216808848916989586621680885944) instance forall k1 k2 k3 (a_69895866216808848976989586621680885945 :: k3) (_z_69895866216808848916989586621680885944 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885946Sym2 a_69895866216808848976989586621680885945 _z_69895866216808848916989586621680885944) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885936Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680885934 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885936Sym1 a6989586621680885934) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885923Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.First a) instance forall a6989586621680884403 (a6989586621680885920 :: Data.Semigroup.First a6989586621680884403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885923Sym1 a6989586621680885920) instance forall a6989586621680884403 (a6989586621680885921 :: Data.Semigroup.First a6989586621680884403) (a6989586621680885920 :: Data.Semigroup.First a6989586621680884403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885923Sym2 a6989586621680885921 a6989586621680885920) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885907Sym0 instance forall a6989586621680884403 (a6989586621680885905 :: Data.Semigroup.First a6989586621680884403). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885907Sym1 a6989586621680885905) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680885896Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680885889Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680885880Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680885873Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885864Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.First instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885861 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885864Sym1 a6989586621680885861) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885862 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680885861 :: Data.Semigroup.First a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885864Sym2 a6989586621680885862 a6989586621680885861) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885848Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680885846 :: Data.Semigroup.First (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885848Sym1 a6989586621680885846) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885836Sym0 instance forall b6989586621679545139 a6989586621679545138 (a6989586621680885834 :: Data.Semigroup.First a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885836Sym1 a6989586621680885834) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885825Sym0 instance forall b6989586621679545141 a6989586621679545140 (a6989586621680885823 :: Data.Semigroup.First a6989586621679545140). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885825Sym1 a6989586621680885823) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680885815Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885807Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable (Data.Semigroup.Arg a) instance forall a6989586621680884394 a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680885805 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885807Sym1 a6989586621680885805) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885793Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable (Data.Semigroup.Arg a) instance forall a6989586621680884393 a6989586621680452727 b6989586621680452728 (a6989586621680885790 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885793Sym1 a6989586621680885790) instance forall a6989586621680884393 a6989586621680452727 b6989586621680452728 (a6989586621680885791 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680885790 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885793Sym2 a6989586621680885791 a6989586621680885790) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym0 instance Data.Singletons.Prelude.Foldable.SFoldable (Data.Semigroup.Arg a) instance forall k1 k2 k3 k4 k5 k6 (_f_69895866216808848536989586621680885774 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym1 _f_69895866216808848536989586621680885774) instance forall k1 k2 k3 k4 k5 k6 (_z_69895866216808848556989586621680885775 :: k6) (_f_69895866216808848536989586621680885774 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym2 _z_69895866216808848556989586621680885775 _f_69895866216808848536989586621680885774) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216808848676989586621680885776 :: k6) (_z_69895866216808848556989586621680885775 :: k5) (_f_69895866216808848536989586621680885774 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym3 a_69895866216808848676989586621680885776 _z_69895866216808848556989586621680885775 _f_69895866216808848536989586621680885774) instance forall k1 k2 k3 k4 k5 k6 (a_69895866216808848696989586621680885777 :: k6) (a_69895866216808848676989586621680885776 :: k5) (_z_69895866216808848556989586621680885775 :: k4) (_f_69895866216808848536989586621680885774 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym4 a_69895866216808848696989586621680885777 a_69895866216808848676989586621680885776 _z_69895866216808848556989586621680885775 _f_69895866216808848536989586621680885774) instance forall k1 k2 k3 k4 k5 k6 (t6989586621680885782 :: k6) (a_69895866216808848696989586621680885777 :: k5) (a_69895866216808848676989586621680885776 :: k4) (_z_69895866216808848556989586621680885775 :: k3) (_f_69895866216808848536989586621680885774 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885778Sym5 t6989586621680885782 a_69895866216808848696989586621680885777 a_69895866216808848676989586621680885776 _z_69895866216808848556989586621680885775 _f_69895866216808848536989586621680885774) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885764Sym0 instance forall a6989586621680884393 a6989586621680452726 m6989586621680452725 (a6989586621680885762 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885764Sym1 a6989586621680885762) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885754Sym0 instance forall k1 k2 k3 k4 k5 (_f_69895866216808848536989586621680885751 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885754Sym1 _f_69895866216808848536989586621680885751) instance forall k1 k2 k3 k4 k5 (a_69895866216808848596989586621680885752 :: k5) (_f_69895866216808848536989586621680885751 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885754Sym2 a_69895866216808848596989586621680885752 _f_69895866216808848536989586621680885751) instance forall k1 k2 k3 k4 k5 (a_69895866216808848616989586621680885753 :: k5) (a_69895866216808848596989586621680885752 :: k4) (_f_69895866216808848536989586621680885751 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885754Sym3 a_69895866216808848616989586621680885753 a_69895866216808848596989586621680885752 _f_69895866216808848536989586621680885751) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680885742Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Arg a b) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680885742Sym1 a6989586621680885739) instance forall a6989586621680884391 b6989586621680884392 (a6989586621680885740 :: GHC.Types.Nat) (a6989586621680885739 :: Data.Semigroup.Arg a6989586621680884391 b6989586621680884392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680885742Sym2 a6989586621680885740 a6989586621680885739) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Max_6989586621680885723Sym0 instance Data.Singletons.Prelude.Ord.POrd (Data.Semigroup.Arg a b) instance forall a6989586621680884379 b6989586621680884380 (a6989586621680885721 :: Data.Semigroup.Arg a6989586621680884379 b6989586621680884380). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Max_6989586621680885723Sym1 a6989586621680885721) 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.Let6989586621680885704YSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680885700 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704YSym1 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680885702 :: k7) (a6989586621680885700 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704YSym2 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844816989586621680885696 :: k7) (b6989586621680885702 :: k6) (a6989586621680885700 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704YSym3 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844836989586621680885697 :: k7) (arg_69895866216808844816989586621680885696 :: k6) (b6989586621680885702 :: k5) (a6989586621680885700 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704YSym4 arg_69895866216808844836989586621680885697 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808844856989586621680885701 :: k7) (arg_69895866216808844836989586621680885697 :: k6) (arg_69895866216808844816989586621680885696 :: k5) (b6989586621680885702 :: k4) (a6989586621680885700 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704YSym5 wild_69895866216808844856989586621680885701 arg_69895866216808844836989586621680885697 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680885700 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym1 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680885702 :: k7) (a6989586621680885700 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym2 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844816989586621680885696 :: k7) (b6989586621680885702 :: k6) (a6989586621680885700 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym3 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844836989586621680885697 :: k7) (arg_69895866216808844816989586621680885696 :: k6) (b6989586621680885702 :: k5) (a6989586621680885700 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym4 arg_69895866216808844836989586621680885697 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808844856989586621680885701 :: k7) (arg_69895866216808844836989586621680885697 :: k6) (arg_69895866216808844816989586621680885696 :: k5) (b6989586621680885702 :: k4) (a6989586621680885700 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885704XSym5 wild_69895866216808844856989586621680885701 arg_69895866216808844836989586621680885697 arg_69895866216808844816989586621680885696 b6989586621680885702 a6989586621680885700) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Min_6989586621680885688Sym0 instance forall a6989586621680884379 b6989586621680884380 (a6989586621680885686 :: Data.Semigroup.Arg a6989586621680884379 b6989586621680884380). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Min_6989586621680885688Sym1 a6989586621680885686) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680885665 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym1 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680885667 :: k7) (a6989586621680885665 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym2 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844696989586621680885661 :: k7) (b6989586621680885667 :: k6) (a6989586621680885665 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym3 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844716989586621680885662 :: k7) (arg_69895866216808844696989586621680885661 :: k6) (b6989586621680885667 :: k5) (a6989586621680885665 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym4 arg_69895866216808844716989586621680885662 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808844736989586621680885666 :: k7) (arg_69895866216808844716989586621680885662 :: k6) (arg_69895866216808844696989586621680885661 :: k5) (b6989586621680885667 :: k4) (a6989586621680885665 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669YSym5 wild_69895866216808844736989586621680885666 arg_69895866216808844716989586621680885662 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym0 instance forall k2 k3 k4 k5 k6 k7 (a6989586621680885665 :: k7). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym1 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (b6989586621680885667 :: k7) (a6989586621680885665 :: k6). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym2 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844696989586621680885661 :: k7) (b6989586621680885667 :: k6) (a6989586621680885665 :: k5). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym3 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (arg_69895866216808844716989586621680885662 :: k7) (arg_69895866216808844696989586621680885661 :: k6) (b6989586621680885667 :: k5) (a6989586621680885665 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym4 arg_69895866216808844716989586621680885662 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance forall k2 k3 k4 k5 k6 k7 (wild_69895866216808844736989586621680885666 :: k7) (arg_69895866216808844716989586621680885662 :: k6) (arg_69895866216808844696989586621680885661 :: k5) (b6989586621680885667 :: k4) (a6989586621680885665 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Let6989586621680885669XSym5 wild_69895866216808844736989586621680885666 arg_69895866216808844716989586621680885662 arg_69895866216808844696989586621680885661 b6989586621680885667 a6989586621680885665) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Compare_6989586621680885653Sym0 instance forall a6989586621680884379 b6989586621680884380 (a6989586621680885651 :: Data.Semigroup.Arg a6989586621680884379 b6989586621680884380). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Compare_6989586621680885653Sym1 a6989586621680885651) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885641Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor (Data.Semigroup.Arg a) instance forall a6989586621680884378 b6989586621679545130 a6989586621679545129 (a6989586621680885639 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885641Sym1 a6989586621680885639) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885631Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor (Data.Semigroup.Arg a) instance forall k1 k2 k3 k4 (_z_69895866216808848216989586621680885620 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885631Sym1 _z_69895866216808848216989586621680885620) instance forall k1 k2 k3 k4 (a_69895866216808848336989586621680885621 :: k4) (_z_69895866216808848216989586621680885620 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885631Sym2 a_69895866216808848336989586621680885621 _z_69895866216808848216989586621680885620) instance forall k1 k2 k3 k4 (a_69895866216808848356989586621680885622 :: k4) (a_69895866216808848336989586621680885621 :: k3) (_z_69895866216808848216989586621680885620 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885631Sym3 a_69895866216808848356989586621680885622 a_69895866216808848336989586621680885621 _z_69895866216808848216989586621680885620) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885623Sym0 instance forall k1 k2 k3 k4 (_z_69895866216808848216989586621680885620 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885623Sym1 _z_69895866216808848216989586621680885620) instance forall k1 k2 k3 k4 (a_69895866216808848336989586621680885621 :: k4) (_z_69895866216808848216989586621680885620 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885623Sym2 a_69895866216808848336989586621680885621 _z_69895866216808848216989586621680885620) instance forall k1 k2 k3 k4 (a_69895866216808848356989586621680885622 :: k4) (a_69895866216808848336989586621680885621 :: k3) (_z_69895866216808848216989586621680885620 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885623Sym3 a_69895866216808848356989586621680885622 a_69895866216808848336989586621680885621 _z_69895866216808848216989586621680885620) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885612Sym0 instance forall a6989586621680884378 a6989586621679545127 b6989586621679545128 (a6989586621680885610 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885612Sym1 a6989586621680885610) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885602Sym0 instance forall k1 k2 k3 k4 (_f_69895866216808848196989586621680885599 :: k4). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885602Sym1 _f_69895866216808848196989586621680885599) instance forall k1 k2 k3 k4 (a_69895866216808848256989586621680885600 :: k4) (_f_69895866216808848196989586621680885599 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885602Sym2 a_69895866216808848256989586621680885600 _f_69895866216808848196989586621680885599) instance forall k1 k2 k3 k4 (a_69895866216808848276989586621680885601 :: k4) (a_69895866216808848256989586621680885600 :: k3) (_f_69895866216808848196989586621680885599 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885602Sym3 a_69895866216808848276989586621680885601 a_69895866216808848256989586621680885600 _f_69895866216808848196989586621680885599) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885591Sym0 instance Data.Singletons.Prelude.Eq.PEq (Data.Semigroup.Arg a b) instance forall a6989586621680884374 b6989586621680884375 (a6989586621680885589 :: Data.Semigroup.Arg a6989586621680884374 b6989586621680884375). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885591Sym1 a6989586621680885589) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885579Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Max instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680885577 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885579Sym1 a6989586621680885577) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885566Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Max instance forall a6989586621680452727 b6989586621680452728 (a6989586621680885563 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885566Sym1 a6989586621680885563) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680885564 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680885563 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885566Sym2 a6989586621680885564 a6989586621680885563) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885550Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680885548 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885550Sym1 a6989586621680885548) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680885539Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680885530Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680885523Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680885516Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885508Sym0 instance forall a6989586621680884364 (a6989586621680885506 :: Data.Semigroup.Max a6989586621680884364). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885508Sym1 a6989586621680885506) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885496Sym0 instance forall a6989586621680884364 (a6989586621680885494 :: Data.Semigroup.Max a6989586621680884364). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885496Sym1 a6989586621680885494) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885484Sym0 instance forall a6989586621680884364 (a6989586621680885482 :: Data.Semigroup.Max a6989586621680884364). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885484Sym1 a6989586621680885482) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885470Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Max a) instance forall a6989586621680884360 (a6989586621680885468 :: Data.Semigroup.Max a6989586621680884360). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885470Sym1 a6989586621680885468) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885458Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Max instance forall b6989586621679545157 a6989586621679545156 (a6989586621680885456 :: Data.Semigroup.Max a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885458Sym1 a6989586621680885456) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885446Sym0 instance forall b6989586621679545159 a6989586621679545158 (a6989586621680885444 :: Data.Semigroup.Max a6989586621679545158). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885446Sym1 a6989586621680885444) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885430Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Max instance forall b6989586621679545130 a6989586621679545129 (a6989586621680885428 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885430Sym1 a6989586621680885428) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885421Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Max instance forall k1 k2 k3 (_z_69895866216808847836989586621680885419 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885421Sym1 _z_69895866216808847836989586621680885419) instance forall k1 k2 k3 (a_69895866216808847896989586621680885420 :: k3) (_z_69895866216808847836989586621680885419 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885421Sym2 a_69895866216808847896989586621680885420 _z_69895866216808847836989586621680885419) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885411Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680885409 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885411Sym1 a6989586621680885409) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885398Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Max a) instance forall a6989586621680884349 (a6989586621680885395 :: Data.Semigroup.Max a6989586621680884349). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885398Sym1 a6989586621680885395) instance forall a6989586621680884349 (a6989586621680885396 :: Data.Semigroup.Max a6989586621680884349) (a6989586621680885395 :: Data.Semigroup.Max a6989586621680884349). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885398Sym2 a6989586621680885396 a6989586621680885395) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885382Sym0 instance forall a6989586621680884349 (a6989586621680885380 :: Data.Semigroup.Max a6989586621680884349). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885382Sym1 a6989586621680885380) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680885371Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680885364Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680885355Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680885348Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885339Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Max instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885336 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885339Sym1 a6989586621680885336) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885337 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680885336 :: Data.Semigroup.Max a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885339Sym2 a6989586621680885337 a6989586621680885336) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885323Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680885321 :: Data.Semigroup.Max (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885323Sym1 a6989586621680885321) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885311Sym0 instance forall b6989586621679545139 a6989586621679545138 (a6989586621680885309 :: Data.Semigroup.Max a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885311Sym1 a6989586621680885309) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885300Sym0 instance forall b6989586621679545141 a6989586621679545140 (a6989586621680885298 :: Data.Semigroup.Max a6989586621679545140). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885300Sym1 a6989586621680885298) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680885290Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885280Sym0 instance Data.Singletons.Prelude.Traversable.PTraversable Data.Semigroup.Min instance forall a6989586621680750996 (f6989586621680750995 :: * -> *) b6989586621680750997 (a6989586621680885278 :: a6989586621680750996 Data.Singletons.Internal.~> f6989586621680750995 b6989586621680750997). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Traverse_6989586621680885280Sym1 a6989586621680885278) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885267Sym0 instance Data.Singletons.Prelude.Foldable.PFoldable Data.Semigroup.Min instance forall a6989586621680452727 b6989586621680452728 (a6989586621680885264 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885267Sym1 a6989586621680885264) instance forall a6989586621680452727 b6989586621680452728 (a6989586621680885265 :: a6989586621680452727 Data.Singletons.Internal.~> (b6989586621680452728 Data.Singletons.Internal.~> b6989586621680452728)) (a6989586621680885264 :: b6989586621680452728). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Foldr_6989586621680885267Sym2 a6989586621680885265 a6989586621680885264) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885251Sym0 instance forall a6989586621680452726 m6989586621680452725 (a6989586621680885249 :: a6989586621680452726 Data.Singletons.Internal.~> m6989586621680452725). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.FoldMap_6989586621680885251Sym1 a6989586621680885249) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromInteger_6989586621680885240Sym0 instance Data.Singletons.Prelude.Num.PNum (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Signum_6989586621680885231Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Abs_6989586621680885224Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Negate_6989586621680885217Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885209Sym0 instance forall a6989586621680884332 (a6989586621680885207 :: Data.Semigroup.Min a6989586621680884332). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885209Sym1 a6989586621680885207) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885197Sym0 instance forall a6989586621680884332 (a6989586621680885195 :: Data.Semigroup.Min a6989586621680884332). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885197Sym1 a6989586621680885195) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885185Sym0 instance forall a6989586621680884332 (a6989586621680885183 :: Data.Semigroup.Min a6989586621680884332). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885185Sym1 a6989586621680885183) instance Data.Singletons.Prelude.Monoid.PMonoid (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885171Sym0 instance Data.Singletons.Prelude.Semigroup.Internal.PSemigroup (Data.Semigroup.Min a) instance forall a6989586621680884328 (a6989586621680885169 :: Data.Semigroup.Min a6989586621680884328). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885171Sym1 a6989586621680885169) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885159Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Semigroup.Min instance forall b6989586621679545157 a6989586621679545156 (a6989586621680885157 :: Data.Semigroup.Min a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885159Sym1 a6989586621680885157) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885147Sym0 instance forall b6989586621679545159 a6989586621679545158 (a6989586621680885145 :: Data.Semigroup.Min a6989586621679545158). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885147Sym1 a6989586621680885145) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885131Sym0 instance Data.Singletons.Prelude.Monad.Internal.PFunctor Data.Semigroup.Min instance forall b6989586621679545130 a6989586621679545129 (a6989586621680885129 :: a6989586621679545129). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885131Sym1 a6989586621680885129) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885122Sym0 instance Data.Singletons.Prelude.Monad.Internal.SFunctor Data.Semigroup.Min instance forall k1 k2 k3 (_z_69895866216808847496989586621680885120 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885122Sym1 _z_69895866216808847496989586621680885120) instance forall k1 k2 k3 (a_69895866216808847556989586621680885121 :: k3) (_z_69895866216808847496989586621680885120 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Lambda_6989586621680885122Sym2 a_69895866216808847556989586621680885121 _z_69895866216808847496989586621680885120) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885112Sym0 instance forall a6989586621679545127 b6989586621679545128 (a6989586621680885110 :: a6989586621679545127 Data.Singletons.Internal.~> b6989586621679545128). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.Fmap_6989586621680885112Sym1 a6989586621680885110) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885099Sym0 instance Data.Singletons.Prelude.Enum.PEnum (Data.Semigroup.Min a) instance forall a6989586621680884317 (a6989586621680885096 :: Data.Semigroup.Min a6989586621680884317). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885099Sym1 a6989586621680885096) instance forall a6989586621680884317 (a6989586621680885097 :: Data.Semigroup.Min a6989586621680884317) (a6989586621680885096 :: Data.Semigroup.Min a6989586621680884317). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromThenTo_6989586621680885099Sym2 a6989586621680885097 a6989586621680885096) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885083Sym0 instance forall a6989586621680884317 (a6989586621680885081 :: Data.Semigroup.Min a6989586621680884317). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.EnumFromTo_6989586621680885083Sym1 a6989586621680885081) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.FromEnum_6989586621680885072Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ToEnum_6989586621680885065Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pred_6989586621680885056Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Succ_6989586621680885049Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885040Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Semigroup.Min instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885037 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885040Sym1 a6989586621680885037) instance forall a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621680885038 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621680885037 :: Data.Semigroup.Min a6989586621679545135). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.LiftA2_6989586621680885040Sym2 a6989586621680885038 a6989586621680885037) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885024Sym0 instance forall a6989586621679545133 b6989586621679545134 (a6989586621680885022 :: Data.Semigroup.Min (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885024Sym1 a6989586621680885022) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885012Sym0 instance forall b6989586621679545139 a6989586621679545138 (a6989586621680885010 :: Data.Semigroup.Min a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885012Sym1 a6989586621680885010) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885001Sym0 instance forall b6989586621679545141 a6989586621679545140 (a6989586621680884999 :: Data.Semigroup.Min a6989586621679545140). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.TFHelper_6989586621680885001Sym1 a6989586621680884999) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.Pure_6989586621680884991Sym0 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_6989586621680868576Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.WrappedMonoid m) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868576Sym1 a6989586621680868573) instance forall m6989586621679063592 (a6989586621680868574 :: GHC.Types.Nat) (a6989586621680868573 :: Data.Semigroup.WrappedMonoid m6989586621679063592). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868576Sym2 a6989586621680868574 a6989586621680868573) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868547Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Last a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868547Sym1 a6989586621680868544) instance forall a6989586621679063586 (a6989586621680868545 :: GHC.Types.Nat) (a6989586621680868544 :: Data.Semigroup.Last a6989586621679063586). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868547Sym2 a6989586621680868545 a6989586621680868544) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868518Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.First a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868518Sym1 a6989586621680868515) instance forall a6989586621679063580 (a6989586621680868516 :: GHC.Types.Nat) (a6989586621680868515 :: Data.Semigroup.First a6989586621679063580). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868518Sym2 a6989586621680868516 a6989586621680868515) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868489Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Max a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868489Sym1 a6989586621680868486) instance forall a6989586621679063566 (a6989586621680868487 :: GHC.Types.Nat) (a6989586621680868486 :: Data.Semigroup.Max a6989586621679063566). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868489Sym2 a6989586621680868487 a6989586621680868486) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868460Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Min a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868460Sym1 a6989586621680868457) instance forall a6989586621679063560 (a6989586621680868458 :: GHC.Types.Nat) (a6989586621680868457 :: Data.Semigroup.Min a6989586621679063560). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868460Sym2 a6989586621680868458 a6989586621680868457) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868431Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Product a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868431Sym1 a6989586621680868428) instance forall a6989586621679086855 (a6989586621680868429 :: GHC.Types.Nat) (a6989586621680868428 :: Data.Semigroup.Internal.Product a6989586621679086855). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868431Sym2 a6989586621680868429 a6989586621680868428) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868402Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Sum a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868402Sym1 a6989586621680868399) instance forall a6989586621679086850 (a6989586621680868400 :: GHC.Types.Nat) (a6989586621680868399 :: Data.Semigroup.Internal.Sum a6989586621679086850). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868402Sym2 a6989586621680868400 a6989586621680868399) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868373Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.Any instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868373Sym1 a6989586621680868370) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868373Sym2 a6989586621680868371 a6989586621680868370) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868347Sym0 instance Data.Singletons.Prelude.Show.PShow Data.Semigroup.Internal.All instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868347Sym1 a6989586621680868344) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868347Sym2 a6989586621680868345 a6989586621680868344) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868321Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Internal.Dual a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868321Sym1 a6989586621680868318) instance forall a6989586621679086865 (a6989586621680868319 :: GHC.Types.Nat) (a6989586621680868318 :: Data.Semigroup.Internal.Dual a6989586621679086865). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868321Sym2 a6989586621680868319 a6989586621680868318) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868292Sym0 instance Data.Singletons.Prelude.Show.PShow (Data.Semigroup.Option a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868292Sym1 a6989586621680868289) instance forall a6989586621679063598 (a6989586621680868290 :: GHC.Types.Nat) (a6989586621680868289 :: Data.Semigroup.Option a6989586621679063598). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ShowsPrec_6989586621680868292Sym2 a6989586621680868290 a6989586621680868289) 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 b6989586621679063574 a6989586621679063573 (t6989586621680866677 :: a6989586621679063573). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Semigroup.ArgSym1 t6989586621680866677) 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_a291h :: [a_a28Y6]) (a_a291i :: [a_a28Y6]) :: [a_a28Y6] infixr 5 ++ (%++) :: forall a_a28Y6 (t_a292t :: [a_a28Y6]) (t_a292u :: [a_a28Y6]). Sing t_a292t -> Sing t_a292u -> Sing (Apply (Apply (++@#@$) t_a292t) t_a292u :: [a_a28Y6]) infixr 5 %++ type family Head (a_a3WLn :: [a_a3U1E]) :: a_a3U1E sHead :: forall a_a3U1E (t_a3WQW :: [a_a3U1E]). Sing t_a3WQW -> Sing (Apply HeadSym0 t_a3WQW :: a_a3U1E) type family Last (a_a3WLi :: [a_a3U1D]) :: a_a3U1D sLast :: forall a_a3U1D (t_a3WQU :: [a_a3U1D]). Sing t_a3WQU -> Sing (Apply LastSym0 t_a3WQU :: a_a3U1D) type family Tail (a_a3WLf :: [a_a3U1C]) :: [a_a3U1C] sTail :: forall a_a3U1C (t_a3WQS :: [a_a3U1C]). Sing t_a3WQS -> Sing (Apply TailSym0 t_a3WQS :: [a_a3U1C]) type family Init (a_a3WL1 :: [a_a3U1B]) :: [a_a3U1B] sInit :: forall a_a3U1B (t_a3WQQ :: [a_a3U1B]). Sing t_a3WQQ -> Sing (Apply InitSym0 t_a3WQQ :: [a_a3U1B]) type family Null (arg_a63xM :: t_a63n5 a_a63nk) :: Bool sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). SFoldable t_a63n5 => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) type family Length (arg_a63xO :: t_a63n5 a_a63nl) :: Nat sLength :: forall a_a63nl (t_a63TF :: t_a63n5 a_a63nl). SFoldable t_a63n5 => Sing t_a63TF -> Sing (Apply LengthSym0 t_a63TF :: Nat) type family Map (a_a291p :: (~>) a_a28Y7 b_a28Y8) (a_a291q :: [a_a28Y7]) :: [b_a28Y8] sMap :: forall a_a28Y7 b_a28Y8 (t_a292x :: (~>) a_a28Y7 b_a28Y8) (t_a292y :: [a_a28Y7]). Sing t_a292x -> Sing t_a292y -> Sing (Apply (Apply MapSym0 t_a292x) t_a292y :: [b_a28Y8]) type family Reverse (a_a3WKg :: [a_a3U1z]) :: [a_a3U1z] sReverse :: forall a_a3U1z (t_a3WQE :: [a_a3U1z]). Sing t_a3WQE -> Sing (Apply ReverseSym0 t_a3WQE :: [a_a3U1z]) type family Intersperse (a_a3WK3 :: a_a3U1y) (a_a3WK4 :: [a_a3U1y]) :: [a_a3U1y] sIntersperse :: forall a_a3U1y (t_a3WQw :: a_a3U1y) (t_a3WQx :: [a_a3U1y]). Sing t_a3WQw -> Sing t_a3WQx -> Sing (Apply (Apply IntersperseSym0 t_a3WQw) t_a3WQx :: [a_a3U1y]) type family Intercalate (a_a3WKa :: [a_a3U1x]) (a_a3WKb :: [[a_a3U1x]]) :: [a_a3U1x] sIntercalate :: forall a_a3U1x (t_a3WQA :: [a_a3U1x]) (t_a3WQB :: [[a_a3U1x]]). Sing t_a3WQA -> Sing t_a3WQB -> Sing (Apply (Apply IntercalateSym0 t_a3WQA) t_a3WQB :: [a_a3U1x]) type family Transpose (a_a3WLq :: [[a_a3TZI]]) :: [[a_a3TZI]] sTranspose :: forall a_a3TZI (t_a3WQY :: [[a_a3TZI]]). Sing t_a3WQY -> Sing (Apply TransposeSym0 t_a3WQY :: [[a_a3TZI]]) type family Subsequences (a_a3WK0 :: [a_a3U1w]) :: [[a_a3U1w]] sSubsequences :: forall a_a3U1w (t_a3WQu :: [a_a3U1w]). Sing t_a3WQu -> Sing (Apply SubsequencesSym0 t_a3WQu :: [[a_a3U1w]]) type family Permutations (a_a3WI6 :: [a_a3U1t]) :: [[a_a3U1t]] sPermutations :: forall a_a3U1t (t_a3WQm :: [a_a3U1t]). Sing t_a3WQm -> Sing (Apply PermutationsSym0 t_a3WQm :: [[a_a3U1t]]) type family Foldl (arg_a63xq :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (arg_a63xr :: b_a63nd) (arg_a63xs :: t_a63n5 a_a63ne) :: b_a63nd sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). SFoldable t_a63n5 => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) type family Foldl' (arg_a63xw :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (arg_a63xx :: b_a63nf) (arg_a63xy :: t_a63n5 a_a63ng) :: b_a63nf sFoldl' :: forall b_a63nf a_a63ng (t_a63Tn :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (t_a63To :: b_a63nf) (t_a63Tp :: t_a63n5 a_a63ng). SFoldable t_a63n5 => Sing t_a63Tn -> Sing t_a63To -> Sing t_a63Tp -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) type family Foldl1 (arg_a63xG :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (arg_a63xH :: t_a63n5 a_a63ni) :: a_a63ni sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). SFoldable t_a63n5 => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) type family Foldl1' (a_a3WHZ :: (~>) a_a3U1p ((~>) a_a3U1p a_a3U1p)) (a_a3WI0 :: [a_a3U1p]) :: a_a3U1p sFoldl1' :: forall a_a3U1p (t_a3WQi :: (~>) a_a3U1p ((~>) a_a3U1p a_a3U1p)) (t_a3WQj :: [a_a3U1p]). Sing t_a3WQi -> Sing t_a3WQj -> Sing (Apply (Apply Foldl1'Sym0 t_a3WQi) t_a3WQj :: a_a3U1p) type family Foldr (arg_a63xe :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (arg_a63xf :: b_a63na) (arg_a63xg :: t_a63n5 a_a63n9) :: b_a63na sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). SFoldable t_a63n5 => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) type family Foldr1 (arg_a63xC :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (arg_a63xD :: t_a63n5 a_a63nh) :: a_a63nh sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). SFoldable t_a63n5 => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) type family Concat (a_a63vk :: t_a63lS [a_a63lT]) :: [a_a63lT] sConcat :: forall t_a63lS a_a63lT (t_a63RI :: t_a63lS [a_a63lT]). SFoldable t_a63lS => Sing t_a63RI -> Sing (Apply ConcatSym0 t_a63RI :: [a_a63lT]) type family ConcatMap (a_a63v4 :: (~>) a_a63lQ [b_a63lR]) (a_a63v5 :: t_a63lP a_a63lQ) :: [b_a63lR] sConcatMap :: forall t_a63lP a_a63lQ b_a63lR (t_a63RE :: (~>) a_a63lQ [b_a63lR]) (t_a63RF :: t_a63lP a_a63lQ). SFoldable t_a63lP => Sing t_a63RE -> Sing t_a63RF -> Sing (Apply (Apply ConcatMapSym0 t_a63RE) t_a63RF :: [b_a63lR]) type family And (a_a63uV :: t_a63lO Bool) :: Bool sAnd :: forall t_a63lO (t_a63RC :: t_a63lO Bool). SFoldable t_a63lO => Sing t_a63RC -> Sing (Apply AndSym0 t_a63RC :: Bool) type family Or (a_a63uM :: t_a63lN Bool) :: Bool sOr :: forall t_a63lN (t_a63RA :: t_a63lN Bool). SFoldable t_a63lN => Sing t_a63RA -> Sing (Apply OrSym0 t_a63RA :: Bool) type family Any (a_a63uz :: (~>) a_a63lM Bool) (a_a63uA :: t_a63lL a_a63lM) :: Bool sAny :: forall t_a63lL a_a63lM (t_a63Rw :: (~>) a_a63lM Bool) (t_a63Rx :: t_a63lL a_a63lM). SFoldable t_a63lL => Sing t_a63Rw -> Sing t_a63Rx -> Sing (Apply (Apply AnySym0 t_a63Rw) t_a63Rx :: Bool) type family All (a_a63um :: (~>) a_a63lK Bool) (a_a63un :: t_a63lJ a_a63lK) :: Bool sAll :: forall t_a63lJ a_a63lK (t_a63Rs :: (~>) a_a63lK Bool) (t_a63Rt :: t_a63lJ a_a63lK). SFoldable t_a63lJ => Sing t_a63Rs -> Sing t_a63Rt -> Sing (Apply (Apply AllSym0 t_a63Rs) t_a63Rt :: Bool) type family Sum (arg_a63xY :: t_a63n5 a_a63np) :: a_a63np sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) type family Product (arg_a63y0 :: t_a63n5 a_a63nq) :: a_a63nq sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) type family Maximum (arg_a63xU :: t_a63n5 a_a63nn) :: a_a63nn sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) type family Minimum (arg_a63xW :: t_a63n5 a_a63no) :: a_a63no sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) type family Scanl (a_a3WEk :: (~>) b_a3U1h ((~>) a_a3U1i b_a3U1h)) (a_a3WEl :: b_a3U1h) (a_a3WEm :: [a_a3U1i]) :: [b_a3U1h] sScanl :: forall b_a3U1h a_a3U1i (t_a3WPc :: (~>) b_a3U1h ((~>) a_a3U1i b_a3U1h)) (t_a3WPd :: b_a3U1h) (t_a3WPe :: [a_a3U1i]). Sing t_a3WPc -> Sing t_a3WPd -> Sing t_a3WPe -> Sing (Apply (Apply (Apply ScanlSym0 t_a3WPc) t_a3WPd) t_a3WPe :: [b_a3U1h]) type family Scanl1 (a_a3WEy :: (~>) a_a3U1g ((~>) a_a3U1g a_a3U1g)) (a_a3WEz :: [a_a3U1g]) :: [a_a3U1g] sScanl1 :: forall a_a3U1g (t_a3WPi :: (~>) a_a3U1g ((~>) a_a3U1g a_a3U1g)) (t_a3WPj :: [a_a3U1g]). Sing t_a3WPi -> Sing t_a3WPj -> Sing (Apply (Apply Scanl1Sym0 t_a3WPi) t_a3WPj :: [a_a3U1g]) type family Scanr (a_a3WDZ :: (~>) a_a3U1e ((~>) b_a3U1f b_a3U1f)) (a_a3WE0 :: b_a3U1f) (a_a3WE1 :: [a_a3U1e]) :: [b_a3U1f] sScanr :: forall a_a3U1e b_a3U1f (t_a3WP6 :: (~>) a_a3U1e ((~>) b_a3U1f b_a3U1f)) (t_a3WP7 :: b_a3U1f) (t_a3WP8 :: [a_a3U1e]). Sing t_a3WP6 -> Sing t_a3WP7 -> Sing t_a3WP8 -> Sing (Apply (Apply (Apply ScanrSym0 t_a3WP6) t_a3WP7) t_a3WP8 :: [b_a3U1f]) type family Scanr1 (a_a3WDB :: (~>) a_a3U1d ((~>) a_a3U1d a_a3U1d)) (a_a3WDC :: [a_a3U1d]) :: [a_a3U1d] sScanr1 :: forall a_a3U1d (t_a3WP2 :: (~>) a_a3U1d ((~>) a_a3U1d a_a3U1d)) (t_a3WP3 :: [a_a3U1d]). Sing t_a3WP2 -> Sing t_a3WP3 -> Sing (Apply (Apply Scanr1Sym0 t_a3WP2) t_a3WP3 :: [a_a3U1d]) type family MapAccumL (a_a7kyz :: (~>) a_a7kpS ((~>) b_a7kpT (a_a7kpS, c_a7kpU))) (a_a7kyA :: a_a7kpS) (a_a7kyB :: t_a7kpR b_a7kpT) :: (a_a7kpS, t_a7kpR c_a7kpU) sMapAccumL :: forall t_a7kpR a_a7kpS b_a7kpT c_a7kpU (t_a7kIh :: (~>) a_a7kpS ((~>) b_a7kpT (a_a7kpS, c_a7kpU))) (t_a7kIi :: a_a7kpS) (t_a7kIj :: t_a7kpR b_a7kpT). STraversable t_a7kpR => Sing t_a7kIh -> Sing t_a7kIi -> Sing t_a7kIj -> Sing (Apply (Apply (Apply MapAccumLSym0 t_a7kIh) t_a7kIi) t_a7kIj :: (a_a7kpS, t_a7kpR c_a7kpU)) type family MapAccumR (a_a7kyi :: (~>) a_a7kpO ((~>) b_a7kpP (a_a7kpO, c_a7kpQ))) (a_a7kyj :: a_a7kpO) (a_a7kyk :: t_a7kpN b_a7kpP) :: (a_a7kpO, t_a7kpN c_a7kpQ) sMapAccumR :: forall t_a7kpN a_a7kpO b_a7kpP c_a7kpQ (t_a7kIb :: (~>) a_a7kpO ((~>) b_a7kpP (a_a7kpO, c_a7kpQ))) (t_a7kIc :: a_a7kpO) (t_a7kId :: t_a7kpN b_a7kpP). STraversable t_a7kpN => Sing t_a7kIb -> Sing t_a7kIc -> Sing t_a7kId -> Sing (Apply (Apply (Apply MapAccumRSym0 t_a7kIb) t_a7kIc) t_a7kId :: (a_a7kpO, t_a7kpN c_a7kpQ)) type family Replicate (a_a3WpL :: Nat) (a_a3WpM :: a_a3TZJ) :: [a_a3TZJ] sReplicate :: forall a_a3TZJ (t_a3WLM :: Nat) (t_a3WLN :: a_a3TZJ). Sing t_a3WLM -> Sing t_a3WLN -> Sing (Apply (Apply ReplicateSym0 t_a3WLM) t_a3WLN :: [a_a3TZJ]) type family Unfoldr (a_a3WBj :: (~>) b_a3U15 (Maybe (a_a3U16, b_a3U15))) (a_a3WBk :: b_a3U15) :: [a_a3U16] sUnfoldr :: forall b_a3U15 a_a3U16 (t_a3WOM :: (~>) b_a3U15 (Maybe (a_a3U16, b_a3U15))) (t_a3WON :: b_a3U15). Sing t_a3WOM -> Sing t_a3WON -> Sing (Apply (Apply UnfoldrSym0 t_a3WOM) t_a3WON :: [a_a3U16]) type family Take (a_a3Wrj :: Nat) (a_a3Wrk :: [a_a3TZZ]) :: [a_a3TZZ] sTake :: forall a_a3TZZ (t_a3WMe :: Nat) (t_a3WMf :: [a_a3TZZ]). Sing t_a3WMe -> Sing t_a3WMf -> Sing (Apply (Apply TakeSym0 t_a3WMe) t_a3WMf :: [a_a3TZZ]) type family Drop (a_a3Wr5 :: Nat) (a_a3Wr6 :: [a_a3TZY]) :: [a_a3TZY] sDrop :: forall a_a3TZY (t_a3WMa :: Nat) (t_a3WMb :: [a_a3TZY]). Sing t_a3WMa -> Sing t_a3WMb -> Sing (Apply (Apply DropSym0 t_a3WMa) t_a3WMb :: [a_a3TZY]) type family SplitAt (a_a3Wrx :: Nat) (a_a3Wry :: [a_a3TZX]) :: ([a_a3TZX], [a_a3TZX]) sSplitAt :: forall a_a3TZX (t_a3WMi :: Nat) (t_a3WMj :: [a_a3TZX]). Sing t_a3WMi -> Sing t_a3WMj -> Sing (Apply (Apply SplitAtSym0 t_a3WMi) t_a3WMj :: ([a_a3TZX], [a_a3TZX])) type family TakeWhile (a_a3WtR :: (~>) a_a3U04 Bool) (a_a3WtS :: [a_a3U04]) :: [a_a3U04] sTakeWhile :: forall a_a3U04 (t_a3WME :: (~>) a_a3U04 Bool) (t_a3WMF :: [a_a3U04]). Sing t_a3WME -> Sing t_a3WMF -> Sing (Apply (Apply TakeWhileSym0 t_a3WME) t_a3WMF :: [a_a3U04]) type family DropWhile (a_a3Wtz :: (~>) a_a3U03 Bool) (a_a3WtA :: [a_a3U03]) :: [a_a3U03] sDropWhile :: forall a_a3U03 (t_a3WMA :: (~>) a_a3U03 Bool) (t_a3WMB :: [a_a3U03]). Sing t_a3WMA -> Sing t_a3WMB -> Sing (Apply (Apply DropWhileSym0 t_a3WMA) t_a3WMB :: [a_a3U03]) type family DropWhileEnd (a_a3WKB :: (~>) a_a3U02 Bool) (a_a3WKC :: [a_a3U02]) :: [a_a3U02] sDropWhileEnd :: forall a_a3U02 (t_a3WQM :: (~>) a_a3U02 Bool) (t_a3WQN :: [a_a3U02]). Sing t_a3WQM -> Sing t_a3WQN -> Sing (Apply (Apply DropWhileEndSym0 t_a3WQM) t_a3WQN :: [a_a3U02]) type family Span (a_a3Wsk :: (~>) a_a3U01 Bool) (a_a3Wsl :: [a_a3U01]) :: ([a_a3U01], [a_a3U01]) sSpan :: forall a_a3U01 (t_a3WMq :: (~>) a_a3U01 Bool) (t_a3WMr :: [a_a3U01]). Sing t_a3WMq -> Sing t_a3WMr -> Sing (Apply (Apply SpanSym0 t_a3WMq) t_a3WMr :: ([a_a3U01], [a_a3U01])) type family Break (a_a3WrD :: (~>) a_a3U00 Bool) (a_a3WrE :: [a_a3U00]) :: ([a_a3U00], [a_a3U00]) sBreak :: forall a_a3U00 (t_a3WMm :: (~>) a_a3U00 Bool) (t_a3WMn :: [a_a3U00]). Sing t_a3WMm -> Sing t_a3WMn -> Sing (Apply (Apply BreakSym0 t_a3WMm) t_a3WMn :: ([a_a3U00], [a_a3U00])) type family StripPrefix (a_a4u8U :: [a_a4qPU]) (a_a4u8V :: [a_a4qPU]) :: Maybe [a_a4qPU] type family Group (a_a3Wtw :: [a_a3TZW]) :: [[a_a3TZW]] sGroup :: forall a_a3TZW (t_a3WMy :: [a_a3TZW]). SEq a_a3TZW => Sing t_a3WMy -> Sing (Apply GroupSym0 t_a3WMy :: [[a_a3TZW]]) type family Inits (a_a3WBb :: [a_a3U14]) :: [[a_a3U14]] sInits :: forall a_a3U14 (t_a3WOK :: [a_a3U14]). Sing t_a3WOK -> Sing (Apply InitsSym0 t_a3WOK :: [[a_a3U14]]) type family Tails (a_a3WB4 :: [a_a3U13]) :: [[a_a3U13]] sTails :: forall a_a3U13 (t_a3WOI :: [a_a3U13]). Sing t_a3WOI -> Sing (Apply TailsSym0 t_a3WOI :: [[a_a3U13]]) type family IsPrefixOf (a_a3WAW :: [a_a3U12]) (a_a3WAX :: [a_a3U12]) :: Bool sIsPrefixOf :: forall a_a3U12 (t_a3WOE :: [a_a3U12]) (t_a3WOF :: [a_a3U12]). SEq a_a3U12 => Sing t_a3WOE -> Sing t_a3WOF -> Sing (Apply (Apply IsPrefixOfSym0 t_a3WOE) t_a3WOF :: Bool) type family IsSuffixOf (a_a3WKt :: [a_a3U11]) (a_a3WKu :: [a_a3U11]) :: Bool sIsSuffixOf :: forall a_a3U11 (t_a3WQG :: [a_a3U11]) (t_a3WQH :: [a_a3U11]). SEq a_a3U11 => Sing t_a3WQG -> Sing t_a3WQH -> Sing (Apply (Apply IsSuffixOfSym0 t_a3WQG) t_a3WQH :: Bool) type family IsInfixOf (a_a3WEM :: [a_a3U10]) (a_a3WEN :: [a_a3U10]) :: Bool sIsInfixOf :: forall a_a3U10 (t_a3WPq :: [a_a3U10]) (t_a3WPr :: [a_a3U10]). SEq a_a3U10 => Sing t_a3WPq -> Sing t_a3WPr -> Sing (Apply (Apply IsInfixOfSym0 t_a3WPq) t_a3WPr :: Bool) type family Elem (arg_a63xQ :: a_a63nm) (arg_a63xR :: t_a63n5 a_a63nm) :: Bool sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) type family NotElem (a_a63tq :: a_a63lE) (a_a63tr :: t_a63lD a_a63lE) :: Bool sNotElem :: forall t_a63lD a_a63lE (t_a63Rg :: a_a63lE) (t_a63Rh :: t_a63lD a_a63lE). (SFoldable t_a63lD, SEq a_a63lE) => Sing t_a63Rg -> Sing t_a63Rh -> Sing (Apply (Apply NotElemSym0 t_a63Rg) t_a63Rh :: Bool) type family Lookup (a_a3WqO :: a_a3TZP) (a_a3WqP :: [(a_a3TZP, b_a3TZQ)]) :: Maybe b_a3TZQ sLookup :: forall a_a3TZP b_a3TZQ (t_a3WM6 :: a_a3TZP) (t_a3WM7 :: [(a_a3TZP, b_a3TZQ)]). SEq a_a3TZP => Sing t_a3WM6 -> Sing t_a3WM7 -> Sing (Apply (Apply LookupSym0 t_a3WM6) t_a3WM7 :: Maybe b_a3TZQ) type family Find (a_a63sZ :: (~>) a_a63lC Bool) (a_a63t0 :: t_a63lB a_a63lC) :: Maybe a_a63lC sFind :: forall t_a63lB a_a63lC (t_a63Rc :: (~>) a_a63lC Bool) (t_a63Rd :: t_a63lB a_a63lC). SFoldable t_a63lB => Sing t_a63Rc -> Sing t_a63Rd -> Sing (Apply (Apply FindSym0 t_a63Rc) t_a63Rd :: Maybe a_a63lC) type family Filter (a_a3Wu5 :: (~>) a_a3U0c Bool) (a_a3Wu6 :: [a_a3U0c]) :: [a_a3U0c] sFilter :: forall a_a3U0c (t_a3WMI :: (~>) a_a3U0c Bool) (t_a3WMJ :: [a_a3U0c]). Sing t_a3WMI -> Sing t_a3WMJ -> Sing (Apply (Apply FilterSym0 t_a3WMI) t_a3WMJ :: [a_a3U0c]) type family Partition (a_a3WqI :: (~>) a_a3TZO Bool) (a_a3WqJ :: [a_a3TZO]) :: ([a_a3TZO], [a_a3TZO]) sPartition :: forall a_a3TZO (t_a3WM2 :: (~>) a_a3TZO Bool) (t_a3WM3 :: [a_a3TZO]). Sing t_a3WM2 -> Sing t_a3WM3 -> Sing (Apply (Apply PartitionSym0 t_a3WM2) t_a3WM3 :: ([a_a3TZO], [a_a3TZO])) type family (!!) (a_a3Wpx :: [a_a3TZH]) (a_a3Wpy :: Nat) :: a_a3TZH infixl 9 !! (%!!) :: forall a_a3TZH (t_a3WLI :: [a_a3TZH]) (t_a3WLJ :: Nat). Sing t_a3WLI -> Sing t_a3WLJ -> Sing (Apply (Apply (!!@#@$) t_a3WLI) t_a3WLJ :: a_a3TZH) infixl 9 %!! type family ElemIndex (a_a3WAg :: a_a3U0a) (a_a3WAh :: [a_a3U0a]) :: Maybe Nat sElemIndex :: forall a_a3U0a (t_a3WOq :: a_a3U0a) (t_a3WOr :: [a_a3U0a]). SEq a_a3U0a => Sing t_a3WOq -> Sing t_a3WOr -> Sing (Apply (Apply ElemIndexSym0 t_a3WOq) t_a3WOr :: Maybe Nat) type family ElemIndices (a_a3WA0 :: a_a3U09) (a_a3WA1 :: [a_a3U09]) :: [Nat] sElemIndices :: forall a_a3U09 (t_a3WOi :: a_a3U09) (t_a3WOj :: [a_a3U09]). SEq a_a3U09 => Sing t_a3WOi -> Sing t_a3WOj -> Sing (Apply (Apply ElemIndicesSym0 t_a3WOi) t_a3WOj :: [Nat]) type family FindIndex (a_a3WA8 :: (~>) a_a3U08 Bool) (a_a3WA9 :: [a_a3U08]) :: Maybe Nat sFindIndex :: forall a_a3U08 (t_a3WOm :: (~>) a_a3U08 Bool) (t_a3WOn :: [a_a3U08]). Sing t_a3WOm -> Sing t_a3WOn -> Sing (Apply (Apply FindIndexSym0 t_a3WOm) t_a3WOn :: Maybe Nat) type family FindIndices (a_a3WzA :: (~>) a_a3U07 Bool) (a_a3WzB :: [a_a3U07]) :: [Nat] sFindIndices :: forall a_a3U07 (t_a3WOe :: (~>) a_a3U07 Bool) (t_a3WOf :: [a_a3U07]). Sing t_a3WOe -> Sing t_a3WOf -> Sing (Apply (Apply FindIndicesSym0 t_a3WOe) t_a3WOf :: [Nat]) type family Zip (a_a3Wzs :: [a_a3U0W]) (a_a3Wzt :: [b_a3U0X]) :: [(a_a3U0W, b_a3U0X)] sZip :: forall a_a3U0W b_a3U0X (t_a3WOa :: [a_a3U0W]) (t_a3WOb :: [b_a3U0X]). Sing t_a3WOa -> Sing t_a3WOb -> Sing (Apply (Apply ZipSym0 t_a3WOa) t_a3WOb :: [(a_a3U0W, b_a3U0X)]) type family Zip3 (a_a3Wzg :: [a_a3U0T]) (a_a3Wzh :: [b_a3U0U]) (a_a3Wzi :: [c_a3U0V]) :: [(a_a3U0T, b_a3U0U, c_a3U0V)] sZip3 :: forall a_a3U0T b_a3U0U c_a3U0V (t_a3WO4 :: [a_a3U0T]) (t_a3WO5 :: [b_a3U0U]) (t_a3WO6 :: [c_a3U0V]). Sing t_a3WO4 -> Sing t_a3WO5 -> Sing t_a3WO6 -> Sing (Apply (Apply (Apply Zip3Sym0 t_a3WO4) t_a3WO5) t_a3WO6 :: [(a_a3U0T, b_a3U0U, c_a3U0V)]) type family Zip4 (a_a4u8I :: [a_a4qPQ]) (a_a4u8J :: [b_a4qPR]) (a_a4u8K :: [c_a4qPS]) (a_a4u8L :: [d_a4qPT]) :: [(a_a4qPQ, b_a4qPR, c_a4qPS, d_a4qPT)] type family Zip5 (a_a4u8l :: [a_a4qPL]) (a_a4u8m :: [b_a4qPM]) (a_a4u8n :: [c_a4qPN]) (a_a4u8o :: [d_a4qPO]) (a_a4u8p :: [e_a4qPP]) :: [(a_a4qPL, b_a4qPM, c_a4qPN, d_a4qPO, e_a4qPP)] type family Zip6 (a_a4u7T :: [a_a4qPF]) (a_a4u7U :: [b_a4qPG]) (a_a4u7V :: [c_a4qPH]) (a_a4u7W :: [d_a4qPI]) (a_a4u7X :: [e_a4qPJ]) (a_a4u7Y :: [f_a4qPK]) :: [(a_a4qPF, b_a4qPG, c_a4qPH, d_a4qPI, e_a4qPJ, f_a4qPK)] type family Zip7 (a_a4u7m :: [a_a4qPy]) (a_a4u7n :: [b_a4qPz]) (a_a4u7o :: [c_a4qPA]) (a_a4u7p :: [d_a4qPB]) (a_a4u7q :: [e_a4qPC]) (a_a4u7r :: [f_a4qPD]) (a_a4u7s :: [g_a4qPE]) :: [(a_a4qPy, b_a4qPz, c_a4qPA, d_a4qPB, e_a4qPC, f_a4qPD, g_a4qPE)] type family ZipWith (a_a3Wz5 :: (~>) a_a3U0Q ((~>) b_a3U0R c_a3U0S)) (a_a3Wz6 :: [a_a3U0Q]) (a_a3Wz7 :: [b_a3U0R]) :: [c_a3U0S] sZipWith :: forall a_a3U0Q b_a3U0R c_a3U0S (t_a3WNY :: (~>) a_a3U0Q ((~>) b_a3U0R c_a3U0S)) (t_a3WNZ :: [a_a3U0Q]) (t_a3WO0 :: [b_a3U0R]). Sing t_a3WNY -> Sing t_a3WNZ -> Sing t_a3WO0 -> Sing (Apply (Apply (Apply ZipWithSym0 t_a3WNY) t_a3WNZ) t_a3WO0 :: [c_a3U0S]) type family ZipWith3 (a_a3WyQ :: (~>) a_a3U0M ((~>) b_a3U0N ((~>) c_a3U0O d_a3U0P))) (a_a3WyR :: [a_a3U0M]) (a_a3WyS :: [b_a3U0N]) (a_a3WyT :: [c_a3U0O]) :: [d_a3U0P] sZipWith3 :: forall a_a3U0M b_a3U0N c_a3U0O d_a3U0P (t_a3WNQ :: (~>) a_a3U0M ((~>) b_a3U0N ((~>) c_a3U0O d_a3U0P))) (t_a3WNR :: [a_a3U0M]) (t_a3WNS :: [b_a3U0N]) (t_a3WNT :: [c_a3U0O]). Sing t_a3WNQ -> Sing t_a3WNR -> Sing t_a3WNS -> Sing t_a3WNT -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a3WNQ) t_a3WNR) t_a3WNS) t_a3WNT :: [d_a3U0P]) type family ZipWith4 (a_a4u6P :: (~>) a_a4qPt ((~>) b_a4qPu ((~>) c_a4qPv ((~>) d_a4qPw e_a4qPx)))) (a_a4u6Q :: [a_a4qPt]) (a_a4u6R :: [b_a4qPu]) (a_a4u6S :: [c_a4qPv]) (a_a4u6T :: [d_a4qPw]) :: [e_a4qPx] type family ZipWith5 (a_a4u6s :: (~>) a_a4qPn ((~>) b_a4qPo ((~>) c_a4qPp ((~>) d_a4qPq ((~>) e_a4qPr f_a4qPs))))) (a_a4u6t :: [a_a4qPn]) (a_a4u6u :: [b_a4qPo]) (a_a4u6v :: [c_a4qPp]) (a_a4u6w :: [d_a4qPq]) (a_a4u6x :: [e_a4qPr]) :: [f_a4qPs] type family ZipWith6 (a_a4u61 :: (~>) a_a4qPg ((~>) b_a4qPh ((~>) c_a4qPi ((~>) d_a4qPj ((~>) e_a4qPk ((~>) f_a4qPl g_a4qPm)))))) (a_a4u62 :: [a_a4qPg]) (a_a4u63 :: [b_a4qPh]) (a_a4u64 :: [c_a4qPi]) (a_a4u65 :: [d_a4qPj]) (a_a4u66 :: [e_a4qPk]) (a_a4u67 :: [f_a4qPl]) :: [g_a4qPm] type family ZipWith7 (a_a4u5w :: (~>) a_a4qP8 ((~>) b_a4qP9 ((~>) c_a4qPa ((~>) d_a4qPb ((~>) e_a4qPc ((~>) f_a4qPd ((~>) g_a4qPe h_a4qPf))))))) (a_a4u5x :: [a_a4qP8]) (a_a4u5y :: [b_a4qP9]) (a_a4u5z :: [c_a4qPa]) (a_a4u5A :: [d_a4qPb]) (a_a4u5B :: [e_a4qPc]) (a_a4u5C :: [f_a4qPd]) (a_a4u5D :: [g_a4qPe]) :: [h_a4qPf] type family Unzip (a_a3Wyx :: [(a_a3U0K, b_a3U0L)]) :: ([a_a3U0K], [b_a3U0L]) sUnzip :: forall a_a3U0K b_a3U0L (t_a3WNO :: [(a_a3U0K, b_a3U0L)]). Sing t_a3WNO -> Sing (Apply UnzipSym0 t_a3WNO :: ([a_a3U0K], [b_a3U0L])) type family Unzip3 (a_a3Wyc :: [(a_a3U0H, b_a3U0I, c_a3U0J)]) :: ([a_a3U0H], [b_a3U0I], [c_a3U0J]) sUnzip3 :: forall a_a3U0H b_a3U0I c_a3U0J (t_a3WNM :: [(a_a3U0H, b_a3U0I, c_a3U0J)]). Sing t_a3WNM -> Sing (Apply Unzip3Sym0 t_a3WNM :: ([a_a3U0H], [b_a3U0I], [c_a3U0J])) type family Unzip4 (a_a3WxP :: [(a_a3U0D, b_a3U0E, c_a3U0F, d_a3U0G)]) :: ([a_a3U0D], [b_a3U0E], [c_a3U0F], [d_a3U0G]) sUnzip4 :: forall a_a3U0D b_a3U0E c_a3U0F d_a3U0G (t_a3WNK :: [(a_a3U0D, b_a3U0E, c_a3U0F, d_a3U0G)]). Sing t_a3WNK -> Sing (Apply Unzip4Sym0 t_a3WNK :: ([a_a3U0D], [b_a3U0E], [c_a3U0F], [d_a3U0G])) type family Unzip5 (a_a3Wxq :: [(a_a3U0y, b_a3U0z, c_a3U0A, d_a3U0B, e_a3U0C)]) :: ([a_a3U0y], [b_a3U0z], [c_a3U0A], [d_a3U0B], [e_a3U0C]) sUnzip5 :: forall a_a3U0y b_a3U0z c_a3U0A d_a3U0B e_a3U0C (t_a3WNI :: [(a_a3U0y, b_a3U0z, c_a3U0A, d_a3U0B, e_a3U0C)]). Sing t_a3WNI -> Sing (Apply Unzip5Sym0 t_a3WNI :: ([a_a3U0y], [b_a3U0z], [c_a3U0A], [d_a3U0B], [e_a3U0C])) type family Unzip6 (a_a3WwZ :: [(a_a3U0s, b_a3U0t, c_a3U0u, d_a3U0v, e_a3U0w, f_a3U0x)]) :: ([a_a3U0s], [b_a3U0t], [c_a3U0u], [d_a3U0v], [e_a3U0w], [f_a3U0x]) sUnzip6 :: forall a_a3U0s b_a3U0t c_a3U0u d_a3U0v e_a3U0w f_a3U0x (t_a3WNG :: [(a_a3U0s, b_a3U0t, c_a3U0u, d_a3U0v, e_a3U0w, f_a3U0x)]). Sing t_a3WNG -> Sing (Apply Unzip6Sym0 t_a3WNG :: ([a_a3U0s], [b_a3U0t], [c_a3U0u], [d_a3U0v], [e_a3U0w], [f_a3U0x])) type family Unzip7 (a_a3Www :: [(a_a3U0l, b_a3U0m, c_a3U0n, d_a3U0o, e_a3U0p, f_a3U0q, g_a3U0r)]) :: ([a_a3U0l], [b_a3U0m], [c_a3U0n], [d_a3U0o], [e_a3U0p], [f_a3U0q], [g_a3U0r]) sUnzip7 :: forall a_a3U0l b_a3U0m c_a3U0n d_a3U0o e_a3U0p f_a3U0q g_a3U0r (t_a3WNE :: [(a_a3U0l, b_a3U0m, c_a3U0n, d_a3U0o, e_a3U0p, f_a3U0q, g_a3U0r)]). Sing t_a3WNE -> Sing (Apply Unzip7Sym0 t_a3WNE :: ([a_a3U0l], [b_a3U0m], [c_a3U0n], [d_a3U0o], [e_a3U0p], [f_a3U0q], [g_a3U0r])) type family Unlines (a_a3Wws :: [Symbol]) :: Symbol sUnlines :: forall (t_a3WNC :: [Symbol]). Sing t_a3WNC -> Sing (Apply UnlinesSym0 t_a3WNC :: Symbol) type family Unwords (a_a3Wwh :: [Symbol]) :: Symbol sUnwords :: forall (t_a3WNA :: [Symbol]). Sing t_a3WNA -> Sing (Apply UnwordsSym0 t_a3WNA :: Symbol) type family Nub (a_a3WAC :: [a_a3TZG]) :: [a_a3TZG] sNub :: forall a_a3TZG (t_a3WOC :: [a_a3TZG]). SEq a_a3TZG => Sing t_a3WOC -> Sing (Apply NubSym0 t_a3WOC :: [a_a3TZG]) type family Delete (a_a3Ww1 :: a_a3U0k) (a_a3Ww2 :: [a_a3U0k]) :: [a_a3U0k] sDelete :: forall a_a3U0k (t_a3WNs :: a_a3U0k) (t_a3WNt :: [a_a3U0k]). SEq a_a3U0k => Sing t_a3WNs -> Sing t_a3WNt -> Sing (Apply (Apply DeleteSym0 t_a3WNs) t_a3WNt :: [a_a3U0k]) type family (\\) (a_a3Wwb :: [a_a3U0j]) (a_a3Wwc :: [a_a3U0j]) :: [a_a3U0j] infix 5 \\ (%\\) :: forall a_a3U0j (t_a3WNw :: [a_a3U0j]) (t_a3WNx :: [a_a3U0j]). SEq a_a3U0j => Sing t_a3WNw -> Sing t_a3WNx -> Sing (Apply (Apply (\\@#@$) t_a3WNw) t_a3WNx :: [a_a3U0j]) infix 5 %\\ type family Union (a_a3WvR :: [a_a3TZC]) (a_a3WvS :: [a_a3TZC]) :: [a_a3TZC] sUnion :: forall a_a3TZC (t_a3WNo :: [a_a3TZC]) (t_a3WNp :: [a_a3TZC]). SEq a_a3TZC => Sing t_a3WNo -> Sing t_a3WNp -> Sing (Apply (Apply UnionSym0 t_a3WNo) t_a3WNp :: [a_a3TZC]) type family Intersect (a_a3WFs :: [a_a3U06]) (a_a3WFt :: [a_a3U06]) :: [a_a3U06] sIntersect :: forall a_a3U06 (t_a3WPA :: [a_a3U06]) (t_a3WPB :: [a_a3U06]). SEq a_a3U06 => Sing t_a3WPA -> Sing t_a3WPB -> Sing (Apply (Apply IntersectSym0 t_a3WPA) t_a3WPB :: [a_a3U06]) type family Insert (a_a3WuQ :: a_a3TZT) (a_a3WuR :: [a_a3TZT]) :: [a_a3TZT] sInsert :: forall a_a3TZT (t_a3WMW :: a_a3TZT) (t_a3WMX :: [a_a3TZT]). SOrd a_a3TZT => Sing t_a3WMW -> Sing t_a3WMX -> Sing (Apply (Apply InsertSym0 t_a3WMW) t_a3WMX :: [a_a3TZT]) type family Sort (a_a3Wv6 :: [a_a3TZS]) :: [a_a3TZS] sSort :: forall a_a3TZS (t_a3WN4 :: [a_a3TZS]). SOrd a_a3TZS => Sing t_a3WN4 -> Sing (Apply SortSym0 t_a3WN4 :: [a_a3TZS]) type family NubBy (a_a3Wp8 :: (~>) a_a3TZF ((~>) a_a3TZF Bool)) (a_a3Wp9 :: [a_a3TZF]) :: [a_a3TZF] sNubBy :: forall a_a3TZF (t_a3WLE :: (~>) a_a3TZF ((~>) a_a3TZF Bool)) (t_a3WLF :: [a_a3TZF]). Sing t_a3WLE -> Sing t_a3WLF -> Sing (Apply (Apply NubBySym0 t_a3WLE) t_a3WLF :: [a_a3TZF]) type family DeleteBy (a_a3Wv9 :: (~>) a_a3U0i ((~>) a_a3U0i Bool)) (a_a3Wva :: a_a3U0i) (a_a3Wvb :: [a_a3U0i]) :: [a_a3U0i] sDeleteBy :: forall a_a3U0i (t_a3WN6 :: (~>) a_a3U0i ((~>) a_a3U0i Bool)) (t_a3WN7 :: a_a3U0i) (t_a3WN8 :: [a_a3U0i]). Sing t_a3WN6 -> Sing t_a3WN7 -> Sing t_a3WN8 -> Sing (Apply (Apply (Apply DeleteBySym0 t_a3WN6) t_a3WN7) t_a3WN8 :: [a_a3U0i]) type family DeleteFirstsBy (a_a3Wvr :: (~>) a_a3U0h ((~>) a_a3U0h Bool)) (a_a3Wvs :: [a_a3U0h]) (a_a3Wvt :: [a_a3U0h]) :: [a_a3U0h] sDeleteFirstsBy :: forall a_a3U0h (t_a3WNc :: (~>) a_a3U0h ((~>) a_a3U0h Bool)) (t_a3WNd :: [a_a3U0h]) (t_a3WNe :: [a_a3U0h]). Sing t_a3WNc -> Sing t_a3WNd -> Sing t_a3WNe -> Sing (Apply (Apply (Apply DeleteFirstsBySym0 t_a3WNc) t_a3WNd) t_a3WNe :: [a_a3U0h]) type family UnionBy (a_a3WvE :: (~>) a_a3TZD ((~>) a_a3TZD Bool)) (a_a3WvF :: [a_a3TZD]) (a_a3WvG :: [a_a3TZD]) :: [a_a3TZD] sUnionBy :: forall a_a3TZD (t_a3WNi :: (~>) a_a3TZD ((~>) a_a3TZD Bool)) (t_a3WNj :: [a_a3TZD]) (t_a3WNk :: [a_a3TZD]). Sing t_a3WNi -> Sing t_a3WNj -> Sing t_a3WNk -> Sing (Apply (Apply (Apply UnionBySym0 t_a3WNi) t_a3WNj) t_a3WNk :: [a_a3TZD]) type family IntersectBy (a_a3WES :: (~>) a_a3U05 ((~>) a_a3U05 Bool)) (a_a3WET :: [a_a3U05]) (a_a3WEU :: [a_a3U05]) :: [a_a3U05] sIntersectBy :: forall a_a3U05 (t_a3WPu :: (~>) a_a3U05 ((~>) a_a3U05 Bool)) (t_a3WPv :: [a_a3U05]) (t_a3WPw :: [a_a3U05]). Sing t_a3WPu -> Sing t_a3WPv -> Sing t_a3WPw -> Sing (Apply (Apply (Apply IntersectBySym0 t_a3WPu) t_a3WPv) t_a3WPw :: [a_a3U05]) type family GroupBy (a_a3Wt1 :: (~>) a_a3TZR ((~>) a_a3TZR Bool)) (a_a3Wt2 :: [a_a3TZR]) :: [[a_a3TZR]] sGroupBy :: forall a_a3TZR (t_a3WMu :: (~>) a_a3TZR ((~>) a_a3TZR Bool)) (t_a3WMv :: [a_a3TZR]). Sing t_a3WMu -> Sing t_a3WMv -> Sing (Apply (Apply GroupBySym0 t_a3WMu) t_a3WMv :: [[a_a3TZR]]) type family SortBy (a_a3WuW :: (~>) a_a3U0g ((~>) a_a3U0g Ordering)) (a_a3WuX :: [a_a3U0g]) :: [a_a3U0g] sSortBy :: forall a_a3U0g (t_a3WN0 :: (~>) a_a3U0g ((~>) a_a3U0g Ordering)) (t_a3WN1 :: [a_a3U0g]). Sing t_a3WN0 -> Sing t_a3WN1 -> Sing (Apply (Apply SortBySym0 t_a3WN0) t_a3WN1 :: [a_a3U0g]) type family InsertBy (a_a3Wus :: (~>) a_a3U0f ((~>) a_a3U0f Ordering)) (a_a3Wut :: a_a3U0f) (a_a3Wuu :: [a_a3U0f]) :: [a_a3U0f] sInsertBy :: forall a_a3U0f (t_a3WMQ :: (~>) a_a3U0f ((~>) a_a3U0f Ordering)) (t_a3WMR :: a_a3U0f) (t_a3WMS :: [a_a3U0f]). Sing t_a3WMQ -> Sing t_a3WMR -> Sing t_a3WMS -> Sing (Apply (Apply (Apply InsertBySym0 t_a3WMQ) t_a3WMR) t_a3WMS :: [a_a3U0f]) type family MaximumBy (a_a63tX :: (~>) a_a63lI ((~>) a_a63lI Ordering)) (a_a63tY :: t_a63lH a_a63lI) :: a_a63lI sMaximumBy :: forall t_a63lH a_a63lI (t_a63Ro :: (~>) a_a63lI ((~>) a_a63lI Ordering)) (t_a63Rp :: t_a63lH a_a63lI). SFoldable t_a63lH => Sing t_a63Ro -> Sing t_a63Rp -> Sing (Apply (Apply MaximumBySym0 t_a63Ro) t_a63Rp :: a_a63lI) type family MinimumBy (a_a63ty :: (~>) a_a63lG ((~>) a_a63lG Ordering)) (a_a63tz :: t_a63lF a_a63lG) :: a_a63lG sMinimumBy :: forall t_a63lF a_a63lG (t_a63Rk :: (~>) a_a63lG ((~>) a_a63lG Ordering)) (t_a63Rl :: t_a63lF a_a63lG). SFoldable t_a63lF => Sing t_a63Rk -> Sing t_a63Rl -> Sing (Apply (Apply MinimumBySym0 t_a63Rk) t_a63Rl :: a_a63lG) type family GenericLength (a_a3WoV :: [a_a3TZB]) :: i_a3TZA sGenericLength :: forall i_a3TZA a_a3TZB (t_a3WLw :: [a_a3TZB]). SNum i_a3TZA => Sing t_a3WLw -> Sing (Apply GenericLengthSym0 t_a3WLw :: i_a3TZA) type family GenericTake (a_a4u5q :: i_a4qP6) (a_a4u5r :: [a_a4qP7]) :: [a_a4qP7] type family GenericDrop (a_a4u5g :: i_a4qP4) (a_a4u5h :: [a_a4qP5]) :: [a_a4qP5] type family GenericSplitAt (a_a4u56 :: i_a4qP2) (a_a4u57 :: [a_a4qP3]) :: ([a_a4qP3], [a_a4qP3]) type family GenericIndex (a_a4u4W :: [a_a4qP1]) (a_a4u4X :: i_a4qP0) :: a_a4qP1 type family GenericReplicate (a_a4u4M :: i_a4qOY) (a_a4u4N :: a_a4qOZ) :: [a_a4qOZ] type NilSym0 = '[] data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679298917 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679298917 :: a3530822107858468865) (t6989586621679298918 :: [a3530822107858468865]) = '(:) t6989586621679298917 t6989586621679298918 type (++@#@$$$) (a6989586621679521123 :: [a6989586621679520926]) (a6989586621679521124 :: [a6989586621679520926]) = (++) a6989586621679521123 a6989586621679521124 data (++@#@$$) (a6989586621679521123 :: [a6989586621679520926]) :: (~>) [a6989586621679520926] [a6989586621679520926] infixr 5 ++@#@$$ data (++@#@$) :: forall a6989586621679520926. (~>) [a6989586621679520926] ((~>) [a6989586621679520926] [a6989586621679520926]) infixr 5 ++@#@$ data HeadSym0 :: forall a6989586621679940142. (~>) [a6989586621679940142] a6989586621679940142 type HeadSym1 (a6989586621679950665 :: [a6989586621679940142]) = Head a6989586621679950665 data LastSym0 :: forall a6989586621679940141. (~>) [a6989586621679940141] a6989586621679940141 type LastSym1 (a6989586621679950660 :: [a6989586621679940141]) = Last a6989586621679950660 data TailSym0 :: forall a6989586621679940140. (~>) [a6989586621679940140] [a6989586621679940140] type TailSym1 (a6989586621679950657 :: [a6989586621679940140]) = Tail a6989586621679950657 data InitSym0 :: forall a6989586621679940139. (~>) [a6989586621679940139] [a6989586621679940139] type InitSym1 (a6989586621679950643 :: [a6989586621679940139]) = Init a6989586621679950643 data NullSym0 :: forall a6989586621680452738 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452738) Bool type NullSym1 (arg6989586621680453386 :: t6989586621680452723 a6989586621680452738) = Null arg6989586621680453386 data LengthSym0 :: forall a6989586621680452739 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452739) Nat type LengthSym1 (arg6989586621680453388 :: t6989586621680452723 a6989586621680452739) = Length arg6989586621680453388 data MapSym0 :: forall a6989586621679520927 b6989586621679520928. (~>) ((~>) a6989586621679520927 b6989586621679520928) ((~>) [a6989586621679520927] [b6989586621679520928]) data MapSym1 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) :: (~>) [a6989586621679520927] [b6989586621679520928] type MapSym2 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) (a6989586621679521132 :: [a6989586621679520927]) = Map a6989586621679521131 a6989586621679521132 data ReverseSym0 :: forall a6989586621679940137. (~>) [a6989586621679940137] [a6989586621679940137] type ReverseSym1 (a6989586621679950596 :: [a6989586621679940137]) = Reverse a6989586621679950596 data IntersperseSym0 :: forall a6989586621679940136. (~>) a6989586621679940136 ((~>) [a6989586621679940136] [a6989586621679940136]) data IntersperseSym1 (a6989586621679950583 :: a6989586621679940136) :: (~>) [a6989586621679940136] [a6989586621679940136] type IntersperseSym2 (a6989586621679950583 :: a6989586621679940136) (a6989586621679950584 :: [a6989586621679940136]) = Intersperse a6989586621679950583 a6989586621679950584 data IntercalateSym0 :: forall a6989586621679940135. (~>) [a6989586621679940135] ((~>) [[a6989586621679940135]] [a6989586621679940135]) data IntercalateSym1 (a6989586621679950590 :: [a6989586621679940135]) :: (~>) [[a6989586621679940135]] [a6989586621679940135] type IntercalateSym2 (a6989586621679950590 :: [a6989586621679940135]) (a6989586621679950591 :: [[a6989586621679940135]]) = Intercalate a6989586621679950590 a6989586621679950591 data TransposeSym0 :: forall a6989586621679940022. (~>) [[a6989586621679940022]] [[a6989586621679940022]] type TransposeSym1 (a6989586621679950668 :: [[a6989586621679940022]]) = Transpose a6989586621679950668 data SubsequencesSym0 :: forall a6989586621679940134. (~>) [a6989586621679940134] [[a6989586621679940134]] type SubsequencesSym1 (a6989586621679950580 :: [a6989586621679940134]) = Subsequences a6989586621679950580 data PermutationsSym0 :: forall a6989586621679940131. (~>) [a6989586621679940131] [[a6989586621679940131]] type PermutationsSym1 (a6989586621679950462 :: [a6989586621679940131]) = Permutations a6989586621679950462 data FoldlSym0 :: forall a6989586621680452732 b6989586621680452731 t6989586621680452723. (~>) ((~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) ((~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731)) data FoldlSym1 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) :: forall t6989586621680452723. (~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731) data FoldlSym2 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731 type FoldlSym3 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) (arg6989586621680453366 :: t6989586621680452723 a6989586621680452732) = Foldl arg6989586621680453364 arg6989586621680453365 arg6989586621680453366 data Foldl'Sym0 :: forall a6989586621680452734 b6989586621680452733 t6989586621680452723. (~>) ((~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) ((~>) b6989586621680452733 ((~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733)) data Foldl'Sym1 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) :: forall t6989586621680452723. (~>) b6989586621680452733 ((~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733) data Foldl'Sym2 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) (arg6989586621680453371 :: b6989586621680452733) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452734) b6989586621680452733 type Foldl'Sym3 (arg6989586621680453370 :: (~>) b6989586621680452733 ((~>) a6989586621680452734 b6989586621680452733)) (arg6989586621680453371 :: b6989586621680452733) (arg6989586621680453372 :: t6989586621680452723 a6989586621680452734) = Foldl' arg6989586621680453370 arg6989586621680453371 arg6989586621680453372 data Foldl1Sym0 :: forall a6989586621680452736 t6989586621680452723. (~>) ((~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) ((~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736) data Foldl1Sym1 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736 type Foldl1Sym2 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) (arg6989586621680453381 :: t6989586621680452723 a6989586621680452736) = Foldl1 arg6989586621680453380 arg6989586621680453381 data Foldl1'Sym0 :: forall a6989586621679940127. (~>) ((~>) a6989586621679940127 ((~>) a6989586621679940127 a6989586621679940127)) ((~>) [a6989586621679940127] a6989586621679940127) data Foldl1'Sym1 (a6989586621679950455 :: (~>) a6989586621679940127 ((~>) a6989586621679940127 a6989586621679940127)) :: (~>) [a6989586621679940127] a6989586621679940127 type Foldl1'Sym2 (a6989586621679950455 :: (~>) a6989586621679940127 ((~>) a6989586621679940127 a6989586621679940127)) (a6989586621679950456 :: [a6989586621679940127]) = Foldl1' a6989586621679950455 a6989586621679950456 data FoldrSym0 :: forall a6989586621680452727 b6989586621680452728 t6989586621680452723. (~>) ((~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) ((~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728)) data FoldrSym1 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) :: forall t6989586621680452723. (~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728) data FoldrSym2 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728 type FoldrSym3 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) (arg6989586621680453354 :: t6989586621680452723 a6989586621680452727) = Foldr arg6989586621680453352 arg6989586621680453353 arg6989586621680453354 data Foldr1Sym0 :: forall a6989586621680452735 t6989586621680452723. (~>) ((~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) ((~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735) data Foldr1Sym1 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735 type Foldr1Sym2 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) (arg6989586621680453377 :: t6989586621680452723 a6989586621680452735) = Foldr1 arg6989586621680453376 arg6989586621680453377 data ConcatSym0 :: forall a6989586621680452649 t6989586621680452648. (~>) (t6989586621680452648 [a6989586621680452649]) [a6989586621680452649] type ConcatSym1 (a6989586621680453234 :: t6989586621680452648 [a6989586621680452649]) = Concat a6989586621680453234 data ConcatMapSym0 :: forall a6989586621680452646 b6989586621680452647 t6989586621680452645. (~>) ((~>) a6989586621680452646 [b6989586621680452647]) ((~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647]) data ConcatMapSym1 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) :: forall t6989586621680452645. (~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647] type ConcatMapSym2 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) (a6989586621680453219 :: t6989586621680452645 a6989586621680452646) = ConcatMap a6989586621680453218 a6989586621680453219 data AndSym0 :: forall t6989586621680452644. (~>) (t6989586621680452644 Bool) Bool type AndSym1 (a6989586621680453209 :: t6989586621680452644 Bool) = And a6989586621680453209 data OrSym0 :: forall t6989586621680452643. (~>) (t6989586621680452643 Bool) Bool type OrSym1 (a6989586621680453200 :: t6989586621680452643 Bool) = Or a6989586621680453200 data AnySym0 :: forall a6989586621680452642 t6989586621680452641. (~>) ((~>) a6989586621680452642 Bool) ((~>) (t6989586621680452641 a6989586621680452642) Bool) data AnySym1 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) :: forall t6989586621680452641. (~>) (t6989586621680452641 a6989586621680452642) Bool type AnySym2 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) (a6989586621680453188 :: t6989586621680452641 a6989586621680452642) = Any a6989586621680453187 a6989586621680453188 data AllSym0 :: forall a6989586621680452640 t6989586621680452639. (~>) ((~>) a6989586621680452640 Bool) ((~>) (t6989586621680452639 a6989586621680452640) Bool) data AllSym1 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) :: forall t6989586621680452639. (~>) (t6989586621680452639 a6989586621680452640) Bool type AllSym2 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) (a6989586621680453175 :: t6989586621680452639 a6989586621680452640) = All a6989586621680453174 a6989586621680453175 data SumSym0 :: forall a6989586621680452743 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452743) a6989586621680452743 type SumSym1 (arg6989586621680453398 :: t6989586621680452723 a6989586621680452743) = Sum arg6989586621680453398 data ProductSym0 :: forall a6989586621680452744 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452744) a6989586621680452744 type ProductSym1 (arg6989586621680453400 :: t6989586621680452723 a6989586621680452744) = Product arg6989586621680453400 data MaximumSym0 :: forall a6989586621680452741 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452741) a6989586621680452741 type MaximumSym1 (arg6989586621680453394 :: t6989586621680452723 a6989586621680452741) = Maximum arg6989586621680453394 data MinimumSym0 :: forall a6989586621680452742 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452742) a6989586621680452742 type MinimumSym1 (arg6989586621680453396 :: t6989586621680452723 a6989586621680452742) = Minimum arg6989586621680453396 data ScanlSym0 :: forall a6989586621679940120 b6989586621679940119. (~>) ((~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) ((~>) b6989586621679940119 ((~>) [a6989586621679940120] [b6989586621679940119])) data ScanlSym1 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) :: (~>) b6989586621679940119 ((~>) [a6989586621679940120] [b6989586621679940119]) data ScanlSym2 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) (a6989586621679950229 :: b6989586621679940119) :: (~>) [a6989586621679940120] [b6989586621679940119] type ScanlSym3 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) (a6989586621679950229 :: b6989586621679940119) (a6989586621679950230 :: [a6989586621679940120]) = Scanl a6989586621679950228 a6989586621679950229 a6989586621679950230 data Scanl1Sym0 :: forall a6989586621679940118. (~>) ((~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) ((~>) [a6989586621679940118] [a6989586621679940118]) data Scanl1Sym1 (a6989586621679950242 :: (~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) :: (~>) [a6989586621679940118] [a6989586621679940118] type Scanl1Sym2 (a6989586621679950242 :: (~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) (a6989586621679950243 :: [a6989586621679940118]) = Scanl1 a6989586621679950242 a6989586621679950243 data ScanrSym0 :: forall a6989586621679940116 b6989586621679940117. (~>) ((~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) ((~>) b6989586621679940117 ((~>) [a6989586621679940116] [b6989586621679940117])) data ScanrSym1 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) :: (~>) b6989586621679940117 ((~>) [a6989586621679940116] [b6989586621679940117]) data ScanrSym2 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) (a6989586621679950208 :: b6989586621679940117) :: (~>) [a6989586621679940116] [b6989586621679940117] type ScanrSym3 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) (a6989586621679950208 :: b6989586621679940117) (a6989586621679950209 :: [a6989586621679940116]) = Scanr a6989586621679950207 a6989586621679950208 a6989586621679950209 data Scanr1Sym0 :: forall a6989586621679940115. (~>) ((~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) ((~>) [a6989586621679940115] [a6989586621679940115]) data Scanr1Sym1 (a6989586621679950183 :: (~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) :: (~>) [a6989586621679940115] [a6989586621679940115] type Scanr1Sym2 (a6989586621679950183 :: (~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) (a6989586621679950184 :: [a6989586621679940115]) = Scanr1 a6989586621679950183 a6989586621679950184 data MapAccumLSym0 :: forall a6989586621680756572 b6989586621680756573 c6989586621680756574 t6989586621680756571. (~>) ((~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) ((~>) a6989586621680756572 ((~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574))) data MapAccumLSym1 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) :: forall t6989586621680756571. (~>) a6989586621680756572 ((~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574)) data MapAccumLSym2 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) (a6989586621680757112 :: a6989586621680756572) :: forall t6989586621680756571. (~>) (t6989586621680756571 b6989586621680756573) (a6989586621680756572, t6989586621680756571 c6989586621680756574) type MapAccumLSym3 (a6989586621680757111 :: (~>) a6989586621680756572 ((~>) b6989586621680756573 (a6989586621680756572, c6989586621680756574))) (a6989586621680757112 :: a6989586621680756572) (a6989586621680757113 :: t6989586621680756571 b6989586621680756573) = MapAccumL a6989586621680757111 a6989586621680757112 a6989586621680757113 data MapAccumRSym0 :: forall a6989586621680756568 b6989586621680756569 c6989586621680756570 t6989586621680756567. (~>) ((~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) ((~>) a6989586621680756568 ((~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570))) data MapAccumRSym1 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) :: forall t6989586621680756567. (~>) a6989586621680756568 ((~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570)) data MapAccumRSym2 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) (a6989586621680757095 :: a6989586621680756568) :: forall t6989586621680756567. (~>) (t6989586621680756567 b6989586621680756569) (a6989586621680756568, t6989586621680756567 c6989586621680756570) type MapAccumRSym3 (a6989586621680757094 :: (~>) a6989586621680756568 ((~>) b6989586621680756569 (a6989586621680756568, c6989586621680756570))) (a6989586621680757095 :: a6989586621680756568) (a6989586621680757096 :: t6989586621680756567 b6989586621680756569) = MapAccumR a6989586621680757094 a6989586621680757095 a6989586621680757096 data ReplicateSym0 :: forall a6989586621679940023. (~>) Nat ((~>) a6989586621679940023 [a6989586621679940023]) data ReplicateSym1 (a6989586621679949325 :: Nat) :: forall a6989586621679940023. (~>) a6989586621679940023 [a6989586621679940023] type ReplicateSym2 (a6989586621679949325 :: Nat) (a6989586621679949326 :: a6989586621679940023) = Replicate a6989586621679949325 a6989586621679949326 data UnfoldrSym0 :: forall a6989586621679940108 b6989586621679940107. (~>) ((~>) b6989586621679940107 (Maybe (a6989586621679940108, b6989586621679940107))) ((~>) b6989586621679940107 [a6989586621679940108]) data UnfoldrSym1 (a6989586621679950041 :: (~>) b6989586621679940107 (Maybe (a6989586621679940108, b6989586621679940107))) :: (~>) b6989586621679940107 [a6989586621679940108] type UnfoldrSym2 (a6989586621679950041 :: (~>) b6989586621679940107 (Maybe (a6989586621679940108, b6989586621679940107))) (a6989586621679950042 :: b6989586621679940107) = Unfoldr a6989586621679950041 a6989586621679950042 data TakeSym0 :: forall a6989586621679940039. (~>) Nat ((~>) [a6989586621679940039] [a6989586621679940039]) data TakeSym1 (a6989586621679949421 :: Nat) :: forall a6989586621679940039. (~>) [a6989586621679940039] [a6989586621679940039] type TakeSym2 (a6989586621679949421 :: Nat) (a6989586621679949422 :: [a6989586621679940039]) = Take a6989586621679949421 a6989586621679949422 data DropSym0 :: forall a6989586621679940038. (~>) Nat ((~>) [a6989586621679940038] [a6989586621679940038]) data DropSym1 (a6989586621679949407 :: Nat) :: forall a6989586621679940038. (~>) [a6989586621679940038] [a6989586621679940038] type DropSym2 (a6989586621679949407 :: Nat) (a6989586621679949408 :: [a6989586621679940038]) = Drop a6989586621679949407 a6989586621679949408 data SplitAtSym0 :: forall a6989586621679940037. (~>) Nat ((~>) [a6989586621679940037] ([a6989586621679940037], [a6989586621679940037])) data SplitAtSym1 (a6989586621679949435 :: Nat) :: forall a6989586621679940037. (~>) [a6989586621679940037] ([a6989586621679940037], [a6989586621679940037]) type SplitAtSym2 (a6989586621679949435 :: Nat) (a6989586621679949436 :: [a6989586621679940037]) = SplitAt a6989586621679949435 a6989586621679949436 data TakeWhileSym0 :: forall a6989586621679940044. (~>) ((~>) a6989586621679940044 Bool) ((~>) [a6989586621679940044] [a6989586621679940044]) data TakeWhileSym1 (a6989586621679949579 :: (~>) a6989586621679940044 Bool) :: (~>) [a6989586621679940044] [a6989586621679940044] type TakeWhileSym2 (a6989586621679949579 :: (~>) a6989586621679940044 Bool) (a6989586621679949580 :: [a6989586621679940044]) = TakeWhile a6989586621679949579 a6989586621679949580 data DropWhileSym0 :: forall a6989586621679940043. (~>) ((~>) a6989586621679940043 Bool) ((~>) [a6989586621679940043] [a6989586621679940043]) data DropWhileSym1 (a6989586621679949561 :: (~>) a6989586621679940043 Bool) :: (~>) [a6989586621679940043] [a6989586621679940043] type DropWhileSym2 (a6989586621679949561 :: (~>) a6989586621679940043 Bool) (a6989586621679949562 :: [a6989586621679940043]) = DropWhile a6989586621679949561 a6989586621679949562 data DropWhileEndSym0 :: forall a6989586621679940042. (~>) ((~>) a6989586621679940042 Bool) ((~>) [a6989586621679940042] [a6989586621679940042]) data DropWhileEndSym1 (a6989586621679950617 :: (~>) a6989586621679940042 Bool) :: (~>) [a6989586621679940042] [a6989586621679940042] type DropWhileEndSym2 (a6989586621679950617 :: (~>) a6989586621679940042 Bool) (a6989586621679950618 :: [a6989586621679940042]) = DropWhileEnd a6989586621679950617 a6989586621679950618 data SpanSym0 :: forall a6989586621679940041. (~>) ((~>) a6989586621679940041 Bool) ((~>) [a6989586621679940041] ([a6989586621679940041], [a6989586621679940041])) data SpanSym1 (a6989586621679949484 :: (~>) a6989586621679940041 Bool) :: (~>) [a6989586621679940041] ([a6989586621679940041], [a6989586621679940041]) type SpanSym2 (a6989586621679949484 :: (~>) a6989586621679940041 Bool) (a6989586621679949485 :: [a6989586621679940041]) = Span a6989586621679949484 a6989586621679949485 data BreakSym0 :: forall a6989586621679940040. (~>) ((~>) a6989586621679940040 Bool) ((~>) [a6989586621679940040] ([a6989586621679940040], [a6989586621679940040])) data BreakSym1 (a6989586621679949441 :: (~>) a6989586621679940040 Bool) :: (~>) [a6989586621679940040] ([a6989586621679940040], [a6989586621679940040]) type BreakSym2 (a6989586621679949441 :: (~>) a6989586621679940040 Bool) (a6989586621679949442 :: [a6989586621679940040]) = Break a6989586621679949441 a6989586621679949442 data StripPrefixSym0 :: forall a6989586621680066266. (~>) [a6989586621680066266] ((~>) [a6989586621680066266] (Maybe [a6989586621680066266])) data StripPrefixSym1 (a6989586621680078976 :: [a6989586621680066266]) :: (~>) [a6989586621680066266] (Maybe [a6989586621680066266]) type StripPrefixSym2 (a6989586621680078976 :: [a6989586621680066266]) (a6989586621680078977 :: [a6989586621680066266]) = StripPrefix a6989586621680078976 a6989586621680078977 data GroupSym0 :: forall a6989586621679940036. (~>) [a6989586621679940036] [[a6989586621679940036]] type GroupSym1 (a6989586621679949558 :: [a6989586621679940036]) = Group a6989586621679949558 data InitsSym0 :: forall a6989586621679940106. (~>) [a6989586621679940106] [[a6989586621679940106]] type InitsSym1 (a6989586621679950033 :: [a6989586621679940106]) = Inits a6989586621679950033 data TailsSym0 :: forall a6989586621679940105. (~>) [a6989586621679940105] [[a6989586621679940105]] type TailsSym1 (a6989586621679950026 :: [a6989586621679940105]) = Tails a6989586621679950026 data IsPrefixOfSym0 :: forall a6989586621679940104. (~>) [a6989586621679940104] ((~>) [a6989586621679940104] Bool) data IsPrefixOfSym1 (a6989586621679950018 :: [a6989586621679940104]) :: (~>) [a6989586621679940104] Bool type IsPrefixOfSym2 (a6989586621679950018 :: [a6989586621679940104]) (a6989586621679950019 :: [a6989586621679940104]) = IsPrefixOf a6989586621679950018 a6989586621679950019 data IsSuffixOfSym0 :: forall a6989586621679940103. (~>) [a6989586621679940103] ((~>) [a6989586621679940103] Bool) data IsSuffixOfSym1 (a6989586621679950609 :: [a6989586621679940103]) :: (~>) [a6989586621679940103] Bool type IsSuffixOfSym2 (a6989586621679950609 :: [a6989586621679940103]) (a6989586621679950610 :: [a6989586621679940103]) = IsSuffixOf a6989586621679950609 a6989586621679950610 data IsInfixOfSym0 :: forall a6989586621679940102. (~>) [a6989586621679940102] ((~>) [a6989586621679940102] Bool) data IsInfixOfSym1 (a6989586621679950256 :: [a6989586621679940102]) :: (~>) [a6989586621679940102] Bool type IsInfixOfSym2 (a6989586621679950256 :: [a6989586621679940102]) (a6989586621679950257 :: [a6989586621679940102]) = IsInfixOf a6989586621679950256 a6989586621679950257 data ElemSym0 :: forall a6989586621680452740 t6989586621680452723. (~>) a6989586621680452740 ((~>) (t6989586621680452723 a6989586621680452740) Bool) data ElemSym1 (arg6989586621680453390 :: a6989586621680452740) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452740) Bool type ElemSym2 (arg6989586621680453390 :: a6989586621680452740) (arg6989586621680453391 :: t6989586621680452723 a6989586621680452740) = Elem arg6989586621680453390 arg6989586621680453391 data NotElemSym0 :: forall a6989586621680452634 t6989586621680452633. (~>) a6989586621680452634 ((~>) (t6989586621680452633 a6989586621680452634) Bool) data NotElemSym1 (a6989586621680453116 :: a6989586621680452634) :: forall t6989586621680452633. (~>) (t6989586621680452633 a6989586621680452634) Bool type NotElemSym2 (a6989586621680453116 :: a6989586621680452634) (a6989586621680453117 :: t6989586621680452633 a6989586621680452634) = NotElem a6989586621680453116 a6989586621680453117 data LookupSym0 :: forall a6989586621679940029 b6989586621679940030. (~>) a6989586621679940029 ((~>) [(a6989586621679940029, b6989586621679940030)] (Maybe b6989586621679940030)) data LookupSym1 (a6989586621679949390 :: a6989586621679940029) :: forall b6989586621679940030. (~>) [(a6989586621679940029, b6989586621679940030)] (Maybe b6989586621679940030) type LookupSym2 (a6989586621679949390 :: a6989586621679940029) (a6989586621679949391 :: [(a6989586621679940029, b6989586621679940030)]) = Lookup a6989586621679949390 a6989586621679949391 data FindSym0 :: forall a6989586621680452632 t6989586621680452631. (~>) ((~>) a6989586621680452632 Bool) ((~>) (t6989586621680452631 a6989586621680452632) (Maybe a6989586621680452632)) data FindSym1 (a6989586621680453089 :: (~>) a6989586621680452632 Bool) :: forall t6989586621680452631. (~>) (t6989586621680452631 a6989586621680452632) (Maybe a6989586621680452632) type FindSym2 (a6989586621680453089 :: (~>) a6989586621680452632 Bool) (a6989586621680453090 :: t6989586621680452631 a6989586621680452632) = Find a6989586621680453089 a6989586621680453090 data FilterSym0 :: forall a6989586621679940052. (~>) ((~>) a6989586621679940052 Bool) ((~>) [a6989586621679940052] [a6989586621679940052]) data FilterSym1 (a6989586621679949593 :: (~>) a6989586621679940052 Bool) :: (~>) [a6989586621679940052] [a6989586621679940052] type FilterSym2 (a6989586621679949593 :: (~>) a6989586621679940052 Bool) (a6989586621679949594 :: [a6989586621679940052]) = Filter a6989586621679949593 a6989586621679949594 data PartitionSym0 :: forall a6989586621679940028. (~>) ((~>) a6989586621679940028 Bool) ((~>) [a6989586621679940028] ([a6989586621679940028], [a6989586621679940028])) data PartitionSym1 (a6989586621679949384 :: (~>) a6989586621679940028 Bool) :: (~>) [a6989586621679940028] ([a6989586621679940028], [a6989586621679940028]) type PartitionSym2 (a6989586621679949384 :: (~>) a6989586621679940028 Bool) (a6989586621679949385 :: [a6989586621679940028]) = Partition a6989586621679949384 a6989586621679949385 data (!!@#@$) :: forall a6989586621679940021. (~>) [a6989586621679940021] ((~>) Nat a6989586621679940021) infixl 9 !!@#@$ data (!!@#@$$) (a6989586621679949311 :: [a6989586621679940021]) :: (~>) Nat a6989586621679940021 infixl 9 !!@#@$$ type (!!@#@$$$) (a6989586621679949311 :: [a6989586621679940021]) (a6989586621679949312 :: Nat) = (!!) a6989586621679949311 a6989586621679949312 data ElemIndexSym0 :: forall a6989586621679940050. (~>) a6989586621679940050 ((~>) [a6989586621679940050] (Maybe Nat)) data ElemIndexSym1 (a6989586621679949976 :: a6989586621679940050) :: (~>) [a6989586621679940050] (Maybe Nat) type ElemIndexSym2 (a6989586621679949976 :: a6989586621679940050) (a6989586621679949977 :: [a6989586621679940050]) = ElemIndex a6989586621679949976 a6989586621679949977 data ElemIndicesSym0 :: forall a6989586621679940049. (~>) a6989586621679940049 ((~>) [a6989586621679940049] [Nat]) data ElemIndicesSym1 (a6989586621679949960 :: a6989586621679940049) :: (~>) [a6989586621679940049] [Nat] type ElemIndicesSym2 (a6989586621679949960 :: a6989586621679940049) (a6989586621679949961 :: [a6989586621679940049]) = ElemIndices a6989586621679949960 a6989586621679949961 data FindIndexSym0 :: forall a6989586621679940048. (~>) ((~>) a6989586621679940048 Bool) ((~>) [a6989586621679940048] (Maybe Nat)) data FindIndexSym1 (a6989586621679949968 :: (~>) a6989586621679940048 Bool) :: (~>) [a6989586621679940048] (Maybe Nat) type FindIndexSym2 (a6989586621679949968 :: (~>) a6989586621679940048 Bool) (a6989586621679949969 :: [a6989586621679940048]) = FindIndex a6989586621679949968 a6989586621679949969 data FindIndicesSym0 :: forall a6989586621679940047. (~>) ((~>) a6989586621679940047 Bool) ((~>) [a6989586621679940047] [Nat]) data FindIndicesSym1 (a6989586621679949934 :: (~>) a6989586621679940047 Bool) :: (~>) [a6989586621679940047] [Nat] type FindIndicesSym2 (a6989586621679949934 :: (~>) a6989586621679940047 Bool) (a6989586621679949935 :: [a6989586621679940047]) = FindIndices a6989586621679949934 a6989586621679949935 data ZipSym0 :: forall a6989586621679940098 b6989586621679940099. (~>) [a6989586621679940098] ((~>) [b6989586621679940099] [(a6989586621679940098, b6989586621679940099)]) data ZipSym1 (a6989586621679949926 :: [a6989586621679940098]) :: forall b6989586621679940099. (~>) [b6989586621679940099] [(a6989586621679940098, b6989586621679940099)] type ZipSym2 (a6989586621679949926 :: [a6989586621679940098]) (a6989586621679949927 :: [b6989586621679940099]) = Zip a6989586621679949926 a6989586621679949927 data Zip3Sym0 :: forall a6989586621679940095 b6989586621679940096 c6989586621679940097. (~>) [a6989586621679940095] ((~>) [b6989586621679940096] ((~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)])) data Zip3Sym1 (a6989586621679949914 :: [a6989586621679940095]) :: forall b6989586621679940096 c6989586621679940097. (~>) [b6989586621679940096] ((~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)]) data Zip3Sym2 (a6989586621679949914 :: [a6989586621679940095]) (a6989586621679949915 :: [b6989586621679940096]) :: forall c6989586621679940097. (~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)] type Zip3Sym3 (a6989586621679949914 :: [a6989586621679940095]) (a6989586621679949915 :: [b6989586621679940096]) (a6989586621679949916 :: [c6989586621679940097]) = Zip3 a6989586621679949914 a6989586621679949915 a6989586621679949916 data Zip4Sym0 :: forall a6989586621680066262 b6989586621680066263 c6989586621680066264 d6989586621680066265. (~>) [a6989586621680066262] ((~>) [b6989586621680066263] ((~>) [c6989586621680066264] ((~>) [d6989586621680066265] [(a6989586621680066262, b6989586621680066263, c6989586621680066264, d6989586621680066265)]))) data Zip4Sym1 (a6989586621680078964 :: [a6989586621680066262]) :: forall b6989586621680066263 c6989586621680066264 d6989586621680066265. (~>) [b6989586621680066263] ((~>) [c6989586621680066264] ((~>) [d6989586621680066265] [(a6989586621680066262, b6989586621680066263, c6989586621680066264, d6989586621680066265)])) data Zip4Sym2 (a6989586621680078964 :: [a6989586621680066262]) (a6989586621680078965 :: [b6989586621680066263]) :: forall c6989586621680066264 d6989586621680066265. (~>) [c6989586621680066264] ((~>) [d6989586621680066265] [(a6989586621680066262, b6989586621680066263, c6989586621680066264, d6989586621680066265)]) data Zip4Sym3 (a6989586621680078964 :: [a6989586621680066262]) (a6989586621680078965 :: [b6989586621680066263]) (a6989586621680078966 :: [c6989586621680066264]) :: forall d6989586621680066265. (~>) [d6989586621680066265] [(a6989586621680066262, b6989586621680066263, c6989586621680066264, d6989586621680066265)] type Zip4Sym4 (a6989586621680078964 :: [a6989586621680066262]) (a6989586621680078965 :: [b6989586621680066263]) (a6989586621680078966 :: [c6989586621680066264]) (a6989586621680078967 :: [d6989586621680066265]) = Zip4 a6989586621680078964 a6989586621680078965 a6989586621680078966 a6989586621680078967 data Zip5Sym0 :: forall a6989586621680066257 b6989586621680066258 c6989586621680066259 d6989586621680066260 e6989586621680066261. (~>) [a6989586621680066257] ((~>) [b6989586621680066258] ((~>) [c6989586621680066259] ((~>) [d6989586621680066260] ((~>) [e6989586621680066261] [(a6989586621680066257, b6989586621680066258, c6989586621680066259, d6989586621680066260, e6989586621680066261)])))) data Zip5Sym1 (a6989586621680078941 :: [a6989586621680066257]) :: forall b6989586621680066258 c6989586621680066259 d6989586621680066260 e6989586621680066261. (~>) [b6989586621680066258] ((~>) [c6989586621680066259] ((~>) [d6989586621680066260] ((~>) [e6989586621680066261] [(a6989586621680066257, b6989586621680066258, c6989586621680066259, d6989586621680066260, e6989586621680066261)]))) data Zip5Sym2 (a6989586621680078941 :: [a6989586621680066257]) (a6989586621680078942 :: [b6989586621680066258]) :: forall c6989586621680066259 d6989586621680066260 e6989586621680066261. (~>) [c6989586621680066259] ((~>) [d6989586621680066260] ((~>) [e6989586621680066261] [(a6989586621680066257, b6989586621680066258, c6989586621680066259, d6989586621680066260, e6989586621680066261)])) data Zip5Sym3 (a6989586621680078941 :: [a6989586621680066257]) (a6989586621680078942 :: [b6989586621680066258]) (a6989586621680078943 :: [c6989586621680066259]) :: forall d6989586621680066260 e6989586621680066261. (~>) [d6989586621680066260] ((~>) [e6989586621680066261] [(a6989586621680066257, b6989586621680066258, c6989586621680066259, d6989586621680066260, e6989586621680066261)]) data Zip5Sym4 (a6989586621680078941 :: [a6989586621680066257]) (a6989586621680078942 :: [b6989586621680066258]) (a6989586621680078943 :: [c6989586621680066259]) (a6989586621680078944 :: [d6989586621680066260]) :: forall e6989586621680066261. (~>) [e6989586621680066261] [(a6989586621680066257, b6989586621680066258, c6989586621680066259, d6989586621680066260, e6989586621680066261)] type Zip5Sym5 (a6989586621680078941 :: [a6989586621680066257]) (a6989586621680078942 :: [b6989586621680066258]) (a6989586621680078943 :: [c6989586621680066259]) (a6989586621680078944 :: [d6989586621680066260]) (a6989586621680078945 :: [e6989586621680066261]) = Zip5 a6989586621680078941 a6989586621680078942 a6989586621680078943 a6989586621680078944 a6989586621680078945 data Zip6Sym0 :: forall a6989586621680066251 b6989586621680066252 c6989586621680066253 d6989586621680066254 e6989586621680066255 f6989586621680066256. (~>) [a6989586621680066251] ((~>) [b6989586621680066252] ((~>) [c6989586621680066253] ((~>) [d6989586621680066254] ((~>) [e6989586621680066255] ((~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)]))))) data Zip6Sym1 (a6989586621680078913 :: [a6989586621680066251]) :: forall b6989586621680066252 c6989586621680066253 d6989586621680066254 e6989586621680066255 f6989586621680066256. (~>) [b6989586621680066252] ((~>) [c6989586621680066253] ((~>) [d6989586621680066254] ((~>) [e6989586621680066255] ((~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)])))) data Zip6Sym2 (a6989586621680078913 :: [a6989586621680066251]) (a6989586621680078914 :: [b6989586621680066252]) :: forall c6989586621680066253 d6989586621680066254 e6989586621680066255 f6989586621680066256. (~>) [c6989586621680066253] ((~>) [d6989586621680066254] ((~>) [e6989586621680066255] ((~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)]))) data Zip6Sym3 (a6989586621680078913 :: [a6989586621680066251]) (a6989586621680078914 :: [b6989586621680066252]) (a6989586621680078915 :: [c6989586621680066253]) :: forall d6989586621680066254 e6989586621680066255 f6989586621680066256. (~>) [d6989586621680066254] ((~>) [e6989586621680066255] ((~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)])) data Zip6Sym4 (a6989586621680078913 :: [a6989586621680066251]) (a6989586621680078914 :: [b6989586621680066252]) (a6989586621680078915 :: [c6989586621680066253]) (a6989586621680078916 :: [d6989586621680066254]) :: forall e6989586621680066255 f6989586621680066256. (~>) [e6989586621680066255] ((~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)]) data Zip6Sym5 (a6989586621680078913 :: [a6989586621680066251]) (a6989586621680078914 :: [b6989586621680066252]) (a6989586621680078915 :: [c6989586621680066253]) (a6989586621680078916 :: [d6989586621680066254]) (a6989586621680078917 :: [e6989586621680066255]) :: forall f6989586621680066256. (~>) [f6989586621680066256] [(a6989586621680066251, b6989586621680066252, c6989586621680066253, d6989586621680066254, e6989586621680066255, f6989586621680066256)] type Zip6Sym6 (a6989586621680078913 :: [a6989586621680066251]) (a6989586621680078914 :: [b6989586621680066252]) (a6989586621680078915 :: [c6989586621680066253]) (a6989586621680078916 :: [d6989586621680066254]) (a6989586621680078917 :: [e6989586621680066255]) (a6989586621680078918 :: [f6989586621680066256]) = Zip6 a6989586621680078913 a6989586621680078914 a6989586621680078915 a6989586621680078916 a6989586621680078917 a6989586621680078918 data Zip7Sym0 :: forall a6989586621680066244 b6989586621680066245 c6989586621680066246 d6989586621680066247 e6989586621680066248 f6989586621680066249 g6989586621680066250. (~>) [a6989586621680066244] ((~>) [b6989586621680066245] ((~>) [c6989586621680066246] ((~>) [d6989586621680066247] ((~>) [e6989586621680066248] ((~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)])))))) data Zip7Sym1 (a6989586621680078880 :: [a6989586621680066244]) :: forall b6989586621680066245 c6989586621680066246 d6989586621680066247 e6989586621680066248 f6989586621680066249 g6989586621680066250. (~>) [b6989586621680066245] ((~>) [c6989586621680066246] ((~>) [d6989586621680066247] ((~>) [e6989586621680066248] ((~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)]))))) data Zip7Sym2 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) :: forall c6989586621680066246 d6989586621680066247 e6989586621680066248 f6989586621680066249 g6989586621680066250. (~>) [c6989586621680066246] ((~>) [d6989586621680066247] ((~>) [e6989586621680066248] ((~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)])))) data Zip7Sym3 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) (a6989586621680078882 :: [c6989586621680066246]) :: forall d6989586621680066247 e6989586621680066248 f6989586621680066249 g6989586621680066250. (~>) [d6989586621680066247] ((~>) [e6989586621680066248] ((~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)]))) data Zip7Sym4 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) (a6989586621680078882 :: [c6989586621680066246]) (a6989586621680078883 :: [d6989586621680066247]) :: forall e6989586621680066248 f6989586621680066249 g6989586621680066250. (~>) [e6989586621680066248] ((~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)])) data Zip7Sym5 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) (a6989586621680078882 :: [c6989586621680066246]) (a6989586621680078883 :: [d6989586621680066247]) (a6989586621680078884 :: [e6989586621680066248]) :: forall f6989586621680066249 g6989586621680066250. (~>) [f6989586621680066249] ((~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)]) data Zip7Sym6 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) (a6989586621680078882 :: [c6989586621680066246]) (a6989586621680078883 :: [d6989586621680066247]) (a6989586621680078884 :: [e6989586621680066248]) (a6989586621680078885 :: [f6989586621680066249]) :: forall g6989586621680066250. (~>) [g6989586621680066250] [(a6989586621680066244, b6989586621680066245, c6989586621680066246, d6989586621680066247, e6989586621680066248, f6989586621680066249, g6989586621680066250)] type Zip7Sym7 (a6989586621680078880 :: [a6989586621680066244]) (a6989586621680078881 :: [b6989586621680066245]) (a6989586621680078882 :: [c6989586621680066246]) (a6989586621680078883 :: [d6989586621680066247]) (a6989586621680078884 :: [e6989586621680066248]) (a6989586621680078885 :: [f6989586621680066249]) (a6989586621680078886 :: [g6989586621680066250]) = Zip7 a6989586621680078880 a6989586621680078881 a6989586621680078882 a6989586621680078883 a6989586621680078884 a6989586621680078885 a6989586621680078886 data ZipWithSym0 :: forall a6989586621679940092 b6989586621679940093 c6989586621679940094. (~>) ((~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) ((~>) [a6989586621679940092] ((~>) [b6989586621679940093] [c6989586621679940094])) data ZipWithSym1 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) :: (~>) [a6989586621679940092] ((~>) [b6989586621679940093] [c6989586621679940094]) data ZipWithSym2 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) (a6989586621679949904 :: [a6989586621679940092]) :: (~>) [b6989586621679940093] [c6989586621679940094] type ZipWithSym3 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) (a6989586621679949904 :: [a6989586621679940092]) (a6989586621679949905 :: [b6989586621679940093]) = ZipWith a6989586621679949903 a6989586621679949904 a6989586621679949905 data ZipWith3Sym0 :: forall a6989586621679940088 b6989586621679940089 c6989586621679940090 d6989586621679940091. (~>) ((~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) ((~>) [a6989586621679940088] ((~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091]))) data ZipWith3Sym1 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) :: (~>) [a6989586621679940088] ((~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091])) data ZipWith3Sym2 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) (a6989586621679949889 :: [a6989586621679940088]) :: (~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091]) data ZipWith3Sym3 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) (a6989586621679949889 :: [a6989586621679940088]) (a6989586621679949890 :: [b6989586621679940089]) :: (~>) [c6989586621679940090] [d6989586621679940091] type ZipWith3Sym4 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) (a6989586621679949889 :: [a6989586621679940088]) (a6989586621679949890 :: [b6989586621679940089]) (a6989586621679949891 :: [c6989586621679940090]) = ZipWith3 a6989586621679949888 a6989586621679949889 a6989586621679949890 a6989586621679949891 data ZipWith4Sym0 :: forall a6989586621680066239 b6989586621680066240 c6989586621680066241 d6989586621680066242 e6989586621680066243. (~>) ((~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) ((~>) [a6989586621680066239] ((~>) [b6989586621680066240] ((~>) [c6989586621680066241] ((~>) [d6989586621680066242] [e6989586621680066243])))) data ZipWith4Sym1 (a6989586621680078847 :: (~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) :: (~>) [a6989586621680066239] ((~>) [b6989586621680066240] ((~>) [c6989586621680066241] ((~>) [d6989586621680066242] [e6989586621680066243]))) data ZipWith4Sym2 (a6989586621680078847 :: (~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) (a6989586621680078848 :: [a6989586621680066239]) :: (~>) [b6989586621680066240] ((~>) [c6989586621680066241] ((~>) [d6989586621680066242] [e6989586621680066243])) data ZipWith4Sym3 (a6989586621680078847 :: (~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) (a6989586621680078848 :: [a6989586621680066239]) (a6989586621680078849 :: [b6989586621680066240]) :: (~>) [c6989586621680066241] ((~>) [d6989586621680066242] [e6989586621680066243]) data ZipWith4Sym4 (a6989586621680078847 :: (~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) (a6989586621680078848 :: [a6989586621680066239]) (a6989586621680078849 :: [b6989586621680066240]) (a6989586621680078850 :: [c6989586621680066241]) :: (~>) [d6989586621680066242] [e6989586621680066243] type ZipWith4Sym5 (a6989586621680078847 :: (~>) a6989586621680066239 ((~>) b6989586621680066240 ((~>) c6989586621680066241 ((~>) d6989586621680066242 e6989586621680066243)))) (a6989586621680078848 :: [a6989586621680066239]) (a6989586621680078849 :: [b6989586621680066240]) (a6989586621680078850 :: [c6989586621680066241]) (a6989586621680078851 :: [d6989586621680066242]) = ZipWith4 a6989586621680078847 a6989586621680078848 a6989586621680078849 a6989586621680078850 a6989586621680078851 data ZipWith5Sym0 :: forall a6989586621680066233 b6989586621680066234 c6989586621680066235 d6989586621680066236 e6989586621680066237 f6989586621680066238. (~>) ((~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) ((~>) [a6989586621680066233] ((~>) [b6989586621680066234] ((~>) [c6989586621680066235] ((~>) [d6989586621680066236] ((~>) [e6989586621680066237] [f6989586621680066238]))))) data ZipWith5Sym1 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) :: (~>) [a6989586621680066233] ((~>) [b6989586621680066234] ((~>) [c6989586621680066235] ((~>) [d6989586621680066236] ((~>) [e6989586621680066237] [f6989586621680066238])))) data ZipWith5Sym2 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) (a6989586621680078825 :: [a6989586621680066233]) :: (~>) [b6989586621680066234] ((~>) [c6989586621680066235] ((~>) [d6989586621680066236] ((~>) [e6989586621680066237] [f6989586621680066238]))) data ZipWith5Sym3 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) (a6989586621680078825 :: [a6989586621680066233]) (a6989586621680078826 :: [b6989586621680066234]) :: (~>) [c6989586621680066235] ((~>) [d6989586621680066236] ((~>) [e6989586621680066237] [f6989586621680066238])) data ZipWith5Sym4 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) (a6989586621680078825 :: [a6989586621680066233]) (a6989586621680078826 :: [b6989586621680066234]) (a6989586621680078827 :: [c6989586621680066235]) :: (~>) [d6989586621680066236] ((~>) [e6989586621680066237] [f6989586621680066238]) data ZipWith5Sym5 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) (a6989586621680078825 :: [a6989586621680066233]) (a6989586621680078826 :: [b6989586621680066234]) (a6989586621680078827 :: [c6989586621680066235]) (a6989586621680078828 :: [d6989586621680066236]) :: (~>) [e6989586621680066237] [f6989586621680066238] type ZipWith5Sym6 (a6989586621680078824 :: (~>) a6989586621680066233 ((~>) b6989586621680066234 ((~>) c6989586621680066235 ((~>) d6989586621680066236 ((~>) e6989586621680066237 f6989586621680066238))))) (a6989586621680078825 :: [a6989586621680066233]) (a6989586621680078826 :: [b6989586621680066234]) (a6989586621680078827 :: [c6989586621680066235]) (a6989586621680078828 :: [d6989586621680066236]) (a6989586621680078829 :: [e6989586621680066237]) = ZipWith5 a6989586621680078824 a6989586621680078825 a6989586621680078826 a6989586621680078827 a6989586621680078828 a6989586621680078829 data ZipWith6Sym0 :: forall a6989586621680066226 b6989586621680066227 c6989586621680066228 d6989586621680066229 e6989586621680066230 f6989586621680066231 g6989586621680066232. (~>) ((~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) ((~>) [a6989586621680066226] ((~>) [b6989586621680066227] ((~>) [c6989586621680066228] ((~>) [d6989586621680066229] ((~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232])))))) data ZipWith6Sym1 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) :: (~>) [a6989586621680066226] ((~>) [b6989586621680066227] ((~>) [c6989586621680066228] ((~>) [d6989586621680066229] ((~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232]))))) data ZipWith6Sym2 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) :: (~>) [b6989586621680066227] ((~>) [c6989586621680066228] ((~>) [d6989586621680066229] ((~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232])))) data ZipWith6Sym3 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) (a6989586621680078799 :: [b6989586621680066227]) :: (~>) [c6989586621680066228] ((~>) [d6989586621680066229] ((~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232]))) data ZipWith6Sym4 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) (a6989586621680078799 :: [b6989586621680066227]) (a6989586621680078800 :: [c6989586621680066228]) :: (~>) [d6989586621680066229] ((~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232])) data ZipWith6Sym5 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) (a6989586621680078799 :: [b6989586621680066227]) (a6989586621680078800 :: [c6989586621680066228]) (a6989586621680078801 :: [d6989586621680066229]) :: (~>) [e6989586621680066230] ((~>) [f6989586621680066231] [g6989586621680066232]) data ZipWith6Sym6 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) (a6989586621680078799 :: [b6989586621680066227]) (a6989586621680078800 :: [c6989586621680066228]) (a6989586621680078801 :: [d6989586621680066229]) (a6989586621680078802 :: [e6989586621680066230]) :: (~>) [f6989586621680066231] [g6989586621680066232] type ZipWith6Sym7 (a6989586621680078797 :: (~>) a6989586621680066226 ((~>) b6989586621680066227 ((~>) c6989586621680066228 ((~>) d6989586621680066229 ((~>) e6989586621680066230 ((~>) f6989586621680066231 g6989586621680066232)))))) (a6989586621680078798 :: [a6989586621680066226]) (a6989586621680078799 :: [b6989586621680066227]) (a6989586621680078800 :: [c6989586621680066228]) (a6989586621680078801 :: [d6989586621680066229]) (a6989586621680078802 :: [e6989586621680066230]) (a6989586621680078803 :: [f6989586621680066231]) = ZipWith6 a6989586621680078797 a6989586621680078798 a6989586621680078799 a6989586621680078800 a6989586621680078801 a6989586621680078802 a6989586621680078803 data ZipWith7Sym0 :: forall a6989586621680066218 b6989586621680066219 c6989586621680066220 d6989586621680066221 e6989586621680066222 f6989586621680066223 g6989586621680066224 h6989586621680066225. (~>) ((~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) ((~>) [a6989586621680066218] ((~>) [b6989586621680066219] ((~>) [c6989586621680066220] ((~>) [d6989586621680066221] ((~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225]))))))) data ZipWith7Sym1 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) :: (~>) [a6989586621680066218] ((~>) [b6989586621680066219] ((~>) [c6989586621680066220] ((~>) [d6989586621680066221] ((~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225])))))) data ZipWith7Sym2 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) :: (~>) [b6989586621680066219] ((~>) [c6989586621680066220] ((~>) [d6989586621680066221] ((~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225]))))) data ZipWith7Sym3 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) :: (~>) [c6989586621680066220] ((~>) [d6989586621680066221] ((~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225])))) data ZipWith7Sym4 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) (a6989586621680078769 :: [c6989586621680066220]) :: (~>) [d6989586621680066221] ((~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225]))) data ZipWith7Sym5 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) (a6989586621680078769 :: [c6989586621680066220]) (a6989586621680078770 :: [d6989586621680066221]) :: (~>) [e6989586621680066222] ((~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225])) data ZipWith7Sym6 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) (a6989586621680078769 :: [c6989586621680066220]) (a6989586621680078770 :: [d6989586621680066221]) (a6989586621680078771 :: [e6989586621680066222]) :: (~>) [f6989586621680066223] ((~>) [g6989586621680066224] [h6989586621680066225]) data ZipWith7Sym7 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) (a6989586621680078769 :: [c6989586621680066220]) (a6989586621680078770 :: [d6989586621680066221]) (a6989586621680078771 :: [e6989586621680066222]) (a6989586621680078772 :: [f6989586621680066223]) :: (~>) [g6989586621680066224] [h6989586621680066225] type ZipWith7Sym8 (a6989586621680078766 :: (~>) a6989586621680066218 ((~>) b6989586621680066219 ((~>) c6989586621680066220 ((~>) d6989586621680066221 ((~>) e6989586621680066222 ((~>) f6989586621680066223 ((~>) g6989586621680066224 h6989586621680066225))))))) (a6989586621680078767 :: [a6989586621680066218]) (a6989586621680078768 :: [b6989586621680066219]) (a6989586621680078769 :: [c6989586621680066220]) (a6989586621680078770 :: [d6989586621680066221]) (a6989586621680078771 :: [e6989586621680066222]) (a6989586621680078772 :: [f6989586621680066223]) (a6989586621680078773 :: [g6989586621680066224]) = ZipWith7 a6989586621680078766 a6989586621680078767 a6989586621680078768 a6989586621680078769 a6989586621680078770 a6989586621680078771 a6989586621680078772 a6989586621680078773 data UnzipSym0 :: forall a6989586621679940086 b6989586621679940087. (~>) [(a6989586621679940086, b6989586621679940087)] ([a6989586621679940086], [b6989586621679940087]) type UnzipSym1 (a6989586621679949869 :: [(a6989586621679940086, b6989586621679940087)]) = Unzip a6989586621679949869 data Unzip3Sym0 :: forall a6989586621679940083 b6989586621679940084 c6989586621679940085. (~>) [(a6989586621679940083, b6989586621679940084, c6989586621679940085)] ([a6989586621679940083], [b6989586621679940084], [c6989586621679940085]) type Unzip3Sym1 (a6989586621679949848 :: [(a6989586621679940083, b6989586621679940084, c6989586621679940085)]) = Unzip3 a6989586621679949848 data Unzip4Sym0 :: forall a6989586621679940079 b6989586621679940080 c6989586621679940081 d6989586621679940082. (~>) [(a6989586621679940079, b6989586621679940080, c6989586621679940081, d6989586621679940082)] ([a6989586621679940079], [b6989586621679940080], [c6989586621679940081], [d6989586621679940082]) type Unzip4Sym1 (a6989586621679949825 :: [(a6989586621679940079, b6989586621679940080, c6989586621679940081, d6989586621679940082)]) = Unzip4 a6989586621679949825 data Unzip5Sym0 :: forall a6989586621679940074 b6989586621679940075 c6989586621679940076 d6989586621679940077 e6989586621679940078. (~>) [(a6989586621679940074, b6989586621679940075, c6989586621679940076, d6989586621679940077, e6989586621679940078)] ([a6989586621679940074], [b6989586621679940075], [c6989586621679940076], [d6989586621679940077], [e6989586621679940078]) type Unzip5Sym1 (a6989586621679949800 :: [(a6989586621679940074, b6989586621679940075, c6989586621679940076, d6989586621679940077, e6989586621679940078)]) = Unzip5 a6989586621679949800 data Unzip6Sym0 :: forall a6989586621679940068 b6989586621679940069 c6989586621679940070 d6989586621679940071 e6989586621679940072 f6989586621679940073. (~>) [(a6989586621679940068, b6989586621679940069, c6989586621679940070, d6989586621679940071, e6989586621679940072, f6989586621679940073)] ([a6989586621679940068], [b6989586621679940069], [c6989586621679940070], [d6989586621679940071], [e6989586621679940072], [f6989586621679940073]) type Unzip6Sym1 (a6989586621679949773 :: [(a6989586621679940068, b6989586621679940069, c6989586621679940070, d6989586621679940071, e6989586621679940072, f6989586621679940073)]) = Unzip6 a6989586621679949773 data Unzip7Sym0 :: forall a6989586621679940061 b6989586621679940062 c6989586621679940063 d6989586621679940064 e6989586621679940065 f6989586621679940066 g6989586621679940067. (~>) [(a6989586621679940061, b6989586621679940062, c6989586621679940063, d6989586621679940064, e6989586621679940065, f6989586621679940066, g6989586621679940067)] ([a6989586621679940061], [b6989586621679940062], [c6989586621679940063], [d6989586621679940064], [e6989586621679940065], [f6989586621679940066], [g6989586621679940067]) type Unzip7Sym1 (a6989586621679949744 :: [(a6989586621679940061, b6989586621679940062, c6989586621679940063, d6989586621679940064, e6989586621679940065, f6989586621679940066, g6989586621679940067)]) = Unzip7 a6989586621679949744 data UnlinesSym0 :: (~>) [Symbol] Symbol type UnlinesSym1 (a6989586621679949740 :: [Symbol]) = Unlines a6989586621679949740 data UnwordsSym0 :: (~>) [Symbol] Symbol type UnwordsSym1 (a6989586621679949729 :: [Symbol]) = Unwords a6989586621679949729 data NubSym0 :: forall a6989586621679940020. (~>) [a6989586621679940020] [a6989586621679940020] type NubSym1 (a6989586621679949998 :: [a6989586621679940020]) = Nub a6989586621679949998 data DeleteSym0 :: forall a6989586621679940060. (~>) a6989586621679940060 ((~>) [a6989586621679940060] [a6989586621679940060]) data DeleteSym1 (a6989586621679949713 :: a6989586621679940060) :: (~>) [a6989586621679940060] [a6989586621679940060] type DeleteSym2 (a6989586621679949713 :: a6989586621679940060) (a6989586621679949714 :: [a6989586621679940060]) = Delete a6989586621679949713 a6989586621679949714 data (\\@#@$) :: forall a6989586621679940059. (~>) [a6989586621679940059] ((~>) [a6989586621679940059] [a6989586621679940059]) infix 5 \\@#@$ data (\\@#@$$) (a6989586621679949723 :: [a6989586621679940059]) :: (~>) [a6989586621679940059] [a6989586621679940059] infix 5 \\@#@$$ type (\\@#@$$$) (a6989586621679949723 :: [a6989586621679940059]) (a6989586621679949724 :: [a6989586621679940059]) = (\\) a6989586621679949723 a6989586621679949724 data UnionSym0 :: forall a6989586621679940016. (~>) [a6989586621679940016] ((~>) [a6989586621679940016] [a6989586621679940016]) data UnionSym1 (a6989586621679949703 :: [a6989586621679940016]) :: (~>) [a6989586621679940016] [a6989586621679940016] type UnionSym2 (a6989586621679949703 :: [a6989586621679940016]) (a6989586621679949704 :: [a6989586621679940016]) = Union a6989586621679949703 a6989586621679949704 data IntersectSym0 :: forall a6989586621679940046. (~>) [a6989586621679940046] ((~>) [a6989586621679940046] [a6989586621679940046]) data IntersectSym1 (a6989586621679950298 :: [a6989586621679940046]) :: (~>) [a6989586621679940046] [a6989586621679940046] type IntersectSym2 (a6989586621679950298 :: [a6989586621679940046]) (a6989586621679950299 :: [a6989586621679940046]) = Intersect a6989586621679950298 a6989586621679950299 data InsertSym0 :: forall a6989586621679940033. (~>) a6989586621679940033 ((~>) [a6989586621679940033] [a6989586621679940033]) data InsertSym1 (a6989586621679949640 :: a6989586621679940033) :: (~>) [a6989586621679940033] [a6989586621679940033] type InsertSym2 (a6989586621679949640 :: a6989586621679940033) (a6989586621679949641 :: [a6989586621679940033]) = Insert a6989586621679949640 a6989586621679949641 data SortSym0 :: forall a6989586621679940032. (~>) [a6989586621679940032] [a6989586621679940032] type SortSym1 (a6989586621679949656 :: [a6989586621679940032]) = Sort a6989586621679949656 data NubBySym0 :: forall a6989586621679940019. (~>) ((~>) a6989586621679940019 ((~>) a6989586621679940019 Bool)) ((~>) [a6989586621679940019] [a6989586621679940019]) data NubBySym1 (a6989586621679949286 :: (~>) a6989586621679940019 ((~>) a6989586621679940019 Bool)) :: (~>) [a6989586621679940019] [a6989586621679940019] type NubBySym2 (a6989586621679949286 :: (~>) a6989586621679940019 ((~>) a6989586621679940019 Bool)) (a6989586621679949287 :: [a6989586621679940019]) = NubBy a6989586621679949286 a6989586621679949287 data DeleteBySym0 :: forall a6989586621679940058. (~>) ((~>) a6989586621679940058 ((~>) a6989586621679940058 Bool)) ((~>) a6989586621679940058 ((~>) [a6989586621679940058] [a6989586621679940058])) data DeleteBySym1 (a6989586621679949659 :: (~>) a6989586621679940058 ((~>) a6989586621679940058 Bool)) :: (~>) a6989586621679940058 ((~>) [a6989586621679940058] [a6989586621679940058]) data DeleteBySym2 (a6989586621679949659 :: (~>) a6989586621679940058 ((~>) a6989586621679940058 Bool)) (a6989586621679949660 :: a6989586621679940058) :: (~>) [a6989586621679940058] [a6989586621679940058] type DeleteBySym3 (a6989586621679949659 :: (~>) a6989586621679940058 ((~>) a6989586621679940058 Bool)) (a6989586621679949660 :: a6989586621679940058) (a6989586621679949661 :: [a6989586621679940058]) = DeleteBy a6989586621679949659 a6989586621679949660 a6989586621679949661 data DeleteFirstsBySym0 :: forall a6989586621679940057. (~>) ((~>) a6989586621679940057 ((~>) a6989586621679940057 Bool)) ((~>) [a6989586621679940057] ((~>) [a6989586621679940057] [a6989586621679940057])) data DeleteFirstsBySym1 (a6989586621679949677 :: (~>) a6989586621679940057 ((~>) a6989586621679940057 Bool)) :: (~>) [a6989586621679940057] ((~>) [a6989586621679940057] [a6989586621679940057]) data DeleteFirstsBySym2 (a6989586621679949677 :: (~>) a6989586621679940057 ((~>) a6989586621679940057 Bool)) (a6989586621679949678 :: [a6989586621679940057]) :: (~>) [a6989586621679940057] [a6989586621679940057] type DeleteFirstsBySym3 (a6989586621679949677 :: (~>) a6989586621679940057 ((~>) a6989586621679940057 Bool)) (a6989586621679949678 :: [a6989586621679940057]) (a6989586621679949679 :: [a6989586621679940057]) = DeleteFirstsBy a6989586621679949677 a6989586621679949678 a6989586621679949679 data UnionBySym0 :: forall a6989586621679940017. (~>) ((~>) a6989586621679940017 ((~>) a6989586621679940017 Bool)) ((~>) [a6989586621679940017] ((~>) [a6989586621679940017] [a6989586621679940017])) data UnionBySym1 (a6989586621679949690 :: (~>) a6989586621679940017 ((~>) a6989586621679940017 Bool)) :: (~>) [a6989586621679940017] ((~>) [a6989586621679940017] [a6989586621679940017]) data UnionBySym2 (a6989586621679949690 :: (~>) a6989586621679940017 ((~>) a6989586621679940017 Bool)) (a6989586621679949691 :: [a6989586621679940017]) :: (~>) [a6989586621679940017] [a6989586621679940017] type UnionBySym3 (a6989586621679949690 :: (~>) a6989586621679940017 ((~>) a6989586621679940017 Bool)) (a6989586621679949691 :: [a6989586621679940017]) (a6989586621679949692 :: [a6989586621679940017]) = UnionBy a6989586621679949690 a6989586621679949691 a6989586621679949692 data IntersectBySym0 :: forall a6989586621679940045. (~>) ((~>) a6989586621679940045 ((~>) a6989586621679940045 Bool)) ((~>) [a6989586621679940045] ((~>) [a6989586621679940045] [a6989586621679940045])) data IntersectBySym1 (a6989586621679950262 :: (~>) a6989586621679940045 ((~>) a6989586621679940045 Bool)) :: (~>) [a6989586621679940045] ((~>) [a6989586621679940045] [a6989586621679940045]) data IntersectBySym2 (a6989586621679950262 :: (~>) a6989586621679940045 ((~>) a6989586621679940045 Bool)) (a6989586621679950263 :: [a6989586621679940045]) :: (~>) [a6989586621679940045] [a6989586621679940045] type IntersectBySym3 (a6989586621679950262 :: (~>) a6989586621679940045 ((~>) a6989586621679940045 Bool)) (a6989586621679950263 :: [a6989586621679940045]) (a6989586621679950264 :: [a6989586621679940045]) = IntersectBy a6989586621679950262 a6989586621679950263 a6989586621679950264 data GroupBySym0 :: forall a6989586621679940031. (~>) ((~>) a6989586621679940031 ((~>) a6989586621679940031 Bool)) ((~>) [a6989586621679940031] [[a6989586621679940031]]) data GroupBySym1 (a6989586621679949527 :: (~>) a6989586621679940031 ((~>) a6989586621679940031 Bool)) :: (~>) [a6989586621679940031] [[a6989586621679940031]] type GroupBySym2 (a6989586621679949527 :: (~>) a6989586621679940031 ((~>) a6989586621679940031 Bool)) (a6989586621679949528 :: [a6989586621679940031]) = GroupBy a6989586621679949527 a6989586621679949528 data SortBySym0 :: forall a6989586621679940056. (~>) ((~>) a6989586621679940056 ((~>) a6989586621679940056 Ordering)) ((~>) [a6989586621679940056] [a6989586621679940056]) data SortBySym1 (a6989586621679949646 :: (~>) a6989586621679940056 ((~>) a6989586621679940056 Ordering)) :: (~>) [a6989586621679940056] [a6989586621679940056] type SortBySym2 (a6989586621679949646 :: (~>) a6989586621679940056 ((~>) a6989586621679940056 Ordering)) (a6989586621679949647 :: [a6989586621679940056]) = SortBy a6989586621679949646 a6989586621679949647 data InsertBySym0 :: forall a6989586621679940055. (~>) ((~>) a6989586621679940055 ((~>) a6989586621679940055 Ordering)) ((~>) a6989586621679940055 ((~>) [a6989586621679940055] [a6989586621679940055])) data InsertBySym1 (a6989586621679949616 :: (~>) a6989586621679940055 ((~>) a6989586621679940055 Ordering)) :: (~>) a6989586621679940055 ((~>) [a6989586621679940055] [a6989586621679940055]) data InsertBySym2 (a6989586621679949616 :: (~>) a6989586621679940055 ((~>) a6989586621679940055 Ordering)) (a6989586621679949617 :: a6989586621679940055) :: (~>) [a6989586621679940055] [a6989586621679940055] type InsertBySym3 (a6989586621679949616 :: (~>) a6989586621679940055 ((~>) a6989586621679940055 Ordering)) (a6989586621679949617 :: a6989586621679940055) (a6989586621679949618 :: [a6989586621679940055]) = InsertBy a6989586621679949616 a6989586621679949617 a6989586621679949618 data MaximumBySym0 :: forall a6989586621680452638 t6989586621680452637. (~>) ((~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) ((~>) (t6989586621680452637 a6989586621680452638) a6989586621680452638) data MaximumBySym1 (a6989586621680453149 :: (~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) :: forall t6989586621680452637. (~>) (t6989586621680452637 a6989586621680452638) a6989586621680452638 type MaximumBySym2 (a6989586621680453149 :: (~>) a6989586621680452638 ((~>) a6989586621680452638 Ordering)) (a6989586621680453150 :: t6989586621680452637 a6989586621680452638) = MaximumBy a6989586621680453149 a6989586621680453150 data MinimumBySym0 :: forall a6989586621680452636 t6989586621680452635. (~>) ((~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) ((~>) (t6989586621680452635 a6989586621680452636) a6989586621680452636) data MinimumBySym1 (a6989586621680453124 :: (~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) :: forall t6989586621680452635. (~>) (t6989586621680452635 a6989586621680452636) a6989586621680452636 type MinimumBySym2 (a6989586621680453124 :: (~>) a6989586621680452636 ((~>) a6989586621680452636 Ordering)) (a6989586621680453125 :: t6989586621680452635 a6989586621680452636) = MinimumBy a6989586621680453124 a6989586621680453125 data GenericLengthSym0 :: forall a6989586621679940015 i6989586621679940014. (~>) [a6989586621679940015] i6989586621679940014 type GenericLengthSym1 (a6989586621679949273 :: [a6989586621679940015]) = GenericLength a6989586621679949273 data GenericTakeSym0 :: forall a6989586621680066217 i6989586621680066216. (~>) i6989586621680066216 ((~>) [a6989586621680066217] [a6989586621680066217]) data GenericTakeSym1 (a6989586621680078760 :: i6989586621680066216) :: forall a6989586621680066217. (~>) [a6989586621680066217] [a6989586621680066217] type GenericTakeSym2 (a6989586621680078760 :: i6989586621680066216) (a6989586621680078761 :: [a6989586621680066217]) = GenericTake a6989586621680078760 a6989586621680078761 data GenericDropSym0 :: forall a6989586621680066215 i6989586621680066214. (~>) i6989586621680066214 ((~>) [a6989586621680066215] [a6989586621680066215]) data GenericDropSym1 (a6989586621680078750 :: i6989586621680066214) :: forall a6989586621680066215. (~>) [a6989586621680066215] [a6989586621680066215] type GenericDropSym2 (a6989586621680078750 :: i6989586621680066214) (a6989586621680078751 :: [a6989586621680066215]) = GenericDrop a6989586621680078750 a6989586621680078751 data GenericSplitAtSym0 :: forall a6989586621680066213 i6989586621680066212. (~>) i6989586621680066212 ((~>) [a6989586621680066213] ([a6989586621680066213], [a6989586621680066213])) data GenericSplitAtSym1 (a6989586621680078740 :: i6989586621680066212) :: forall a6989586621680066213. (~>) [a6989586621680066213] ([a6989586621680066213], [a6989586621680066213]) type GenericSplitAtSym2 (a6989586621680078740 :: i6989586621680066212) (a6989586621680078741 :: [a6989586621680066213]) = GenericSplitAt a6989586621680078740 a6989586621680078741 data GenericIndexSym0 :: forall a6989586621680066211 i6989586621680066210. (~>) [a6989586621680066211] ((~>) i6989586621680066210 a6989586621680066211) data GenericIndexSym1 (a6989586621680078730 :: [a6989586621680066211]) :: forall i6989586621680066210. (~>) i6989586621680066210 a6989586621680066211 type GenericIndexSym2 (a6989586621680078730 :: [a6989586621680066211]) (a6989586621680078731 :: i6989586621680066210) = GenericIndex a6989586621680078730 a6989586621680078731 data GenericReplicateSym0 :: forall a6989586621680066209 i6989586621680066208. (~>) i6989586621680066208 ((~>) a6989586621680066209 [a6989586621680066209]) data GenericReplicateSym1 (a6989586621680078720 :: i6989586621680066208) :: forall a6989586621680066209. (~>) a6989586621680066209 [a6989586621680066209] type GenericReplicateSym2 (a6989586621680078720 :: i6989586621680066208) (a6989586621680078721 :: a6989586621680066209) = GenericReplicate a6989586621680078720 a6989586621680078721 -- | Defines the promoted and singled versions of the MonadZip type -- class. module Data.Singletons.Prelude.Monad.Zip class PMonad m_a8Fpr => PMonadZip (m_a8Fpr :: Type -> Type) where { type family Mzip (arg_a8FqF :: m_a8Fpr a_a8Fps) (arg_a8FqG :: m_a8Fpr b_a8Fpt) :: m_a8Fpr (a_a8Fps, b_a8Fpt); type family MzipWith (arg_a8FqJ :: (~>) a_a8Fpu ((~>) b_a8Fpv c_a8Fpw)) (arg_a8FqK :: m_a8Fpr a_a8Fpu) (arg_a8FqL :: m_a8Fpr b_a8Fpv) :: m_a8Fpr c_a8Fpw; type family Munzip (arg_a8FqP :: m_a8Fpr (a_a8Fpx, b_a8Fpy)) :: (m_a8Fpr a_a8Fpx, m_a8Fpr b_a8Fpy); type Mzip a_a8Fr1 a_a8Fr2 = Apply (Apply Mzip_6989586621681075697Sym0 a_a8Fr1) a_a8Fr2; type MzipWith a_a8Frg a_a8Frh a_a8Fri = Apply (Apply (Apply MzipWith_6989586621681075713Sym0 a_a8Frg) a_a8Frh) a_a8Fri; type Munzip a_a8Frr = Apply Munzip_6989586621681075722Sym0 a_a8Frr; } class SMonad m_a8Fpr => SMonadZip (m_a8Fpr :: Type -> Type) sMzip :: forall a_a8Fps b_a8Fpt (t_a8Fvz :: m_a8Fpr a_a8Fps) (t_a8FvA :: m_a8Fpr b_a8Fpt). SMonadZip m_a8Fpr => Sing t_a8Fvz -> Sing t_a8FvA -> Sing (Apply (Apply MzipSym0 t_a8Fvz) t_a8FvA :: m_a8Fpr (a_a8Fps, b_a8Fpt)) sMzipWith :: forall a_a8Fpu b_a8Fpv c_a8Fpw (t_a8FvD :: (~>) a_a8Fpu ((~>) b_a8Fpv c_a8Fpw)) (t_a8FvE :: m_a8Fpr a_a8Fpu) (t_a8FvF :: m_a8Fpr b_a8Fpv). SMonadZip m_a8Fpr => Sing t_a8FvD -> Sing t_a8FvE -> Sing t_a8FvF -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8FvD) t_a8FvE) t_a8FvF :: m_a8Fpr c_a8Fpw) sMunzip :: forall a_a8Fpx b_a8Fpy (t_a8FvJ :: m_a8Fpr (a_a8Fpx, b_a8Fpy)). SMonadZip m_a8Fpr => Sing t_a8FvJ -> Sing (Apply MunzipSym0 t_a8FvJ :: (m_a8Fpr a_a8Fpx, m_a8Fpr b_a8Fpy)) sMzip :: forall a_a8Fps b_a8Fpt (t_a8Fvz :: m_a8Fpr a_a8Fps) (t_a8FvA :: m_a8Fpr b_a8Fpt). (SMonadZip m_a8Fpr, (Apply (Apply MzipSym0 t_a8Fvz) t_a8FvA :: m_a8Fpr (a_a8Fps, b_a8Fpt)) ~ Apply (Apply Mzip_6989586621681075697Sym0 t_a8Fvz) t_a8FvA) => Sing t_a8Fvz -> Sing t_a8FvA -> Sing (Apply (Apply MzipSym0 t_a8Fvz) t_a8FvA :: m_a8Fpr (a_a8Fps, b_a8Fpt)) sMzipWith :: forall a_a8Fpu b_a8Fpv c_a8Fpw (t_a8FvD :: (~>) a_a8Fpu ((~>) b_a8Fpv c_a8Fpw)) (t_a8FvE :: m_a8Fpr a_a8Fpu) (t_a8FvF :: m_a8Fpr b_a8Fpv). (SMonadZip m_a8Fpr, (Apply (Apply (Apply MzipWithSym0 t_a8FvD) t_a8FvE) t_a8FvF :: m_a8Fpr c_a8Fpw) ~ Apply (Apply (Apply MzipWith_6989586621681075713Sym0 t_a8FvD) t_a8FvE) t_a8FvF) => Sing t_a8FvD -> Sing t_a8FvE -> Sing t_a8FvF -> Sing (Apply (Apply (Apply MzipWithSym0 t_a8FvD) t_a8FvE) t_a8FvF :: m_a8Fpr c_a8Fpw) sMunzip :: forall a_a8Fpx b_a8Fpy (t_a8FvJ :: m_a8Fpr (a_a8Fpx, b_a8Fpy)). (SMonadZip m_a8Fpr, (Apply MunzipSym0 t_a8FvJ :: (m_a8Fpr a_a8Fpx, m_a8Fpr b_a8Fpy)) ~ Apply Munzip_6989586621681075722Sym0 t_a8FvJ) => Sing t_a8FvJ -> Sing (Apply MunzipSym0 t_a8FvJ :: (m_a8Fpr a_a8Fpx, m_a8Fpr b_a8Fpy)) data MzipSym0 :: forall a6989586621681075598 b6989586621681075599 m6989586621681075597. (~>) (m6989586621681075597 a6989586621681075598) ((~>) (m6989586621681075597 b6989586621681075599) (m6989586621681075597 (a6989586621681075598, b6989586621681075599))) data MzipSym1 (arg6989586621681075673 :: m6989586621681075597 a6989586621681075598) :: forall b6989586621681075599. (~>) (m6989586621681075597 b6989586621681075599) (m6989586621681075597 (a6989586621681075598, b6989586621681075599)) type MzipSym2 (arg6989586621681075673 :: m6989586621681075597 a6989586621681075598) (arg6989586621681075674 :: m6989586621681075597 b6989586621681075599) = Mzip arg6989586621681075673 arg6989586621681075674 data MzipWithSym0 :: forall a6989586621681075600 b6989586621681075601 c6989586621681075602 m6989586621681075597. (~>) ((~>) a6989586621681075600 ((~>) b6989586621681075601 c6989586621681075602)) ((~>) (m6989586621681075597 a6989586621681075600) ((~>) (m6989586621681075597 b6989586621681075601) (m6989586621681075597 c6989586621681075602))) data MzipWithSym1 (arg6989586621681075677 :: (~>) a6989586621681075600 ((~>) b6989586621681075601 c6989586621681075602)) :: forall m6989586621681075597. (~>) (m6989586621681075597 a6989586621681075600) ((~>) (m6989586621681075597 b6989586621681075601) (m6989586621681075597 c6989586621681075602)) data MzipWithSym2 (arg6989586621681075677 :: (~>) a6989586621681075600 ((~>) b6989586621681075601 c6989586621681075602)) (arg6989586621681075678 :: m6989586621681075597 a6989586621681075600) :: (~>) (m6989586621681075597 b6989586621681075601) (m6989586621681075597 c6989586621681075602) type MzipWithSym3 (arg6989586621681075677 :: (~>) a6989586621681075600 ((~>) b6989586621681075601 c6989586621681075602)) (arg6989586621681075678 :: m6989586621681075597 a6989586621681075600) (arg6989586621681075679 :: m6989586621681075597 b6989586621681075601) = MzipWith arg6989586621681075677 arg6989586621681075678 arg6989586621681075679 data MunzipSym0 :: forall a6989586621681075603 b6989586621681075604 m6989586621681075597. (~>) (m6989586621681075597 (a6989586621681075603, b6989586621681075604)) (m6989586621681075597 a6989586621681075603, m6989586621681075597 b6989586621681075604) type MunzipSym1 (arg6989586621681075683 :: m6989586621681075597 (a6989586621681075603, b6989586621681075604)) = Munzip arg6989586621681075683 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_6989586621681075972Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.Last instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075969 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075972Sym1 a6989586621681075969) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075970 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075969 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075972Sym2 a6989586621681075970 a6989586621681075969) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075949Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Monoid.First instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075946 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075949Sym1 a6989586621681075946) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075947 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075946 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075949Sym2 a6989586621681075947 a6989586621681075946) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075926Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Maybe.Maybe instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075923 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075926Sym1 a6989586621681075923) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075924 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075923 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075926Sym2 a6989586621681075924 a6989586621681075923) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075903Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Product instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075900 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075903Sym1 a6989586621681075900) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075901 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075900 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075903Sym2 a6989586621681075901 a6989586621681075900) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075880Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Sum instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075877 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075880Sym1 a6989586621681075877) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075878 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075877 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075880Sym2 a6989586621681075878 a6989586621681075877) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075857Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Semigroup.Internal.Dual instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075854 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075857Sym1 a6989586621681075854) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075855 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075854 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075857Sym2 a6989586621681075855 a6989586621681075854) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681075836Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip Data.Functor.Identity.Identity instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075826Sym0 instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075823 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075826Sym1 a6989586621681075823) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075824 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075823 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075826Sym2 a6989586621681075824 a6989586621681075823) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681075805Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip [] instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075794Sym0 instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075791 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075794Sym1 a6989586621681075791) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075792 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075791 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075794Sym2 a6989586621681075792 a6989586621681075791) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681075772Sym0 instance forall b6989586621681075599 (m6989586621681075597 :: * -> *) a6989586621681075598 (a6989586621681075770 :: m6989586621681075597 a6989586621681075598). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681075772Sym1 a6989586621681075770) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MunzipSym0 instance forall b6989586621681075599 (m6989586621681075597 :: * -> *) a6989586621681075598 (arg6989586621681075673 :: m6989586621681075597 a6989586621681075598). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipSym1 arg6989586621681075673) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipSym0 instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (arg6989586621681075678 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (arg6989586621681075677 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym2 arg6989586621681075678 arg6989586621681075677) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (arg6989586621681075677 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWithSym1 arg6989586621681075677) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWithSym0 instance forall b6989586621681075599 (m6989586621681075597 :: * -> *) a6989586621681075598 (a6989586621681075695 :: m6989586621681075597 a6989586621681075598). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681075697Sym1 a6989586621681075695) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Mzip_6989586621681075697Sym0 instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075711 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681075710 :: m6989586621681075597 a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075713Sym2 a6989586621681075711 a6989586621681075710) instance forall (m6989586621681075597 :: * -> *) a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681075710 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075713Sym1 a6989586621681075710) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.MzipWith_6989586621681075713Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Zip.Munzip_6989586621681075722Sym0 -- | 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_afKw -> Type) type family Map (a_a8O72 :: (~>) a_a8NGT b_a8NGU) (a_a8O73 :: NonEmpty a_a8NGT) :: NonEmpty b_a8NGU sMap :: forall a_a8NGT b_a8NGU (t_a8Ods :: (~>) a_a8NGT b_a8NGU) (t_a8Odt :: NonEmpty a_a8NGT). Sing t_a8Ods -> Sing t_a8Odt -> Sing (Apply (Apply MapSym0 t_a8Ods) t_a8Odt :: NonEmpty b_a8NGU) type family Intersperse (a_a8O6S :: a_a8NGJ) (a_a8O6T :: NonEmpty a_a8NGJ) :: NonEmpty a_a8NGJ sIntersperse :: forall a_a8NGJ (t_a8Odo :: a_a8NGJ) (t_a8Odp :: NonEmpty a_a8NGJ). Sing t_a8Odo -> Sing t_a8Odp -> Sing (Apply (Apply IntersperseSym0 t_a8Odo) t_a8Odp :: NonEmpty a_a8NGJ) type family Scanl (a_a8O9m :: (~>) b_a8NGO ((~>) a_a8NGP b_a8NGO)) (a_a8O9n :: b_a8NGO) (a_a8O9o :: [a_a8NGP]) :: NonEmpty b_a8NGO sScanl :: forall b_a8NGO a_a8NGP (t_a8OeA :: (~>) b_a8NGO ((~>) a_a8NGP b_a8NGO)) (t_a8OeB :: b_a8NGO) (t_a8OeC :: [a_a8NGP]). Sing t_a8OeA -> Sing t_a8OeB -> Sing t_a8OeC -> Sing (Apply (Apply (Apply ScanlSym0 t_a8OeA) t_a8OeB) t_a8OeC :: NonEmpty b_a8NGO) type family Scanr (a_a8O9x :: (~>) a_a8NGM ((~>) b_a8NGN b_a8NGN)) (a_a8O9y :: b_a8NGN) (a_a8O9z :: [a_a8NGM]) :: NonEmpty b_a8NGN sScanr :: forall a_a8NGM b_a8NGN (t_a8OeG :: (~>) a_a8NGM ((~>) b_a8NGN b_a8NGN)) (t_a8OeH :: b_a8NGN) (t_a8OeI :: [a_a8NGM]). Sing t_a8OeG -> Sing t_a8OeH -> Sing t_a8OeI -> Sing (Apply (Apply (Apply ScanrSym0 t_a8OeG) t_a8OeH) t_a8OeI :: NonEmpty b_a8NGN) type family Scanl1 (a_a8O9I :: (~>) a_a8NGL ((~>) a_a8NGL a_a8NGL)) (a_a8O9J :: NonEmpty a_a8NGL) :: NonEmpty a_a8NGL sScanl1 :: forall a_a8NGL (t_a8OeM :: (~>) a_a8NGL ((~>) a_a8NGL a_a8NGL)) (t_a8OeN :: NonEmpty a_a8NGL). Sing t_a8OeM -> Sing t_a8OeN -> Sing (Apply (Apply Scanl1Sym0 t_a8OeM) t_a8OeN :: NonEmpty a_a8NGL) type family Scanr1 (a_a8O9P :: (~>) a_a8NGK ((~>) a_a8NGK a_a8NGK)) (a_a8O9Q :: NonEmpty a_a8NGK) :: NonEmpty a_a8NGK sScanr1 :: forall a_a8NGK (t_a8OeQ :: (~>) a_a8NGK ((~>) a_a8NGK a_a8NGK)) (t_a8OeR :: NonEmpty a_a8NGK). Sing t_a8OeQ -> Sing t_a8OeR -> Sing (Apply (Apply Scanr1Sym0 t_a8OeQ) t_a8OeR :: NonEmpty a_a8NGK) type family Transpose (a_a8ObL :: NonEmpty (NonEmpty a_a8NGb)) :: NonEmpty (NonEmpty a_a8NGb) sTranspose :: forall a_a8NGb (t_a8Ofw :: NonEmpty (NonEmpty a_a8NGb)). Sing t_a8Ofw -> Sing (Apply TransposeSym0 t_a8Ofw :: NonEmpty (NonEmpty a_a8NGb)) type family SortBy (a_a8O8E :: (~>) a_a8NGa ((~>) a_a8NGa Ordering)) (a_a8O8F :: NonEmpty a_a8NGa) :: NonEmpty a_a8NGa sSortBy :: forall a_a8NGa (t_a8Oeg :: (~>) a_a8NGa ((~>) a_a8NGa Ordering)) (t_a8Oeh :: NonEmpty a_a8NGa). Sing t_a8Oeg -> Sing t_a8Oeh -> Sing (Apply (Apply SortBySym0 t_a8Oeg) t_a8Oeh :: NonEmpty a_a8NGa) type family SortWith (a_a8O8Q :: (~>) a_a8NG9 o_a8NG8) (a_a8O8R :: NonEmpty a_a8NG9) :: NonEmpty a_a8NG9 sSortWith :: forall o_a8NG8 a_a8NG9 (t_a8Oek :: (~>) a_a8NG9 o_a8NG8) (t_a8Oel :: NonEmpty a_a8NG9). SOrd o_a8NG8 => Sing t_a8Oek -> Sing t_a8Oel -> Sing (Apply (Apply SortWithSym0 t_a8Oek) t_a8Oel :: NonEmpty a_a8NG9) type family Length (a_a8Obz :: NonEmpty a_a8NHc) :: Nat sLength :: forall a_a8NHc (t_a8Ofq :: NonEmpty a_a8NHc). Sing t_a8Ofq -> Sing (Apply LengthSym0 t_a8Ofq :: Nat) type family Head (a_a8Oat :: NonEmpty a_a8NH5) :: a_a8NH5 sHead :: forall a_a8NH5 (t_a8Ofa :: NonEmpty a_a8NH5). Sing t_a8Ofa -> Sing (Apply HeadSym0 t_a8Ofa :: a_a8NH5) type family Tail (a_a8Oaq :: NonEmpty a_a8NH4) :: [a_a8NH4] sTail :: forall a_a8NH4 (t_a8Of8 :: NonEmpty a_a8NH4). Sing t_a8Of8 -> Sing (Apply TailSym0 t_a8Of8 :: [a_a8NH4]) type family Last (a_a8Oam :: NonEmpty a_a8NH3) :: a_a8NH3 sLast :: forall a_a8NH3 (t_a8Of6 :: NonEmpty a_a8NH3). Sing t_a8Of6 -> Sing (Apply LastSym0 t_a8Of6 :: a_a8NH3) type family Init (a_a8Oai :: NonEmpty a_a8NH2) :: [a_a8NH2] sInit :: forall a_a8NH2 (t_a8Of4 :: NonEmpty a_a8NH2). Sing t_a8Of4 -> Sing (Apply InitSym0 t_a8Of4 :: [a_a8NH2]) type family (<|) (a_a8Oa1 :: a_a8NH1) (a_a8Oa2 :: NonEmpty a_a8NH1) :: NonEmpty a_a8NH1 (%<|) :: forall a_a8NH1 (t_a8OeW :: a_a8NH1) (t_a8OeX :: NonEmpty a_a8NH1). Sing t_a8OeW -> Sing t_a8OeX -> Sing (Apply (Apply (<|@#@$) t_a8OeW) t_a8OeX :: NonEmpty a_a8NH1) type family Cons (a_a8Oac :: a_a8NH0) (a_a8Oad :: NonEmpty a_a8NH0) :: NonEmpty a_a8NH0 sCons :: forall a_a8NH0 (t_a8Of0 :: a_a8NH0) (t_a8Of1 :: NonEmpty a_a8NH0). Sing t_a8Of0 -> Sing t_a8Of1 -> Sing (Apply (Apply ConsSym0 t_a8Of0) t_a8Of1 :: NonEmpty a_a8NH0) type family Uncons (a_a8Ob3 :: NonEmpty a_a8NH8) :: (a_a8NH8, Maybe (NonEmpty a_a8NH8)) sUncons :: forall a_a8NH8 (t_a8Ofi :: NonEmpty a_a8NH8). Sing t_a8Ofi -> Sing (Apply UnconsSym0 t_a8Ofi :: (a_a8NH8, Maybe (NonEmpty a_a8NH8))) type family Unfoldr (a_a8Oaw :: (~>) a_a8NH6 (b_a8NH7, Maybe a_a8NH6)) (a_a8Oax :: a_a8NH6) :: NonEmpty b_a8NH7 sUnfoldr :: forall a_a8NH6 b_a8NH7 (t_a8Ofc :: (~>) a_a8NH6 (b_a8NH7, Maybe a_a8NH6)) (t_a8Ofd :: a_a8NH6). Sing t_a8Ofc -> Sing t_a8Ofd -> Sing (Apply (Apply UnfoldrSym0 t_a8Ofc) t_a8Ofd :: NonEmpty b_a8NH7) type family Sort (a_a8O9Y :: NonEmpty a_a8NGZ) :: NonEmpty a_a8NGZ sSort :: forall a_a8NGZ (t_a8OeU :: NonEmpty a_a8NGZ). SOrd a_a8NGZ => Sing t_a8OeU -> Sing (Apply SortSym0 t_a8OeU :: NonEmpty a_a8NGZ) type family Reverse (a_a8O8B :: NonEmpty a_a8NGI) :: NonEmpty a_a8NGI sReverse :: forall a_a8NGI (t_a8Oee :: NonEmpty a_a8NGI). Sing t_a8Oee -> Sing (Apply ReverseSym0 t_a8Oee :: NonEmpty a_a8NGI) type family Inits (a_a8O96 :: [a_a8NGS]) :: NonEmpty [a_a8NGS] sInits :: forall a_a8NGS (t_a8Oes :: [a_a8NGS]). Sing t_a8Oes -> Sing (Apply InitsSym0 t_a8Oes :: NonEmpty [a_a8NGS]) type family Tails (a_a8O9b :: [a_a8NGR]) :: NonEmpty [a_a8NGR] sTails :: forall a_a8NGR (t_a8Oeu :: [a_a8NGR]). Sing t_a8Oeu -> Sing (Apply TailsSym0 t_a8Oeu :: NonEmpty [a_a8NGR]) type family Unfold (a_a8Ob7 :: (~>) a_a8NHa (b_a8NHb, Maybe a_a8NHa)) (a_a8Ob8 :: a_a8NHa) :: NonEmpty b_a8NHb sUnfold :: forall a_a8NHa b_a8NHb (t_a8Ofk :: (~>) a_a8NHa (b_a8NHb, Maybe a_a8NHa)) (t_a8Ofl :: a_a8NHa). Sing t_a8Ofk -> Sing t_a8Ofl -> Sing (Apply (Apply UnfoldSym0 t_a8Ofk) t_a8Ofl :: NonEmpty b_a8NHb) type family Insert (a_a8O9e :: a_a8NGQ) (a_a8O9f :: [a_a8NGQ]) :: NonEmpty a_a8NGQ sInsert :: forall a_a8NGQ (t_a8Oew :: a_a8NGQ) (t_a8Oex :: [a_a8NGQ]). SOrd a_a8NGQ => Sing t_a8Oew -> Sing t_a8Oex -> Sing (Apply (Apply InsertSym0 t_a8Oew) t_a8Oex :: NonEmpty a_a8NGQ) type family Take (a_a8O7d :: Nat) (a_a8O7e :: NonEmpty a_a8NGH) :: [a_a8NGH] sTake :: forall a_a8NGH (t_a8Ody :: Nat) (t_a8Odz :: NonEmpty a_a8NGH). Sing t_a8Ody -> Sing t_a8Odz -> Sing (Apply (Apply TakeSym0 t_a8Ody) t_a8Odz :: [a_a8NGH]) type family Drop (a_a8O7l :: Nat) (a_a8O7m :: NonEmpty a_a8NGG) :: [a_a8NGG] sDrop :: forall a_a8NGG (t_a8OdC :: Nat) (t_a8OdD :: NonEmpty a_a8NGG). Sing t_a8OdC -> Sing t_a8OdD -> Sing (Apply (Apply DropSym0 t_a8OdC) t_a8OdD :: [a_a8NGG]) type family SplitAt (a_a8O7t :: Nat) (a_a8O7u :: NonEmpty a_a8NGF) :: ([a_a8NGF], [a_a8NGF]) sSplitAt :: forall a_a8NGF (t_a8OdG :: Nat) (t_a8OdH :: NonEmpty a_a8NGF). Sing t_a8OdG -> Sing t_a8OdH -> Sing (Apply (Apply SplitAtSym0 t_a8OdG) t_a8OdH :: ([a_a8NGF], [a_a8NGF])) type family TakeWhile (a_a8O7B :: (~>) a_a8NGE Bool) (a_a8O7C :: NonEmpty a_a8NGE) :: [a_a8NGE] sTakeWhile :: forall a_a8NGE (t_a8OdK :: (~>) a_a8NGE Bool) (t_a8OdL :: NonEmpty a_a8NGE). Sing t_a8OdK -> Sing t_a8OdL -> Sing (Apply (Apply TakeWhileSym0 t_a8OdK) t_a8OdL :: [a_a8NGE]) type family DropWhile (a_a8O7J :: (~>) a_a8NGD Bool) (a_a8O7K :: NonEmpty a_a8NGD) :: [a_a8NGD] sDropWhile :: forall a_a8NGD (t_a8OdO :: (~>) a_a8NGD Bool) (t_a8OdP :: NonEmpty a_a8NGD). Sing t_a8OdO -> Sing t_a8OdP -> Sing (Apply (Apply DropWhileSym0 t_a8OdO) t_a8OdP :: [a_a8NGD]) type family Span (a_a8O7R :: (~>) a_a8NGC Bool) (a_a8O7S :: NonEmpty a_a8NGC) :: ([a_a8NGC], [a_a8NGC]) sSpan :: forall a_a8NGC (t_a8OdS :: (~>) a_a8NGC Bool) (t_a8OdT :: NonEmpty a_a8NGC). Sing t_a8OdS -> Sing t_a8OdT -> Sing (Apply (Apply SpanSym0 t_a8OdS) t_a8OdT :: ([a_a8NGC], [a_a8NGC])) type family Break (a_a8O7Z :: (~>) a_a8NGB Bool) (a_a8O80 :: NonEmpty a_a8NGB) :: ([a_a8NGB], [a_a8NGB]) sBreak :: forall a_a8NGB (t_a8OdW :: (~>) a_a8NGB Bool) (t_a8OdX :: NonEmpty a_a8NGB). Sing t_a8OdW -> Sing t_a8OdX -> Sing (Apply (Apply BreakSym0 t_a8OdW) t_a8OdX :: ([a_a8NGB], [a_a8NGB])) type family Filter (a_a8O87 :: (~>) a_a8NGA Bool) (a_a8O88 :: NonEmpty a_a8NGA) :: [a_a8NGA] sFilter :: forall a_a8NGA (t_a8Oe0 :: (~>) a_a8NGA Bool) (t_a8Oe1 :: NonEmpty a_a8NGA). Sing t_a8Oe0 -> Sing t_a8Oe1 -> Sing (Apply (Apply FilterSym0 t_a8Oe0) t_a8Oe1 :: [a_a8NGA]) type family Partition (a_a8O8f :: (~>) a_a8NGz Bool) (a_a8O8g :: NonEmpty a_a8NGz) :: ([a_a8NGz], [a_a8NGz]) sPartition :: forall a_a8NGz (t_a8Oe4 :: (~>) a_a8NGz Bool) (t_a8Oe5 :: NonEmpty a_a8NGz). Sing t_a8Oe4 -> Sing t_a8Oe5 -> Sing (Apply (Apply PartitionSym0 t_a8Oe4) t_a8Oe5 :: ([a_a8NGz], [a_a8NGz])) type family Group (a_a8O6P :: [a_a8NGy]) :: [NonEmpty a_a8NGy] sGroup :: forall a_a8NGy (t_a8Odm :: [a_a8NGy]). SEq a_a8NGy => Sing t_a8Odm -> Sing (Apply GroupSym0 t_a8Odm :: [NonEmpty a_a8NGy]) type family GroupBy (a_a8O53 :: (~>) a_a8NGx ((~>) a_a8NGx Bool)) (a_a8O54 :: [a_a8NGx]) :: [NonEmpty a_a8NGx] sGroupBy :: forall a_a8NGx (t_a8Od0 :: (~>) a_a8NGx ((~>) a_a8NGx Bool)) (t_a8Od1 :: [a_a8NGx]). Sing t_a8Od0 -> Sing t_a8Od1 -> Sing (Apply (Apply GroupBySym0 t_a8Od0) t_a8Od1 :: [NonEmpty a_a8NGx]) type family GroupWith (a_a8O5P :: (~>) a_a8NGw b_a8NGv) (a_a8O5Q :: [a_a8NGw]) :: [NonEmpty a_a8NGw] sGroupWith :: forall b_a8NGv a_a8NGw (t_a8Od4 :: (~>) a_a8NGw b_a8NGv) (t_a8Od5 :: [a_a8NGw]). SEq b_a8NGv => Sing t_a8Od4 -> Sing t_a8Od5 -> Sing (Apply (Apply GroupWithSym0 t_a8Od4) t_a8Od5 :: [NonEmpty a_a8NGw]) type family GroupAllWith (a_a8O5X :: (~>) a_a8NGu b_a8NGt) (a_a8O5Y :: [a_a8NGu]) :: [NonEmpty a_a8NGu] sGroupAllWith :: forall b_a8NGt a_a8NGu (t_a8Od8 :: (~>) a_a8NGu b_a8NGt) (t_a8Od9 :: [a_a8NGu]). SOrd b_a8NGt => Sing t_a8Od8 -> Sing t_a8Od9 -> Sing (Apply (Apply GroupAllWithSym0 t_a8Od8) t_a8Od9 :: [NonEmpty a_a8NGu]) type family Group1 (a_a8O6C :: NonEmpty a_a8NGs) :: NonEmpty (NonEmpty a_a8NGs) sGroup1 :: forall a_a8NGs (t_a8Odg :: NonEmpty a_a8NGs). SEq a_a8NGs => Sing t_a8Odg -> Sing (Apply Group1Sym0 t_a8Odg :: NonEmpty (NonEmpty a_a8NGs)) type family GroupBy1 (a_a8O65 :: (~>) a_a8NGr ((~>) a_a8NGr Bool)) (a_a8O66 :: NonEmpty a_a8NGr) :: NonEmpty (NonEmpty a_a8NGr) sGroupBy1 :: forall a_a8NGr (t_a8Odc :: (~>) a_a8NGr ((~>) a_a8NGr Bool)) (t_a8Odd :: NonEmpty a_a8NGr). Sing t_a8Odc -> Sing t_a8Odd -> Sing (Apply (Apply GroupBy1Sym0 t_a8Odc) t_a8Odd :: NonEmpty (NonEmpty a_a8NGr)) type family GroupWith1 (a_a8O6F :: (~>) a_a8NGq b_a8NGp) (a_a8O6G :: NonEmpty a_a8NGq) :: NonEmpty (NonEmpty a_a8NGq) sGroupWith1 :: forall b_a8NGp a_a8NGq (t_a8Odi :: (~>) a_a8NGq b_a8NGp) (t_a8Odj :: NonEmpty a_a8NGq). SEq b_a8NGp => Sing t_a8Odi -> Sing t_a8Odj -> Sing (Apply (Apply GroupWith1Sym0 t_a8Odi) t_a8Odj :: NonEmpty (NonEmpty a_a8NGq)) type family GroupAllWith1 (a_a8O8W :: (~>) a_a8NGo b_a8NGn) (a_a8O8X :: NonEmpty a_a8NGo) :: NonEmpty (NonEmpty a_a8NGo) sGroupAllWith1 :: forall b_a8NGn a_a8NGo (t_a8Oeo :: (~>) a_a8NGo b_a8NGn) (t_a8Oep :: NonEmpty a_a8NGo). SOrd b_a8NGn => Sing t_a8Oeo -> Sing t_a8Oep -> Sing (Apply (Apply GroupAllWith1Sym0 t_a8Oeo) t_a8Oep :: NonEmpty (NonEmpty a_a8NGo)) type family IsPrefixOf (a_a8O4V :: [a_a8NGm]) (a_a8O4W :: NonEmpty a_a8NGm) :: Bool sIsPrefixOf :: forall a_a8NGm (t_a8OcW :: [a_a8NGm]) (t_a8OcX :: NonEmpty a_a8NGm). SEq a_a8NGm => Sing t_a8OcW -> Sing t_a8OcX -> Sing (Apply (Apply IsPrefixOfSym0 t_a8OcW) t_a8OcX :: Bool) type family Nub (a_a8O3O :: NonEmpty a_a8NGd) :: NonEmpty a_a8NGd sNub :: forall a_a8NGd (t_a8OcE :: NonEmpty a_a8NGd). SEq a_a8NGd => Sing t_a8OcE -> Sing (Apply NubSym0 t_a8OcE :: NonEmpty a_a8NGd) type family NubBy (a_a8O3x :: (~>) a_a8NGc ((~>) a_a8NGc Bool)) (a_a8O3y :: NonEmpty a_a8NGc) :: NonEmpty a_a8NGc sNubBy :: forall a_a8NGc (t_a8OcA :: (~>) a_a8NGc ((~>) a_a8NGc Bool)) (t_a8OcB :: NonEmpty a_a8NGc). Sing t_a8OcA -> Sing t_a8OcB -> Sing (Apply (Apply NubBySym0 t_a8OcA) t_a8OcB :: NonEmpty a_a8NGc) type family (!!) (a_a8O4D :: NonEmpty a_a8NGl) (a_a8O4E :: Nat) :: a_a8NGl (%!!) :: forall a_a8NGl (t_a8OcS :: NonEmpty a_a8NGl) (t_a8OcT :: Nat). Sing t_a8OcS -> Sing t_a8OcT -> Sing (Apply (Apply (!!@#@$) t_a8OcS) t_a8OcT :: a_a8NGl) type family Zip (a_a8O4v :: NonEmpty a_a8NGj) (a_a8O4w :: NonEmpty b_a8NGk) :: NonEmpty (a_a8NGj, b_a8NGk) sZip :: forall a_a8NGj b_a8NGk (t_a8OcO :: NonEmpty a_a8NGj) (t_a8OcP :: NonEmpty b_a8NGk). Sing t_a8OcO -> Sing t_a8OcP -> Sing (Apply (Apply ZipSym0 t_a8OcO) t_a8OcP :: NonEmpty (a_a8NGj, b_a8NGk)) type family ZipWith (a_a8O4k :: (~>) a_a8NGg ((~>) b_a8NGh c_a8NGi)) (a_a8O4l :: NonEmpty a_a8NGg) (a_a8O4m :: NonEmpty b_a8NGh) :: NonEmpty c_a8NGi sZipWith :: forall a_a8NGg b_a8NGh c_a8NGi (t_a8OcI :: (~>) a_a8NGg ((~>) b_a8NGh c_a8NGi)) (t_a8OcJ :: NonEmpty a_a8NGg) (t_a8OcK :: NonEmpty b_a8NGh). Sing t_a8OcI -> Sing t_a8OcJ -> Sing t_a8OcK -> Sing (Apply (Apply (Apply ZipWithSym0 t_a8OcI) t_a8OcJ) t_a8OcK :: NonEmpty c_a8NGi) type family Unzip (a_a8O3R :: NonEmpty (a_a8NGe, b_a8NGf)) :: (NonEmpty a_a8NGe, NonEmpty b_a8NGf) sUnzip :: forall a_a8NGe b_a8NGf (t_a8OcG :: NonEmpty (a_a8NGe, b_a8NGf)). Sing t_a8OcG -> Sing (Apply UnzipSym0 t_a8OcG :: (NonEmpty a_a8NGe, NonEmpty b_a8NGf)) type family FromList (a_a8O8n :: [a_a8NGY]) :: NonEmpty a_a8NGY sFromList :: forall a_a8NGY (t_a8Oe8 :: [a_a8NGY]). Sing t_a8Oe8 -> Sing (Apply FromListSym0 t_a8Oe8 :: NonEmpty a_a8NGY) type family ToList (a_a8O79 :: NonEmpty a_a8NGX) :: [a_a8NGX] sToList :: forall a_a8NGX (t_a8Odw :: NonEmpty a_a8NGX). Sing t_a8Odw -> Sing (Apply ToListSym0 t_a8Odw :: [a_a8NGX]) type family NonEmpty_ (a_a8OaZ :: [a_a8NH9]) :: Maybe (NonEmpty a_a8NH9) sNonEmpty_ :: forall a_a8NH9 (t_a8Ofg :: [a_a8NH9]). Sing t_a8Ofg -> Sing (Apply NonEmpty_Sym0 t_a8Ofg :: Maybe (NonEmpty a_a8NH9)) type family Xor (a_a8Obm :: NonEmpty Bool) :: Bool sXor :: forall (t_a8Ofo :: NonEmpty Bool). Sing t_a8Ofo -> Sing (Apply XorSym0 t_a8Ofo :: Bool) data (:|@#@$) :: forall (a6989586621679070336 :: Type). (~>) a6989586621679070336 ((~>) [a6989586621679070336] (NonEmpty (a6989586621679070336 :: Type))) infixr 5 :|@#@$ data (:|@#@$$) (t6989586621679298984 :: (a6989586621679070336 :: Type)) :: (~>) [a6989586621679070336] (NonEmpty (a6989586621679070336 :: Type)) infixr 5 :|@#@$$ type (:|@#@$$$) (t6989586621679298984 :: a6989586621679070336) (t6989586621679298985 :: [a6989586621679070336]) = '(:|) t6989586621679298984 t6989586621679298985 data MapSym0 :: forall a6989586621681107431 b6989586621681107432. (~>) ((~>) a6989586621681107431 b6989586621681107432) ((~>) (NonEmpty a6989586621681107431) (NonEmpty b6989586621681107432)) data MapSym1 (a6989586621681109052 :: (~>) a6989586621681107431 b6989586621681107432) :: (~>) (NonEmpty a6989586621681107431) (NonEmpty b6989586621681107432) type MapSym2 (a6989586621681109052 :: (~>) a6989586621681107431 b6989586621681107432) (a6989586621681109053 :: NonEmpty a6989586621681107431) = Map a6989586621681109052 a6989586621681109053 data IntersperseSym0 :: forall a6989586621681107421. (~>) a6989586621681107421 ((~>) (NonEmpty a6989586621681107421) (NonEmpty a6989586621681107421)) data IntersperseSym1 (a6989586621681109042 :: a6989586621681107421) :: (~>) (NonEmpty a6989586621681107421) (NonEmpty a6989586621681107421) type IntersperseSym2 (a6989586621681109042 :: a6989586621681107421) (a6989586621681109043 :: NonEmpty a6989586621681107421) = Intersperse a6989586621681109042 a6989586621681109043 data ScanlSym0 :: forall a6989586621681107427 b6989586621681107426. (~>) ((~>) b6989586621681107426 ((~>) a6989586621681107427 b6989586621681107426)) ((~>) b6989586621681107426 ((~>) [a6989586621681107427] (NonEmpty b6989586621681107426))) data ScanlSym1 (a6989586621681109196 :: (~>) b6989586621681107426 ((~>) a6989586621681107427 b6989586621681107426)) :: (~>) b6989586621681107426 ((~>) [a6989586621681107427] (NonEmpty b6989586621681107426)) data ScanlSym2 (a6989586621681109196 :: (~>) b6989586621681107426 ((~>) a6989586621681107427 b6989586621681107426)) (a6989586621681109197 :: b6989586621681107426) :: (~>) [a6989586621681107427] (NonEmpty b6989586621681107426) type ScanlSym3 (a6989586621681109196 :: (~>) b6989586621681107426 ((~>) a6989586621681107427 b6989586621681107426)) (a6989586621681109197 :: b6989586621681107426) (a6989586621681109198 :: [a6989586621681107427]) = Scanl a6989586621681109196 a6989586621681109197 a6989586621681109198 data ScanrSym0 :: forall a6989586621681107424 b6989586621681107425. (~>) ((~>) a6989586621681107424 ((~>) b6989586621681107425 b6989586621681107425)) ((~>) b6989586621681107425 ((~>) [a6989586621681107424] (NonEmpty b6989586621681107425))) data ScanrSym1 (a6989586621681109207 :: (~>) a6989586621681107424 ((~>) b6989586621681107425 b6989586621681107425)) :: (~>) b6989586621681107425 ((~>) [a6989586621681107424] (NonEmpty b6989586621681107425)) data ScanrSym2 (a6989586621681109207 :: (~>) a6989586621681107424 ((~>) b6989586621681107425 b6989586621681107425)) (a6989586621681109208 :: b6989586621681107425) :: (~>) [a6989586621681107424] (NonEmpty b6989586621681107425) type ScanrSym3 (a6989586621681109207 :: (~>) a6989586621681107424 ((~>) b6989586621681107425 b6989586621681107425)) (a6989586621681109208 :: b6989586621681107425) (a6989586621681109209 :: [a6989586621681107424]) = Scanr a6989586621681109207 a6989586621681109208 a6989586621681109209 data Scanl1Sym0 :: forall a6989586621681107423. (~>) ((~>) a6989586621681107423 ((~>) a6989586621681107423 a6989586621681107423)) ((~>) (NonEmpty a6989586621681107423) (NonEmpty a6989586621681107423)) data Scanl1Sym1 (a6989586621681109218 :: (~>) a6989586621681107423 ((~>) a6989586621681107423 a6989586621681107423)) :: (~>) (NonEmpty a6989586621681107423) (NonEmpty a6989586621681107423) type Scanl1Sym2 (a6989586621681109218 :: (~>) a6989586621681107423 ((~>) a6989586621681107423 a6989586621681107423)) (a6989586621681109219 :: NonEmpty a6989586621681107423) = Scanl1 a6989586621681109218 a6989586621681109219 data Scanr1Sym0 :: forall a6989586621681107422. (~>) ((~>) a6989586621681107422 ((~>) a6989586621681107422 a6989586621681107422)) ((~>) (NonEmpty a6989586621681107422) (NonEmpty a6989586621681107422)) data Scanr1Sym1 (a6989586621681109225 :: (~>) a6989586621681107422 ((~>) a6989586621681107422 a6989586621681107422)) :: (~>) (NonEmpty a6989586621681107422) (NonEmpty a6989586621681107422) type Scanr1Sym2 (a6989586621681109225 :: (~>) a6989586621681107422 ((~>) a6989586621681107422 a6989586621681107422)) (a6989586621681109226 :: NonEmpty a6989586621681107422) = Scanr1 a6989586621681109225 a6989586621681109226 data TransposeSym0 :: forall a6989586621681107387. (~>) (NonEmpty (NonEmpty a6989586621681107387)) (NonEmpty (NonEmpty a6989586621681107387)) type TransposeSym1 (a6989586621681109345 :: NonEmpty (NonEmpty a6989586621681107387)) = Transpose a6989586621681109345 data SortBySym0 :: forall a6989586621681107386. (~>) ((~>) a6989586621681107386 ((~>) a6989586621681107386 Ordering)) ((~>) (NonEmpty a6989586621681107386) (NonEmpty a6989586621681107386)) data SortBySym1 (a6989586621681109152 :: (~>) a6989586621681107386 ((~>) a6989586621681107386 Ordering)) :: (~>) (NonEmpty a6989586621681107386) (NonEmpty a6989586621681107386) type SortBySym2 (a6989586621681109152 :: (~>) a6989586621681107386 ((~>) a6989586621681107386 Ordering)) (a6989586621681109153 :: NonEmpty a6989586621681107386) = SortBy a6989586621681109152 a6989586621681109153 data SortWithSym0 :: forall a6989586621681107385 o6989586621681107384. (~>) ((~>) a6989586621681107385 o6989586621681107384) ((~>) (NonEmpty a6989586621681107385) (NonEmpty a6989586621681107385)) data SortWithSym1 (a6989586621681109164 :: (~>) a6989586621681107385 o6989586621681107384) :: (~>) (NonEmpty a6989586621681107385) (NonEmpty a6989586621681107385) type SortWithSym2 (a6989586621681109164 :: (~>) a6989586621681107385 o6989586621681107384) (a6989586621681109165 :: NonEmpty a6989586621681107385) = SortWith a6989586621681109164 a6989586621681109165 data LengthSym0 :: forall a6989586621681107450. (~>) (NonEmpty a6989586621681107450) Nat type LengthSym1 (a6989586621681109333 :: NonEmpty a6989586621681107450) = Length a6989586621681109333 data HeadSym0 :: forall a6989586621681107443. (~>) (NonEmpty a6989586621681107443) a6989586621681107443 type HeadSym1 (a6989586621681109265 :: NonEmpty a6989586621681107443) = Head a6989586621681109265 data TailSym0 :: forall a6989586621681107442. (~>) (NonEmpty a6989586621681107442) [a6989586621681107442] type TailSym1 (a6989586621681109262 :: NonEmpty a6989586621681107442) = Tail a6989586621681109262 data LastSym0 :: forall a6989586621681107441. (~>) (NonEmpty a6989586621681107441) a6989586621681107441 type LastSym1 (a6989586621681109258 :: NonEmpty a6989586621681107441) = Last a6989586621681109258 data InitSym0 :: forall a6989586621681107440. (~>) (NonEmpty a6989586621681107440) [a6989586621681107440] type InitSym1 (a6989586621681109254 :: NonEmpty a6989586621681107440) = Init a6989586621681109254 data (<|@#@$) :: forall a6989586621681107439. (~>) a6989586621681107439 ((~>) (NonEmpty a6989586621681107439) (NonEmpty a6989586621681107439)) data (<|@#@$$) (a6989586621681109237 :: a6989586621681107439) :: (~>) (NonEmpty a6989586621681107439) (NonEmpty a6989586621681107439) type (<|@#@$$$) (a6989586621681109237 :: a6989586621681107439) (a6989586621681109238 :: NonEmpty a6989586621681107439) = (<|) a6989586621681109237 a6989586621681109238 data ConsSym0 :: forall a6989586621681107438. (~>) a6989586621681107438 ((~>) (NonEmpty a6989586621681107438) (NonEmpty a6989586621681107438)) data ConsSym1 (a6989586621681109248 :: a6989586621681107438) :: (~>) (NonEmpty a6989586621681107438) (NonEmpty a6989586621681107438) type ConsSym2 (a6989586621681109248 :: a6989586621681107438) (a6989586621681109249 :: NonEmpty a6989586621681107438) = Cons a6989586621681109248 a6989586621681109249 data UnconsSym0 :: forall a6989586621681107446. (~>) (NonEmpty a6989586621681107446) (a6989586621681107446, Maybe (NonEmpty a6989586621681107446)) type UnconsSym1 (a6989586621681109301 :: NonEmpty a6989586621681107446) = Uncons a6989586621681109301 data UnfoldrSym0 :: forall a6989586621681107444 b6989586621681107445. (~>) ((~>) a6989586621681107444 (b6989586621681107445, Maybe a6989586621681107444)) ((~>) a6989586621681107444 (NonEmpty b6989586621681107445)) data UnfoldrSym1 (a6989586621681109268 :: (~>) a6989586621681107444 (b6989586621681107445, Maybe a6989586621681107444)) :: (~>) a6989586621681107444 (NonEmpty b6989586621681107445) type UnfoldrSym2 (a6989586621681109268 :: (~>) a6989586621681107444 (b6989586621681107445, Maybe a6989586621681107444)) (a6989586621681109269 :: a6989586621681107444) = Unfoldr a6989586621681109268 a6989586621681109269 data SortSym0 :: forall a6989586621681107437. (~>) (NonEmpty a6989586621681107437) (NonEmpty a6989586621681107437) type SortSym1 (a6989586621681109234 :: NonEmpty a6989586621681107437) = Sort a6989586621681109234 data ReverseSym0 :: forall a6989586621681107420. (~>) (NonEmpty a6989586621681107420) (NonEmpty a6989586621681107420) type ReverseSym1 (a6989586621681109149 :: NonEmpty a6989586621681107420) = Reverse a6989586621681109149 data InitsSym0 :: forall a6989586621681107430. (~>) [a6989586621681107430] (NonEmpty [a6989586621681107430]) type InitsSym1 (a6989586621681109180 :: [a6989586621681107430]) = Inits a6989586621681109180 data TailsSym0 :: forall a6989586621681107429. (~>) [a6989586621681107429] (NonEmpty [a6989586621681107429]) type TailsSym1 (a6989586621681109185 :: [a6989586621681107429]) = Tails a6989586621681109185 data UnfoldSym0 :: forall a6989586621681107448 b6989586621681107449. (~>) ((~>) a6989586621681107448 (b6989586621681107449, Maybe a6989586621681107448)) ((~>) a6989586621681107448 (NonEmpty b6989586621681107449)) data UnfoldSym1 (a6989586621681109305 :: (~>) a6989586621681107448 (b6989586621681107449, Maybe a6989586621681107448)) :: (~>) a6989586621681107448 (NonEmpty b6989586621681107449) data InsertSym0 :: forall a6989586621681107428. (~>) a6989586621681107428 ((~>) [a6989586621681107428] (NonEmpty a6989586621681107428)) data InsertSym1 (a6989586621681109188 :: a6989586621681107428) :: (~>) [a6989586621681107428] (NonEmpty a6989586621681107428) type InsertSym2 (a6989586621681109188 :: a6989586621681107428) (a6989586621681109189 :: [a6989586621681107428]) = Insert a6989586621681109188 a6989586621681109189 data TakeSym0 :: forall a6989586621681107419. (~>) Nat ((~>) (NonEmpty a6989586621681107419) [a6989586621681107419]) data TakeSym1 (a6989586621681109063 :: Nat) :: forall a6989586621681107419. (~>) (NonEmpty a6989586621681107419) [a6989586621681107419] type TakeSym2 (a6989586621681109063 :: Nat) (a6989586621681109064 :: NonEmpty a6989586621681107419) = Take a6989586621681109063 a6989586621681109064 data DropSym0 :: forall a6989586621681107418. (~>) Nat ((~>) (NonEmpty a6989586621681107418) [a6989586621681107418]) data DropSym1 (a6989586621681109071 :: Nat) :: forall a6989586621681107418. (~>) (NonEmpty a6989586621681107418) [a6989586621681107418] type DropSym2 (a6989586621681109071 :: Nat) (a6989586621681109072 :: NonEmpty a6989586621681107418) = Drop a6989586621681109071 a6989586621681109072 data SplitAtSym0 :: forall a6989586621681107417. (~>) Nat ((~>) (NonEmpty a6989586621681107417) ([a6989586621681107417], [a6989586621681107417])) data SplitAtSym1 (a6989586621681109079 :: Nat) :: forall a6989586621681107417. (~>) (NonEmpty a6989586621681107417) ([a6989586621681107417], [a6989586621681107417]) type SplitAtSym2 (a6989586621681109079 :: Nat) (a6989586621681109080 :: NonEmpty a6989586621681107417) = SplitAt a6989586621681109079 a6989586621681109080 data TakeWhileSym0 :: forall a6989586621681107416. (~>) ((~>) a6989586621681107416 Bool) ((~>) (NonEmpty a6989586621681107416) [a6989586621681107416]) data TakeWhileSym1 (a6989586621681109087 :: (~>) a6989586621681107416 Bool) :: (~>) (NonEmpty a6989586621681107416) [a6989586621681107416] type TakeWhileSym2 (a6989586621681109087 :: (~>) a6989586621681107416 Bool) (a6989586621681109088 :: NonEmpty a6989586621681107416) = TakeWhile a6989586621681109087 a6989586621681109088 data DropWhileSym0 :: forall a6989586621681107415. (~>) ((~>) a6989586621681107415 Bool) ((~>) (NonEmpty a6989586621681107415) [a6989586621681107415]) data DropWhileSym1 (a6989586621681109095 :: (~>) a6989586621681107415 Bool) :: (~>) (NonEmpty a6989586621681107415) [a6989586621681107415] type DropWhileSym2 (a6989586621681109095 :: (~>) a6989586621681107415 Bool) (a6989586621681109096 :: NonEmpty a6989586621681107415) = DropWhile a6989586621681109095 a6989586621681109096 data SpanSym0 :: forall a6989586621681107414. (~>) ((~>) a6989586621681107414 Bool) ((~>) (NonEmpty a6989586621681107414) ([a6989586621681107414], [a6989586621681107414])) data SpanSym1 (a6989586621681109103 :: (~>) a6989586621681107414 Bool) :: (~>) (NonEmpty a6989586621681107414) ([a6989586621681107414], [a6989586621681107414]) type SpanSym2 (a6989586621681109103 :: (~>) a6989586621681107414 Bool) (a6989586621681109104 :: NonEmpty a6989586621681107414) = Span a6989586621681109103 a6989586621681109104 data BreakSym0 :: forall a6989586621681107413. (~>) ((~>) a6989586621681107413 Bool) ((~>) (NonEmpty a6989586621681107413) ([a6989586621681107413], [a6989586621681107413])) data BreakSym1 (a6989586621681109111 :: (~>) a6989586621681107413 Bool) :: (~>) (NonEmpty a6989586621681107413) ([a6989586621681107413], [a6989586621681107413]) type BreakSym2 (a6989586621681109111 :: (~>) a6989586621681107413 Bool) (a6989586621681109112 :: NonEmpty a6989586621681107413) = Break a6989586621681109111 a6989586621681109112 data FilterSym0 :: forall a6989586621681107412. (~>) ((~>) a6989586621681107412 Bool) ((~>) (NonEmpty a6989586621681107412) [a6989586621681107412]) data FilterSym1 (a6989586621681109119 :: (~>) a6989586621681107412 Bool) :: (~>) (NonEmpty a6989586621681107412) [a6989586621681107412] type FilterSym2 (a6989586621681109119 :: (~>) a6989586621681107412 Bool) (a6989586621681109120 :: NonEmpty a6989586621681107412) = Filter a6989586621681109119 a6989586621681109120 data PartitionSym0 :: forall a6989586621681107411. (~>) ((~>) a6989586621681107411 Bool) ((~>) (NonEmpty a6989586621681107411) ([a6989586621681107411], [a6989586621681107411])) data PartitionSym1 (a6989586621681109127 :: (~>) a6989586621681107411 Bool) :: (~>) (NonEmpty a6989586621681107411) ([a6989586621681107411], [a6989586621681107411]) type PartitionSym2 (a6989586621681109127 :: (~>) a6989586621681107411 Bool) (a6989586621681109128 :: NonEmpty a6989586621681107411) = Partition a6989586621681109127 a6989586621681109128 data GroupSym0 :: forall a6989586621681107410. (~>) [a6989586621681107410] [NonEmpty a6989586621681107410] type GroupSym1 (a6989586621681109039 :: [a6989586621681107410]) = Group a6989586621681109039 data GroupBySym0 :: forall a6989586621681107409. (~>) ((~>) a6989586621681107409 ((~>) a6989586621681107409 Bool)) ((~>) [a6989586621681107409] [NonEmpty a6989586621681107409]) data GroupBySym1 (a6989586621681108929 :: (~>) a6989586621681107409 ((~>) a6989586621681107409 Bool)) :: (~>) [a6989586621681107409] [NonEmpty a6989586621681107409] type GroupBySym2 (a6989586621681108929 :: (~>) a6989586621681107409 ((~>) a6989586621681107409 Bool)) (a6989586621681108930 :: [a6989586621681107409]) = GroupBy a6989586621681108929 a6989586621681108930 data GroupWithSym0 :: forall a6989586621681107408 b6989586621681107407. (~>) ((~>) a6989586621681107408 b6989586621681107407) ((~>) [a6989586621681107408] [NonEmpty a6989586621681107408]) data GroupWithSym1 (a6989586621681108977 :: (~>) a6989586621681107408 b6989586621681107407) :: (~>) [a6989586621681107408] [NonEmpty a6989586621681107408] type GroupWithSym2 (a6989586621681108977 :: (~>) a6989586621681107408 b6989586621681107407) (a6989586621681108978 :: [a6989586621681107408]) = GroupWith a6989586621681108977 a6989586621681108978 data GroupAllWithSym0 :: forall a6989586621681107406 b6989586621681107405. (~>) ((~>) a6989586621681107406 b6989586621681107405) ((~>) [a6989586621681107406] [NonEmpty a6989586621681107406]) data GroupAllWithSym1 (a6989586621681108985 :: (~>) a6989586621681107406 b6989586621681107405) :: (~>) [a6989586621681107406] [NonEmpty a6989586621681107406] type GroupAllWithSym2 (a6989586621681108985 :: (~>) a6989586621681107406 b6989586621681107405) (a6989586621681108986 :: [a6989586621681107406]) = GroupAllWith a6989586621681108985 a6989586621681108986 data Group1Sym0 :: forall a6989586621681107404. (~>) (NonEmpty a6989586621681107404) (NonEmpty (NonEmpty a6989586621681107404)) type Group1Sym1 (a6989586621681109026 :: NonEmpty a6989586621681107404) = Group1 a6989586621681109026 data GroupBy1Sym0 :: forall a6989586621681107403. (~>) ((~>) a6989586621681107403 ((~>) a6989586621681107403 Bool)) ((~>) (NonEmpty a6989586621681107403) (NonEmpty (NonEmpty a6989586621681107403))) data GroupBy1Sym1 (a6989586621681108993 :: (~>) a6989586621681107403 ((~>) a6989586621681107403 Bool)) :: (~>) (NonEmpty a6989586621681107403) (NonEmpty (NonEmpty a6989586621681107403)) type GroupBy1Sym2 (a6989586621681108993 :: (~>) a6989586621681107403 ((~>) a6989586621681107403 Bool)) (a6989586621681108994 :: NonEmpty a6989586621681107403) = GroupBy1 a6989586621681108993 a6989586621681108994 data GroupWith1Sym0 :: forall a6989586621681107402 b6989586621681107401. (~>) ((~>) a6989586621681107402 b6989586621681107401) ((~>) (NonEmpty a6989586621681107402) (NonEmpty (NonEmpty a6989586621681107402))) data GroupWith1Sym1 (a6989586621681109029 :: (~>) a6989586621681107402 b6989586621681107401) :: (~>) (NonEmpty a6989586621681107402) (NonEmpty (NonEmpty a6989586621681107402)) type GroupWith1Sym2 (a6989586621681109029 :: (~>) a6989586621681107402 b6989586621681107401) (a6989586621681109030 :: NonEmpty a6989586621681107402) = GroupWith1 a6989586621681109029 a6989586621681109030 data GroupAllWith1Sym0 :: forall a6989586621681107400 b6989586621681107399. (~>) ((~>) a6989586621681107400 b6989586621681107399) ((~>) (NonEmpty a6989586621681107400) (NonEmpty (NonEmpty a6989586621681107400))) data GroupAllWith1Sym1 (a6989586621681109170 :: (~>) a6989586621681107400 b6989586621681107399) :: (~>) (NonEmpty a6989586621681107400) (NonEmpty (NonEmpty a6989586621681107400)) type GroupAllWith1Sym2 (a6989586621681109170 :: (~>) a6989586621681107400 b6989586621681107399) (a6989586621681109171 :: NonEmpty a6989586621681107400) = GroupAllWith1 a6989586621681109170 a6989586621681109171 data IsPrefixOfSym0 :: forall a6989586621681107398. (~>) [a6989586621681107398] ((~>) (NonEmpty a6989586621681107398) Bool) data IsPrefixOfSym1 (a6989586621681108921 :: [a6989586621681107398]) :: (~>) (NonEmpty a6989586621681107398) Bool type IsPrefixOfSym2 (a6989586621681108921 :: [a6989586621681107398]) (a6989586621681108922 :: NonEmpty a6989586621681107398) = IsPrefixOf a6989586621681108921 a6989586621681108922 data NubSym0 :: forall a6989586621681107389. (~>) (NonEmpty a6989586621681107389) (NonEmpty a6989586621681107389) type NubSym1 (a6989586621681108852 :: NonEmpty a6989586621681107389) = Nub a6989586621681108852 data NubBySym0 :: forall a6989586621681107388. (~>) ((~>) a6989586621681107388 ((~>) a6989586621681107388 Bool)) ((~>) (NonEmpty a6989586621681107388) (NonEmpty a6989586621681107388)) data NubBySym1 (a6989586621681108835 :: (~>) a6989586621681107388 ((~>) a6989586621681107388 Bool)) :: (~>) (NonEmpty a6989586621681107388) (NonEmpty a6989586621681107388) type NubBySym2 (a6989586621681108835 :: (~>) a6989586621681107388 ((~>) a6989586621681107388 Bool)) (a6989586621681108836 :: NonEmpty a6989586621681107388) = NubBy a6989586621681108835 a6989586621681108836 data (!!@#@$) :: forall a6989586621681107397. (~>) (NonEmpty a6989586621681107397) ((~>) Nat a6989586621681107397) data (!!@#@$$) (a6989586621681108903 :: NonEmpty a6989586621681107397) :: (~>) Nat a6989586621681107397 type (!!@#@$$$) (a6989586621681108903 :: NonEmpty a6989586621681107397) (a6989586621681108904 :: Nat) = (!!) a6989586621681108903 a6989586621681108904 data ZipSym0 :: forall a6989586621681107395 b6989586621681107396. (~>) (NonEmpty a6989586621681107395) ((~>) (NonEmpty b6989586621681107396) (NonEmpty (a6989586621681107395, b6989586621681107396))) data ZipSym1 (a6989586621681108895 :: NonEmpty a6989586621681107395) :: forall b6989586621681107396. (~>) (NonEmpty b6989586621681107396) (NonEmpty (a6989586621681107395, b6989586621681107396)) type ZipSym2 (a6989586621681108895 :: NonEmpty a6989586621681107395) (a6989586621681108896 :: NonEmpty b6989586621681107396) = Zip a6989586621681108895 a6989586621681108896 data ZipWithSym0 :: forall a6989586621681107392 b6989586621681107393 c6989586621681107394. (~>) ((~>) a6989586621681107392 ((~>) b6989586621681107393 c6989586621681107394)) ((~>) (NonEmpty a6989586621681107392) ((~>) (NonEmpty b6989586621681107393) (NonEmpty c6989586621681107394))) data ZipWithSym1 (a6989586621681108884 :: (~>) a6989586621681107392 ((~>) b6989586621681107393 c6989586621681107394)) :: (~>) (NonEmpty a6989586621681107392) ((~>) (NonEmpty b6989586621681107393) (NonEmpty c6989586621681107394)) data ZipWithSym2 (a6989586621681108884 :: (~>) a6989586621681107392 ((~>) b6989586621681107393 c6989586621681107394)) (a6989586621681108885 :: NonEmpty a6989586621681107392) :: (~>) (NonEmpty b6989586621681107393) (NonEmpty c6989586621681107394) type ZipWithSym3 (a6989586621681108884 :: (~>) a6989586621681107392 ((~>) b6989586621681107393 c6989586621681107394)) (a6989586621681108885 :: NonEmpty a6989586621681107392) (a6989586621681108886 :: NonEmpty b6989586621681107393) = ZipWith a6989586621681108884 a6989586621681108885 a6989586621681108886 data UnzipSym0 :: forall a6989586621681107390 b6989586621681107391. (~>) (NonEmpty (a6989586621681107390, b6989586621681107391)) (NonEmpty a6989586621681107390, NonEmpty b6989586621681107391) type UnzipSym1 (a6989586621681108855 :: NonEmpty (a6989586621681107390, b6989586621681107391)) = Unzip a6989586621681108855 data FromListSym0 :: forall a6989586621681107436. (~>) [a6989586621681107436] (NonEmpty a6989586621681107436) type FromListSym1 (a6989586621681109135 :: [a6989586621681107436]) = FromList a6989586621681109135 data ToListSym0 :: forall a6989586621681107435. (~>) (NonEmpty a6989586621681107435) [a6989586621681107435] type ToListSym1 (a6989586621681109059 :: NonEmpty a6989586621681107435) = ToList a6989586621681109059 data NonEmpty_Sym0 :: forall a6989586621681107447. (~>) [a6989586621681107447] (Maybe (NonEmpty a6989586621681107447)) type NonEmpty_Sym1 (a6989586621681109297 :: [a6989586621681107447]) = NonEmpty_ a6989586621681109297 data XorSym0 :: (~>) (NonEmpty Bool) Bool type XorSym1 (a6989586621681109320 :: NonEmpty Bool) = Xor a6989586621681109320 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Munzip_6989586621681109393Sym0 instance Data.Singletons.Prelude.Monad.Zip.PMonadZip GHC.Base.NonEmpty instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681109382Sym0 instance forall a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681109379 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681109382Sym1 a6989586621681109379) instance forall a6989586621681075600 b6989586621681075601 c6989586621681075602 (a6989586621681109380 :: a6989586621681075600 Data.Singletons.Internal.~> (b6989586621681075601 Data.Singletons.Internal.~> c6989586621681075602)) (a6989586621681109379 :: GHC.Base.NonEmpty a6989586621681075600). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MzipWith_6989586621681109382Sym2 a6989586621681109380 a6989586621681109379) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681109360Sym0 instance forall b6989586621681075599 a6989586621681075598 (a6989586621681109358 :: GHC.Base.NonEmpty a6989586621681075598). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Mzip_6989586621681109360Sym1 a6989586621681109358) 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 a6989586621681107451 b6989586621681107452 (a6989586621681109336 :: a6989586621681107451 Data.Singletons.Internal.~> b6989586621681107452). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FmapSym1 a6989586621681109336) 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 b6989586621681107449 a6989586621681107448 (a6989586621681109305 :: a6989586621681107448 Data.Singletons.Internal.~> (b6989586621681107449, GHC.Maybe.Maybe a6989586621681107448)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldSym1 a6989586621681109305) 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 b6989586621681107445 a6989586621681107444 (a6989586621681109268 :: a6989586621681107444 Data.Singletons.Internal.~> (b6989586621681107445, GHC.Maybe.Maybe a6989586621681107444)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.UnfoldrSym1 a6989586621681109268) 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 a6989586621681107438 (a6989586621681109248 :: a6989586621681107438). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ConsSym1 a6989586621681109248) 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 a6989586621681107439 (a6989586621681109237 :: a6989586621681107439). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.<|@#@$$) a6989586621681109237) 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 a6989586621681107422 (a6989586621681109225 :: a6989586621681107422 Data.Singletons.Internal.~> (a6989586621681107422 Data.Singletons.Internal.~> a6989586621681107422)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanr1Sym1 a6989586621681109225) 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 a6989586621681107423 (a6989586621681109218 :: a6989586621681107423 Data.Singletons.Internal.~> (a6989586621681107423 Data.Singletons.Internal.~> a6989586621681107423)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Scanl1Sym1 a6989586621681109218) 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 a6989586621681107424 b6989586621681107425 (a6989586621681109207 :: a6989586621681107424 Data.Singletons.Internal.~> (b6989586621681107425 Data.Singletons.Internal.~> b6989586621681107425)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym1 a6989586621681109207) 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 a6989586621681107424 b6989586621681107425 (a6989586621681109208 :: a6989586621681107424 Data.Singletons.Internal.~> (b6989586621681107425 Data.Singletons.Internal.~> b6989586621681107425)) (a6989586621681109207 :: b6989586621681107425). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanrSym2 a6989586621681109208 a6989586621681109207) 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 a6989586621681107427 b6989586621681107426 (a6989586621681109196 :: b6989586621681107426 Data.Singletons.Internal.~> (a6989586621681107427 Data.Singletons.Internal.~> b6989586621681107426)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym1 a6989586621681109196) 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 a6989586621681107427 b6989586621681107426 (a6989586621681109197 :: b6989586621681107426 Data.Singletons.Internal.~> (a6989586621681107427 Data.Singletons.Internal.~> b6989586621681107426)) (a6989586621681109196 :: b6989586621681107426). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ScanlSym2 a6989586621681109197 a6989586621681109196) 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 a6989586621681107428 (a6989586621681109188 :: a6989586621681107428). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.InsertSym1 a6989586621681109188) 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 a6989586621681107400 b6989586621681107399 (a6989586621681109170 :: a6989586621681107400 Data.Singletons.Internal.~> b6989586621681107399). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWith1Sym1 a6989586621681109170) 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 a6989586621681107385 o6989586621681107384 (a6989586621681109164 :: a6989586621681107385 Data.Singletons.Internal.~> o6989586621681107384). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortWithSym1 a6989586621681109164) 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 a6989586621681107386 (a6989586621681109152 :: a6989586621681107386 Data.Singletons.Internal.~> (a6989586621681107386 Data.Singletons.Internal.~> GHC.Types.Ordering)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SortBySym1 a6989586621681109152) 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 a6989586621681107433 b6989586621681107434 (a6989586621681109139 :: [a6989586621681107433] Data.Singletons.Internal.~> [b6989586621681107434]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.LiftSym1 a6989586621681109139) 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 a6989586621681107411 (a6989586621681109127 :: a6989586621681107411 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.PartitionSym1 a6989586621681109127) 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 a6989586621681107412 (a6989586621681109119 :: a6989586621681107412 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.FilterSym1 a6989586621681109119) 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 a6989586621681107413 (a6989586621681109111 :: a6989586621681107413 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.BreakSym1 a6989586621681109111) 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 a6989586621681107414 (a6989586621681109103 :: a6989586621681107414 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.SpanSym1 a6989586621681109103) 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 a6989586621681107415 (a6989586621681109095 :: a6989586621681107415 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.DropWhileSym1 a6989586621681109095) 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 a6989586621681107416 (a6989586621681109087 :: a6989586621681107416 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.TakeWhileSym1 a6989586621681109087) 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 a6989586621681109079) 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 a6989586621681109071) 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 a6989586621681109063) 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 a6989586621681107431 b6989586621681107432 (a6989586621681109052 :: a6989586621681107431 Data.Singletons.Internal.~> b6989586621681107432). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.MapSym1 a6989586621681109052) 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 a6989586621681107421 (a6989586621681109042 :: a6989586621681107421). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IntersperseSym1 a6989586621681109042) 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 a6989586621681107402 b6989586621681107401 (a6989586621681109029 :: a6989586621681107402 Data.Singletons.Internal.~> b6989586621681107401). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWith1Sym1 a6989586621681109029) 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 a6989586621681107403 (a6989586621681108993 :: a6989586621681107403 Data.Singletons.Internal.~> (a6989586621681107403 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBy1Sym1 a6989586621681108993) 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 a6989586621681107406 b6989586621681107405 (a6989586621681108985 :: a6989586621681107406 Data.Singletons.Internal.~> b6989586621681107405). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupAllWithSym1 a6989586621681108985) 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 a6989586621681107408 b6989586621681107407 (a6989586621681108977 :: a6989586621681107408 Data.Singletons.Internal.~> b6989586621681107407). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupWithSym1 a6989586621681108977) 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.Let6989586621681108937GoSym0 instance forall k1 a6989586621680389361 k2 (eq06989586621681108935 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108937GoSym1 eq06989586621681108935) instance forall a6989586621680389361 k1 k2 (a6989586621681108938 :: k2) (a_69895866216811089336989586621681108936 :: k1) (eq06989586621681108935 :: a6989586621680389361 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108937GoSym3 a6989586621681108938 a_69895866216811089336989586621681108936 eq06989586621681108935) instance forall a6989586621680389361 k1 k2 (a_69895866216811089336989586621681108936 :: k2) (eq06989586621681108935 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108937GoSym2 a_69895866216811089336989586621681108936 eq06989586621681108935) instance forall a6989586621681107409 (a6989586621681108929 :: a6989586621681107409 Data.Singletons.Internal.~> (a6989586621681107409 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.GroupBySym1 a6989586621681108929) 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 a6989586621681107398 (a6989586621681108921 :: [a6989586621681107398]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.IsPrefixOfSym1 a6989586621681108921) 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 a6989586621681107397 (a6989586621681108903 :: GHC.Base.NonEmpty a6989586621681107397). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.List.NonEmpty.!!@#@$$) a6989586621681108903) 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 b6989586621681107396 a6989586621681107395 (a6989586621681108895 :: GHC.Base.NonEmpty a6989586621681107395). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipSym1 a6989586621681108895) 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 a6989586621681107392 b6989586621681107393 c6989586621681107394 (a6989586621681108884 :: a6989586621681107392 Data.Singletons.Internal.~> (b6989586621681107393 Data.Singletons.Internal.~> c6989586621681107394)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym1 a6989586621681108884) 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 a6989586621681107392 b6989586621681107393 c6989586621681107394 (a6989586621681108885 :: a6989586621681107392 Data.Singletons.Internal.~> (b6989586621681107393 Data.Singletons.Internal.~> c6989586621681107394)) (a6989586621681108884 :: GHC.Base.NonEmpty a6989586621681107392). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.ZipWithSym2 a6989586621681108885 a6989586621681108884) 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 a6989586621681107388 (a6989586621681108835 :: a6989586621681107388 Data.Singletons.Internal.~> (a6989586621681107388 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.NubBySym1 a6989586621681108835) 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.Let6989586621681109324Xor'Sym0 instance forall k1 k2 (x6989586621681109322 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109324Xor'Sym1 x6989586621681109322) instance forall k1 k2 (xs6989586621681109323 :: k2) (x6989586621681109322 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109324Xor'Sym2 xs6989586621681109323 x6989586621681109322) instance forall k1 k2 (a6989586621681109325 :: k2) (xs6989586621681109323 :: k1) (x6989586621681109322 :: GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109324Xor'Sym3 a6989586621681109325 xs6989586621681109323 x6989586621681109322) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109311Scrutinee_6989586621681107615Sym0 instance forall k1 k (f6989586621681109309 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109311Scrutinee_6989586621681107615Sym1 f6989586621681109309) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109289Scrutinee_6989586621681107625Sym0 instance forall k1 k (f6989586621681109272 :: k1 Data.Singletons.Internal.~> k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109289Scrutinee_6989586621681107625Sym1 f6989586621681109272) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109274GoSym0 instance forall k k2 k3 (f6989586621681109272 :: k3 Data.Singletons.Internal.~> (k2, GHC.Maybe.Maybe k3)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109274GoSym1 f6989586621681109272) instance forall k k2 k3 (a6989586621681109273 :: k3 Data.Singletons.Internal.~> (k2, GHC.Maybe.Maybe k3)) (f6989586621681109272 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109274GoSym2 a6989586621681109273 f6989586621681109272) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109280Scrutinee_6989586621681107629Sym0 instance forall k1 k2 k3 (f6989586621681109272 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109280Scrutinee_6989586621681107629Sym1 f6989586621681109272) instance forall k1 k2 k3 (a6989586621681109273 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681109272 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109280Scrutinee_6989586621681107629Sym2 a6989586621681109273 f6989586621681109272) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000X_6989586621681109001Sym0 instance forall k1 a6989586621680389361 (eq6989586621681108997 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000X_6989586621681109001Sym1 eq6989586621681108997) instance forall k1 a6989586621680389361 (x6989586621681108998 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108997 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000X_6989586621681109001Sym2 x6989586621681108998 eq6989586621681108997) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000YsSym0 instance forall k1 a6989586621680389361 (eq6989586621681108997 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000YsSym1 eq6989586621681108997) instance forall k1 a6989586621680389361 (x6989586621681108998 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108997 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000YsSym2 x6989586621681108998 eq6989586621681108997) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000ZsSym0 instance forall k1 a6989586621680389361 (eq6989586621681108997 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000ZsSym1 eq6989586621681108997) instance forall k1 a6989586621680389361 (x6989586621681108998 :: k1 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108997 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681109000ZsSym2 x6989586621681108998 eq6989586621681108997) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947X_6989586621681108948Sym0 instance forall k1 k2 a6989586621680389361 k3 (eq06989586621681108935 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947X_6989586621681108948Sym1 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (eq6989586621681108944 :: k3) (eq06989586621681108935 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947X_6989586621681108948Sym2 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (x6989586621681108945 :: k3) (eq6989586621681108944 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681108935 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947X_6989586621681108948Sym3 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (xs6989586621681108946 :: k3) (x6989586621681108945 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108944 :: k2) (eq06989586621681108935 :: [a6989586621680389361]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947X_6989586621681108948Sym4 xs6989586621681108946 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947YsSym0 instance forall k1 k2 a6989586621680389361 k3 (eq06989586621681108935 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947YsSym1 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (eq6989586621681108944 :: k3) (eq06989586621681108935 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947YsSym2 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (x6989586621681108945 :: k3) (eq6989586621681108944 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681108935 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947YsSym3 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (xs6989586621681108946 :: k3) (x6989586621681108945 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108944 :: k2) (eq06989586621681108935 :: [a6989586621680389361]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947YsSym4 xs6989586621681108946 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947ZsSym0 instance forall k1 k2 a6989586621680389361 k3 (eq06989586621681108935 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947ZsSym1 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (eq6989586621681108944 :: k3) (eq06989586621681108935 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947ZsSym2 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (x6989586621681108945 :: k3) (eq6989586621681108944 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq06989586621681108935 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947ZsSym3 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance forall k1 k2 a6989586621680389361 k3 (xs6989586621681108946 :: k3) (x6989586621681108945 :: k2 Data.Singletons.Internal.~> (a6989586621680389361 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108944 :: k2) (eq06989586621681108935 :: [a6989586621680389361]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108947ZsSym4 xs6989586621681108946 x6989586621681108945 eq6989586621681108944 eq06989586621681108935) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860X_6989586621681108861Sym0 instance forall k1 a6989586621680389348 b6989586621680389349 k2 (a6989586621681108857 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860X_6989586621681108861Sym1 a6989586621681108857) instance forall a6989586621680389348 b6989586621680389349 k1 k2 (b6989586621681108858 :: k2) (a6989586621681108857 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860X_6989586621681108861Sym2 b6989586621681108858 a6989586621681108857) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860AsSym0 instance forall k1 b6989586621680389349 a6989586621680389348 k2 (a6989586621681108857 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860AsSym1 a6989586621681108857) instance forall b6989586621680389349 a6989586621680389348 k1 k2 (b6989586621681108858 :: k2) (a6989586621681108857 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860AsSym2 b6989586621681108858 a6989586621681108857) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860BsSym0 instance forall k1 a6989586621680389348 b6989586621680389349 k2 (a6989586621681108857 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860BsSym1 a6989586621681108857) instance forall a6989586621680389348 b6989586621680389349 k1 k2 (b6989586621681108858 :: k2) (a6989586621681108857 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Let6989586621681108860BsSym2 b6989586621681108858 a6989586621681108857) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681108842Sym0 instance forall k k2 k3 (eq6989586621681108839 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681108842Sym1 eq6989586621681108839) instance forall k k2 k3 (a6989586621681108840 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (eq6989586621681108839 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681108842Sym2 a6989586621681108840 eq6989586621681108839) instance forall k k2 k3 (as6989586621681108841 :: k2 Data.Singletons.Internal.~> (k3 Data.Singletons.Internal.~> GHC.Types.Bool)) (a6989586621681108840 :: k2) (eq6989586621681108839 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.List.NonEmpty.Lambda_6989586621681108842Sym3 as6989586621681108841 a6989586621681108840 eq6989586621681108839) -- | Defines and exports a promoted and singled version of the -- IsString type class from Data.String. module Data.Singletons.Prelude.IsString class PIsString (a_a9bPV :: Type) where { type family FromString (arg_a9bQv :: Symbol) :: a_a9bPV; } class SIsString a_a9bPV sFromString :: forall (t_a9bQL :: Symbol). SIsString a_a9bPV => Sing t_a9bQL -> Sing (Apply FromStringSym0 t_a9bQL :: a_a9bPV) data FromStringSym0 :: forall a6989586621681200247. (~>) Symbol a6989586621681200247 type FromStringSym1 (arg6989586621681200283 :: Symbol) = FromString arg6989586621681200283 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_6989586621681200296Sym0 instance Data.Singletons.Prelude.IsString.PIsString (Data.Functor.Identity.Identity a) instance forall a6989586621681200249 k6989586621681200248 (b6989586621681200250 :: k6989586621681200248). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.IsString.FromString_6989586621681200289Sym0 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_a2fgv => PApplicative (f_a2fgv :: Type -> Type) where { type family Pure (arg_a2fna :: a_a2fgw) :: f_a2fgv a_a2fgw; type family (<*>) (arg_a2fnc :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (arg_a2fnd :: f_a2fgv a_a2fgx) :: f_a2fgv b_a2fgy; type family LiftA2 (arg_a2fng :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (arg_a2fnh :: f_a2fgv a_a2fgz) (arg_a2fni :: f_a2fgv b_a2fgA) :: f_a2fgv c_a2fgB; type family (*>) (arg_a2fnm :: f_a2fgv a_a2fgC) (arg_a2fnn :: f_a2fgv b_a2fgD) :: f_a2fgv b_a2fgD; type family (<*) (arg_a2fnq :: f_a2fgv a_a2fgE) (arg_a2fnr :: f_a2fgv b_a2fgF) :: f_a2fgv a_a2fgE; type (<*>) a_a2fnE a_a2fnF = Apply (Apply TFHelper_6989586621679545576Sym0 a_a2fnE) a_a2fnF; type LiftA2 a_a2fnV a_a2fnW a_a2fnX = Apply (Apply (Apply LiftA2_6989586621679545594Sym0 a_a2fnV) a_a2fnW) a_a2fnX; type (*>) a_a2fo9 a_a2foa = Apply (Apply TFHelper_6989586621679545607Sym0 a_a2fo9) a_a2foa; type (<*) a_a2fop a_a2foq = Apply (Apply TFHelper_6989586621679545623Sym0 a_a2fop) a_a2foq; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2fgv => SApplicative (f_a2fgv :: Type -> Type) sPure :: forall a_a2fgw (t_a2frn :: a_a2fgw). SApplicative f_a2fgv => Sing t_a2frn -> Sing (Apply PureSym0 t_a2frn :: f_a2fgv a_a2fgw) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). SApplicative f_a2fgv => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) sLiftA2 :: forall a_a2fgz b_a2fgA c_a2fgB (t_a2frt :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (t_a2fru :: f_a2fgv a_a2fgz) (t_a2frv :: f_a2fgv b_a2fgA). SApplicative f_a2fgv => Sing t_a2frt -> Sing t_a2fru -> Sing t_a2frv -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). SApplicative f_a2fgv => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). SApplicative f_a2fgv => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). (SApplicative f_a2fgv, (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) ~ Apply (Apply TFHelper_6989586621679545576Sym0 t_a2frp) t_a2frq) => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) sLiftA2 :: forall a_a2fgz b_a2fgA c_a2fgB (t_a2frt :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (t_a2fru :: f_a2fgv a_a2fgz) (t_a2frv :: f_a2fgv b_a2fgA). (SApplicative f_a2fgv, (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) ~ Apply (Apply (Apply LiftA2_6989586621679545594Sym0 t_a2frt) t_a2fru) t_a2frv) => Sing t_a2frt -> Sing t_a2fru -> Sing t_a2frv -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). (SApplicative f_a2fgv, (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) ~ Apply (Apply TFHelper_6989586621679545607Sym0 t_a2frz) t_a2frA) => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). (SApplicative f_a2fgv, (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) ~ Apply (Apply TFHelper_6989586621679545623Sym0 t_a2frD) t_a2frE) => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) infixl 4 %<*> infixl 4 %*> infixl 4 %<* class PApplicative f_a2fhK => PAlternative (f_a2fhK :: Type -> Type) where { type family Empty :: f_a2fhK a_a2fhL; type family (<|>) (arg_a2fpj :: f_a2fhK a_a2fhM) (arg_a2fpk :: f_a2fhK a_a2fhM) :: f_a2fhK a_a2fhM; } infixl 3 <|> class SApplicative f_a2fhK => SAlternative (f_a2fhK :: Type -> Type) sEmpty :: forall a_a2fhL. SAlternative f_a2fhK => Sing (EmptySym0 :: f_a2fhK a_a2fhL) (%<|>) :: forall a_a2fhM (t_a2fs4 :: f_a2fhK a_a2fhM) (t_a2fs5 :: f_a2fhK a_a2fhM). SAlternative f_a2fhK => Sing t_a2fs4 -> Sing t_a2fs5 -> Sing (Apply (Apply (<|>@#@$) t_a2fs4) t_a2fs5 :: f_a2fhK a_a2fhM) 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_a78UM :: Const a_a78UK b_a78UL) :: a_a78UK type family (<$>) (a_a2XlQ :: (~>) a_a2Xky b_a2Xkz) (a_a2XlR :: f_a2Xkx a_a2Xky) :: f_a2Xkx b_a2Xkz infixl 4 <$> (%<$>) :: forall f_a2Xkx a_a2Xky b_a2Xkz (t_a2Xnr :: (~>) a_a2Xky b_a2Xkz) (t_a2Xns :: f_a2Xkx a_a2Xky). SFunctor f_a2Xkx => Sing t_a2Xnr -> Sing t_a2Xns -> Sing (Apply (Apply (<$>@#@$) t_a2Xnr) t_a2Xns :: f_a2Xkx b_a2Xkz) infixl 4 %<$> type family (<$) (arg_a2fmQ :: a_a2fgt) (arg_a2fmR :: f_a2fgq b_a2fgu) :: f_a2fgq a_a2fgt infixl 4 <$ (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). SFunctor f_a2fgq => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) infixl 4 %<$ type family (<**>) (a_a2fmw :: f_a2ffQ a_a2ffR) (a_a2fmx :: f_a2ffQ ((~>) a_a2ffR b_a2ffS)) :: f_a2ffQ b_a2ffS infixl 4 <**> (%<**>) :: forall f_a2ffQ a_a2ffR b_a2ffS (t_a2fqP :: f_a2ffQ a_a2ffR) (t_a2fqQ :: f_a2ffQ ((~>) a_a2ffR b_a2ffS)). SApplicative f_a2ffQ => Sing t_a2fqP -> Sing t_a2fqQ -> Sing (Apply (Apply (<**>@#@$) t_a2fqP) t_a2fqQ :: f_a2ffQ b_a2ffS) infixl 4 %<**> type family LiftA (a_a2fmm :: (~>) a_a2ffO b_a2ffP) (a_a2fmn :: f_a2ffN a_a2ffO) :: f_a2ffN b_a2ffP sLiftA :: forall f_a2ffN a_a2ffO b_a2ffP (t_a2fqL :: (~>) a_a2ffO b_a2ffP) (t_a2fqM :: f_a2ffN a_a2ffO). SApplicative f_a2ffN => Sing t_a2fqL -> Sing t_a2fqM -> Sing (Apply (Apply LiftASym0 t_a2fqL) t_a2fqM :: f_a2ffN b_a2ffP) type family LiftA3 (a_a2fma :: (~>) a_a2ffJ ((~>) b_a2ffK ((~>) c_a2ffL d_a2ffM))) (a_a2fmb :: f_a2ffI a_a2ffJ) (a_a2fmc :: f_a2ffI b_a2ffK) (a_a2fmd :: f_a2ffI c_a2ffL) :: f_a2ffI d_a2ffM sLiftA3 :: forall f_a2ffI a_a2ffJ b_a2ffK c_a2ffL d_a2ffM (t_a2fqD :: (~>) a_a2ffJ ((~>) b_a2ffK ((~>) c_a2ffL d_a2ffM))) (t_a2fqE :: f_a2ffI a_a2ffJ) (t_a2fqF :: f_a2ffI b_a2ffK) (t_a2fqG :: f_a2ffI c_a2ffL). SApplicative f_a2ffI => Sing t_a2fqD -> Sing t_a2fqE -> Sing t_a2fqF -> Sing t_a2fqG -> Sing (Apply (Apply (Apply (Apply LiftA3Sym0 t_a2fqD) t_a2fqE) t_a2fqF) t_a2fqG :: f_a2ffI d_a2ffM) type family Optional (a_a9csF :: f_a9cs1 a_a9cs2) :: f_a9cs1 (Maybe a_a9cs2) sOptional :: forall f_a9cs1 a_a9cs2 (t_a9ctH :: f_a9cs1 a_a9cs2). SAlternative f_a9cs1 => Sing t_a9ctH -> Sing (Apply OptionalSym0 t_a9ctH :: f_a9cs1 (Maybe a_a9cs2)) data PureSym0 :: forall a6989586621679545132 f6989586621679545131. (~>) a6989586621679545132 (f6989586621679545131 a6989586621679545132) type PureSym1 (arg6989586621679545544 :: a6989586621679545132) = Pure arg6989586621679545544 data (<*>@#@$) :: forall a6989586621679545133 b6989586621679545134 f6989586621679545131. (~>) (f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) ((~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) :: (~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) (arg6989586621679545547 :: f6989586621679545131 a6989586621679545133) = (<*>) arg6989586621679545546 arg6989586621679545547 data (*>@#@$) :: forall a6989586621679545138 b6989586621679545139 f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545138) ((~>) (f6989586621679545131 b6989586621679545139) (f6989586621679545131 b6989586621679545139)) infixl 4 *>@#@$ data (*>@#@$$) (arg6989586621679545556 :: f6989586621679545131 a6989586621679545138) :: forall b6989586621679545139. (~>) (f6989586621679545131 b6989586621679545139) (f6989586621679545131 b6989586621679545139) infixl 4 *>@#@$$ type (*>@#@$$$) (arg6989586621679545556 :: f6989586621679545131 a6989586621679545138) (arg6989586621679545557 :: f6989586621679545131 b6989586621679545139) = (*>) arg6989586621679545556 arg6989586621679545557 data (<*@#@$) :: forall a6989586621679545140 b6989586621679545141 f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545140) ((~>) (f6989586621679545131 b6989586621679545141) (f6989586621679545131 a6989586621679545140)) infixl 4 <*@#@$ data (<*@#@$$) (arg6989586621679545560 :: f6989586621679545131 a6989586621679545140) :: forall b6989586621679545141. (~>) (f6989586621679545131 b6989586621679545141) (f6989586621679545131 a6989586621679545140) infixl 4 <*@#@$$ type (<*@#@$$$) (arg6989586621679545560 :: f6989586621679545131 a6989586621679545140) (arg6989586621679545561 :: f6989586621679545131 b6989586621679545141) = (<*) arg6989586621679545560 arg6989586621679545561 type EmptySym0 = Empty data (<|>@#@$) :: forall a6989586621679545210 f6989586621679545208. (~>) (f6989586621679545208 a6989586621679545210) ((~>) (f6989586621679545208 a6989586621679545210) (f6989586621679545208 a6989586621679545210)) infixl 3 <|>@#@$ data (<|>@#@$$) (arg6989586621679545677 :: f6989586621679545208 a6989586621679545210) :: (~>) (f6989586621679545208 a6989586621679545210) (f6989586621679545208 a6989586621679545210) infixl 3 <|>@#@$$ type (<|>@#@$$$) (arg6989586621679545677 :: f6989586621679545208 a6989586621679545210) (arg6989586621679545678 :: f6989586621679545208 a6989586621679545210) = (<|>) arg6989586621679545677 arg6989586621679545678 data ConstSym0 :: forall (a6989586621679092839 :: Type) k6989586621679092838 (b6989586621679092840 :: k6989586621679092838). (~>) a6989586621679092839 (Const (a6989586621679092839 :: Type) (b6989586621679092840 :: k6989586621679092838)) type ConstSym1 (t6989586621680712043 :: a6989586621679092839) = 'Const t6989586621680712043 data GetConstSym0 :: forall a6989586621680712358 b6989586621680712359. (~>) (Const a6989586621680712358 b6989586621680712359) a6989586621680712358 type GetConstSym1 (x6989586621680712360 :: Const a6989586621680712358 b6989586621680712359) = GetConst x6989586621680712360 data (<$>@#@$) :: forall a6989586621679714518 b6989586621679714519 f6989586621679714517. (~>) ((~>) a6989586621679714518 b6989586621679714519) ((~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) :: forall f6989586621679714517. (~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) (a6989586621679714599 :: f6989586621679714517 a6989586621679714518) = (<$>) a6989586621679714598 a6989586621679714599 data (<$@#@$) :: forall a6989586621679545129 b6989586621679545130 f6989586621679545126. (~>) a6989586621679545129 ((~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679545524 :: a6989586621679545129) :: forall b6989586621679545130 f6989586621679545126. (~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679545524 :: a6989586621679545129) (arg6989586621679545525 :: f6989586621679545126 b6989586621679545130) = (<$) arg6989586621679545524 arg6989586621679545525 data (<**>@#@$) :: forall a6989586621679545091 b6989586621679545092 f6989586621679545090. (~>) (f6989586621679545090 a6989586621679545091) ((~>) (f6989586621679545090 ((~>) a6989586621679545091 b6989586621679545092)) (f6989586621679545090 b6989586621679545092)) infixl 4 <**>@#@$ data (<**>@#@$$) (a6989586621679545504 :: f6989586621679545090 a6989586621679545091) :: forall b6989586621679545092. (~>) (f6989586621679545090 ((~>) a6989586621679545091 b6989586621679545092)) (f6989586621679545090 b6989586621679545092) infixl 4 <**>@#@$$ type (<**>@#@$$$) (a6989586621679545504 :: f6989586621679545090 a6989586621679545091) (a6989586621679545505 :: f6989586621679545090 ((~>) a6989586621679545091 b6989586621679545092)) = (<**>) a6989586621679545504 a6989586621679545505 data LiftASym0 :: forall a6989586621679545088 b6989586621679545089 f6989586621679545087. (~>) ((~>) a6989586621679545088 b6989586621679545089) ((~>) (f6989586621679545087 a6989586621679545088) (f6989586621679545087 b6989586621679545089)) data LiftASym1 (a6989586621679545494 :: (~>) a6989586621679545088 b6989586621679545089) :: forall f6989586621679545087. (~>) (f6989586621679545087 a6989586621679545088) (f6989586621679545087 b6989586621679545089) type LiftASym2 (a6989586621679545494 :: (~>) a6989586621679545088 b6989586621679545089) (a6989586621679545495 :: f6989586621679545087 a6989586621679545088) = LiftA a6989586621679545494 a6989586621679545495 data LiftA2Sym0 :: forall a6989586621679545135 b6989586621679545136 c6989586621679545137 f6989586621679545131. (~>) ((~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) ((~>) (f6989586621679545131 a6989586621679545135) ((~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137))) data LiftA2Sym1 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) :: forall f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545135) ((~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137)) data LiftA2Sym2 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) (arg6989586621679545551 :: f6989586621679545131 a6989586621679545135) :: (~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137) type LiftA2Sym3 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) (arg6989586621679545551 :: f6989586621679545131 a6989586621679545135) (arg6989586621679545552 :: f6989586621679545131 b6989586621679545136) = LiftA2 arg6989586621679545550 arg6989586621679545551 arg6989586621679545552 data LiftA3Sym0 :: forall a6989586621679545083 b6989586621679545084 c6989586621679545085 d6989586621679545086 f6989586621679545082. (~>) ((~>) a6989586621679545083 ((~>) b6989586621679545084 ((~>) c6989586621679545085 d6989586621679545086))) ((~>) (f6989586621679545082 a6989586621679545083) ((~>) (f6989586621679545082 b6989586621679545084) ((~>) (f6989586621679545082 c6989586621679545085) (f6989586621679545082 d6989586621679545086)))) data LiftA3Sym1 (a6989586621679545482 :: (~>) a6989586621679545083 ((~>) b6989586621679545084 ((~>) c6989586621679545085 d6989586621679545086))) :: forall f6989586621679545082. (~>) (f6989586621679545082 a6989586621679545083) ((~>) (f6989586621679545082 b6989586621679545084) ((~>) (f6989586621679545082 c6989586621679545085) (f6989586621679545082 d6989586621679545086))) data LiftA3Sym2 (a6989586621679545482 :: (~>) a6989586621679545083 ((~>) b6989586621679545084 ((~>) c6989586621679545085 d6989586621679545086))) (a6989586621679545483 :: f6989586621679545082 a6989586621679545083) :: (~>) (f6989586621679545082 b6989586621679545084) ((~>) (f6989586621679545082 c6989586621679545085) (f6989586621679545082 d6989586621679545086)) data LiftA3Sym3 (a6989586621679545482 :: (~>) a6989586621679545083 ((~>) b6989586621679545084 ((~>) c6989586621679545085 d6989586621679545086))) (a6989586621679545483 :: f6989586621679545082 a6989586621679545083) (a6989586621679545484 :: f6989586621679545082 b6989586621679545084) :: (~>) (f6989586621679545082 c6989586621679545085) (f6989586621679545082 d6989586621679545086) data OptionalSym0 :: forall a6989586621681202610 f6989586621681202609. (~>) (f6989586621681202609 a6989586621681202610) (f6989586621681202609 (Maybe a6989586621681202610)) type OptionalSym1 (a6989586621681202649 :: f6989586621681202609 a6989586621681202610) = Optional a6989586621681202649 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681202709Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative Data.Ord.Down instance forall a6989586621679545133 b6989586621679545134 (a6989586621681202707 :: Data.Ord.Down (a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681202709Sym1 a6989586621681202707) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681202698Sym0 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.LiftA2_6989586621681202687Sym0 instance Data.Singletons.Prelude.Monad.Internal.PApplicative ((,) a) instance forall a6989586621681202613 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621681202684 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681202687Sym1 a6989586621681202684) instance forall a6989586621681202613 a6989586621679545135 b6989586621679545136 c6989586621679545137 (a6989586621681202685 :: a6989586621679545135 Data.Singletons.Internal.~> (b6989586621679545136 Data.Singletons.Internal.~> c6989586621679545137)) (a6989586621681202684 :: (a6989586621681202613, a6989586621679545135)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.LiftA2_6989586621681202687Sym2 a6989586621681202685 a6989586621681202684) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.TFHelper_6989586621681202669Sym0 instance forall a6989586621681202613 a6989586621679545133 b6989586621679545134 (a6989586621681202667 :: (a6989586621681202613, a6989586621679545133 Data.Singletons.Internal.~> b6989586621679545134)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Applicative.TFHelper_6989586621681202669Sym1 a6989586621681202667) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Applicative.Pure_6989586621681202656Sym0 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_a2fgq :: Type -> Type) where { type family Fmap (arg_a2fmM :: (~>) a_a2fgr b_a2fgs) (arg_a2fmN :: f_a2fgq a_a2fgr) :: f_a2fgq b_a2fgs; type (<$) a_a2fn4 a_a2fn5 = Apply (Apply TFHelper_6989586621679545540Sym0 a_a2fn4) a_a2fn5; } class SFunctor (f_a2fgq :: Type -> Type) sFmap :: forall a_a2fgr b_a2fgs (t_a2frd :: (~>) a_a2fgr b_a2fgs) (t_a2fre :: f_a2fgq a_a2fgr). SFunctor f_a2fgq => Sing t_a2frd -> Sing t_a2fre -> Sing (Apply (Apply FmapSym0 t_a2frd) t_a2fre :: f_a2fgq b_a2fgs) class PApplicative m_a2fgT => PMonad (m_a2fgT :: Type -> Type) where { type family (>>=) (arg_a2fov :: m_a2fgT a_a2fgU) (arg_a2fow :: (~>) a_a2fgU (m_a2fgT b_a2fgV)) :: m_a2fgT b_a2fgV; type family (>>) (arg_a2foz :: m_a2fgT a_a2fgW) (arg_a2foA :: m_a2fgT b_a2fgX) :: m_a2fgT b_a2fgX; type family Return (arg_a2foD :: a_a2fgY) :: m_a2fgT a_a2fgY; type family Fail (arg_a2foF :: Symbol) :: m_a2fgT a_a2fgZ; type (>>) a_a2foX a_a2foY = Apply (Apply TFHelper_6989586621679545657Sym0 a_a2foX) a_a2foY; type Return a_a2fp8 = Apply Return_6989586621679545667Sym0 a_a2fp8; type Fail a_a2fpf = Apply Fail_6989586621679545674Sym0 a_a2fpf; } infixl 1 >>= infixl 1 >> class SApplicative m_a2fgT => SMonad (m_a2fgT :: Type -> Type) (%>>=) :: forall a_a2fgU b_a2fgV (t_a2frO :: m_a2fgT a_a2fgU) (t_a2frP :: (~>) a_a2fgU (m_a2fgT b_a2fgV)). SMonad m_a2fgT => Sing t_a2frO -> Sing t_a2frP -> Sing (Apply (Apply (>>=@#@$) t_a2frO) t_a2frP :: m_a2fgT b_a2fgV) (%>>) :: forall a_a2fgW b_a2fgX (t_a2frS :: m_a2fgT a_a2fgW) (t_a2frT :: m_a2fgT b_a2fgX). SMonad m_a2fgT => Sing t_a2frS -> Sing t_a2frT -> Sing (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) sReturn :: forall a_a2fgY (t_a2frW :: a_a2fgY). SMonad m_a2fgT => Sing t_a2frW -> Sing (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) sFail :: forall a_a2fgZ (t_a2frY :: Symbol). SMonad m_a2fgT => Sing t_a2frY -> Sing (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) (%>>) :: forall a_a2fgW b_a2fgX (t_a2frS :: m_a2fgT a_a2fgW) (t_a2frT :: m_a2fgT b_a2fgX). (SMonad m_a2fgT, (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) ~ Apply (Apply TFHelper_6989586621679545657Sym0 t_a2frS) t_a2frT) => Sing t_a2frS -> Sing t_a2frT -> Sing (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) sReturn :: forall a_a2fgY (t_a2frW :: a_a2fgY). (SMonad m_a2fgT, (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) ~ Apply Return_6989586621679545667Sym0 t_a2frW) => Sing t_a2frW -> Sing (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) sFail :: forall a_a2fgZ (t_a2frY :: Symbol). (SMonad m_a2fgT, (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) ~ Apply Fail_6989586621679545674Sym0 t_a2frY) => Sing t_a2frY -> Sing (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) infixl 1 %>>= infixl 1 %>> class (PAlternative m_a2fhN, PMonad m_a2fhN) => PMonadPlus (m_a2fhN :: Type -> Type) where { type family Mzero :: m_a2fhN a_a2fhO; type family Mplus (arg_a2fpn :: m_a2fhN a_a2fhP) (arg_a2fpo :: m_a2fhN a_a2fhP) :: m_a2fhN a_a2fhP; type Mzero = Mzero_6989586621679545685Sym0; type Mplus a_a2fpD a_a2fpE = Apply (Apply Mplus_6989586621679545699Sym0 a_a2fpD) a_a2fpE; } class (SAlternative m_a2fhN, SMonad m_a2fhN) => SMonadPlus (m_a2fhN :: Type -> Type) sMzero :: forall a_a2fhO. SMonadPlus m_a2fhN => Sing (MzeroSym0 :: m_a2fhN a_a2fhO) sMplus :: forall a_a2fhP (t_a2fs8 :: m_a2fhN a_a2fhP) (t_a2fs9 :: m_a2fhN a_a2fhP). SMonadPlus m_a2fhN => Sing t_a2fs8 -> Sing t_a2fs9 -> Sing (Apply (Apply MplusSym0 t_a2fs8) t_a2fs9 :: m_a2fhN a_a2fhP) sMzero :: forall a_a2fhO. (SMonadPlus m_a2fhN, (MzeroSym0 :: m_a2fhN a_a2fhO) ~ Mzero_6989586621679545685Sym0) => Sing (MzeroSym0 :: m_a2fhN a_a2fhO) sMplus :: forall a_a2fhP (t_a2fs8 :: m_a2fhN a_a2fhP) (t_a2fs9 :: m_a2fhN a_a2fhP). (SMonadPlus m_a2fhN, (Apply (Apply MplusSym0 t_a2fs8) t_a2fs9 :: m_a2fhN a_a2fhP) ~ Apply (Apply Mplus_6989586621679545699Sym0 t_a2fs8) t_a2fs9) => Sing t_a2fs8 -> Sing t_a2fs9 -> Sing (Apply (Apply MplusSym0 t_a2fs8) t_a2fs9 :: m_a2fhN a_a2fhP) type family MapM (arg_a7iYc :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (arg_a7iYd :: t_a7iXU a_a7iY1) :: m_a7iY0 (t_a7iXU b_a7iY2) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) type family MapM_ (a_a63vQ :: (~>) a_a63mc (m_a63mb b_a63md)) (a_a63vR :: t_a63ma a_a63mc) :: m_a63mb () sMapM_ :: forall t_a63ma m_a63mb a_a63mc b_a63md (t_a63RS :: (~>) a_a63mc (m_a63mb b_a63md)) (t_a63RT :: t_a63ma a_a63mc). (SFoldable t_a63ma, SMonad m_a63mb) => Sing t_a63RS -> Sing t_a63RT -> Sing (Apply (Apply MapM_Sym0 t_a63RS) t_a63RT :: m_a63mb ()) type family ForM (a_a7kyU :: t_a7kpV a_a7kpX) (a_a7kyV :: (~>) a_a7kpX (m_a7kpW b_a7kpY)) :: m_a7kpW (t_a7kpV b_a7kpY) sForM :: forall t_a7kpV m_a7kpW a_a7kpX b_a7kpY (t_a7kIn :: t_a7kpV a_a7kpX) (t_a7kIo :: (~>) a_a7kpX (m_a7kpW b_a7kpY)). (STraversable t_a7kpV, SMonad m_a7kpW) => Sing t_a7kIn -> Sing t_a7kIo -> Sing (Apply (Apply ForMSym0 t_a7kIn) t_a7kIo :: m_a7kpW (t_a7kpV b_a7kpY)) type family Sequence (arg_a7iYg :: t_a7iXU (m_a7iY3 a_a7iY4)) :: m_a7iY3 (t_a7iXU a_a7iY4) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) type family Sequence_ (a_a63vI :: t_a63m0 (m_a63m1 a_a63m2)) :: m_a63m1 () sSequence_ :: forall t_a63m0 m_a63m1 a_a63m2 (t_a63RO :: t_a63m0 (m_a63m1 a_a63m2)). (SFoldable t_a63m0, SMonad m_a63m1) => Sing t_a63RO -> Sing (Apply Sequence_Sym0 t_a63RO :: m_a63m1 ()) type family (=<<) (a_a2fm1 :: (~>) a_a2ffE (m_a2ffD b_a2ffF)) (a_a2fm2 :: m_a2ffD a_a2ffE) :: m_a2ffD b_a2ffF infixr 1 =<< (%=<<) :: forall m_a2ffD a_a2ffE b_a2ffF (t_a2fqx :: (~>) a_a2ffE (m_a2ffD b_a2ffF)) (t_a2fqy :: m_a2ffD a_a2ffE). SMonad m_a2ffD => Sing t_a2fqx -> Sing t_a2fqy -> Sing (Apply (Apply (=<<@#@$) t_a2fqx) t_a2fqy :: m_a2ffD b_a2ffF) infixr 1 %=<< type family (>=>) (a_a9ePN :: (~>) a_a9eIO (m_a9eIN b_a9eIP)) (a_a9ePO :: (~>) b_a9eIP (m_a9eIN c_a9eIQ)) (a_a9ePP :: a_a9eIO) :: m_a9eIN c_a9eIQ infixr 1 >=> (%>=>) :: forall m_a9eIN a_a9eIO b_a9eIP c_a9eIQ (t_a9eS5 :: (~>) a_a9eIO (m_a9eIN b_a9eIP)) (t_a9eS6 :: (~>) b_a9eIP (m_a9eIN c_a9eIQ)) (t_a9eS7 :: a_a9eIO). SMonad m_a9eIN => Sing t_a9eS5 -> Sing t_a9eS6 -> Sing t_a9eS7 -> Sing (Apply (Apply (Apply (>=>@#@$) t_a9eS5) t_a9eS6) t_a9eS7 :: m_a9eIN c_a9eIQ) infixr 1 %>=> type family (<=<) (a_a9eQc :: (~>) b_a9eIK (m_a9eIJ c_a9eIL)) (a_a9eQd :: (~>) a_a9eIM (m_a9eIJ b_a9eIK)) (a_a9eQe :: a_a9eIM) :: m_a9eIJ c_a9eIL infixr 1 <=< (%<=<) :: forall m_a9eIJ b_a9eIK c_a9eIL a_a9eIM (t_a9eSb :: (~>) b_a9eIK (m_a9eIJ c_a9eIL)) (t_a9eSc :: (~>) a_a9eIM (m_a9eIJ b_a9eIK)) (t_a9eSd :: a_a9eIM). SMonad m_a9eIJ => Sing t_a9eSb -> Sing t_a9eSc -> Sing t_a9eSd -> Sing (Apply (Apply (Apply (<=<@#@$) t_a9eSb) t_a9eSc) t_a9eSd :: m_a9eIJ c_a9eIL) infixr 1 %<=< type family Void (a_a2Xlz :: f_a2Xkp a_a2Xkq) :: f_a2Xkp () sVoid :: forall f_a2Xkp a_a2Xkq (t_a2Xnl :: f_a2Xkp a_a2Xkq). SFunctor f_a2Xkp => Sing t_a2Xnl -> Sing (Apply VoidSym0 t_a2Xnl :: f_a2Xkp ()) type family Join (a_a2fm7 :: m_a2ffG (m_a2ffG a_a2ffH)) :: m_a2ffG a_a2ffH sJoin :: forall m_a2ffG a_a2ffH (t_a2fqB :: m_a2ffG (m_a2ffG a_a2ffH)). SMonad m_a2ffG => Sing t_a2fqB -> Sing (Apply JoinSym0 t_a2fqB :: m_a2ffG a_a2ffH) type family Msum (a_a63vD :: t_a63lU (m_a63lV a_a63lW)) :: m_a63lV a_a63lW sMsum :: forall t_a63lU m_a63lV a_a63lW (t_a63RM :: t_a63lU (m_a63lV a_a63lW)). (SFoldable t_a63lU, SMonadPlus m_a63lV) => Sing t_a63RM -> Sing (Apply MsumSym0 t_a63RM :: m_a63lV a_a63lW) type family Mfilter (a_a9eNF :: (~>) a_a9eIg Bool) (a_a9eNG :: m_a9eIf a_a9eIg) :: m_a9eIf a_a9eIg sMfilter :: forall m_a9eIf a_a9eIg (t_a9eRj :: (~>) a_a9eIg Bool) (t_a9eRk :: m_a9eIf a_a9eIg). SMonadPlus m_a9eIf => Sing t_a9eRj -> Sing t_a9eRk -> Sing (Apply (Apply MfilterSym0 t_a9eRj) t_a9eRk :: m_a9eIf a_a9eIg) type family FilterM (a_a9eQl :: (~>) a_a9eIS (m_a9eIR Bool)) (a_a9eQm :: [a_a9eIS]) :: m_a9eIR [a_a9eIS] sFilterM :: forall m_a9eIR a_a9eIS (t_a9eSh :: (~>) a_a9eIS (m_a9eIR Bool)) (t_a9eSi :: [a_a9eIS]). SApplicative m_a9eIR => Sing t_a9eSh -> Sing t_a9eSi -> Sing (Apply (Apply FilterMSym0 t_a9eSh) t_a9eSi :: m_a9eIR [a_a9eIS]) type family MapAndUnzipM (a_a9ePH :: (~>) a_a9eIG (m_a9eIF (b_a9eIH, c_a9eII))) (a_a9ePI :: [a_a9eIG]) :: m_a9eIF ([b_a9eIH], [c_a9eII]) sMapAndUnzipM :: forall m_a9eIF a_a9eIG b_a9eIH c_a9eII (t_a9eS1 :: (~>) a_a9eIG (m_a9eIF (b_a9eIH, c_a9eII))) (t_a9eS2 :: [a_a9eIG]). SApplicative m_a9eIF => Sing t_a9eS1 -> Sing t_a9eS2 -> Sing (Apply (Apply MapAndUnzipMSym0 t_a9eS1) t_a9eS2 :: m_a9eIF ([b_a9eIH], [c_a9eII])) type family ZipWithM (a_a9ePy :: (~>) a_a9eIC ((~>) b_a9eID (m_a9eIB c_a9eIE))) (a_a9ePz :: [a_a9eIC]) (a_a9ePA :: [b_a9eID]) :: m_a9eIB [c_a9eIE] sZipWithM :: forall m_a9eIB a_a9eIC b_a9eID c_a9eIE (t_a9eRV :: (~>) a_a9eIC ((~>) b_a9eID (m_a9eIB c_a9eIE))) (t_a9eRW :: [a_a9eIC]) (t_a9eRX :: [b_a9eID]). SApplicative m_a9eIB => Sing t_a9eRV -> Sing t_a9eRW -> Sing t_a9eRX -> Sing (Apply (Apply (Apply ZipWithMSym0 t_a9eRV) t_a9eRW) t_a9eRX :: m_a9eIB [c_a9eIE]) type family ZipWithM_ (a_a9ePp :: (~>) a_a9eIy ((~>) b_a9eIz (m_a9eIx c_a9eIA))) (a_a9ePq :: [a_a9eIy]) (a_a9ePr :: [b_a9eIz]) :: m_a9eIx () sZipWithM_ :: forall m_a9eIx a_a9eIy b_a9eIz c_a9eIA (t_a9eRP :: (~>) a_a9eIy ((~>) b_a9eIz (m_a9eIx c_a9eIA))) (t_a9eRQ :: [a_a9eIy]) (t_a9eRR :: [b_a9eIz]). SApplicative m_a9eIx => Sing t_a9eRP -> Sing t_a9eRQ -> Sing t_a9eRR -> Sing (Apply (Apply (Apply ZipWithM_Sym0 t_a9eRP) t_a9eRQ) t_a9eRR :: m_a9eIx ()) type family FoldlM (a_a63wq :: (~>) b_a63mo ((~>) a_a63mp (m_a63mn b_a63mo))) (a_a63wr :: b_a63mo) (a_a63ws :: t_a63mm a_a63mp) :: m_a63mn b_a63mo sFoldlM :: forall t_a63mm m_a63mn b_a63mo a_a63mp (t_a63S8 :: (~>) b_a63mo ((~>) a_a63mp (m_a63mn b_a63mo))) (t_a63S9 :: b_a63mo) (t_a63Sa :: t_a63mm a_a63mp). (SFoldable t_a63mm, SMonad m_a63mn) => Sing t_a63S8 -> Sing t_a63S9 -> Sing t_a63Sa -> Sing (Apply (Apply (Apply FoldlMSym0 t_a63S8) t_a63S9) t_a63Sa :: m_a63mn b_a63mo) type family ReplicateM (a_a9eOI :: Nat) (a_a9eOJ :: m_a9eIn a_a9eIo) :: m_a9eIn [a_a9eIo] sReplicateM :: forall m_a9eIn a_a9eIo (t_a9eRz :: Nat) (t_a9eRA :: m_a9eIn a_a9eIo). SApplicative m_a9eIn => Sing t_a9eRz -> Sing t_a9eRA -> Sing (Apply (Apply ReplicateMSym0 t_a9eRz) t_a9eRA :: m_a9eIn [a_a9eIo]) type family ReplicateM_ (a_a9eOp :: Nat) (a_a9eOq :: m_a9eIl a_a9eIm) :: m_a9eIl () sReplicateM_ :: forall m_a9eIl a_a9eIm (t_a9eRv :: Nat) (t_a9eRw :: m_a9eIl a_a9eIm). SApplicative m_a9eIl => Sing t_a9eRv -> Sing t_a9eRw -> Sing (Apply (Apply ReplicateM_Sym0 t_a9eRv) t_a9eRw :: m_a9eIl ()) type family Guard (a_a2fhS :: Bool) :: f_a2ff9 () sGuard :: forall f_a2ff9 (t_a2fpJ :: Bool). SAlternative f_a2ff9 => Sing t_a2fpJ -> Sing (Apply GuardSym0 t_a2fpJ :: f_a2ff9 ()) type family When (a_a2flS :: Bool) (a_a2flT :: f_a2ffC ()) :: f_a2ffC () sWhen :: forall f_a2ffC (t_a2fqt :: Bool) (t_a2fqu :: f_a2ffC ()). SApplicative f_a2ffC => Sing t_a2fqt -> Sing t_a2fqu -> Sing (Apply (Apply WhenSym0 t_a2fqt) t_a2fqu :: f_a2ffC ()) type family Unless (a_a9eOg :: Bool) (a_a9eOh :: f_a9eIk ()) :: f_a9eIk () sUnless :: forall f_a9eIk (t_a9eRr :: Bool) (t_a9eRs :: f_a9eIk ()). SApplicative f_a9eIk => Sing t_a9eRr -> Sing t_a9eRs -> Sing (Apply (Apply UnlessSym0 t_a9eRr) t_a9eRs :: f_a9eIk ()) type family LiftM (a_a2flF :: (~>) a1_a2ffA r_a2ffB) (a_a2flG :: m_a2ffz a1_a2ffA) :: m_a2ffz r_a2ffB sLiftM :: forall m_a2ffz a1_a2ffA r_a2ffB (t_a2fqp :: (~>) a1_a2ffA r_a2ffB) (t_a2fqq :: m_a2ffz a1_a2ffA). SMonad m_a2ffz => Sing t_a2fqp -> Sing t_a2fqq -> Sing (Apply (Apply LiftMSym0 t_a2fqp) t_a2fqq :: m_a2ffz r_a2ffB) type family LiftM2 (a_a2flf :: (~>) a1_a2ffw ((~>) a2_a2ffx r_a2ffy)) (a_a2flg :: m_a2ffv a1_a2ffw) (a_a2flh :: m_a2ffv a2_a2ffx) :: m_a2ffv r_a2ffy sLiftM2 :: forall m_a2ffv a1_a2ffw a2_a2ffx r_a2ffy (t_a2fqj :: (~>) a1_a2ffw ((~>) a2_a2ffx r_a2ffy)) (t_a2fqk :: m_a2ffv a1_a2ffw) (t_a2fql :: m_a2ffv a2_a2ffx). SMonad m_a2ffv => Sing t_a2fqj -> Sing t_a2fqk -> Sing t_a2fql -> Sing (Apply (Apply (Apply LiftM2Sym0 t_a2fqj) t_a2fqk) t_a2fql :: m_a2ffv r_a2ffy) type family LiftM3 (a_a2fkz :: (~>) a1_a2ffr ((~>) a2_a2ffs ((~>) a3_a2fft r_a2ffu))) (a_a2fkA :: m_a2ffq a1_a2ffr) (a_a2fkB :: m_a2ffq a2_a2ffs) (a_a2fkC :: m_a2ffq a3_a2fft) :: m_a2ffq r_a2ffu sLiftM3 :: forall m_a2ffq a1_a2ffr a2_a2ffs a3_a2fft r_a2ffu (t_a2fqb :: (~>) a1_a2ffr ((~>) a2_a2ffs ((~>) a3_a2fft r_a2ffu))) (t_a2fqc :: m_a2ffq a1_a2ffr) (t_a2fqd :: m_a2ffq a2_a2ffs) (t_a2fqe :: m_a2ffq a3_a2fft). SMonad m_a2ffq => Sing t_a2fqb -> Sing t_a2fqc -> Sing t_a2fqd -> Sing t_a2fqe -> Sing (Apply (Apply (Apply (Apply LiftM3Sym0 t_a2fqb) t_a2fqc) t_a2fqd) t_a2fqe :: m_a2ffq r_a2ffu) type family LiftM4 (a_a2fjA :: (~>) a1_a2ffl ((~>) a2_a2ffm ((~>) a3_a2ffn ((~>) a4_a2ffo r_a2ffp)))) (a_a2fjB :: m_a2ffk a1_a2ffl) (a_a2fjC :: m_a2ffk a2_a2ffm) (a_a2fjD :: m_a2ffk a3_a2ffn) (a_a2fjE :: m_a2ffk a4_a2ffo) :: m_a2ffk r_a2ffp sLiftM4 :: forall m_a2ffk a1_a2ffl a2_a2ffm a3_a2ffn a4_a2ffo r_a2ffp (t_a2fq1 :: (~>) a1_a2ffl ((~>) a2_a2ffm ((~>) a3_a2ffn ((~>) a4_a2ffo r_a2ffp)))) (t_a2fq2 :: m_a2ffk a1_a2ffl) (t_a2fq3 :: m_a2ffk a2_a2ffm) (t_a2fq4 :: m_a2ffk a3_a2ffn) (t_a2fq5 :: m_a2ffk a4_a2ffo). SMonad m_a2ffk => Sing t_a2fq1 -> Sing t_a2fq2 -> Sing t_a2fq3 -> Sing t_a2fq4 -> Sing t_a2fq5 -> Sing (Apply (Apply (Apply (Apply (Apply LiftM4Sym0 t_a2fq1) t_a2fq2) t_a2fq3) t_a2fq4) t_a2fq5 :: m_a2ffk r_a2ffp) type family LiftM5 (a_a2fif :: (~>) a1_a2ffe ((~>) a2_a2fff ((~>) a3_a2ffg ((~>) a4_a2ffh ((~>) a5_a2ffi r_a2ffj))))) (a_a2fig :: m_a2ffd a1_a2ffe) (a_a2fih :: m_a2ffd a2_a2fff) (a_a2fii :: m_a2ffd a3_a2ffg) (a_a2fij :: m_a2ffd a4_a2ffh) (a_a2fik :: m_a2ffd a5_a2ffi) :: m_a2ffd r_a2ffj sLiftM5 :: forall m_a2ffd a1_a2ffe a2_a2fff a3_a2ffg a4_a2ffh a5_a2ffi r_a2ffj (t_a2fpP :: (~>) a1_a2ffe ((~>) a2_a2fff ((~>) a3_a2ffg ((~>) a4_a2ffh ((~>) a5_a2ffi r_a2ffj))))) (t_a2fpQ :: m_a2ffd a1_a2ffe) (t_a2fpR :: m_a2ffd a2_a2fff) (t_a2fpS :: m_a2ffd a3_a2ffg) (t_a2fpT :: m_a2ffd a4_a2ffh) (t_a2fpU :: m_a2ffd a5_a2ffi). SMonad m_a2ffd => Sing t_a2fpP -> Sing t_a2fpQ -> Sing t_a2fpR -> Sing t_a2fpS -> Sing t_a2fpT -> Sing t_a2fpU -> Sing (Apply (Apply (Apply (Apply (Apply (Apply LiftM5Sym0 t_a2fpP) t_a2fpQ) t_a2fpR) t_a2fpS) t_a2fpT) t_a2fpU :: m_a2ffd r_a2ffj) type family Ap (a_a2fhU :: m_a2ffa ((~>) a_a2ffb b_a2ffc)) (a_a2fhV :: m_a2ffa a_a2ffb) :: m_a2ffa b_a2ffc sAp :: forall m_a2ffa a_a2ffb b_a2ffc (t_a2fpL :: m_a2ffa ((~>) a_a2ffb b_a2ffc)) (t_a2fpM :: m_a2ffa a_a2ffb). SMonad m_a2ffa => Sing t_a2fpL -> Sing t_a2fpM -> Sing (Apply (Apply ApSym0 t_a2fpL) t_a2fpM :: m_a2ffa b_a2ffc) type family (<$!>) (a_a9eNZ :: (~>) a_a9eIi b_a9eIj) (a_a9eO0 :: m_a9eIh a_a9eIi) :: m_a9eIh b_a9eIj infixl 4 <$!> (%<$!>) :: forall m_a9eIh a_a9eIi b_a9eIj (t_a9eRn :: (~>) a_a9eIi b_a9eIj) (t_a9eRo :: m_a9eIh a_a9eIi). SMonad m_a9eIh => Sing t_a9eRn -> Sing t_a9eRo -> Sing (Apply (Apply (<$!>@#@$) t_a9eRn) t_a9eRo :: m_a9eIh b_a9eIj) infixl 4 %<$!> data FmapSym0 :: forall a6989586621679545127 b6989586621679545128 f6989586621679545126. (~>) ((~>) a6989586621679545127 b6989586621679545128) ((~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128)) data FmapSym1 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) :: forall f6989586621679545126. (~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128) type FmapSym2 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) (arg6989586621679545521 :: f6989586621679545126 a6989586621679545127) = Fmap arg6989586621679545520 arg6989586621679545521 data (>>=@#@$) :: forall a6989586621679545156 b6989586621679545157 m6989586621679545155. (~>) (m6989586621679545155 a6989586621679545156) ((~>) ((~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) (m6989586621679545155 b6989586621679545157)) infixl 1 >>=@#@$ data (>>=@#@$$) (arg6989586621679545627 :: m6989586621679545155 a6989586621679545156) :: forall b6989586621679545157. (~>) ((~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) (m6989586621679545155 b6989586621679545157) infixl 1 >>=@#@$$ type (>>=@#@$$$) (arg6989586621679545627 :: m6989586621679545155 a6989586621679545156) (arg6989586621679545628 :: (~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) = (>>=) arg6989586621679545627 arg6989586621679545628 data (>>@#@$) :: forall a6989586621679545158 b6989586621679545159 m6989586621679545155. (~>) (m6989586621679545155 a6989586621679545158) ((~>) (m6989586621679545155 b6989586621679545159) (m6989586621679545155 b6989586621679545159)) infixl 1 >>@#@$ data (>>@#@$$) (arg6989586621679545631 :: m6989586621679545155 a6989586621679545158) :: forall b6989586621679545159. (~>) (m6989586621679545155 b6989586621679545159) (m6989586621679545155 b6989586621679545159) infixl 1 >>@#@$$ type (>>@#@$$$) (arg6989586621679545631 :: m6989586621679545155 a6989586621679545158) (arg6989586621679545632 :: m6989586621679545155 b6989586621679545159) = (>>) arg6989586621679545631 arg6989586621679545632 data ReturnSym0 :: forall a6989586621679545160 m6989586621679545155. (~>) a6989586621679545160 (m6989586621679545155 a6989586621679545160) type ReturnSym1 (arg6989586621679545635 :: a6989586621679545160) = Return arg6989586621679545635 data FailSym0 :: forall a6989586621679545161 m6989586621679545155. (~>) Symbol (m6989586621679545155 a6989586621679545161) type FailSym1 (arg6989586621679545637 :: Symbol) = Fail arg6989586621679545637 type MzeroSym0 = Mzero data MplusSym0 :: forall a6989586621679545213 m6989586621679545211. (~>) (m6989586621679545211 a6989586621679545213) ((~>) (m6989586621679545211 a6989586621679545213) (m6989586621679545211 a6989586621679545213)) data MplusSym1 (arg6989586621679545681 :: m6989586621679545211 a6989586621679545213) :: (~>) (m6989586621679545211 a6989586621679545213) (m6989586621679545211 a6989586621679545213) type MplusSym2 (arg6989586621679545681 :: m6989586621679545211 a6989586621679545213) (arg6989586621679545682 :: m6989586621679545211 a6989586621679545213) = Mplus arg6989586621679545681 arg6989586621679545682 data MapMSym0 :: forall a6989586621680751001 b6989586621680751002 m6989586621680751000 t6989586621680750994. (~>) ((~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) ((~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002))) data MapMSym1 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002)) type MapMSym2 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) (arg6989586621680751013 :: t6989586621680750994 a6989586621680751001) = MapM arg6989586621680751012 arg6989586621680751013 data MapM_Sym0 :: forall a6989586621680452668 b6989586621680452669 m6989586621680452667 t6989586621680452666. (~>) ((~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) ((~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ())) data MapM_Sym1 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) :: forall t6989586621680452666. (~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ()) type MapM_Sym2 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) (a6989586621680453267 :: t6989586621680452666 a6989586621680452668) = MapM_ a6989586621680453266 a6989586621680453267 data ForMSym0 :: forall a6989586621680756577 b6989586621680756578 m6989586621680756576 t6989586621680756575. (~>) (t6989586621680756575 a6989586621680756577) ((~>) ((~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) (m6989586621680756576 (t6989586621680756575 b6989586621680756578))) data ForMSym1 (a6989586621680757132 :: t6989586621680756575 a6989586621680756577) :: forall b6989586621680756578 m6989586621680756576. (~>) ((~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) (m6989586621680756576 (t6989586621680756575 b6989586621680756578)) type ForMSym2 (a6989586621680757132 :: t6989586621680756575 a6989586621680756577) (a6989586621680757133 :: (~>) a6989586621680756577 (m6989586621680756576 b6989586621680756578)) = ForM a6989586621680757132 a6989586621680757133 data SequenceSym0 :: forall a6989586621680751004 m6989586621680751003 t6989586621680750994. (~>) (t6989586621680750994 (m6989586621680751003 a6989586621680751004)) (m6989586621680751003 (t6989586621680750994 a6989586621680751004)) type SequenceSym1 (arg6989586621680751016 :: t6989586621680750994 (m6989586621680751003 a6989586621680751004)) = Sequence arg6989586621680751016 data Sequence_Sym0 :: forall a6989586621680452658 m6989586621680452657 t6989586621680452656. (~>) (t6989586621680452656 (m6989586621680452657 a6989586621680452658)) (m6989586621680452657 ()) type Sequence_Sym1 (a6989586621680453258 :: t6989586621680452656 (m6989586621680452657 a6989586621680452658)) = Sequence_ a6989586621680453258 data (=<<@#@$) :: forall a6989586621679545078 b6989586621679545079 m6989586621679545077. (~>) ((~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) ((~>) (m6989586621679545077 a6989586621679545078) (m6989586621679545077 b6989586621679545079)) infixr 1 =<<@#@$ data (=<<@#@$$) (a6989586621679545473 :: (~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) :: (~>) (m6989586621679545077 a6989586621679545078) (m6989586621679545077 b6989586621679545079) infixr 1 =<<@#@$$ type (=<<@#@$$$) (a6989586621679545473 :: (~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) (a6989586621679545474 :: m6989586621679545077 a6989586621679545078) = (=<<) a6989586621679545473 a6989586621679545474 data (>=>@#@$) :: forall a6989586621681211338 b6989586621681211339 c6989586621681211340 m6989586621681211337. (~>) ((~>) a6989586621681211338 (m6989586621681211337 b6989586621681211339)) ((~>) ((~>) b6989586621681211339 (m6989586621681211337 c6989586621681211340)) ((~>) a6989586621681211338 (m6989586621681211337 c6989586621681211340))) infixr 1 >=>@#@$ data (>=>@#@$$) (a6989586621681211771 :: (~>) a6989586621681211338 (m6989586621681211337 b6989586621681211339)) :: forall c6989586621681211340. (~>) ((~>) b6989586621681211339 (m6989586621681211337 c6989586621681211340)) ((~>) a6989586621681211338 (m6989586621681211337 c6989586621681211340)) infixr 1 >=>@#@$$ data (>=>@#@$$$) (a6989586621681211771 :: (~>) a6989586621681211338 (m6989586621681211337 b6989586621681211339)) (a6989586621681211772 :: (~>) b6989586621681211339 (m6989586621681211337 c6989586621681211340)) :: (~>) a6989586621681211338 (m6989586621681211337 c6989586621681211340) infixr 1 >=>@#@$$$ data (<=<@#@$) :: forall a6989586621681211336 b6989586621681211334 c6989586621681211335 m6989586621681211333. (~>) ((~>) b6989586621681211334 (m6989586621681211333 c6989586621681211335)) ((~>) ((~>) a6989586621681211336 (m6989586621681211333 b6989586621681211334)) ((~>) a6989586621681211336 (m6989586621681211333 c6989586621681211335))) infixr 1 <=<@#@$ data (<=<@#@$$) (a6989586621681211796 :: (~>) b6989586621681211334 (m6989586621681211333 c6989586621681211335)) :: forall a6989586621681211336. (~>) ((~>) a6989586621681211336 (m6989586621681211333 b6989586621681211334)) ((~>) a6989586621681211336 (m6989586621681211333 c6989586621681211335)) infixr 1 <=<@#@$$ data (<=<@#@$$$) (a6989586621681211796 :: (~>) b6989586621681211334 (m6989586621681211333 c6989586621681211335)) (a6989586621681211797 :: (~>) a6989586621681211336 (m6989586621681211333 b6989586621681211334)) :: (~>) a6989586621681211336 (m6989586621681211333 c6989586621681211335) infixr 1 <=<@#@$$$ data VoidSym0 :: forall a6989586621679714510 f6989586621679714509. (~>) (f6989586621679714509 a6989586621679714510) (f6989586621679714509 ()) type VoidSym1 (a6989586621679714581 :: f6989586621679714509 a6989586621679714510) = Void a6989586621679714581 data JoinSym0 :: forall a6989586621679545081 m6989586621679545080. (~>) (m6989586621679545080 (m6989586621679545080 a6989586621679545081)) (m6989586621679545080 a6989586621679545081) type JoinSym1 (a6989586621679545479 :: m6989586621679545080 (m6989586621679545080 a6989586621679545081)) = Join a6989586621679545479 data MsumSym0 :: forall a6989586621680452652 m6989586621680452651 t6989586621680452650. (~>) (t6989586621680452650 (m6989586621680452651 a6989586621680452652)) (m6989586621680452651 a6989586621680452652) type MsumSym1 (a6989586621680453253 :: t6989586621680452650 (m6989586621680452651 a6989586621680452652)) = Msum a6989586621680453253 data MfilterSym0 :: forall a6989586621681211304 m6989586621681211303. (~>) ((~>) a6989586621681211304 Bool) ((~>) (m6989586621681211303 a6989586621681211304) (m6989586621681211303 a6989586621681211304)) data MfilterSym1 (a6989586621681211639 :: (~>) a6989586621681211304 Bool) :: forall m6989586621681211303. (~>) (m6989586621681211303 a6989586621681211304) (m6989586621681211303 a6989586621681211304) type MfilterSym2 (a6989586621681211639 :: (~>) a6989586621681211304 Bool) (a6989586621681211640 :: m6989586621681211303 a6989586621681211304) = Mfilter a6989586621681211639 a6989586621681211640 data FilterMSym0 :: forall a6989586621681211342 m6989586621681211341. (~>) ((~>) a6989586621681211342 (m6989586621681211341 Bool)) ((~>) [a6989586621681211342] (m6989586621681211341 [a6989586621681211342])) data FilterMSym1 (a6989586621681211805 :: (~>) a6989586621681211342 (m6989586621681211341 Bool)) :: (~>) [a6989586621681211342] (m6989586621681211341 [a6989586621681211342]) type FilterMSym2 (a6989586621681211805 :: (~>) a6989586621681211342 (m6989586621681211341 Bool)) (a6989586621681211806 :: [a6989586621681211342]) = FilterM a6989586621681211805 a6989586621681211806 data MapAndUnzipMSym0 :: forall a6989586621681211330 b6989586621681211331 c6989586621681211332 m6989586621681211329. (~>) ((~>) a6989586621681211330 (m6989586621681211329 (b6989586621681211331, c6989586621681211332))) ((~>) [a6989586621681211330] (m6989586621681211329 ([b6989586621681211331], [c6989586621681211332]))) data MapAndUnzipMSym1 (a6989586621681211765 :: (~>) a6989586621681211330 (m6989586621681211329 (b6989586621681211331, c6989586621681211332))) :: (~>) [a6989586621681211330] (m6989586621681211329 ([b6989586621681211331], [c6989586621681211332])) type MapAndUnzipMSym2 (a6989586621681211765 :: (~>) a6989586621681211330 (m6989586621681211329 (b6989586621681211331, c6989586621681211332))) (a6989586621681211766 :: [a6989586621681211330]) = MapAndUnzipM a6989586621681211765 a6989586621681211766 data ZipWithMSym0 :: forall a6989586621681211326 b6989586621681211327 c6989586621681211328 m6989586621681211325. (~>) ((~>) a6989586621681211326 ((~>) b6989586621681211327 (m6989586621681211325 c6989586621681211328))) ((~>) [a6989586621681211326] ((~>) [b6989586621681211327] (m6989586621681211325 [c6989586621681211328]))) data ZipWithMSym1 (a6989586621681211756 :: (~>) a6989586621681211326 ((~>) b6989586621681211327 (m6989586621681211325 c6989586621681211328))) :: (~>) [a6989586621681211326] ((~>) [b6989586621681211327] (m6989586621681211325 [c6989586621681211328])) data ZipWithMSym2 (a6989586621681211756 :: (~>) a6989586621681211326 ((~>) b6989586621681211327 (m6989586621681211325 c6989586621681211328))) (a6989586621681211757 :: [a6989586621681211326]) :: (~>) [b6989586621681211327] (m6989586621681211325 [c6989586621681211328]) type ZipWithMSym3 (a6989586621681211756 :: (~>) a6989586621681211326 ((~>) b6989586621681211327 (m6989586621681211325 c6989586621681211328))) (a6989586621681211757 :: [a6989586621681211326]) (a6989586621681211758 :: [b6989586621681211327]) = ZipWithM a6989586621681211756 a6989586621681211757 a6989586621681211758 data ZipWithM_Sym0 :: forall a6989586621681211322 b6989586621681211323 c6989586621681211324 m6989586621681211321. (~>) ((~>) a6989586621681211322 ((~>) b6989586621681211323 (m6989586621681211321 c6989586621681211324))) ((~>) [a6989586621681211322] ((~>) [b6989586621681211323] (m6989586621681211321 ()))) data ZipWithM_Sym1 (a6989586621681211747 :: (~>) a6989586621681211322 ((~>) b6989586621681211323 (m6989586621681211321 c6989586621681211324))) :: (~>) [a6989586621681211322] ((~>) [b6989586621681211323] (m6989586621681211321 ())) data ZipWithM_Sym2 (a6989586621681211747 :: (~>) a6989586621681211322 ((~>) b6989586621681211323 (m6989586621681211321 c6989586621681211324))) (a6989586621681211748 :: [a6989586621681211322]) :: (~>) [b6989586621681211323] (m6989586621681211321 ()) type ZipWithM_Sym3 (a6989586621681211747 :: (~>) a6989586621681211322 ((~>) b6989586621681211323 (m6989586621681211321 c6989586621681211324))) (a6989586621681211748 :: [a6989586621681211322]) (a6989586621681211749 :: [b6989586621681211323]) = ZipWithM_ a6989586621681211747 a6989586621681211748 a6989586621681211749 data FoldlMSym0 :: forall a6989586621680452681 b6989586621680452680 m6989586621680452679 t6989586621680452678. (~>) ((~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) ((~>) b6989586621680452680 ((~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680))) data FoldlMSym1 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) :: forall t6989586621680452678. (~>) b6989586621680452680 ((~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680)) data FoldlMSym2 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) (a6989586621680453303 :: b6989586621680452680) :: forall t6989586621680452678. (~>) (t6989586621680452678 a6989586621680452681) (m6989586621680452679 b6989586621680452680) type FoldlMSym3 (a6989586621680453302 :: (~>) b6989586621680452680 ((~>) a6989586621680452681 (m6989586621680452679 b6989586621680452680))) (a6989586621680453303 :: b6989586621680452680) (a6989586621680453304 :: t6989586621680452678 a6989586621680452681) = FoldlM a6989586621680453302 a6989586621680453303 a6989586621680453304 data ReplicateMSym0 :: forall a6989586621681211312 m6989586621681211311. (~>) Nat ((~>) (m6989586621681211311 a6989586621681211312) (m6989586621681211311 [a6989586621681211312])) data ReplicateMSym1 (a6989586621681211704 :: Nat) :: forall a6989586621681211312 m6989586621681211311. (~>) (m6989586621681211311 a6989586621681211312) (m6989586621681211311 [a6989586621681211312]) type ReplicateMSym2 (a6989586621681211704 :: Nat) (a6989586621681211705 :: m6989586621681211311 a6989586621681211312) = ReplicateM a6989586621681211704 a6989586621681211705 data ReplicateM_Sym0 :: forall a6989586621681211310 m6989586621681211309. (~>) Nat ((~>) (m6989586621681211309 a6989586621681211310) (m6989586621681211309 ())) data ReplicateM_Sym1 (a6989586621681211685 :: Nat) :: forall a6989586621681211310 m6989586621681211309. (~>) (m6989586621681211309 a6989586621681211310) (m6989586621681211309 ()) type ReplicateM_Sym2 (a6989586621681211685 :: Nat) (a6989586621681211686 :: m6989586621681211309 a6989586621681211310) = ReplicateM_ a6989586621681211685 a6989586621681211686 data GuardSym0 :: forall f6989586621679545047. (~>) Bool (f6989586621679545047 ()) type GuardSym1 (a6989586621679545216 :: Bool) = Guard a6989586621679545216 data WhenSym0 :: forall f6989586621679545076. (~>) Bool ((~>) (f6989586621679545076 ()) (f6989586621679545076 ())) data WhenSym1 (a6989586621679545464 :: Bool) :: forall f6989586621679545076. (~>) (f6989586621679545076 ()) (f6989586621679545076 ()) type WhenSym2 (a6989586621679545464 :: Bool) (a6989586621679545465 :: f6989586621679545076 ()) = When a6989586621679545464 a6989586621679545465 data UnlessSym0 :: forall f6989586621681211308. (~>) Bool ((~>) (f6989586621681211308 ()) (f6989586621681211308 ())) data UnlessSym1 (a6989586621681211676 :: Bool) :: forall f6989586621681211308. (~>) (f6989586621681211308 ()) (f6989586621681211308 ()) type UnlessSym2 (a6989586621681211676 :: Bool) (a6989586621681211677 :: f6989586621681211308 ()) = Unless a6989586621681211676 a6989586621681211677 data LiftMSym0 :: forall a16989586621679545074 m6989586621679545073 r6989586621679545075. (~>) ((~>) a16989586621679545074 r6989586621679545075) ((~>) (m6989586621679545073 a16989586621679545074) (m6989586621679545073 r6989586621679545075)) data LiftMSym1 (a6989586621679545451 :: (~>) a16989586621679545074 r6989586621679545075) :: forall m6989586621679545073. (~>) (m6989586621679545073 a16989586621679545074) (m6989586621679545073 r6989586621679545075) type LiftMSym2 (a6989586621679545451 :: (~>) a16989586621679545074 r6989586621679545075) (a6989586621679545452 :: m6989586621679545073 a16989586621679545074) = LiftM a6989586621679545451 a6989586621679545452 data LiftM2Sym0 :: forall a16989586621679545070 a26989586621679545071 m6989586621679545069 r6989586621679545072. (~>) ((~>) a16989586621679545070 ((~>) a26989586621679545071 r6989586621679545072)) ((~>) (m6989586621679545069 a16989586621679545070) ((~>) (m6989586621679545069 a26989586621679545071) (m6989586621679545069 r6989586621679545072))) data LiftM2Sym1 (a6989586621679545425 :: (~>) a16989586621679545070 ((~>) a26989586621679545071 r6989586621679545072)) :: forall m6989586621679545069. (~>) (m6989586621679545069 a16989586621679545070) ((~>) (m6989586621679545069 a26989586621679545071) (m6989586621679545069 r6989586621679545072)) data LiftM2Sym2 (a6989586621679545425 :: (~>) a16989586621679545070 ((~>) a26989586621679545071 r6989586621679545072)) (a6989586621679545426 :: m6989586621679545069 a16989586621679545070) :: (~>) (m6989586621679545069 a26989586621679545071) (m6989586621679545069 r6989586621679545072) type LiftM2Sym3 (a6989586621679545425 :: (~>) a16989586621679545070 ((~>) a26989586621679545071 r6989586621679545072)) (a6989586621679545426 :: m6989586621679545069 a16989586621679545070) (a6989586621679545427 :: m6989586621679545069 a26989586621679545071) = LiftM2 a6989586621679545425 a6989586621679545426 a6989586621679545427 data LiftM3Sym0 :: forall a16989586621679545065 a26989586621679545066 a36989586621679545067 m6989586621679545064 r6989586621679545068. (~>) ((~>) a16989586621679545065 ((~>) a26989586621679545066 ((~>) a36989586621679545067 r6989586621679545068))) ((~>) (m6989586621679545064 a16989586621679545065) ((~>) (m6989586621679545064 a26989586621679545066) ((~>) (m6989586621679545064 a36989586621679545067) (m6989586621679545064 r6989586621679545068)))) data LiftM3Sym1 (a6989586621679545383 :: (~>) a16989586621679545065 ((~>) a26989586621679545066 ((~>) a36989586621679545067 r6989586621679545068))) :: forall m6989586621679545064. (~>) (m6989586621679545064 a16989586621679545065) ((~>) (m6989586621679545064 a26989586621679545066) ((~>) (m6989586621679545064 a36989586621679545067) (m6989586621679545064 r6989586621679545068))) data LiftM3Sym2 (a6989586621679545383 :: (~>) a16989586621679545065 ((~>) a26989586621679545066 ((~>) a36989586621679545067 r6989586621679545068))) (a6989586621679545384 :: m6989586621679545064 a16989586621679545065) :: (~>) (m6989586621679545064 a26989586621679545066) ((~>) (m6989586621679545064 a36989586621679545067) (m6989586621679545064 r6989586621679545068)) data LiftM3Sym3 (a6989586621679545383 :: (~>) a16989586621679545065 ((~>) a26989586621679545066 ((~>) a36989586621679545067 r6989586621679545068))) (a6989586621679545384 :: m6989586621679545064 a16989586621679545065) (a6989586621679545385 :: m6989586621679545064 a26989586621679545066) :: (~>) (m6989586621679545064 a36989586621679545067) (m6989586621679545064 r6989586621679545068) type LiftM3Sym4 (a6989586621679545383 :: (~>) a16989586621679545065 ((~>) a26989586621679545066 ((~>) a36989586621679545067 r6989586621679545068))) (a6989586621679545384 :: m6989586621679545064 a16989586621679545065) (a6989586621679545385 :: m6989586621679545064 a26989586621679545066) (a6989586621679545386 :: m6989586621679545064 a36989586621679545067) = LiftM3 a6989586621679545383 a6989586621679545384 a6989586621679545385 a6989586621679545386 data LiftM4Sym0 :: forall a16989586621679545059 a26989586621679545060 a36989586621679545061 a46989586621679545062 m6989586621679545058 r6989586621679545063. (~>) ((~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) ((~>) (m6989586621679545058 a16989586621679545059) ((~>) (m6989586621679545058 a26989586621679545060) ((~>) (m6989586621679545058 a36989586621679545061) ((~>) (m6989586621679545058 a46989586621679545062) (m6989586621679545058 r6989586621679545063))))) data LiftM4Sym1 (a6989586621679545322 :: (~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) :: forall m6989586621679545058. (~>) (m6989586621679545058 a16989586621679545059) ((~>) (m6989586621679545058 a26989586621679545060) ((~>) (m6989586621679545058 a36989586621679545061) ((~>) (m6989586621679545058 a46989586621679545062) (m6989586621679545058 r6989586621679545063)))) data LiftM4Sym2 (a6989586621679545322 :: (~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) (a6989586621679545323 :: m6989586621679545058 a16989586621679545059) :: (~>) (m6989586621679545058 a26989586621679545060) ((~>) (m6989586621679545058 a36989586621679545061) ((~>) (m6989586621679545058 a46989586621679545062) (m6989586621679545058 r6989586621679545063))) data LiftM4Sym3 (a6989586621679545322 :: (~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) (a6989586621679545323 :: m6989586621679545058 a16989586621679545059) (a6989586621679545324 :: m6989586621679545058 a26989586621679545060) :: (~>) (m6989586621679545058 a36989586621679545061) ((~>) (m6989586621679545058 a46989586621679545062) (m6989586621679545058 r6989586621679545063)) data LiftM4Sym4 (a6989586621679545322 :: (~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) (a6989586621679545323 :: m6989586621679545058 a16989586621679545059) (a6989586621679545324 :: m6989586621679545058 a26989586621679545060) (a6989586621679545325 :: m6989586621679545058 a36989586621679545061) :: (~>) (m6989586621679545058 a46989586621679545062) (m6989586621679545058 r6989586621679545063) type LiftM4Sym5 (a6989586621679545322 :: (~>) a16989586621679545059 ((~>) a26989586621679545060 ((~>) a36989586621679545061 ((~>) a46989586621679545062 r6989586621679545063)))) (a6989586621679545323 :: m6989586621679545058 a16989586621679545059) (a6989586621679545324 :: m6989586621679545058 a26989586621679545060) (a6989586621679545325 :: m6989586621679545058 a36989586621679545061) (a6989586621679545326 :: m6989586621679545058 a46989586621679545062) = LiftM4 a6989586621679545322 a6989586621679545323 a6989586621679545324 a6989586621679545325 a6989586621679545326 data LiftM5Sym0 :: forall a16989586621679545052 a26989586621679545053 a36989586621679545054 a46989586621679545055 a56989586621679545056 m6989586621679545051 r6989586621679545057. (~>) ((~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) ((~>) (m6989586621679545051 a16989586621679545052) ((~>) (m6989586621679545051 a26989586621679545053) ((~>) (m6989586621679545051 a36989586621679545054) ((~>) (m6989586621679545051 a46989586621679545055) ((~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057)))))) data LiftM5Sym1 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) :: forall m6989586621679545051. (~>) (m6989586621679545051 a16989586621679545052) ((~>) (m6989586621679545051 a26989586621679545053) ((~>) (m6989586621679545051 a36989586621679545054) ((~>) (m6989586621679545051 a46989586621679545055) ((~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057))))) data LiftM5Sym2 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) (a6989586621679545240 :: m6989586621679545051 a16989586621679545052) :: (~>) (m6989586621679545051 a26989586621679545053) ((~>) (m6989586621679545051 a36989586621679545054) ((~>) (m6989586621679545051 a46989586621679545055) ((~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057)))) data LiftM5Sym3 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) (a6989586621679545240 :: m6989586621679545051 a16989586621679545052) (a6989586621679545241 :: m6989586621679545051 a26989586621679545053) :: (~>) (m6989586621679545051 a36989586621679545054) ((~>) (m6989586621679545051 a46989586621679545055) ((~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057))) data LiftM5Sym4 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) (a6989586621679545240 :: m6989586621679545051 a16989586621679545052) (a6989586621679545241 :: m6989586621679545051 a26989586621679545053) (a6989586621679545242 :: m6989586621679545051 a36989586621679545054) :: (~>) (m6989586621679545051 a46989586621679545055) ((~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057)) data LiftM5Sym5 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) (a6989586621679545240 :: m6989586621679545051 a16989586621679545052) (a6989586621679545241 :: m6989586621679545051 a26989586621679545053) (a6989586621679545242 :: m6989586621679545051 a36989586621679545054) (a6989586621679545243 :: m6989586621679545051 a46989586621679545055) :: (~>) (m6989586621679545051 a56989586621679545056) (m6989586621679545051 r6989586621679545057) type LiftM5Sym6 (a6989586621679545239 :: (~>) a16989586621679545052 ((~>) a26989586621679545053 ((~>) a36989586621679545054 ((~>) a46989586621679545055 ((~>) a56989586621679545056 r6989586621679545057))))) (a6989586621679545240 :: m6989586621679545051 a16989586621679545052) (a6989586621679545241 :: m6989586621679545051 a26989586621679545053) (a6989586621679545242 :: m6989586621679545051 a36989586621679545054) (a6989586621679545243 :: m6989586621679545051 a46989586621679545055) (a6989586621679545244 :: m6989586621679545051 a56989586621679545056) = LiftM5 a6989586621679545239 a6989586621679545240 a6989586621679545241 a6989586621679545242 a6989586621679545243 a6989586621679545244 data ApSym0 :: forall a6989586621679545049 b6989586621679545050 m6989586621679545048. (~>) (m6989586621679545048 ((~>) a6989586621679545049 b6989586621679545050)) ((~>) (m6989586621679545048 a6989586621679545049) (m6989586621679545048 b6989586621679545050)) data ApSym1 (a6989586621679545218 :: m6989586621679545048 ((~>) a6989586621679545049 b6989586621679545050)) :: (~>) (m6989586621679545048 a6989586621679545049) (m6989586621679545048 b6989586621679545050) type ApSym2 (a6989586621679545218 :: m6989586621679545048 ((~>) a6989586621679545049 b6989586621679545050)) (a6989586621679545219 :: m6989586621679545048 a6989586621679545049) = Ap a6989586621679545218 a6989586621679545219 data (<$!>@#@$) :: forall a6989586621681211306 b6989586621681211307 m6989586621681211305. (~>) ((~>) a6989586621681211306 b6989586621681211307) ((~>) (m6989586621681211305 a6989586621681211306) (m6989586621681211305 b6989586621681211307)) infixl 4 <$!>@#@$ data (<$!>@#@$$) (a6989586621681211659 :: (~>) a6989586621681211306 b6989586621681211307) :: forall m6989586621681211305. (~>) (m6989586621681211305 a6989586621681211306) (m6989586621681211305 b6989586621681211307) infixl 4 <$!>@#@$$ type (<$!>@#@$$$) (a6989586621681211659 :: (~>) a6989586621681211306 b6989586621681211307) (a6989586621681211660 :: m6989586621681211305 a6989586621681211306) = (<$!>) a6989586621681211659 a6989586621681211660 instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681211861Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad Data.Ord.Down instance forall b6989586621679545157 a6989586621679545156 (a6989586621681211859 :: Data.Ord.Down a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681211861Sym1 a6989586621681211859) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.TFHelper_6989586621681211849Sym0 instance Data.Singletons.Prelude.Monad.Internal.PMonad ((,) a) instance forall b6989586621679545157 a6989586621681211390 a6989586621679545156 (a6989586621681211847 :: (a6989586621681211390, a6989586621679545156)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.TFHelper_6989586621681211849Sym1 a6989586621681211847) instance Data.Singletons.Prelude.Monoid.SMonoid a => Data.Singletons.Prelude.Monad.Internal.SMonad ((,) a) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681211838Scrutinee_6989586621681211404Sym0 instance forall k1 k2 k3 (u6989586621681211835 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211838Scrutinee_6989586621681211404Sym1 u6989586621681211835) instance forall k1 k2 k3 (a6989586621681211836 :: k3) (u6989586621681211835 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211838Scrutinee_6989586621681211404Sym2 a6989586621681211836 u6989586621681211835) 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 a6989586621681211342 (m6989586621681211341 :: * -> *) (a6989586621681211805 :: a6989586621681211342 Data.Singletons.Internal.~> m6989586621681211341 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FilterMSym1 a6989586621681211805) 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 a6989586621681211336 b6989586621681211334 (m6989586621681211333 :: * -> *) c6989586621681211335 (a6989586621681211796 :: b6989586621681211334 Data.Singletons.Internal.~> m6989586621681211333 c6989586621681211335). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<=<@#@$$) a6989586621681211796) 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 a6989586621681211336 b6989586621681211334 (m6989586621681211333 :: * -> *) c6989586621681211335 (a6989586621681211797 :: b6989586621681211334 Data.Singletons.Internal.~> m6989586621681211333 c6989586621681211335) (a6989586621681211796 :: a6989586621681211336 Data.Singletons.Internal.~> m6989586621681211333 b6989586621681211334). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681211797 Data.Singletons.Prelude.Monad.<=<@#@$$$ a6989586621681211796) 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 c6989586621681211340 a6989586621681211338 (m6989586621681211337 :: * -> *) b6989586621681211339 (a6989586621681211771 :: a6989586621681211338 Data.Singletons.Internal.~> m6989586621681211337 b6989586621681211339). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.>=>@#@$$) a6989586621681211771) 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 c6989586621681211340 a6989586621681211338 (m6989586621681211337 :: * -> *) b6989586621681211339 (a6989586621681211772 :: a6989586621681211338 Data.Singletons.Internal.~> m6989586621681211337 b6989586621681211339) (a6989586621681211771 :: b6989586621681211339 Data.Singletons.Internal.~> m6989586621681211337 c6989586621681211340). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (a6989586621681211772 Data.Singletons.Prelude.Monad.>=>@#@$$$ a6989586621681211771) 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 a6989586621681211330 (m6989586621681211329 :: * -> *) b6989586621681211331 c6989586621681211332 (a6989586621681211765 :: a6989586621681211330 Data.Singletons.Internal.~> m6989586621681211329 (b6989586621681211331, c6989586621681211332)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MapAndUnzipMSym1 a6989586621681211765) 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 a6989586621681211326 b6989586621681211327 (m6989586621681211325 :: * -> *) c6989586621681211328 (a6989586621681211756 :: a6989586621681211326 Data.Singletons.Internal.~> (b6989586621681211327 Data.Singletons.Internal.~> m6989586621681211325 c6989586621681211328)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym1 a6989586621681211756) 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 a6989586621681211326 b6989586621681211327 (m6989586621681211325 :: * -> *) c6989586621681211328 (a6989586621681211757 :: a6989586621681211326 Data.Singletons.Internal.~> (b6989586621681211327 Data.Singletons.Internal.~> m6989586621681211325 c6989586621681211328)) (a6989586621681211756 :: [a6989586621681211326]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithMSym2 a6989586621681211757 a6989586621681211756) 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 a6989586621681211322 b6989586621681211323 (m6989586621681211321 :: * -> *) c6989586621681211324 (a6989586621681211747 :: a6989586621681211322 Data.Singletons.Internal.~> (b6989586621681211323 Data.Singletons.Internal.~> m6989586621681211321 c6989586621681211324)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym1 a6989586621681211747) 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 a6989586621681211322 b6989586621681211323 (m6989586621681211321 :: * -> *) c6989586621681211324 (a6989586621681211748 :: a6989586621681211322 Data.Singletons.Internal.~> (b6989586621681211323 Data.Singletons.Internal.~> m6989586621681211321 c6989586621681211324)) (a6989586621681211747 :: [a6989586621681211322]). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.ZipWithM_Sym2 a6989586621681211748 a6989586621681211747) 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 (t6989586621681211317 :: * -> *) a6989586621681211320 (m6989586621681211318 :: * -> *) b6989586621681211319 (a6989586621681211738 :: b6989586621681211319 Data.Singletons.Internal.~> (a6989586621681211320 Data.Singletons.Internal.~> m6989586621681211318 b6989586621681211319)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym1 a6989586621681211738) 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 (t6989586621681211317 :: * -> *) a6989586621681211320 (m6989586621681211318 :: * -> *) b6989586621681211319 (a6989586621681211739 :: b6989586621681211319 Data.Singletons.Internal.~> (a6989586621681211320 Data.Singletons.Internal.~> m6989586621681211318 b6989586621681211319)) (a6989586621681211738 :: b6989586621681211319). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldMSym2 a6989586621681211739 a6989586621681211738) 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 (t6989586621681211313 :: * -> *) a6989586621681211316 (m6989586621681211314 :: * -> *) b6989586621681211315 (a6989586621681211723 :: b6989586621681211315 Data.Singletons.Internal.~> (a6989586621681211316 Data.Singletons.Internal.~> m6989586621681211314 b6989586621681211315)). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym1 a6989586621681211723) 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 (t6989586621681211313 :: * -> *) a6989586621681211316 (m6989586621681211314 :: * -> *) b6989586621681211315 (a6989586621681211724 :: b6989586621681211315 Data.Singletons.Internal.~> (a6989586621681211316 Data.Singletons.Internal.~> m6989586621681211314 b6989586621681211315)) (a6989586621681211723 :: b6989586621681211315). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.FoldM_Sym2 a6989586621681211724 a6989586621681211723) 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 a6989586621681211704) 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 a6989586621681211685) 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 a6989586621681211676) 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 (m6989586621681211305 :: * -> *) a6989586621681211306 b6989586621681211307 (a6989586621681211659 :: a6989586621681211306 Data.Singletons.Internal.~> b6989586621681211307). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.Prelude.Monad.<$!>@#@$$) a6989586621681211659) 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 (m6989586621681211303 :: * -> *) a6989586621681211304 (a6989586621681211639 :: a6989586621681211304 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.MfilterSym1 a6989586621681211639) 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_6989586621681211813Sym0 instance forall k2 k3 (f6989586621679545131 :: * -> *) (p6989586621681211811 :: k3 Data.Singletons.Internal.~> f6989586621679545131 GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211813Sym1 p6989586621681211811) instance forall k2 k3 (f6989586621679545131 :: * -> *) (a_69895866216812118096989586621681211812 :: k3 Data.Singletons.Internal.~> f6989586621679545131 GHC.Types.Bool) (p6989586621681211811 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211813Sym2 a_69895866216812118096989586621681211812 p6989586621681211811) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681211816Sym0 instance forall k1 k2 k3 (p6989586621681211811 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211816Sym1 p6989586621681211811) instance forall k1 k2 k3 (x6989586621681211815 :: k3) (p6989586621681211811 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211816Sym2 x6989586621681211815 p6989586621681211811) instance forall k1 k2 k3 (a_69895866216812118096989586621681211812 :: k3) (x6989586621681211815 :: k2) (p6989586621681211811 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211816Sym3 a_69895866216812118096989586621681211812 x6989586621681211815 p6989586621681211811) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681211782Sym0 instance forall k b6989586621679545157 k1 (m6989586621679545155 :: * -> *) a6989586621679545156 (f6989586621681211779 :: k1 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211782Sym1 f6989586621681211779) instance forall k b6989586621679545157 k1 (m6989586621679545155 :: * -> *) a6989586621679545156 (g6989586621681211780 :: k1 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156) (f6989586621681211779 :: a6989586621679545156 Data.Singletons.Internal.~> m6989586621679545155 b6989586621679545157). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211782Sym2 g6989586621681211780 f6989586621681211779) instance forall k b6989586621679545157 k1 (m6989586621679545155 :: * -> *) a6989586621679545156 (a_69895866216812117776989586621681211781 :: k1 Data.Singletons.Internal.~> m6989586621679545155 a6989586621679545156) (g6989586621681211780 :: a6989586621679545156 Data.Singletons.Internal.~> m6989586621679545155 b6989586621679545157) (f6989586621681211779 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211782Sym3 a_69895866216812117776989586621681211781 g6989586621681211780 f6989586621681211779) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681211710LoopSym0 instance forall k1 (f6989586621679545131 :: * -> *) k2 k3 (cnt06989586621681211708 :: k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211710LoopSym1 cnt06989586621681211708) instance forall k1 (f6989586621679545131 :: * -> *) k2 k3 (f6989586621681211709 :: k3) (cnt06989586621681211708 :: f6989586621679545131 k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211710LoopSym2 f6989586621681211709 cnt06989586621681211708) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681211691LoopSym0 instance forall a6989586621679545138 k1 (f6989586621679545131 :: * -> *) k2 (cnt06989586621681211689 :: k2). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211691LoopSym1 cnt06989586621681211689) instance forall k1 (f6989586621679545131 :: * -> *) a6989586621679545138 k2 (f6989586621681211690 :: k2) (cnt06989586621681211689 :: f6989586621679545131 a6989586621679545138). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211691LoopSym2 f6989586621681211690 cnt06989586621681211689) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681211665Sym0 instance forall k (m6989586621679545155 :: * -> *) k2 k3 (f6989586621681211663 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211665Sym1 f6989586621681211663) instance forall (m6989586621679545155 :: * -> *) k k2 k3 (m6989586621681211664 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681211663 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211665Sym2 m6989586621681211664 f6989586621681211663) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681211668ZSym0 instance forall k1 k2 k3 (f6989586621681211663 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211668ZSym1 f6989586621681211663) instance forall k1 k2 k3 (m6989586621681211664 :: k2 Data.Singletons.Internal.~> k3) (f6989586621681211663 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211668ZSym2 m6989586621681211664 f6989586621681211663) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Lambda_6989586621681211645Sym0 instance forall k (m6989586621679545155 :: * -> *) k1 (p6989586621681211643 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211645Sym1 p6989586621681211643) instance forall (m6989586621679545155 :: * -> *) k k1 (ma6989586621681211644 :: k1 Data.Singletons.Internal.~> GHC.Types.Bool) (p6989586621681211643 :: k). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Lambda_6989586621681211645Sym2 ma6989586621681211644 p6989586621681211643) instance Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings Data.Singletons.Prelude.Monad.Let6989586621681211648Scrutinee_6989586621681211402Sym0 instance forall k1 k2 k3 (p6989586621681211643 :: k2 Data.Singletons.Internal.~> k3). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211648Scrutinee_6989586621681211402Sym1 p6989586621681211643) instance forall k1 k2 k3 (ma6989586621681211644 :: k2 Data.Singletons.Internal.~> k3) (p6989586621681211643 :: k1). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings (Data.Singletons.Prelude.Monad.Let6989586621681211648Scrutinee_6989586621681211402Sym2 ma6989586621681211644 p6989586621681211643) 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) -- | 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_a1yuv => POrd (a_a1yuv :: Type) where { type family Compare (arg_a1yw1 :: a_a1yuv) (arg_a1yw2 :: a_a1yuv) :: Ordering; type family (<) (arg_a1yw5 :: a_a1yuv) (arg_a1yw6 :: a_a1yuv) :: Bool; type family (<=) (arg_a1yw9 :: a_a1yuv) (arg_a1ywa :: a_a1yuv) :: Bool; type family (>) (arg_a1ywd :: a_a1yuv) (arg_a1ywe :: a_a1yuv) :: Bool; type family (>=) (arg_a1ywh :: a_a1yuv) (arg_a1ywi :: a_a1yuv) :: Bool; type family Max (arg_a1ywl :: a_a1yuv) (arg_a1ywm :: a_a1yuv) :: a_a1yuv; type family Min (arg_a1ywp :: a_a1yuv) (arg_a1ywq :: a_a1yuv) :: a_a1yuv; type Compare a_a1ywL a_a1ywM = Apply (Apply Compare_6989586621679380849Sym0 a_a1ywL) a_a1ywM; type (<) a_a1yx3 a_a1yx4 = Apply (Apply TFHelper_6989586621679380867Sym0 a_a1yx3) a_a1yx4; type (<=) a_a1yxl a_a1yxm = Apply (Apply TFHelper_6989586621679380885Sym0 a_a1yxl) a_a1yxm; type (>) a_a1yxD a_a1yxE = Apply (Apply TFHelper_6989586621679380903Sym0 a_a1yxD) a_a1yxE; type (>=) a_a1yxV a_a1yxW = Apply (Apply TFHelper_6989586621679380921Sym0 a_a1yxV) a_a1yxW; type Max a_a1yyd a_a1yye = Apply (Apply Max_6989586621679380939Sym0 a_a1yyd) a_a1yye; type Min a_a1yyv a_a1yyw = Apply (Apply Min_6989586621679380957Sym0 a_a1yyv) a_a1yyw; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1yuv => SOrd a_a1yuv sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) ~ Apply (Apply Compare_6989586621679380849Sym0 t_a1yyK) t_a1yyL) => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) ~ Apply (Apply TFHelper_6989586621679380867Sym0 t_a1yyO) t_a1yyP) => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) ~ Apply (Apply TFHelper_6989586621679380885Sym0 t_a1yyS) t_a1yyT) => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) ~ Apply (Apply TFHelper_6989586621679380903Sym0 t_a1yyW) t_a1yyX) => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) ~ Apply (Apply TFHelper_6989586621679380921Sym0 t_a1yz0) t_a1yz1) => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) ~ Apply (Apply Max_6989586621679380939Sym0 t_a1yz4) t_a1yz5) => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) ~ Apply (Apply Min_6989586621679380957Sym0 t_a1yz8) t_a1yz9) => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= type family ThenCmp (a_a1BdW :: Ordering) (a_a1BdX :: Ordering) :: Ordering sThenCmp :: forall (t_a1Be1 :: Ordering) (t_a1Be2 :: Ordering). Sing t_a1Be1 -> Sing t_a1Be2 -> Sing (Apply (Apply ThenCmpSym0 t_a1Be1) t_a1Be2 :: 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_a32ST :: Type) where { type family MinBound :: a_a32ST; type family MaxBound :: a_a32ST; } class SBounded a_a32ST sMinBound :: SBounded a_a32ST => Sing (MinBoundSym0 :: a_a32ST) sMaxBound :: SBounded a_a32ST => Sing (MaxBoundSym0 :: a_a32ST) class PEnum (a_a33YN :: Type) where { type family ToEnum (arg_a343r :: Nat) :: a_a33YN; type family FromEnum (arg_a343t :: a_a33YN) :: Nat; type Succ a_a343Q = Apply Succ_6989586621679740391Sym0 a_a343Q; type Pred a_a343Z = Apply Pred_6989586621679740400Sym0 a_a343Z; type EnumFromTo a_a3449 a_a344a = Apply (Apply EnumFromTo_6989586621679740411Sym0 a_a3449) a_a344a; type EnumFromThenTo a_a344o a_a344p a_a344q = Apply (Apply (Apply EnumFromThenTo_6989586621679740427Sym0 a_a344o) a_a344p) a_a344q; } class SEnum a_a33YN sToEnum :: forall (t_a346p :: Nat). SEnum a_a33YN => Sing t_a346p -> Sing (Apply ToEnumSym0 t_a346p :: a_a33YN) sFromEnum :: forall (t_a346r :: a_a33YN). SEnum a_a33YN => Sing t_a346r -> Sing (Apply FromEnumSym0 t_a346r :: Nat) class PShow (a_a5fo8 :: Type) where { type family ShowsPrec (arg_a5fTA :: Nat) (arg_a5fTB :: a_a5fo8) (arg_a5fTC :: Symbol) :: Symbol; type family Show_ (arg_a5fTG :: a_a5fo8) :: Symbol; type family ShowList (arg_a5fTI :: [a_a5fo8]) (arg_a5fTJ :: Symbol) :: Symbol; type ShowsPrec a_a5fTU a_a5fTV a_a5fTW = Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 a_a5fTU) a_a5fTV) a_a5fTW; type Show_ a_a5fU5 = Apply Show__6989586621680262570Sym0 a_a5fU5; type ShowList a_a5fUf a_a5fUg = Apply (Apply ShowList_6989586621680262581Sym0 a_a5fUf) a_a5fUg; } class SShow a_a5fo8 sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). SShow a_a5fo8 => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). SShow a_a5fo8 => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). SShow a_a5fo8 => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). (SShow a_a5fo8, (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 t_a5fXJ) t_a5fXK) t_a5fXL) => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). (SShow a_a5fo8, (Apply Show_Sym0 t_a5fXP :: Symbol) ~ Apply Show__6989586621680262570Sym0 t_a5fXP) => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). (SShow a_a5fo8, (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) ~ Apply (Apply ShowList_6989586621680262581Sym0 t_a5fXR) t_a5fXS) => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) type family ShowString (a_a5fSh :: Symbol) (a_a5fSi :: Symbol) :: Symbol sShowString :: forall (t_a5fWU :: Symbol) (t_a5fWV :: Symbol). Sing t_a5fWU -> Sing t_a5fWV -> Sing (Apply (Apply ShowStringSym0 t_a5fWU) t_a5fWV :: Symbol) type family ShowParen (a_a5fSC :: Bool) (a_a5fSD :: (~>) Symbol Symbol) (a_a5fSE :: Symbol) :: Symbol sShowParen :: forall (t_a5fX4 :: Bool) (t_a5fX5 :: (~>) Symbol Symbol) (t_a5fX6 :: Symbol). Sing t_a5fX4 -> Sing t_a5fX5 -> Sing t_a5fX6 -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5fX4) t_a5fX5) t_a5fX6 :: Symbol) type family ShowSpace (a_a5fS4 :: Symbol) :: Symbol sShowSpace :: forall (t_a5fWS :: Symbol). Sing t_a5fWS -> Sing (Apply ShowSpaceSym0 t_a5fWS :: Symbol) type family ShowChar (a_a5fSw :: Symbol) (a_a5fSx :: Symbol) :: Symbol sShowChar :: forall (t_a5fX0 :: Symbol) (t_a5fX1 :: Symbol). Sing t_a5fX0 -> Sing t_a5fX1 -> Sing (Apply (Apply ShowCharSym0 t_a5fX0) t_a5fX1 :: Symbol) type family ShowCommaSpace (a_a5fSp :: Symbol) :: Symbol sShowCommaSpace :: forall (t_a5fWY :: Symbol). Sing t_a5fWY -> Sing (Apply ShowCommaSpaceSym0 t_a5fWY :: Symbol) class PFunctor (f_a2fgq :: Type -> Type) where { type family Fmap (arg_a2fmM :: (~>) a_a2fgr b_a2fgs) (arg_a2fmN :: f_a2fgq a_a2fgr) :: f_a2fgq b_a2fgs; type family (<$) (arg_a2fmQ :: a_a2fgt) (arg_a2fmR :: f_a2fgq b_a2fgu) :: f_a2fgq a_a2fgt; type (<$) a_a2fn4 a_a2fn5 = Apply (Apply TFHelper_6989586621679545540Sym0 a_a2fn4) a_a2fn5; } infixl 4 <$ class SFunctor (f_a2fgq :: Type -> Type) sFmap :: forall a_a2fgr b_a2fgs (t_a2frd :: (~>) a_a2fgr b_a2fgs) (t_a2fre :: f_a2fgq a_a2fgr). SFunctor f_a2fgq => Sing t_a2frd -> Sing t_a2fre -> Sing (Apply (Apply FmapSym0 t_a2frd) t_a2fre :: f_a2fgq b_a2fgs) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). SFunctor f_a2fgq => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). (SFunctor f_a2fgq, (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) ~ Apply (Apply TFHelper_6989586621679545540Sym0 t_a2frh) t_a2fri) => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) infixl 4 %<$ class PFoldable (t_a63n5 :: Type -> Type) where { type family Fold (arg_a63x8 :: t_a63n5 m_a63n6) :: m_a63n6; type family FoldMap (arg_a63xa :: (~>) a_a63n8 m_a63n7) (arg_a63xb :: t_a63n5 a_a63n8) :: m_a63n7; type family Foldr (arg_a63xe :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (arg_a63xf :: b_a63na) (arg_a63xg :: t_a63n5 a_a63n9) :: b_a63na; type family Foldr' (arg_a63xk :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (arg_a63xl :: b_a63nc) (arg_a63xm :: t_a63n5 a_a63nb) :: b_a63nc; type family Foldl (arg_a63xq :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (arg_a63xr :: b_a63nd) (arg_a63xs :: t_a63n5 a_a63ne) :: b_a63nd; type family Foldl' (arg_a63xw :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (arg_a63xx :: b_a63nf) (arg_a63xy :: t_a63n5 a_a63ng) :: b_a63nf; type family Foldr1 (arg_a63xC :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (arg_a63xD :: t_a63n5 a_a63nh) :: a_a63nh; type family Foldl1 (arg_a63xG :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (arg_a63xH :: t_a63n5 a_a63ni) :: a_a63ni; type family ToList (arg_a63xK :: t_a63n5 a_a63nj) :: [a_a63nj]; type family Null (arg_a63xM :: t_a63n5 a_a63nk) :: Bool; type family Length (arg_a63xO :: t_a63n5 a_a63nl) :: Nat; type family Elem (arg_a63xQ :: a_a63nm) (arg_a63xR :: t_a63n5 a_a63nm) :: Bool; type family Maximum (arg_a63xU :: t_a63n5 a_a63nn) :: a_a63nn; type family Minimum (arg_a63xW :: t_a63n5 a_a63no) :: a_a63no; type family Sum (arg_a63xY :: t_a63n5 a_a63np) :: a_a63np; type family Product (arg_a63y0 :: t_a63n5 a_a63nq) :: a_a63nq; type Fold a_a63y7 = Apply Fold_6989586621680453408Sym0 a_a63y7; type FoldMap a_a63yj a_a63yk = Apply (Apply FoldMap_6989586621680453421Sym0 a_a63yj) a_a63yk; type Foldr a_a63yG a_a63yH a_a63yI = Apply (Apply (Apply Foldr_6989586621680453445Sym0 a_a63yG) a_a63yH) a_a63yI; type Foldr' a_a63za a_a63zb a_a63zc = Apply (Apply (Apply Foldr'_6989586621680453475Sym0 a_a63za) a_a63zb) a_a63zc; type Foldl a_a63zz a_a63zA a_a63zB = Apply (Apply (Apply Foldl_6989586621680453500Sym0 a_a63zz) a_a63zA) a_a63zB; type Foldl' a_a63A3 a_a63A4 a_a63A5 = Apply (Apply (Apply Foldl'_6989586621680453530Sym0 a_a63A3) a_a63A4) a_a63A5; type Foldr1 a_a63Au a_a63Av = Apply (Apply Foldr1_6989586621680453556Sym0 a_a63Au) a_a63Av; type Foldl1 a_a63AT a_a63AU = Apply (Apply Foldl1_6989586621680453581Sym0 a_a63AT) a_a63AU; type ToList a_a63B4 = Apply ToList_6989586621680453591Sym0 a_a63B4; type Null a_a63Bp = Apply Null_6989586621680453612Sym0 a_a63Bp; type Length a_a63BL = Apply Length_6989586621680453634Sym0 a_a63BL; type Elem a_a63BZ a_a63C0 = Apply (Apply Elem_6989586621680453649Sym0 a_a63BZ) a_a63C0; type Maximum a_a63Ce = Apply Maximum_6989586621680453663Sym0 a_a63Ce; type Minimum a_a63Cr = Apply Minimum_6989586621680453676Sym0 a_a63Cr; type Sum a_a63CE = Apply Sum_6989586621680453689Sym0 a_a63CE; type Product a_a63CR = Apply Product_6989586621680453702Sym0 a_a63CR; } class SFoldable (t_a63n5 :: Type -> Type) sFold :: forall m_a63n6 (t_a63SZ :: t_a63n5 m_a63n6). (SFoldable t_a63n5, SMonoid m_a63n6) => Sing t_a63SZ -> Sing (Apply FoldSym0 t_a63SZ :: m_a63n6) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). SFoldable t_a63n5 => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldr' :: forall a_a63nb b_a63nc (t_a63Tb :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (t_a63Tc :: b_a63nc) (t_a63Td :: t_a63n5 a_a63nb). SFoldable t_a63n5 => Sing t_a63Tb -> Sing t_a63Tc -> Sing t_a63Td -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). SFoldable t_a63n5 => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldl' :: forall b_a63nf a_a63ng (t_a63Tn :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (t_a63To :: b_a63nf) (t_a63Tp :: t_a63n5 a_a63ng). SFoldable t_a63n5 => Sing t_a63Tn -> Sing t_a63To -> Sing t_a63Tp -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). SFoldable t_a63n5 => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). SFoldable t_a63n5 => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sToList :: forall a_a63nj (t_a63TB :: t_a63n5 a_a63nj). SFoldable t_a63n5 => Sing t_a63TB -> Sing (Apply ToListSym0 t_a63TB :: [a_a63nj]) sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). SFoldable t_a63n5 => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) sLength :: forall a_a63nl (t_a63TF :: t_a63n5 a_a63nl). SFoldable t_a63n5 => Sing t_a63TF -> Sing (Apply LengthSym0 t_a63TF :: Nat) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) sFold :: forall m_a63n6 (t_a63SZ :: t_a63n5 m_a63n6). (SFoldable t_a63n5, (Apply FoldSym0 t_a63SZ :: m_a63n6) ~ Apply Fold_6989586621680453408Sym0 t_a63SZ, SMonoid m_a63n6) => Sing t_a63SZ -> Sing (Apply FoldSym0 t_a63SZ :: m_a63n6) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) ~ Apply (Apply FoldMap_6989586621680453421Sym0 t_a63T1) t_a63T2, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). (SFoldable t_a63n5, (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) ~ Apply (Apply (Apply Foldr_6989586621680453445Sym0 t_a63T5) t_a63T6) t_a63T7) => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldr' :: forall a_a63nb b_a63nc (t_a63Tb :: (~>) a_a63nb ((~>) b_a63nc b_a63nc)) (t_a63Tc :: b_a63nc) (t_a63Td :: t_a63n5 a_a63nb). (SFoldable t_a63n5, (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) ~ Apply (Apply (Apply Foldr'_6989586621680453475Sym0 t_a63Tb) t_a63Tc) t_a63Td) => Sing t_a63Tb -> Sing t_a63Tc -> Sing t_a63Td -> Sing (Apply (Apply (Apply Foldr'Sym0 t_a63Tb) t_a63Tc) t_a63Td :: b_a63nc) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). (SFoldable t_a63n5, (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) ~ Apply (Apply (Apply Foldl_6989586621680453500Sym0 t_a63Th) t_a63Ti) t_a63Tj) => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldl' :: forall b_a63nf a_a63ng (t_a63Tn :: (~>) b_a63nf ((~>) a_a63ng b_a63nf)) (t_a63To :: b_a63nf) (t_a63Tp :: t_a63n5 a_a63ng). (SFoldable t_a63n5, (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) ~ Apply (Apply (Apply Foldl'_6989586621680453530Sym0 t_a63Tn) t_a63To) t_a63Tp) => Sing t_a63Tn -> Sing t_a63To -> Sing t_a63Tp -> Sing (Apply (Apply (Apply Foldl'Sym0 t_a63Tn) t_a63To) t_a63Tp :: b_a63nf) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). (SFoldable t_a63n5, (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) ~ Apply (Apply Foldr1_6989586621680453556Sym0 t_a63Tt) t_a63Tu) => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). (SFoldable t_a63n5, (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) ~ Apply (Apply Foldl1_6989586621680453581Sym0 t_a63Tx) t_a63Ty) => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sToList :: forall a_a63nj (t_a63TB :: t_a63n5 a_a63nj). (SFoldable t_a63n5, (Apply ToListSym0 t_a63TB :: [a_a63nj]) ~ Apply ToList_6989586621680453591Sym0 t_a63TB) => Sing t_a63TB -> Sing (Apply ToListSym0 t_a63TB :: [a_a63nj]) sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). (SFoldable t_a63n5, (Apply NullSym0 t_a63TD :: Bool) ~ Apply Null_6989586621680453612Sym0 t_a63TD) => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) sLength :: forall a_a63nl (t_a63TF :: t_a63n5 a_a63nl). (SFoldable t_a63n5, (Apply LengthSym0 t_a63TF :: Nat) ~ Apply Length_6989586621680453634Sym0 t_a63TF) => Sing t_a63TF -> Sing (Apply LengthSym0 t_a63TF :: Nat) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) ~ Apply (Apply Elem_6989586621680453649Sym0 t_a63TH) t_a63TI, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, (Apply MaximumSym0 t_a63TL :: a_a63nn) ~ Apply Maximum_6989586621680453663Sym0 t_a63TL, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, (Apply MinimumSym0 t_a63TN :: a_a63no) ~ Apply Minimum_6989586621680453676Sym0 t_a63TN, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, (Apply SumSym0 t_a63TP :: a_a63np) ~ Apply Sum_6989586621680453689Sym0 t_a63TP, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, (Apply ProductSym0 t_a63TR :: a_a63nq) ~ Apply Product_6989586621680453702Sym0 t_a63TR, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) class PSemigroup a_a5xk1 => PMonoid (a_a5xk1 :: Type) where { type family Mempty :: a_a5xk1; type family Mappend (arg_a5xqe :: a_a5xk1) (arg_a5xqf :: a_a5xk1) :: a_a5xk1; type family Mconcat (arg_a5xqi :: [a_a5xk1]) :: a_a5xk1; type Mappend a_a5xqu a_a5xqv = Apply (Apply Mappend_6989586621680329928Sym0 a_a5xqu) a_a5xqv; type Mconcat a_a5xqF = Apply Mconcat_6989586621680329938Sym0 a_a5xqF; } class SSemigroup a_a5xk1 => SMonoid a_a5xk1 sMempty :: SMonoid a_a5xk1 => Sing (MemptySym0 :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). SMonoid a_a5xk1 => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). SMonoid a_a5xk1 => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). (SMonoid a_a5xk1, (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) ~ Apply (Apply Mappend_6989586621680329928Sym0 t_a5xrz) t_a5xrA) => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). (SMonoid a_a5xk1, (Apply MconcatSym0 t_a5xrD :: a_a5xk1) ~ Apply Mconcat_6989586621680329938Sym0 t_a5xrD) => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) class (PFunctor t_a7iXU, PFoldable t_a7iXU) => PTraversable (t_a7iXU :: Type -> Type) where { type family Traverse (arg_a7iY6 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (arg_a7iY7 :: t_a7iXU a_a7iXW) :: f_a7iXV (t_a7iXU b_a7iXX); type family SequenceA (arg_a7iYa :: t_a7iXU (f_a7iXY a_a7iXZ)) :: f_a7iXY (t_a7iXU a_a7iXZ); type family MapM (arg_a7iYc :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (arg_a7iYd :: t_a7iXU a_a7iY1) :: m_a7iY0 (t_a7iXU b_a7iY2); type family Sequence (arg_a7iYg :: t_a7iXU (m_a7iY3 a_a7iY4)) :: m_a7iY3 (t_a7iXU a_a7iY4); type Traverse a_a7iYq a_a7iYr = Apply (Apply Traverse_6989586621680751028Sym0 a_a7iYq) a_a7iYr; type SequenceA a_a7iYB = Apply SequenceA_6989586621680751038Sym0 a_a7iYB; type MapM a_a7iYP a_a7iYQ = Apply (Apply MapM_6989586621680751053Sym0 a_a7iYP) a_a7iYQ; type Sequence a_a7iZ0 = Apply Sequence_6989586621680751063Sym0 a_a7iZ0; } class (SFunctor t_a7iXU, SFoldable t_a7iXU) => STraversable (t_a7iXU :: Type -> Type) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) ~ Apply (Apply Traverse_6989586621680751028Sym0 t_a7iZ4) t_a7iZ5, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) ~ Apply SequenceA_6989586621680751038Sym0 t_a7iZ8, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) ~ Apply (Apply MapM_6989586621680751053Sym0 t_a7iZa) t_a7iZb, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) ~ Apply Sequence_6989586621680751063Sym0 t_a7iZe, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) class PFunctor f_a2fgv => PApplicative (f_a2fgv :: Type -> Type) where { type family Pure (arg_a2fna :: a_a2fgw) :: f_a2fgv a_a2fgw; type family (<*>) (arg_a2fnc :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (arg_a2fnd :: f_a2fgv a_a2fgx) :: f_a2fgv b_a2fgy; type family LiftA2 (arg_a2fng :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (arg_a2fnh :: f_a2fgv a_a2fgz) (arg_a2fni :: f_a2fgv b_a2fgA) :: f_a2fgv c_a2fgB; type family (*>) (arg_a2fnm :: f_a2fgv a_a2fgC) (arg_a2fnn :: f_a2fgv b_a2fgD) :: f_a2fgv b_a2fgD; type family (<*) (arg_a2fnq :: f_a2fgv a_a2fgE) (arg_a2fnr :: f_a2fgv b_a2fgF) :: f_a2fgv a_a2fgE; type (<*>) a_a2fnE a_a2fnF = Apply (Apply TFHelper_6989586621679545576Sym0 a_a2fnE) a_a2fnF; type LiftA2 a_a2fnV a_a2fnW a_a2fnX = Apply (Apply (Apply LiftA2_6989586621679545594Sym0 a_a2fnV) a_a2fnW) a_a2fnX; type (*>) a_a2fo9 a_a2foa = Apply (Apply TFHelper_6989586621679545607Sym0 a_a2fo9) a_a2foa; type (<*) a_a2fop a_a2foq = Apply (Apply TFHelper_6989586621679545623Sym0 a_a2fop) a_a2foq; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2fgv => SApplicative (f_a2fgv :: Type -> Type) sPure :: forall a_a2fgw (t_a2frn :: a_a2fgw). SApplicative f_a2fgv => Sing t_a2frn -> Sing (Apply PureSym0 t_a2frn :: f_a2fgv a_a2fgw) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). SApplicative f_a2fgv => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) sLiftA2 :: forall a_a2fgz b_a2fgA c_a2fgB (t_a2frt :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (t_a2fru :: f_a2fgv a_a2fgz) (t_a2frv :: f_a2fgv b_a2fgA). SApplicative f_a2fgv => Sing t_a2frt -> Sing t_a2fru -> Sing t_a2frv -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). SApplicative f_a2fgv => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). SApplicative f_a2fgv => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). (SApplicative f_a2fgv, (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) ~ Apply (Apply TFHelper_6989586621679545576Sym0 t_a2frp) t_a2frq) => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) sLiftA2 :: forall a_a2fgz b_a2fgA c_a2fgB (t_a2frt :: (~>) a_a2fgz ((~>) b_a2fgA c_a2fgB)) (t_a2fru :: f_a2fgv a_a2fgz) (t_a2frv :: f_a2fgv b_a2fgA). (SApplicative f_a2fgv, (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) ~ Apply (Apply (Apply LiftA2_6989586621679545594Sym0 t_a2frt) t_a2fru) t_a2frv) => Sing t_a2frt -> Sing t_a2fru -> Sing t_a2frv -> Sing (Apply (Apply (Apply LiftA2Sym0 t_a2frt) t_a2fru) t_a2frv :: f_a2fgv c_a2fgB) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). (SApplicative f_a2fgv, (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) ~ Apply (Apply TFHelper_6989586621679545607Sym0 t_a2frz) t_a2frA) => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). (SApplicative f_a2fgv, (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) ~ Apply (Apply TFHelper_6989586621679545623Sym0 t_a2frD) t_a2frE) => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) infixl 4 %<*> infixl 4 %*> infixl 4 %<* type family (:.) (a_a290G :: (~>) b_a28Y0 c_a28Y1) (a_a290H :: (~>) a_a28Y2 b_a28Y0) (a_a290I :: a_a28Y2) :: c_a28Y1 infixr 9 :. (%.) :: forall b_a28Y0 c_a28Y1 a_a28Y2 (t_a292d :: (~>) b_a28Y0 c_a28Y1) (t_a292e :: (~>) a_a28Y2 b_a28Y0) (t_a292f :: a_a28Y2). Sing t_a292d -> Sing t_a292e -> Sing t_a292f -> Sing (Apply (Apply (Apply (.@#@$) t_a292d) t_a292e) t_a292f :: c_a28Y1) 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 k06989586621679468164 k6989586621679468163. (~>) k06989586621679468164 k6989586621679468163 type ErrorSym1 (str6989586621679468165 :: k06989586621679468164) = Error str6989586621679468165 -- | 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 a6989586621679366522. (~>) a6989586621679366522 ((~>) a6989586621679366522 Bool) infix 4 ==@#@$ data (==@#@$$) (x6989586621679366523 :: a6989586621679366522) :: (~>) a6989586621679366522 Bool infix 4 ==@#@$$ type (==@#@$$$) (x6989586621679366523 :: a6989586621679366522) (y6989586621679366524 :: a6989586621679366522) = (==) x6989586621679366523 y6989586621679366524 data (>@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679380813 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679380813 :: a6989586621679380707) (arg6989586621679380814 :: a6989586621679380707) = (>) arg6989586621679380813 arg6989586621679380814 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 (t6989586621679299010 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679299010 :: a3530822107858468865) (t6989586621679299011 :: b3530822107858468866) = '(t6989586621679299010, t6989586621679299011) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679299041 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679299041 :: (a3530822107858468865 :: Type)) (t6989586621679299042 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679299041 :: a3530822107858468865) (t6989586621679299042 :: b3530822107858468866) (t6989586621679299043 :: c3530822107858468867) = '(t6989586621679299041, t6989586621679299042, t6989586621679299043) 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 (t6989586621679299088 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) (t6989586621679299090 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679299088 :: a3530822107858468865) (t6989586621679299089 :: b3530822107858468866) (t6989586621679299090 :: c3530822107858468867) (t6989586621679299091 :: d3530822107858468868) = '(t6989586621679299088, t6989586621679299089, t6989586621679299090, t6989586621679299091) 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 (t6989586621679299153 :: (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 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) (t6989586621679299156 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679299153 :: a3530822107858468865) (t6989586621679299154 :: b3530822107858468866) (t6989586621679299155 :: c3530822107858468867) (t6989586621679299156 :: d3530822107858468868) (t6989586621679299157 :: e3530822107858468869) = '(t6989586621679299153, t6989586621679299154, t6989586621679299155, t6989586621679299156, t6989586621679299157) 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 (t6989586621679299238 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) (t6989586621679299242 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679299238 :: a3530822107858468865) (t6989586621679299239 :: b3530822107858468866) (t6989586621679299240 :: c3530822107858468867) (t6989586621679299241 :: d3530822107858468868) (t6989586621679299242 :: e3530822107858468869) (t6989586621679299243 :: f3530822107858468870) = '(t6989586621679299238, t6989586621679299239, t6989586621679299240, t6989586621679299241, t6989586621679299242, t6989586621679299243) 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 (t6989586621679299345 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (e3530822107858468869 :: Type)) (t6989586621679299350 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679299345 :: a3530822107858468865) (t6989586621679299346 :: b3530822107858468866) (t6989586621679299347 :: c3530822107858468867) (t6989586621679299348 :: d3530822107858468868) (t6989586621679299349 :: e3530822107858468869) (t6989586621679299350 :: f3530822107858468870) (t6989586621679299351 :: g3530822107858468871) = '(t6989586621679299345, t6989586621679299346, t6989586621679299347, t6989586621679299348, t6989586621679299349, t6989586621679299350, t6989586621679299351) data CompareSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Ordering) data CompareSym1 (arg6989586621679380801 :: a6989586621679380707) :: (~>) a6989586621679380707 Ordering type CompareSym2 (arg6989586621679380801 :: a6989586621679380707) (arg6989586621679380802 :: a6989586621679380707) = Compare arg6989586621679380801 arg6989586621679380802 data ThenCmpSym0 :: (~>) Ordering ((~>) Ordering Ordering) data ThenCmpSym1 (a6989586621679391212 :: Ordering) :: (~>) Ordering Ordering type ThenCmpSym2 (a6989586621679391212 :: Ordering) (a6989586621679391213 :: Ordering) = ThenCmp a6989586621679391212 a6989586621679391213 data FoldlSym0 :: forall a6989586621680452732 b6989586621680452731 t6989586621680452723. (~>) ((~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) ((~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731)) data FoldlSym1 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) :: forall t6989586621680452723. (~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731) data FoldlSym2 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731 type FoldlSym3 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) (arg6989586621680453366 :: t6989586621680452723 a6989586621680452732) = Foldl arg6989586621680453364 arg6989586621680453365 arg6989586621680453366 type MinBoundSym0 = MinBound type MaxBoundSym0 = MaxBound data ShowsPrecSym0 :: forall a6989586621680260588. (~>) Nat ((~>) a6989586621680260588 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680262538 :: Nat) :: forall a6989586621680260588. (~>) a6989586621680260588 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) (arg6989586621680262540 :: Symbol) = ShowsPrec arg6989586621680262538 arg6989586621680262539 arg6989586621680262540 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680262457 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680262457 :: Symbol) (a6989586621680262458 :: Symbol) = ShowString a6989586621680262457 a6989586621680262458 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680262478 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680262478 :: Bool) (a6989586621680262479 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data ShowSpaceSym0 :: (~>) Symbol Symbol type ShowSpaceSym1 (a6989586621680262444 :: Symbol) = ShowSpace a6989586621680262444 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680262472 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680262472 :: Symbol) (a6989586621680262473 :: Symbol) = ShowChar a6989586621680262472 a6989586621680262473 data ShowCommaSpaceSym0 :: (~>) Symbol Symbol type ShowCommaSpaceSym1 (a6989586621680262465 :: Symbol) = ShowCommaSpace a6989586621680262465 data FmapSym0 :: forall a6989586621679545127 b6989586621679545128 f6989586621679545126. (~>) ((~>) a6989586621679545127 b6989586621679545128) ((~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128)) data FmapSym1 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) :: forall f6989586621679545126. (~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128) type FmapSym2 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) (arg6989586621679545521 :: f6989586621679545126 a6989586621679545127) = Fmap arg6989586621679545520 arg6989586621679545521 data (<$@#@$) :: forall a6989586621679545129 b6989586621679545130 f6989586621679545126. (~>) a6989586621679545129 ((~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679545524 :: a6989586621679545129) :: forall b6989586621679545130 f6989586621679545126. (~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679545524 :: a6989586621679545129) (arg6989586621679545525 :: f6989586621679545126 b6989586621679545130) = (<$) arg6989586621679545524 arg6989586621679545525 data FoldMapSym0 :: forall a6989586621680452726 m6989586621680452725 t6989586621680452723. (~>) ((~>) a6989586621680452726 m6989586621680452725) ((~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725) data FoldMapSym1 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725 type FoldMapSym2 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) (arg6989586621680453349 :: t6989586621680452723 a6989586621680452726) = FoldMap arg6989586621680453348 arg6989586621680453349 type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680329525. (~>) a6989586621680329525 ((~>) a6989586621680329525 a6989586621680329525) data MappendSym1 (arg6989586621680329910 :: a6989586621680329525) :: (~>) a6989586621680329525 a6989586621680329525 type MappendSym2 (arg6989586621680329910 :: a6989586621680329525) (arg6989586621680329911 :: a6989586621680329525) = Mappend arg6989586621680329910 arg6989586621680329911 data FoldrSym0 :: forall a6989586621680452727 b6989586621680452728 t6989586621680452723. (~>) ((~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) ((~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728)) data FoldrSym1 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) :: forall t6989586621680452723. (~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728) data FoldrSym2 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728 type FoldrSym3 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) (arg6989586621680453354 :: t6989586621680452723 a6989586621680452727) = Foldr arg6989586621680453352 arg6989586621680453353 arg6989586621680453354 data TraverseSym0 :: forall a6989586621680750996 b6989586621680750997 f6989586621680750995 t6989586621680750994. (~>) ((~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) ((~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997))) data TraverseSym1 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997)) type TraverseSym2 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) (arg6989586621680751007 :: t6989586621680750994 a6989586621680750996) = Traverse arg6989586621680751006 arg6989586621680751007 data PureSym0 :: forall a6989586621679545132 f6989586621679545131. (~>) a6989586621679545132 (f6989586621679545131 a6989586621679545132) type PureSym1 (arg6989586621679545544 :: a6989586621679545132) = Pure arg6989586621679545544 data (<*>@#@$) :: forall a6989586621679545133 b6989586621679545134 f6989586621679545131. (~>) (f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) ((~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) :: (~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) (arg6989586621679545547 :: f6989586621679545131 a6989586621679545133) = (<*>) arg6989586621679545546 arg6989586621679545547 data LiftA2Sym0 :: forall a6989586621679545135 b6989586621679545136 c6989586621679545137 f6989586621679545131. (~>) ((~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) ((~>) (f6989586621679545131 a6989586621679545135) ((~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137))) data LiftA2Sym1 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) :: forall f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545135) ((~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137)) data LiftA2Sym2 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) (arg6989586621679545551 :: f6989586621679545131 a6989586621679545135) :: (~>) (f6989586621679545131 b6989586621679545136) (f6989586621679545131 c6989586621679545137) type LiftA2Sym3 (arg6989586621679545550 :: (~>) a6989586621679545135 ((~>) b6989586621679545136 c6989586621679545137)) (arg6989586621679545551 :: f6989586621679545131 a6989586621679545135) (arg6989586621679545552 :: f6989586621679545131 b6989586621679545136) = LiftA2 arg6989586621679545550 arg6989586621679545551 arg6989586621679545552 data (.@#@$) :: forall a6989586621679520922 b6989586621679520920 c6989586621679520921. (~>) ((~>) b6989586621679520920 c6989586621679520921) ((~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) :: forall a6989586621679520922. (~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) :: (~>) a6989586621679520922 c6989586621679520921 infixr 9 .@#@$$$ type (.@#@$$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) (a6989586621679521088 :: a6989586621679520922) = (:.) a6989586621679521086 a6989586621679521087 a6989586621679521088 data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679298917 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679298917 :: a3530822107858468865) (t6989586621679298918 :: [a3530822107858468865]) = '(:) t6989586621679298917 t6989586621679298918 -- | 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 (s6989586621681262316 :: Type). (~>) s6989586621681262316 (ErrorMessage' (s6989586621681262316 :: Type)) type TextSym1 (t6989586621681263102 :: s6989586621681262316) = 'Text t6989586621681263102 data ShowTypeSym0 :: forall (s6989586621681262316 :: Type) t6989586621681262317. (~>) t6989586621681262317 (ErrorMessage' (s6989586621681262316 :: Type)) type ShowTypeSym1 (t6989586621681263104 :: t6989586621681262317) = 'ShowType t6989586621681263104 data (:<>:@#@$) :: forall (s6989586621681262316 :: Type). (~>) (ErrorMessage' s6989586621681262316) ((~>) (ErrorMessage' s6989586621681262316) (ErrorMessage' (s6989586621681262316 :: Type))) infixl 6 :<>:@#@$ data (:<>:@#@$$) (t6989586621681263106 :: ErrorMessage' (s6989586621681262316 :: Type)) :: (~>) (ErrorMessage' s6989586621681262316) (ErrorMessage' (s6989586621681262316 :: Type)) infixl 6 :<>:@#@$$ type (:<>:@#@$$$) (t6989586621681263106 :: ErrorMessage' s6989586621681262316) (t6989586621681263107 :: ErrorMessage' s6989586621681262316) = '(:<>:) t6989586621681263106 t6989586621681263107 data (:$$:@#@$) :: forall (s6989586621681262316 :: Type). (~>) (ErrorMessage' s6989586621681262316) ((~>) (ErrorMessage' s6989586621681262316) (ErrorMessage' (s6989586621681262316 :: Type))) infixl 5 :$$:@#@$ data (:$$:@#@$$) (t6989586621681263110 :: ErrorMessage' (s6989586621681262316 :: Type)) :: (~>) (ErrorMessage' s6989586621681262316) (ErrorMessage' (s6989586621681262316 :: Type)) infixl 5 :$$:@#@$$ type (:$$:@#@$$$) (t6989586621681263110 :: ErrorMessage' s6989586621681262316) (t6989586621681263111 :: ErrorMessage' s6989586621681262316) = '(:$$:) t6989586621681263110 t6989586621681263111 data TypeErrorSym0 :: forall b6989586621681262306. (~>) PErrorMessage b6989586621681262306 type TypeErrorSym1 (a6989586621681262307 :: PErrorMessage) = TypeError a6989586621681262307 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 s6989586621681262316 (t6989586621681263110 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681262316). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:$$:@#@$$) t6989586621681263110) 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 s6989586621681262316 (t6989586621681263106 :: Data.Singletons.TypeError.ErrorMessage' s6989586621681262316). Data.Singletons.SuppressUnusedWarnings.SuppressUnusedWarnings ((Data.Singletons.TypeError.:<>:@#@$$) t6989586621681263106) 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_akDJ b_akDK -> 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_a1yuv => POrd (a_a1yuv :: Type) where { type family Compare (arg_a1yw1 :: a_a1yuv) (arg_a1yw2 :: a_a1yuv) :: Ordering; type family (<) (arg_a1yw5 :: a_a1yuv) (arg_a1yw6 :: a_a1yuv) :: Bool; type family (<=) (arg_a1yw9 :: a_a1yuv) (arg_a1ywa :: a_a1yuv) :: Bool; type family (>) (arg_a1ywd :: a_a1yuv) (arg_a1ywe :: a_a1yuv) :: Bool; type family (>=) (arg_a1ywh :: a_a1yuv) (arg_a1ywi :: a_a1yuv) :: Bool; type family Max (arg_a1ywl :: a_a1yuv) (arg_a1ywm :: a_a1yuv) :: a_a1yuv; type family Min (arg_a1ywp :: a_a1yuv) (arg_a1ywq :: a_a1yuv) :: a_a1yuv; type Compare a_a1ywL a_a1ywM = Apply (Apply Compare_6989586621679380849Sym0 a_a1ywL) a_a1ywM; type (<) a_a1yx3 a_a1yx4 = Apply (Apply TFHelper_6989586621679380867Sym0 a_a1yx3) a_a1yx4; type (<=) a_a1yxl a_a1yxm = Apply (Apply TFHelper_6989586621679380885Sym0 a_a1yxl) a_a1yxm; type (>) a_a1yxD a_a1yxE = Apply (Apply TFHelper_6989586621679380903Sym0 a_a1yxD) a_a1yxE; type (>=) a_a1yxV a_a1yxW = Apply (Apply TFHelper_6989586621679380921Sym0 a_a1yxV) a_a1yxW; type Max a_a1yyd a_a1yye = Apply (Apply Max_6989586621679380939Sym0 a_a1yyd) a_a1yye; type Min a_a1yyv a_a1yyw = Apply (Apply Min_6989586621679380957Sym0 a_a1yyv) a_a1yyw; } infix 4 >= infix 4 > infix 4 < infix 4 <= class SEq a_a1yuv => SOrd a_a1yuv sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). SOrd a_a1yuv => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) sCompare :: forall (t_a1yyK :: a_a1yuv) (t_a1yyL :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) ~ Apply (Apply Compare_6989586621679380849Sym0 t_a1yyK) t_a1yyL) => Sing t_a1yyK -> Sing t_a1yyL -> Sing (Apply (Apply CompareSym0 t_a1yyK) t_a1yyL :: Ordering) (%<) :: forall (t_a1yyO :: a_a1yuv) (t_a1yyP :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) ~ Apply (Apply TFHelper_6989586621679380867Sym0 t_a1yyO) t_a1yyP) => Sing t_a1yyO -> Sing t_a1yyP -> Sing (Apply (Apply (<@#@$) t_a1yyO) t_a1yyP :: Bool) (%<=) :: forall (t_a1yyS :: a_a1yuv) (t_a1yyT :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) ~ Apply (Apply TFHelper_6989586621679380885Sym0 t_a1yyS) t_a1yyT) => Sing t_a1yyS -> Sing t_a1yyT -> Sing (Apply (Apply (<=@#@$) t_a1yyS) t_a1yyT :: Bool) (%>) :: forall (t_a1yyW :: a_a1yuv) (t_a1yyX :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) ~ Apply (Apply TFHelper_6989586621679380903Sym0 t_a1yyW) t_a1yyX) => Sing t_a1yyW -> Sing t_a1yyX -> Sing (Apply (Apply (>@#@$) t_a1yyW) t_a1yyX :: Bool) (%>=) :: forall (t_a1yz0 :: a_a1yuv) (t_a1yz1 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) ~ Apply (Apply TFHelper_6989586621679380921Sym0 t_a1yz0) t_a1yz1) => Sing t_a1yz0 -> Sing t_a1yz1 -> Sing (Apply (Apply (>=@#@$) t_a1yz0) t_a1yz1 :: Bool) sMax :: forall (t_a1yz4 :: a_a1yuv) (t_a1yz5 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) ~ Apply (Apply Max_6989586621679380939Sym0 t_a1yz4) t_a1yz5) => Sing t_a1yz4 -> Sing t_a1yz5 -> Sing (Apply (Apply MaxSym0 t_a1yz4) t_a1yz5 :: a_a1yuv) sMin :: forall (t_a1yz8 :: a_a1yuv) (t_a1yz9 :: a_a1yuv). (SOrd a_a1yuv, (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) ~ Apply (Apply Min_6989586621679380957Sym0 t_a1yz8) t_a1yz9) => Sing t_a1yz8 -> Sing t_a1yz9 -> Sing (Apply (Apply MinSym0 t_a1yz8) t_a1yz9 :: a_a1yuv) infix 4 %<= infix 4 %< infix 4 %> infix 4 %>= class SBounded a_a32ST sMinBound :: SBounded a_a32ST => Sing (MinBoundSym0 :: a_a32ST) sMaxBound :: SBounded a_a32ST => Sing (MaxBoundSym0 :: a_a32ST) class PBounded (a_a32ST :: Type) where { type family MinBound :: a_a32ST; type family MaxBound :: a_a32ST; } type MaxBoundSym0 = MaxBound type MinBoundSym0 = MinBound class SEnum a_a33YN sToEnum :: forall (t_a346p :: Nat). SEnum a_a33YN => Sing t_a346p -> Sing (Apply ToEnumSym0 t_a346p :: a_a33YN) sFromEnum :: forall (t_a346r :: a_a33YN). SEnum a_a33YN => Sing t_a346r -> Sing (Apply FromEnumSym0 t_a346r :: Nat) sEnumFromTo :: forall (t_a346t :: a_a33YN) (t_a346u :: a_a33YN). SEnum a_a33YN => Sing t_a346t -> Sing t_a346u -> Sing (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) sEnumFromThenTo :: forall (t_a346x :: a_a33YN) (t_a346y :: a_a33YN) (t_a346z :: a_a33YN). SEnum a_a33YN => Sing t_a346x -> Sing t_a346y -> Sing t_a346z -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) sEnumFromTo :: forall (t_a346t :: a_a33YN) (t_a346u :: a_a33YN). (SEnum a_a33YN, (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) ~ Apply (Apply EnumFromTo_6989586621679740411Sym0 t_a346t) t_a346u) => Sing t_a346t -> Sing t_a346u -> Sing (Apply (Apply EnumFromToSym0 t_a346t) t_a346u :: [a_a33YN]) sEnumFromThenTo :: forall (t_a346x :: a_a33YN) (t_a346y :: a_a33YN) (t_a346z :: a_a33YN). (SEnum a_a33YN, (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) ~ Apply (Apply (Apply EnumFromThenTo_6989586621679740427Sym0 t_a346x) t_a346y) t_a346z) => Sing t_a346x -> Sing t_a346y -> Sing t_a346z -> Sing (Apply (Apply (Apply EnumFromThenToSym0 t_a346x) t_a346y) t_a346z :: [a_a33YN]) class PEnum (a_a33YN :: Type) where { type family ToEnum (arg_a343r :: Nat) :: a_a33YN; type family FromEnum (arg_a343t :: a_a33YN) :: Nat; type family EnumFromTo (arg_a343v :: a_a33YN) (arg_a343w :: a_a33YN) :: [a_a33YN]; type family EnumFromThenTo (arg_a343z :: a_a33YN) (arg_a343A :: a_a33YN) (arg_a343B :: a_a33YN) :: [a_a33YN]; type Succ a_a343Q = Apply Succ_6989586621679740391Sym0 a_a343Q; type Pred a_a343Z = Apply Pred_6989586621679740400Sym0 a_a343Z; type EnumFromTo a_a3449 a_a344a = Apply (Apply EnumFromTo_6989586621679740411Sym0 a_a3449) a_a344a; type EnumFromThenTo a_a344o a_a344p a_a344q = Apply (Apply (Apply EnumFromThenTo_6989586621679740427Sym0 a_a344o) a_a344p) a_a344q; } data EnumFromThenToSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 ((~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077])) data EnumFromThenToSym1 (arg6989586621679740373 :: a6989586621679740077) :: (~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077]) data EnumFromThenToSym2 (arg6989586621679740373 :: a6989586621679740077) (arg6989586621679740374 :: a6989586621679740077) :: (~>) a6989586621679740077 [a6989586621679740077] type EnumFromThenToSym3 (arg6989586621679740373 :: a6989586621679740077) (arg6989586621679740374 :: a6989586621679740077) (arg6989586621679740375 :: a6989586621679740077) = EnumFromThenTo arg6989586621679740373 arg6989586621679740374 arg6989586621679740375 data EnumFromToSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 ((~>) a6989586621679740077 [a6989586621679740077]) data EnumFromToSym1 (arg6989586621679740369 :: a6989586621679740077) :: (~>) a6989586621679740077 [a6989586621679740077] type EnumFromToSym2 (arg6989586621679740369 :: a6989586621679740077) (arg6989586621679740370 :: a6989586621679740077) = EnumFromTo arg6989586621679740369 arg6989586621679740370 data FromEnumSym0 :: forall a6989586621679740077. (~>) a6989586621679740077 Nat type FromEnumSym1 (arg6989586621679740367 :: a6989586621679740077) = FromEnum arg6989586621679740367 data ToEnumSym0 :: forall a6989586621679740077. (~>) Nat a6989586621679740077 type ToEnumSym1 (arg6989586621679740365 :: Nat) = ToEnum arg6989586621679740365 -- | 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_a5fo8 :: Type) where { type family ShowsPrec (arg_a5fTA :: Nat) (arg_a5fTB :: a_a5fo8) (arg_a5fTC :: Symbol) :: Symbol; type family Show_ (arg_a5fTG :: a_a5fo8) :: Symbol; type family ShowList (arg_a5fTI :: [a_a5fo8]) (arg_a5fTJ :: Symbol) :: Symbol; type ShowsPrec a_a5fTU a_a5fTV a_a5fTW = Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 a_a5fTU) a_a5fTV) a_a5fTW; type Show_ a_a5fU5 = Apply Show__6989586621680262570Sym0 a_a5fU5; type ShowList a_a5fUf a_a5fUg = Apply (Apply ShowList_6989586621680262581Sym0 a_a5fUf) a_a5fUg; } class SShow a_a5fo8 sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). SShow a_a5fo8 => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). SShow a_a5fo8 => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). SShow a_a5fo8 => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) sShowsPrec :: forall (t_a5fXJ :: Nat) (t_a5fXK :: a_a5fo8) (t_a5fXL :: Symbol). (SShow a_a5fo8, (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) ~ Apply (Apply (Apply ShowsPrec_6989586621680262561Sym0 t_a5fXJ) t_a5fXK) t_a5fXL) => Sing t_a5fXJ -> Sing t_a5fXK -> Sing t_a5fXL -> Sing (Apply (Apply (Apply ShowsPrecSym0 t_a5fXJ) t_a5fXK) t_a5fXL :: Symbol) sShow_ :: forall (t_a5fXP :: a_a5fo8). (SShow a_a5fo8, (Apply Show_Sym0 t_a5fXP :: Symbol) ~ Apply Show__6989586621680262570Sym0 t_a5fXP) => Sing t_a5fXP -> Sing (Apply Show_Sym0 t_a5fXP :: Symbol) sShowList :: forall (t_a5fXR :: [a_a5fo8]) (t_a5fXS :: Symbol). (SShow a_a5fo8, (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: Symbol) ~ Apply (Apply ShowList_6989586621680262581Sym0 t_a5fXR) t_a5fXS) => Sing t_a5fXR -> Sing t_a5fXS -> Sing (Apply (Apply ShowListSym0 t_a5fXR) t_a5fXS :: 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_a5fTs :: a_a5fnT) (a_a5fTt :: Symbol) :: Symbol sShows :: forall a_a5fnT (t_a5fXk :: a_a5fnT) (t_a5fXl :: Symbol). SShow a_a5fnT => Sing t_a5fXk -> Sing t_a5fXl -> Sing (Apply (Apply ShowsSym0 t_a5fXk) t_a5fXl :: Symbol) type family ShowChar (a_a5fSw :: Symbol) (a_a5fSx :: Symbol) :: Symbol sShowChar :: forall (t_a5fX0 :: Symbol) (t_a5fX1 :: Symbol). Sing t_a5fX0 -> Sing t_a5fX1 -> Sing (Apply (Apply ShowCharSym0 t_a5fX0) t_a5fX1 :: Symbol) type family ShowString (a_a5fSh :: Symbol) (a_a5fSi :: Symbol) :: Symbol sShowString :: forall (t_a5fWU :: Symbol) (t_a5fWV :: Symbol). Sing t_a5fWU -> Sing t_a5fWV -> Sing (Apply (Apply ShowStringSym0 t_a5fWU) t_a5fWV :: Symbol) type family ShowParen (a_a5fSC :: Bool) (a_a5fSD :: (~>) Symbol Symbol) (a_a5fSE :: Symbol) :: Symbol sShowParen :: forall (t_a5fX4 :: Bool) (t_a5fX5 :: (~>) Symbol Symbol) (t_a5fX6 :: Symbol). Sing t_a5fX4 -> Sing t_a5fX5 -> Sing t_a5fX6 -> Sing (Apply (Apply (Apply ShowParenSym0 t_a5fX4) t_a5fX5) t_a5fX6 :: Symbol) class PSemigroup (a_a3mgl :: Type) where { type family (<>) (arg_a3moa :: a_a3mgl) (arg_a3mob :: a_a3mgl) :: a_a3mgl; type Sconcat a_a3mov = Apply Sconcat_6989586621679810864Sym0 a_a3mov; } infixr 6 <> class SSemigroup a_a3mgl (%<>) :: forall (t_a3mrY :: a_a3mgl) (t_a3mrZ :: a_a3mgl). SSemigroup a_a3mgl => Sing t_a3mrY -> Sing t_a3mrZ -> Sing (Apply (Apply (<>@#@$) t_a3mrY) t_a3mrZ :: a_a3mgl) infixr 6 %<> class PSemigroup a_a5xk1 => PMonoid (a_a5xk1 :: Type) where { type family Mempty :: a_a5xk1; type family Mappend (arg_a5xqe :: a_a5xk1) (arg_a5xqf :: a_a5xk1) :: a_a5xk1; type family Mconcat (arg_a5xqi :: [a_a5xk1]) :: a_a5xk1; type Mappend a_a5xqu a_a5xqv = Apply (Apply Mappend_6989586621680329928Sym0 a_a5xqu) a_a5xqv; type Mconcat a_a5xqF = Apply Mconcat_6989586621680329938Sym0 a_a5xqF; } class SSemigroup a_a5xk1 => SMonoid a_a5xk1 sMempty :: SMonoid a_a5xk1 => Sing (MemptySym0 :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). SMonoid a_a5xk1 => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). SMonoid a_a5xk1 => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) sMappend :: forall (t_a5xrz :: a_a5xk1) (t_a5xrA :: a_a5xk1). (SMonoid a_a5xk1, (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) ~ Apply (Apply Mappend_6989586621680329928Sym0 t_a5xrz) t_a5xrA) => Sing t_a5xrz -> Sing t_a5xrA -> Sing (Apply (Apply MappendSym0 t_a5xrz) t_a5xrA :: a_a5xk1) sMconcat :: forall (t_a5xrD :: [a_a5xk1]). (SMonoid a_a5xk1, (Apply MconcatSym0 t_a5xrD :: a_a5xk1) ~ Apply Mconcat_6989586621680329938Sym0 t_a5xrD) => Sing t_a5xrD -> Sing (Apply MconcatSym0 t_a5xrD :: a_a5xk1) class PFunctor (f_a2fgq :: Type -> Type) where { type family Fmap (arg_a2fmM :: (~>) a_a2fgr b_a2fgs) (arg_a2fmN :: f_a2fgq a_a2fgr) :: f_a2fgq b_a2fgs; type family (<$) (arg_a2fmQ :: a_a2fgt) (arg_a2fmR :: f_a2fgq b_a2fgu) :: f_a2fgq a_a2fgt; type (<$) a_a2fn4 a_a2fn5 = Apply (Apply TFHelper_6989586621679545540Sym0 a_a2fn4) a_a2fn5; } infixl 4 <$ class SFunctor (f_a2fgq :: Type -> Type) sFmap :: forall a_a2fgr b_a2fgs (t_a2frd :: (~>) a_a2fgr b_a2fgs) (t_a2fre :: f_a2fgq a_a2fgr). SFunctor f_a2fgq => Sing t_a2frd -> Sing t_a2fre -> Sing (Apply (Apply FmapSym0 t_a2frd) t_a2fre :: f_a2fgq b_a2fgs) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). SFunctor f_a2fgq => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) (%<$) :: forall a_a2fgt b_a2fgu (t_a2frh :: a_a2fgt) (t_a2fri :: f_a2fgq b_a2fgu). (SFunctor f_a2fgq, (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) ~ Apply (Apply TFHelper_6989586621679545540Sym0 t_a2frh) t_a2fri) => Sing t_a2frh -> Sing t_a2fri -> Sing (Apply (Apply (<$@#@$) t_a2frh) t_a2fri :: f_a2fgq a_a2fgt) infixl 4 %<$ type family (<$>) (a_a2XlQ :: (~>) a_a2Xky b_a2Xkz) (a_a2XlR :: f_a2Xkx a_a2Xky) :: f_a2Xkx b_a2Xkz infixl 4 <$> (%<$>) :: forall f_a2Xkx a_a2Xky b_a2Xkz (t_a2Xnr :: (~>) a_a2Xky b_a2Xkz) (t_a2Xns :: f_a2Xkx a_a2Xky). SFunctor f_a2Xkx => Sing t_a2Xnr -> Sing t_a2Xns -> Sing (Apply (Apply (<$>@#@$) t_a2Xnr) t_a2Xns :: f_a2Xkx b_a2Xkz) infixl 4 %<$> class PFunctor f_a2fgv => PApplicative (f_a2fgv :: Type -> Type) where { type family Pure (arg_a2fna :: a_a2fgw) :: f_a2fgv a_a2fgw; type family (<*>) (arg_a2fnc :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (arg_a2fnd :: f_a2fgv a_a2fgx) :: f_a2fgv b_a2fgy; type family (*>) (arg_a2fnm :: f_a2fgv a_a2fgC) (arg_a2fnn :: f_a2fgv b_a2fgD) :: f_a2fgv b_a2fgD; type family (<*) (arg_a2fnq :: f_a2fgv a_a2fgE) (arg_a2fnr :: f_a2fgv b_a2fgF) :: f_a2fgv a_a2fgE; type (<*>) a_a2fnE a_a2fnF = Apply (Apply TFHelper_6989586621679545576Sym0 a_a2fnE) a_a2fnF; type LiftA2 a_a2fnV a_a2fnW a_a2fnX = Apply (Apply (Apply LiftA2_6989586621679545594Sym0 a_a2fnV) a_a2fnW) a_a2fnX; type (*>) a_a2fo9 a_a2foa = Apply (Apply TFHelper_6989586621679545607Sym0 a_a2fo9) a_a2foa; type (<*) a_a2fop a_a2foq = Apply (Apply TFHelper_6989586621679545623Sym0 a_a2fop) a_a2foq; } infixl 4 <*> infixl 4 *> infixl 4 <* class SFunctor f_a2fgv => SApplicative (f_a2fgv :: Type -> Type) sPure :: forall a_a2fgw (t_a2frn :: a_a2fgw). SApplicative f_a2fgv => Sing t_a2frn -> Sing (Apply PureSym0 t_a2frn :: f_a2fgv a_a2fgw) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). SApplicative f_a2fgv => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). SApplicative f_a2fgv => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). SApplicative f_a2fgv => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) (%<*>) :: forall a_a2fgx b_a2fgy (t_a2frp :: f_a2fgv ((~>) a_a2fgx b_a2fgy)) (t_a2frq :: f_a2fgv a_a2fgx). (SApplicative f_a2fgv, (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) ~ Apply (Apply TFHelper_6989586621679545576Sym0 t_a2frp) t_a2frq) => Sing t_a2frp -> Sing t_a2frq -> Sing (Apply (Apply (<*>@#@$) t_a2frp) t_a2frq :: f_a2fgv b_a2fgy) (%*>) :: forall a_a2fgC b_a2fgD (t_a2frz :: f_a2fgv a_a2fgC) (t_a2frA :: f_a2fgv b_a2fgD). (SApplicative f_a2fgv, (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) ~ Apply (Apply TFHelper_6989586621679545607Sym0 t_a2frz) t_a2frA) => Sing t_a2frz -> Sing t_a2frA -> Sing (Apply (Apply (*>@#@$) t_a2frz) t_a2frA :: f_a2fgv b_a2fgD) (%<*) :: forall a_a2fgE b_a2fgF (t_a2frD :: f_a2fgv a_a2fgE) (t_a2frE :: f_a2fgv b_a2fgF). (SApplicative f_a2fgv, (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) ~ Apply (Apply TFHelper_6989586621679545623Sym0 t_a2frD) t_a2frE) => Sing t_a2frD -> Sing t_a2frE -> Sing (Apply (Apply (<*@#@$) t_a2frD) t_a2frE :: f_a2fgv a_a2fgE) infixl 4 %<*> infixl 4 %*> infixl 4 %<* class PApplicative m_a2fgT => PMonad (m_a2fgT :: Type -> Type) where { type family (>>=) (arg_a2fov :: m_a2fgT a_a2fgU) (arg_a2fow :: (~>) a_a2fgU (m_a2fgT b_a2fgV)) :: m_a2fgT b_a2fgV; type family (>>) (arg_a2foz :: m_a2fgT a_a2fgW) (arg_a2foA :: m_a2fgT b_a2fgX) :: m_a2fgT b_a2fgX; type family Return (arg_a2foD :: a_a2fgY) :: m_a2fgT a_a2fgY; type family Fail (arg_a2foF :: Symbol) :: m_a2fgT a_a2fgZ; type (>>) a_a2foX a_a2foY = Apply (Apply TFHelper_6989586621679545657Sym0 a_a2foX) a_a2foY; type Return a_a2fp8 = Apply Return_6989586621679545667Sym0 a_a2fp8; type Fail a_a2fpf = Apply Fail_6989586621679545674Sym0 a_a2fpf; } infixl 1 >>= infixl 1 >> class SApplicative m_a2fgT => SMonad (m_a2fgT :: Type -> Type) (%>>=) :: forall a_a2fgU b_a2fgV (t_a2frO :: m_a2fgT a_a2fgU) (t_a2frP :: (~>) a_a2fgU (m_a2fgT b_a2fgV)). SMonad m_a2fgT => Sing t_a2frO -> Sing t_a2frP -> Sing (Apply (Apply (>>=@#@$) t_a2frO) t_a2frP :: m_a2fgT b_a2fgV) (%>>) :: forall a_a2fgW b_a2fgX (t_a2frS :: m_a2fgT a_a2fgW) (t_a2frT :: m_a2fgT b_a2fgX). SMonad m_a2fgT => Sing t_a2frS -> Sing t_a2frT -> Sing (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) sReturn :: forall a_a2fgY (t_a2frW :: a_a2fgY). SMonad m_a2fgT => Sing t_a2frW -> Sing (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) sFail :: forall a_a2fgZ (t_a2frY :: Symbol). SMonad m_a2fgT => Sing t_a2frY -> Sing (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) (%>>) :: forall a_a2fgW b_a2fgX (t_a2frS :: m_a2fgT a_a2fgW) (t_a2frT :: m_a2fgT b_a2fgX). (SMonad m_a2fgT, (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) ~ Apply (Apply TFHelper_6989586621679545657Sym0 t_a2frS) t_a2frT) => Sing t_a2frS -> Sing t_a2frT -> Sing (Apply (Apply (>>@#@$) t_a2frS) t_a2frT :: m_a2fgT b_a2fgX) sReturn :: forall a_a2fgY (t_a2frW :: a_a2fgY). (SMonad m_a2fgT, (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) ~ Apply Return_6989586621679545667Sym0 t_a2frW) => Sing t_a2frW -> Sing (Apply ReturnSym0 t_a2frW :: m_a2fgT a_a2fgY) sFail :: forall a_a2fgZ (t_a2frY :: Symbol). (SMonad m_a2fgT, (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) ~ Apply Fail_6989586621679545674Sym0 t_a2frY) => Sing t_a2frY -> Sing (Apply FailSym0 t_a2frY :: m_a2fgT a_a2fgZ) infixl 1 %>>= infixl 1 %>> type family MapM_ (a_a63vQ :: (~>) a_a63mc (m_a63mb b_a63md)) (a_a63vR :: t_a63ma a_a63mc) :: m_a63mb () sMapM_ :: forall t_a63ma m_a63mb a_a63mc b_a63md (t_a63RS :: (~>) a_a63mc (m_a63mb b_a63md)) (t_a63RT :: t_a63ma a_a63mc). (SFoldable t_a63ma, SMonad m_a63mb) => Sing t_a63RS -> Sing t_a63RT -> Sing (Apply (Apply MapM_Sym0 t_a63RS) t_a63RT :: m_a63mb ()) type family Sequence_ (a_a63vI :: t_a63m0 (m_a63m1 a_a63m2)) :: m_a63m1 () sSequence_ :: forall t_a63m0 m_a63m1 a_a63m2 (t_a63RO :: t_a63m0 (m_a63m1 a_a63m2)). (SFoldable t_a63m0, SMonad m_a63m1) => Sing t_a63RO -> Sing (Apply Sequence_Sym0 t_a63RO :: m_a63m1 ()) type family (=<<) (a_a2fm1 :: (~>) a_a2ffE (m_a2ffD b_a2ffF)) (a_a2fm2 :: m_a2ffD a_a2ffE) :: m_a2ffD b_a2ffF infixr 1 =<< (%=<<) :: forall m_a2ffD a_a2ffE b_a2ffF (t_a2fqx :: (~>) a_a2ffE (m_a2ffD b_a2ffF)) (t_a2fqy :: m_a2ffD a_a2ffE). SMonad m_a2ffD => Sing t_a2fqx -> Sing t_a2fqy -> Sing (Apply (Apply (=<<@#@$) t_a2fqx) t_a2fqy :: m_a2ffD b_a2ffF) infixr 1 %=<< class PFoldable (t_a63n5 :: Type -> Type) where { type family FoldMap (arg_a63xa :: (~>) a_a63n8 m_a63n7) (arg_a63xb :: t_a63n5 a_a63n8) :: m_a63n7; type family Foldr (arg_a63xe :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (arg_a63xf :: b_a63na) (arg_a63xg :: t_a63n5 a_a63n9) :: b_a63na; type family Foldl (arg_a63xq :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (arg_a63xr :: b_a63nd) (arg_a63xs :: t_a63n5 a_a63ne) :: b_a63nd; type family Foldr1 (arg_a63xC :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (arg_a63xD :: t_a63n5 a_a63nh) :: a_a63nh; type family Foldl1 (arg_a63xG :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (arg_a63xH :: t_a63n5 a_a63ni) :: a_a63ni; type family Elem (arg_a63xQ :: a_a63nm) (arg_a63xR :: t_a63n5 a_a63nm) :: Bool; type family Maximum (arg_a63xU :: t_a63n5 a_a63nn) :: a_a63nn; type family Minimum (arg_a63xW :: t_a63n5 a_a63no) :: a_a63no; type family Sum (arg_a63xY :: t_a63n5 a_a63np) :: a_a63np; type family Product (arg_a63y0 :: t_a63n5 a_a63nq) :: a_a63nq; type Fold a_a63y7 = Apply Fold_6989586621680453408Sym0 a_a63y7; type FoldMap a_a63yj a_a63yk = Apply (Apply FoldMap_6989586621680453421Sym0 a_a63yj) a_a63yk; type Foldr a_a63yG a_a63yH a_a63yI = Apply (Apply (Apply Foldr_6989586621680453445Sym0 a_a63yG) a_a63yH) a_a63yI; type Foldr' a_a63za a_a63zb a_a63zc = Apply (Apply (Apply Foldr'_6989586621680453475Sym0 a_a63za) a_a63zb) a_a63zc; type Foldl a_a63zz a_a63zA a_a63zB = Apply (Apply (Apply Foldl_6989586621680453500Sym0 a_a63zz) a_a63zA) a_a63zB; type Foldl' a_a63A3 a_a63A4 a_a63A5 = Apply (Apply (Apply Foldl'_6989586621680453530Sym0 a_a63A3) a_a63A4) a_a63A5; type Foldr1 a_a63Au a_a63Av = Apply (Apply Foldr1_6989586621680453556Sym0 a_a63Au) a_a63Av; type Foldl1 a_a63AT a_a63AU = Apply (Apply Foldl1_6989586621680453581Sym0 a_a63AT) a_a63AU; type ToList a_a63B4 = Apply ToList_6989586621680453591Sym0 a_a63B4; type Null a_a63Bp = Apply Null_6989586621680453612Sym0 a_a63Bp; type Length a_a63BL = Apply Length_6989586621680453634Sym0 a_a63BL; type Elem a_a63BZ a_a63C0 = Apply (Apply Elem_6989586621680453649Sym0 a_a63BZ) a_a63C0; type Maximum a_a63Ce = Apply Maximum_6989586621680453663Sym0 a_a63Ce; type Minimum a_a63Cr = Apply Minimum_6989586621680453676Sym0 a_a63Cr; type Sum a_a63CE = Apply Sum_6989586621680453689Sym0 a_a63CE; type Product a_a63CR = Apply Product_6989586621680453702Sym0 a_a63CR; } class SFoldable (t_a63n5 :: Type -> Type) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). SFoldable t_a63n5 => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). SFoldable t_a63n5 => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). SFoldable t_a63n5 => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). SFoldable t_a63n5 => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) sFoldMap :: forall m_a63n7 a_a63n8 (t_a63T1 :: (~>) a_a63n8 m_a63n7) (t_a63T2 :: t_a63n5 a_a63n8). (SFoldable t_a63n5, (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) ~ Apply (Apply FoldMap_6989586621680453421Sym0 t_a63T1) t_a63T2, SMonoid m_a63n7) => Sing t_a63T1 -> Sing t_a63T2 -> Sing (Apply (Apply FoldMapSym0 t_a63T1) t_a63T2 :: m_a63n7) sFoldr :: forall a_a63n9 b_a63na (t_a63T5 :: (~>) a_a63n9 ((~>) b_a63na b_a63na)) (t_a63T6 :: b_a63na) (t_a63T7 :: t_a63n5 a_a63n9). (SFoldable t_a63n5, (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) ~ Apply (Apply (Apply Foldr_6989586621680453445Sym0 t_a63T5) t_a63T6) t_a63T7) => Sing t_a63T5 -> Sing t_a63T6 -> Sing t_a63T7 -> Sing (Apply (Apply (Apply FoldrSym0 t_a63T5) t_a63T6) t_a63T7 :: b_a63na) sFoldl :: forall b_a63nd a_a63ne (t_a63Th :: (~>) b_a63nd ((~>) a_a63ne b_a63nd)) (t_a63Ti :: b_a63nd) (t_a63Tj :: t_a63n5 a_a63ne). (SFoldable t_a63n5, (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) ~ Apply (Apply (Apply Foldl_6989586621680453500Sym0 t_a63Th) t_a63Ti) t_a63Tj) => Sing t_a63Th -> Sing t_a63Ti -> Sing t_a63Tj -> Sing (Apply (Apply (Apply FoldlSym0 t_a63Th) t_a63Ti) t_a63Tj :: b_a63nd) sFoldr1 :: forall a_a63nh (t_a63Tt :: (~>) a_a63nh ((~>) a_a63nh a_a63nh)) (t_a63Tu :: t_a63n5 a_a63nh). (SFoldable t_a63n5, (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) ~ Apply (Apply Foldr1_6989586621680453556Sym0 t_a63Tt) t_a63Tu) => Sing t_a63Tt -> Sing t_a63Tu -> Sing (Apply (Apply Foldr1Sym0 t_a63Tt) t_a63Tu :: a_a63nh) sFoldl1 :: forall a_a63ni (t_a63Tx :: (~>) a_a63ni ((~>) a_a63ni a_a63ni)) (t_a63Ty :: t_a63n5 a_a63ni). (SFoldable t_a63n5, (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) ~ Apply (Apply Foldl1_6989586621680453581Sym0 t_a63Tx) t_a63Ty) => Sing t_a63Tx -> Sing t_a63Ty -> Sing (Apply (Apply Foldl1Sym0 t_a63Tx) t_a63Ty :: a_a63ni) sElem :: forall a_a63nm (t_a63TH :: a_a63nm) (t_a63TI :: t_a63n5 a_a63nm). (SFoldable t_a63n5, (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) ~ Apply (Apply Elem_6989586621680453649Sym0 t_a63TH) t_a63TI, SEq a_a63nm) => Sing t_a63TH -> Sing t_a63TI -> Sing (Apply (Apply ElemSym0 t_a63TH) t_a63TI :: Bool) sMaximum :: forall a_a63nn (t_a63TL :: t_a63n5 a_a63nn). (SFoldable t_a63n5, (Apply MaximumSym0 t_a63TL :: a_a63nn) ~ Apply Maximum_6989586621680453663Sym0 t_a63TL, SOrd a_a63nn) => Sing t_a63TL -> Sing (Apply MaximumSym0 t_a63TL :: a_a63nn) sMinimum :: forall a_a63no (t_a63TN :: t_a63n5 a_a63no). (SFoldable t_a63n5, (Apply MinimumSym0 t_a63TN :: a_a63no) ~ Apply Minimum_6989586621680453676Sym0 t_a63TN, SOrd a_a63no) => Sing t_a63TN -> Sing (Apply MinimumSym0 t_a63TN :: a_a63no) sSum :: forall a_a63np (t_a63TP :: t_a63n5 a_a63np). (SFoldable t_a63n5, (Apply SumSym0 t_a63TP :: a_a63np) ~ Apply Sum_6989586621680453689Sym0 t_a63TP, SNum a_a63np) => Sing t_a63TP -> Sing (Apply SumSym0 t_a63TP :: a_a63np) sProduct :: forall a_a63nq (t_a63TR :: t_a63n5 a_a63nq). (SFoldable t_a63n5, (Apply ProductSym0 t_a63TR :: a_a63nq) ~ Apply Product_6989586621680453702Sym0 t_a63TR, SNum a_a63nq) => Sing t_a63TR -> Sing (Apply ProductSym0 t_a63TR :: a_a63nq) class (PFunctor t_a7iXU, PFoldable t_a7iXU) => PTraversable (t_a7iXU :: Type -> Type) where { type family Traverse (arg_a7iY6 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (arg_a7iY7 :: t_a7iXU a_a7iXW) :: f_a7iXV (t_a7iXU b_a7iXX); type family SequenceA (arg_a7iYa :: t_a7iXU (f_a7iXY a_a7iXZ)) :: f_a7iXY (t_a7iXU a_a7iXZ); type family MapM (arg_a7iYc :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (arg_a7iYd :: t_a7iXU a_a7iY1) :: m_a7iY0 (t_a7iXU b_a7iY2); type family Sequence (arg_a7iYg :: t_a7iXU (m_a7iY3 a_a7iY4)) :: m_a7iY3 (t_a7iXU a_a7iY4); type Traverse a_a7iYq a_a7iYr = Apply (Apply Traverse_6989586621680751028Sym0 a_a7iYq) a_a7iYr; type SequenceA a_a7iYB = Apply SequenceA_6989586621680751038Sym0 a_a7iYB; type MapM a_a7iYP a_a7iYQ = Apply (Apply MapM_6989586621680751053Sym0 a_a7iYP) a_a7iYQ; type Sequence a_a7iZ0 = Apply Sequence_6989586621680751063Sym0 a_a7iZ0; } class (SFunctor t_a7iXU, SFoldable t_a7iXU) => STraversable (t_a7iXU :: Type -> Type) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) sTraverse :: forall f_a7iXV a_a7iXW b_a7iXX (t_a7iZ4 :: (~>) a_a7iXW (f_a7iXV b_a7iXX)) (t_a7iZ5 :: t_a7iXU a_a7iXW). (STraversable t_a7iXU, (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) ~ Apply (Apply Traverse_6989586621680751028Sym0 t_a7iZ4) t_a7iZ5, SApplicative f_a7iXV) => Sing t_a7iZ4 -> Sing t_a7iZ5 -> Sing (Apply (Apply TraverseSym0 t_a7iZ4) t_a7iZ5 :: f_a7iXV (t_a7iXU b_a7iXX)) sSequenceA :: forall f_a7iXY a_a7iXZ (t_a7iZ8 :: t_a7iXU (f_a7iXY a_a7iXZ)). (STraversable t_a7iXU, (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) ~ Apply SequenceA_6989586621680751038Sym0 t_a7iZ8, SApplicative f_a7iXY) => Sing t_a7iZ8 -> Sing (Apply SequenceASym0 t_a7iZ8 :: f_a7iXY (t_a7iXU a_a7iXZ)) sMapM :: forall m_a7iY0 a_a7iY1 b_a7iY2 (t_a7iZa :: (~>) a_a7iY1 (m_a7iY0 b_a7iY2)) (t_a7iZb :: t_a7iXU a_a7iY1). (STraversable t_a7iXU, (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) ~ Apply (Apply MapM_6989586621680751053Sym0 t_a7iZa) t_a7iZb, SMonad m_a7iY0) => Sing t_a7iZa -> Sing t_a7iZb -> Sing (Apply (Apply MapMSym0 t_a7iZa) t_a7iZb :: m_a7iY0 (t_a7iXU b_a7iY2)) sSequence :: forall m_a7iY3 a_a7iY4 (t_a7iZe :: t_a7iXU (m_a7iY3 a_a7iY4)). (STraversable t_a7iXU, (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) ~ Apply Sequence_6989586621680751063Sym0 t_a7iZe, SMonad m_a7iY3) => Sing t_a7iZe -> Sing (Apply SequenceSym0 t_a7iZe :: m_a7iY3 (t_a7iXU a_a7iY4)) type family Id (a_a291e :: a_a28Y5) :: a_a28Y5 sId :: forall a_a28Y5 (t_a292r :: a_a28Y5). Sing t_a292r -> Sing (Apply IdSym0 t_a292r :: a_a28Y5) type family Const (a_a290Z :: a_a28Y3) (a_a2910 :: b_a28Y4) :: a_a28Y3 sConst :: forall a_a28Y3 b_a28Y4 (t_a292j :: a_a28Y3) (t_a292k :: b_a28Y4). Sing t_a292j -> Sing t_a292k -> Sing (Apply (Apply ConstSym0 t_a292j) t_a292k :: a_a28Y3) type family (:.) (a_a290G :: (~>) b_a28Y0 c_a28Y1) (a_a290H :: (~>) a_a28Y2 b_a28Y0) (a_a290I :: a_a28Y2) :: c_a28Y1 infixr 9 :. (%.) :: forall b_a28Y0 c_a28Y1 a_a28Y2 (t_a292d :: (~>) b_a28Y0 c_a28Y1) (t_a292e :: (~>) a_a28Y2 b_a28Y0) (t_a292f :: a_a28Y2). Sing t_a292d -> Sing t_a292e -> Sing t_a292f -> Sing (Apply (Apply (Apply (.@#@$) t_a292d) t_a292e) t_a292f :: c_a28Y1) infixr 9 %. type family ($) (a_a290r :: (~>) a_a28XU b_a28XV) (a_a290s :: a_a28XU) :: b_a28XV infixr 0 $ (%$) :: forall a_a28XU b_a28XV (t_a2923 :: (~>) a_a28XU b_a28XV) (t_a2924 :: a_a28XU). Sing t_a2923 -> Sing t_a2924 -> Sing (Apply (Apply ($@#@$) t_a2923) t_a2924 :: b_a28XV) infixr 0 %$ type family ($!) (a_a290i :: (~>) a_a28XS b_a28XT) (a_a290j :: a_a28XS) :: b_a28XT infixr 0 $! (%$!) :: forall a_a28XS b_a28XT (t_a291Z :: (~>) a_a28XS b_a28XT) (t_a2920 :: a_a28XS). Sing t_a291Z -> Sing t_a2920 -> Sing (Apply (Apply ($!@#@$) t_a291Z) t_a2920 :: b_a28XT) infixr 0 %$! type family Flip (a_a290x :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (a_a290y :: b_a28XY) (a_a290z :: a_a28XX) :: c_a28XZ sFlip :: forall a_a28XX b_a28XY c_a28XZ (t_a2927 :: (~>) a_a28XX ((~>) b_a28XY c_a28XZ)) (t_a2928 :: b_a28XY) (t_a2929 :: a_a28XX). Sing t_a2927 -> Sing t_a2928 -> Sing t_a2929 -> Sing (Apply (Apply (Apply FlipSym0 t_a2927) t_a2928) t_a2929 :: c_a28XZ) type family AsTypeOf (a_a2918 :: a_a28XW) (a_a2919 :: a_a28XW) :: a_a28XW sAsTypeOf :: forall a_a28XW (t_a292n :: a_a28XW) (t_a292o :: a_a28XW). Sing t_a292n -> Sing t_a292o -> Sing (Apply (Apply AsTypeOfSym0 t_a292n) t_a292o :: a_a28XW) type family Seq (a_a28ZN :: a_a28XP) (a_a28ZO :: b_a28XQ) :: b_a28XQ infixr 0 `Seq` sSeq :: forall a_a28XP b_a28XQ (t_a291P :: a_a28XP) (t_a291Q :: b_a28XQ). Sing t_a291P -> Sing t_a291Q -> Sing (Apply (Apply SeqSym0 t_a291P) t_a291Q :: b_a28XQ) infixr 0 `sSeq` type family Map (a_a291p :: (~>) a_a28Y7 b_a28Y8) (a_a291q :: [a_a28Y7]) :: [b_a28Y8] sMap :: forall a_a28Y7 b_a28Y8 (t_a292x :: (~>) a_a28Y7 b_a28Y8) (t_a292y :: [a_a28Y7]). Sing t_a292x -> Sing t_a292y -> Sing (Apply (Apply MapSym0 t_a292x) t_a292y :: [b_a28Y8]) type family (++) (a_a291h :: [a_a28Y6]) (a_a291i :: [a_a28Y6]) :: [a_a28Y6] infixr 5 ++ (%++) :: forall a_a28Y6 (t_a292t :: [a_a28Y6]) (t_a292u :: [a_a28Y6]). Sing t_a292t -> Sing t_a292u -> Sing (Apply (Apply (++@#@$) t_a292t) t_a292u :: [a_a28Y6]) infixr 5 %++ type family Filter (a_a3Wu5 :: (~>) a_a3U0c Bool) (a_a3Wu6 :: [a_a3U0c]) :: [a_a3U0c] sFilter :: forall a_a3U0c (t_a3WMI :: (~>) a_a3U0c Bool) (t_a3WMJ :: [a_a3U0c]). Sing t_a3WMI -> Sing t_a3WMJ -> Sing (Apply (Apply FilterSym0 t_a3WMI) t_a3WMJ :: [a_a3U0c]) type family Head (a_a3WLn :: [a_a3U1E]) :: a_a3U1E sHead :: forall a_a3U1E (t_a3WQW :: [a_a3U1E]). Sing t_a3WQW -> Sing (Apply HeadSym0 t_a3WQW :: a_a3U1E) type family Last (a_a3WLi :: [a_a3U1D]) :: a_a3U1D sLast :: forall a_a3U1D (t_a3WQU :: [a_a3U1D]). Sing t_a3WQU -> Sing (Apply LastSym0 t_a3WQU :: a_a3U1D) type family Tail (a_a3WLf :: [a_a3U1C]) :: [a_a3U1C] sTail :: forall a_a3U1C (t_a3WQS :: [a_a3U1C]). Sing t_a3WQS -> Sing (Apply TailSym0 t_a3WQS :: [a_a3U1C]) type family Init (a_a3WL1 :: [a_a3U1B]) :: [a_a3U1B] sInit :: forall a_a3U1B (t_a3WQQ :: [a_a3U1B]). Sing t_a3WQQ -> Sing (Apply InitSym0 t_a3WQQ :: [a_a3U1B]) type family Null (arg_a63xM :: t_a63n5 a_a63nk) :: Bool sNull :: forall a_a63nk (t_a63TD :: t_a63n5 a_a63nk). SFoldable t_a63n5 => Sing t_a63TD -> Sing (Apply NullSym0 t_a63TD :: Bool) type family Reverse (a_a3WKg :: [a_a3U1z]) :: [a_a3U1z] sReverse :: forall a_a3U1z (t_a3WQE :: [a_a3U1z]). Sing t_a3WQE -> Sing (Apply ReverseSym0 t_a3WQE :: [a_a3U1z]) type family And (a_a63uV :: t_a63lO Bool) :: Bool sAnd :: forall t_a63lO (t_a63RC :: t_a63lO Bool). SFoldable t_a63lO => Sing t_a63RC -> Sing (Apply AndSym0 t_a63RC :: Bool) type family Or (a_a63uM :: t_a63lN Bool) :: Bool sOr :: forall t_a63lN (t_a63RA :: t_a63lN Bool). SFoldable t_a63lN => Sing t_a63RA -> Sing (Apply OrSym0 t_a63RA :: Bool) type family Any (a_a63uz :: (~>) a_a63lM Bool) (a_a63uA :: t_a63lL a_a63lM) :: Bool sAny :: forall t_a63lL a_a63lM (t_a63Rw :: (~>) a_a63lM Bool) (t_a63Rx :: t_a63lL a_a63lM). SFoldable t_a63lL => Sing t_a63Rw -> Sing t_a63Rx -> Sing (Apply (Apply AnySym0 t_a63Rw) t_a63Rx :: Bool) type family All (a_a63um :: (~>) a_a63lK Bool) (a_a63un :: t_a63lJ a_a63lK) :: Bool sAll :: forall t_a63lJ a_a63lK (t_a63Rs :: (~>) a_a63lK Bool) (t_a63Rt :: t_a63lJ a_a63lK). SFoldable t_a63lJ => Sing t_a63Rs -> Sing t_a63Rt -> Sing (Apply (Apply AllSym0 t_a63Rs) t_a63Rt :: Bool) type family Concat (a_a63vk :: t_a63lS [a_a63lT]) :: [a_a63lT] sConcat :: forall t_a63lS a_a63lT (t_a63RI :: t_a63lS [a_a63lT]). SFoldable t_a63lS => Sing t_a63RI -> Sing (Apply ConcatSym0 t_a63RI :: [a_a63lT]) type family ConcatMap (a_a63v4 :: (~>) a_a63lQ [b_a63lR]) (a_a63v5 :: t_a63lP a_a63lQ) :: [b_a63lR] sConcatMap :: forall t_a63lP a_a63lQ b_a63lR (t_a63RE :: (~>) a_a63lQ [b_a63lR]) (t_a63RF :: t_a63lP a_a63lQ). SFoldable t_a63lP => Sing t_a63RE -> Sing t_a63RF -> Sing (Apply (Apply ConcatMapSym0 t_a63RE) t_a63RF :: [b_a63lR]) type family Scanl (a_a3WEk :: (~>) b_a3U1h ((~>) a_a3U1i b_a3U1h)) (a_a3WEl :: b_a3U1h) (a_a3WEm :: [a_a3U1i]) :: [b_a3U1h] sScanl :: forall b_a3U1h a_a3U1i (t_a3WPc :: (~>) b_a3U1h ((~>) a_a3U1i b_a3U1h)) (t_a3WPd :: b_a3U1h) (t_a3WPe :: [a_a3U1i]). Sing t_a3WPc -> Sing t_a3WPd -> Sing t_a3WPe -> Sing (Apply (Apply (Apply ScanlSym0 t_a3WPc) t_a3WPd) t_a3WPe :: [b_a3U1h]) type family Scanl1 (a_a3WEy :: (~>) a_a3U1g ((~>) a_a3U1g a_a3U1g)) (a_a3WEz :: [a_a3U1g]) :: [a_a3U1g] sScanl1 :: forall a_a3U1g (t_a3WPi :: (~>) a_a3U1g ((~>) a_a3U1g a_a3U1g)) (t_a3WPj :: [a_a3U1g]). Sing t_a3WPi -> Sing t_a3WPj -> Sing (Apply (Apply Scanl1Sym0 t_a3WPi) t_a3WPj :: [a_a3U1g]) type family Scanr (a_a3WDZ :: (~>) a_a3U1e ((~>) b_a3U1f b_a3U1f)) (a_a3WE0 :: b_a3U1f) (a_a3WE1 :: [a_a3U1e]) :: [b_a3U1f] sScanr :: forall a_a3U1e b_a3U1f (t_a3WP6 :: (~>) a_a3U1e ((~>) b_a3U1f b_a3U1f)) (t_a3WP7 :: b_a3U1f) (t_a3WP8 :: [a_a3U1e]). Sing t_a3WP6 -> Sing t_a3WP7 -> Sing t_a3WP8 -> Sing (Apply (Apply (Apply ScanrSym0 t_a3WP6) t_a3WP7) t_a3WP8 :: [b_a3U1f]) type family Scanr1 (a_a3WDB :: (~>) a_a3U1d ((~>) a_a3U1d a_a3U1d)) (a_a3WDC :: [a_a3U1d]) :: [a_a3U1d] sScanr1 :: forall a_a3U1d (t_a3WP2 :: (~>) a_a3U1d ((~>) a_a3U1d a_a3U1d)) (t_a3WP3 :: [a_a3U1d]). Sing t_a3WP2 -> Sing t_a3WP3 -> Sing (Apply (Apply Scanr1Sym0 t_a3WP2) t_a3WP3 :: [a_a3U1d]) type family Replicate (a_a3WpL :: Nat) (a_a3WpM :: a_a3TZJ) :: [a_a3TZJ] sReplicate :: forall a_a3TZJ (t_a3WLM :: Nat) (t_a3WLN :: a_a3TZJ). Sing t_a3WLM -> Sing t_a3WLN -> Sing (Apply (Apply ReplicateSym0 t_a3WLM) t_a3WLN :: [a_a3TZJ]) type family Take (a_a3Wrj :: Nat) (a_a3Wrk :: [a_a3TZZ]) :: [a_a3TZZ] sTake :: forall a_a3TZZ (t_a3WMe :: Nat) (t_a3WMf :: [a_a3TZZ]). Sing t_a3WMe -> Sing t_a3WMf -> Sing (Apply (Apply TakeSym0 t_a3WMe) t_a3WMf :: [a_a3TZZ]) type family Drop (a_a3Wr5 :: Nat) (a_a3Wr6 :: [a_a3TZY]) :: [a_a3TZY] sDrop :: forall a_a3TZY (t_a3WMa :: Nat) (t_a3WMb :: [a_a3TZY]). Sing t_a3WMa -> Sing t_a3WMb -> Sing (Apply (Apply DropSym0 t_a3WMa) t_a3WMb :: [a_a3TZY]) type family SplitAt (a_a3Wrx :: Nat) (a_a3Wry :: [a_a3TZX]) :: ([a_a3TZX], [a_a3TZX]) sSplitAt :: forall a_a3TZX (t_a3WMi :: Nat) (t_a3WMj :: [a_a3TZX]). Sing t_a3WMi -> Sing t_a3WMj -> Sing (Apply (Apply SplitAtSym0 t_a3WMi) t_a3WMj :: ([a_a3TZX], [a_a3TZX])) type family TakeWhile (a_a3WtR :: (~>) a_a3U04 Bool) (a_a3WtS :: [a_a3U04]) :: [a_a3U04] sTakeWhile :: forall a_a3U04 (t_a3WME :: (~>) a_a3U04 Bool) (t_a3WMF :: [a_a3U04]). Sing t_a3WME -> Sing t_a3WMF -> Sing (Apply (Apply TakeWhileSym0 t_a3WME) t_a3WMF :: [a_a3U04]) type family Span (a_a3Wsk :: (~>) a_a3U01 Bool) (a_a3Wsl :: [a_a3U01]) :: ([a_a3U01], [a_a3U01]) sSpan :: forall a_a3U01 (t_a3WMq :: (~>) a_a3U01 Bool) (t_a3WMr :: [a_a3U01]). Sing t_a3WMq -> Sing t_a3WMr -> Sing (Apply (Apply SpanSym0 t_a3WMq) t_a3WMr :: ([a_a3U01], [a_a3U01])) type family Break (a_a3WrD :: (~>) a_a3U00 Bool) (a_a3WrE :: [a_a3U00]) :: ([a_a3U00], [a_a3U00]) sBreak :: forall a_a3U00 (t_a3WMm :: (~>) a_a3U00 Bool) (t_a3WMn :: [a_a3U00]). Sing t_a3WMm -> Sing t_a3WMn -> Sing (Apply (Apply BreakSym0 t_a3WMm) t_a3WMn :: ([a_a3U00], [a_a3U00])) type family NotElem (a_a63tq :: a_a63lE) (a_a63tr :: t_a63lD a_a63lE) :: Bool sNotElem :: forall t_a63lD a_a63lE (t_a63Rg :: a_a63lE) (t_a63Rh :: t_a63lD a_a63lE). (SFoldable t_a63lD, SEq a_a63lE) => Sing t_a63Rg -> Sing t_a63Rh -> Sing (Apply (Apply NotElemSym0 t_a63Rg) t_a63Rh :: Bool) type family Lookup (a_a3WqO :: a_a3TZP) (a_a3WqP :: [(a_a3TZP, b_a3TZQ)]) :: Maybe b_a3TZQ sLookup :: forall a_a3TZP b_a3TZQ (t_a3WM6 :: a_a3TZP) (t_a3WM7 :: [(a_a3TZP, b_a3TZQ)]). SEq a_a3TZP => Sing t_a3WM6 -> Sing t_a3WM7 -> Sing (Apply (Apply LookupSym0 t_a3WM6) t_a3WM7 :: Maybe b_a3TZQ) type family Zip (a_a3Wzs :: [a_a3U0W]) (a_a3Wzt :: [b_a3U0X]) :: [(a_a3U0W, b_a3U0X)] sZip :: forall a_a3U0W b_a3U0X (t_a3WOa :: [a_a3U0W]) (t_a3WOb :: [b_a3U0X]). Sing t_a3WOa -> Sing t_a3WOb -> Sing (Apply (Apply ZipSym0 t_a3WOa) t_a3WOb :: [(a_a3U0W, b_a3U0X)]) type family Zip3 (a_a3Wzg :: [a_a3U0T]) (a_a3Wzh :: [b_a3U0U]) (a_a3Wzi :: [c_a3U0V]) :: [(a_a3U0T, b_a3U0U, c_a3U0V)] sZip3 :: forall a_a3U0T b_a3U0U c_a3U0V (t_a3WO4 :: [a_a3U0T]) (t_a3WO5 :: [b_a3U0U]) (t_a3WO6 :: [c_a3U0V]). Sing t_a3WO4 -> Sing t_a3WO5 -> Sing t_a3WO6 -> Sing (Apply (Apply (Apply Zip3Sym0 t_a3WO4) t_a3WO5) t_a3WO6 :: [(a_a3U0T, b_a3U0U, c_a3U0V)]) type family ZipWith (a_a3Wz5 :: (~>) a_a3U0Q ((~>) b_a3U0R c_a3U0S)) (a_a3Wz6 :: [a_a3U0Q]) (a_a3Wz7 :: [b_a3U0R]) :: [c_a3U0S] sZipWith :: forall a_a3U0Q b_a3U0R c_a3U0S (t_a3WNY :: (~>) a_a3U0Q ((~>) b_a3U0R c_a3U0S)) (t_a3WNZ :: [a_a3U0Q]) (t_a3WO0 :: [b_a3U0R]). Sing t_a3WNY -> Sing t_a3WNZ -> Sing t_a3WO0 -> Sing (Apply (Apply (Apply ZipWithSym0 t_a3WNY) t_a3WNZ) t_a3WO0 :: [c_a3U0S]) type family ZipWith3 (a_a3WyQ :: (~>) a_a3U0M ((~>) b_a3U0N ((~>) c_a3U0O d_a3U0P))) (a_a3WyR :: [a_a3U0M]) (a_a3WyS :: [b_a3U0N]) (a_a3WyT :: [c_a3U0O]) :: [d_a3U0P] sZipWith3 :: forall a_a3U0M b_a3U0N c_a3U0O d_a3U0P (t_a3WNQ :: (~>) a_a3U0M ((~>) b_a3U0N ((~>) c_a3U0O d_a3U0P))) (t_a3WNR :: [a_a3U0M]) (t_a3WNS :: [b_a3U0N]) (t_a3WNT :: [c_a3U0O]). Sing t_a3WNQ -> Sing t_a3WNR -> Sing t_a3WNS -> Sing t_a3WNT -> Sing (Apply (Apply (Apply (Apply ZipWith3Sym0 t_a3WNQ) t_a3WNR) t_a3WNS) t_a3WNT :: [d_a3U0P]) type family Unzip (a_a3Wyx :: [(a_a3U0K, b_a3U0L)]) :: ([a_a3U0K], [b_a3U0L]) sUnzip :: forall a_a3U0K b_a3U0L (t_a3WNO :: [(a_a3U0K, b_a3U0L)]). Sing t_a3WNO -> Sing (Apply UnzipSym0 t_a3WNO :: ([a_a3U0K], [b_a3U0L])) type family Unzip3 (a_a3Wyc :: [(a_a3U0H, b_a3U0I, c_a3U0J)]) :: ([a_a3U0H], [b_a3U0I], [c_a3U0J]) sUnzip3 :: forall a_a3U0H b_a3U0I c_a3U0J (t_a3WNM :: [(a_a3U0H, b_a3U0I, c_a3U0J)]). Sing t_a3WNM -> Sing (Apply Unzip3Sym0 t_a3WNM :: ([a_a3U0H], [b_a3U0I], [c_a3U0J])) type family Unlines (a_a3Wws :: [Symbol]) :: Symbol sUnlines :: forall (t_a3WNC :: [Symbol]). Sing t_a3WNC -> Sing (Apply UnlinesSym0 t_a3WNC :: Symbol) type family Unwords (a_a3Wwh :: [Symbol]) :: Symbol sUnwords :: forall (t_a3WNA :: [Symbol]). Sing t_a3WNA -> Sing (Apply UnwordsSym0 t_a3WNA :: Symbol) type family Maybe_ (a_a224s :: b_a224a) (a_a224t :: (~>) a_a224b b_a224a) (a_a224u :: Maybe a_a224b) :: b_a224a sMaybe_ :: forall b_a224a a_a224b (t_a224B :: b_a224a) (t_a224C :: (~>) a_a224b b_a224a) (t_a224D :: Maybe a_a224b). Sing t_a224B -> Sing t_a224C -> Sing t_a224D -> Sing (Apply (Apply (Apply Maybe_Sym0 t_a224B) t_a224C) t_a224D :: b_a224a) type family Either_ (a_a5Ybd :: (~>) a_a5YaD c_a5YaE) (a_a5Ybe :: (~>) b_a5YaF c_a5YaE) (a_a5Ybf :: Either a_a5YaD b_a5YaF) :: c_a5YaE sEither_ :: forall a_a5YaD c_a5YaE b_a5YaF (t_a5Ybn :: (~>) a_a5YaD c_a5YaE) (t_a5Ybo :: (~>) b_a5YaF c_a5YaE) (t_a5Ybp :: Either a_a5YaD b_a5YaF). Sing t_a5Ybn -> Sing t_a5Ybo -> Sing t_a5Ybp -> Sing (Apply (Apply (Apply Either_Sym0 t_a5Ybn) t_a5Ybo) t_a5Ybp :: c_a5YaE) type family Fst (a_a1s6S :: (a_a1s5k, b_a1s5l)) :: a_a1s5k sFst :: forall a_a1s5k b_a1s5l (t_a1s7b :: (a_a1s5k, b_a1s5l)). Sing t_a1s7b -> Sing (Apply FstSym0 t_a1s7b :: a_a1s5k) type family Snd (a_a1s6P :: (a_a1s5i, b_a1s5j)) :: b_a1s5j sSnd :: forall a_a1s5i b_a1s5j (t_a1s79 :: (a_a1s5i, b_a1s5j)). Sing t_a1s79 -> Sing (Apply SndSym0 t_a1s79 :: b_a1s5j) type family Curry (a_a1s6G :: (~>) (a_a1s5f, b_a1s5g) c_a1s5h) (a_a1s6H :: a_a1s5f) (a_a1s6I :: b_a1s5g) :: c_a1s5h sCurry :: forall a_a1s5f b_a1s5g c_a1s5h (t_a1s73 :: (~>) (a_a1s5f, b_a1s5g) c_a1s5h) (t_a1s74 :: a_a1s5f) (t_a1s75 :: b_a1s5g). Sing t_a1s73 -> Sing t_a1s74 -> Sing t_a1s75 -> Sing (Apply (Apply (Apply CurrySym0 t_a1s73) t_a1s74) t_a1s75 :: c_a1s5h) type family Uncurry (a_a1s6V :: (~>) a_a1s5c ((~>) b_a1s5d c_a1s5e)) (a_a1s6W :: (a_a1s5c, b_a1s5d)) :: c_a1s5e sUncurry :: forall a_a1s5c b_a1s5d c_a1s5e (t_a1s7d :: (~>) a_a1s5c ((~>) b_a1s5d c_a1s5e)) (t_a1s7e :: (a_a1s5c, b_a1s5d)). Sing t_a1s7d -> Sing t_a1s7e -> Sing (Apply (Apply UncurrySym0 t_a1s7d) t_a1s7e :: c_a1s5e) -- | (Kind) This is the kind of type-level symbols. Declared here because -- class IP needs it data Symbol either_ :: (a_a5YaD -> c_a5YaE) -> (b_a5YaF -> c_a5YaE) -> Either a_a5YaD b_a5YaF -> c_a5YaE maybe_ :: b_a224a -> (a_a224b -> b_a224a) -> Maybe a_a224b -> b_a224a bool_ :: a_a1tMz -> a_a1tMz -> Bool -> a_a1tMz -- | 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 (a6989586621679363899 :: Bool) = Not a6989586621679363899 data (&&@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 3 &&@#@$ data (&&@#@$$) (a6989586621679363358 :: Bool) :: (~>) Bool Bool infixr 3 &&@#@$$ type (&&@#@$$$) (a6989586621679363358 :: Bool) (b6989586621679363359 :: Bool) = (&&) a6989586621679363358 b6989586621679363359 data (||@#@$) :: (~>) Bool ((~>) Bool Bool) infixr 2 ||@#@$ data (||@#@$$) (a6989586621679363599 :: Bool) :: (~>) Bool Bool infixr 2 ||@#@$$ type (||@#@$$$) (a6989586621679363599 :: Bool) (b6989586621679363600 :: Bool) = (||) a6989586621679363599 b6989586621679363600 type OtherwiseSym0 = Otherwise type NothingSym0 = 'Nothing data JustSym0 :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 (Maybe (a3530822107858468865 :: Type)) type JustSym1 (t6989586621679298894 :: a3530822107858468865) = 'Just t6989586621679298894 data Maybe_Sym0 :: forall a6989586621679494395 b6989586621679494394. (~>) b6989586621679494394 ((~>) ((~>) a6989586621679494395 b6989586621679494394) ((~>) (Maybe a6989586621679494395) b6989586621679494394)) data Maybe_Sym1 (a6989586621679494412 :: b6989586621679494394) :: forall a6989586621679494395. (~>) ((~>) a6989586621679494395 b6989586621679494394) ((~>) (Maybe a6989586621679494395) b6989586621679494394) data Maybe_Sym2 (a6989586621679494412 :: b6989586621679494394) (a6989586621679494413 :: (~>) a6989586621679494395 b6989586621679494394) :: (~>) (Maybe a6989586621679494395) b6989586621679494394 type Maybe_Sym3 (a6989586621679494412 :: b6989586621679494394) (a6989586621679494413 :: (~>) a6989586621679494395 b6989586621679494394) (a6989586621679494414 :: Maybe a6989586621679494395) = Maybe_ a6989586621679494412 a6989586621679494413 a6989586621679494414 data LeftSym0 :: forall (a6989586621679089135 :: Type) (b6989586621679089136 :: Type). (~>) a6989586621679089135 (Either (a6989586621679089135 :: Type) (b6989586621679089136 :: Type)) type LeftSym1 (t6989586621679298961 :: a6989586621679089135) = 'Left t6989586621679298961 data RightSym0 :: forall (a6989586621679089135 :: Type) (b6989586621679089136 :: Type). (~>) b6989586621679089136 (Either (a6989586621679089135 :: Type) (b6989586621679089136 :: Type)) type RightSym1 (t6989586621679298963 :: b6989586621679089136) = 'Right t6989586621679298963 data Either_Sym0 :: forall a6989586621680432731 b6989586621680432733 c6989586621680432732. (~>) ((~>) a6989586621680432731 c6989586621680432732) ((~>) ((~>) b6989586621680432733 c6989586621680432732) ((~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732)) data Either_Sym1 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) :: forall b6989586621680432733. (~>) ((~>) b6989586621680432733 c6989586621680432732) ((~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732) data Either_Sym2 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) (a6989586621680432768 :: (~>) b6989586621680432733 c6989586621680432732) :: (~>) (Either a6989586621680432731 b6989586621680432733) c6989586621680432732 type Either_Sym3 (a6989586621680432767 :: (~>) a6989586621680432731 c6989586621680432732) (a6989586621680432768 :: (~>) b6989586621680432733 c6989586621680432732) (a6989586621680432769 :: Either a6989586621680432731 b6989586621680432733) = Either_ a6989586621680432767 a6989586621680432768 a6989586621680432769 type Tuple0Sym0 = '() data Tuple2Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type))) data Tuple2Sym1 (t6989586621679299010 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type). (~>) b3530822107858468866 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type)) type Tuple2Sym2 (t6989586621679299010 :: a3530822107858468865) (t6989586621679299011 :: b3530822107858468866) = '(t6989586621679299010, t6989586621679299011) data Tuple3Sym0 :: forall (a3530822107858468865 :: Type) (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) a3530822107858468865 ((~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)))) data Tuple3Sym1 (t6989586621679299041 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type))) data Tuple3Sym2 (t6989586621679299041 :: (a3530822107858468865 :: Type)) (t6989586621679299042 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type). (~>) c3530822107858468867 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type)) type Tuple3Sym3 (t6989586621679299041 :: a3530822107858468865) (t6989586621679299042 :: b3530822107858468866) (t6989586621679299043 :: c3530822107858468867) = '(t6989586621679299041, t6989586621679299042, t6989586621679299043) 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 (t6989586621679299088 :: (a3530822107858468865 :: Type)) :: forall (b3530822107858468866 :: Type) (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) b3530822107858468866 ((~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)))) data Tuple4Sym2 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type))) data Tuple4Sym3 (t6989586621679299088 :: (a3530822107858468865 :: Type)) (t6989586621679299089 :: (b3530822107858468866 :: Type)) (t6989586621679299090 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type). (~>) d3530822107858468868 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type)) type Tuple4Sym4 (t6989586621679299088 :: a3530822107858468865) (t6989586621679299089 :: b3530822107858468866) (t6989586621679299090 :: c3530822107858468867) (t6989586621679299091 :: d3530822107858468868) = '(t6989586621679299088, t6989586621679299089, t6989586621679299090, t6989586621679299091) 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 (t6989586621679299153 :: (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 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) :: forall (c3530822107858468867 :: Type) (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) c3530822107858468867 ((~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)))) data Tuple5Sym3 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) :: forall (d3530822107858468868 :: Type) (e3530822107858468869 :: Type). (~>) d3530822107858468868 ((~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type))) data Tuple5Sym4 (t6989586621679299153 :: (a3530822107858468865 :: Type)) (t6989586621679299154 :: (b3530822107858468866 :: Type)) (t6989586621679299155 :: (c3530822107858468867 :: Type)) (t6989586621679299156 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type). (~>) e3530822107858468869 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type)) type Tuple5Sym5 (t6989586621679299153 :: a3530822107858468865) (t6989586621679299154 :: b3530822107858468866) (t6989586621679299155 :: c3530822107858468867) (t6989586621679299156 :: d3530822107858468868) (t6989586621679299157 :: e3530822107858468869) = '(t6989586621679299153, t6989586621679299154, t6989586621679299155, t6989586621679299156, t6989586621679299157) 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 (t6989586621679299238 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (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 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) :: forall (e3530822107858468869 :: Type) (f3530822107858468870 :: Type). (~>) e3530822107858468869 ((~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type))) data Tuple6Sym5 (t6989586621679299238 :: (a3530822107858468865 :: Type)) (t6989586621679299239 :: (b3530822107858468866 :: Type)) (t6989586621679299240 :: (c3530822107858468867 :: Type)) (t6989586621679299241 :: (d3530822107858468868 :: Type)) (t6989586621679299242 :: (e3530822107858468869 :: Type)) :: forall (f3530822107858468870 :: Type). (~>) f3530822107858468870 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type)) type Tuple6Sym6 (t6989586621679299238 :: a3530822107858468865) (t6989586621679299239 :: b3530822107858468866) (t6989586621679299240 :: c3530822107858468867) (t6989586621679299241 :: d3530822107858468868) (t6989586621679299242 :: e3530822107858468869) (t6989586621679299243 :: f3530822107858468870) = '(t6989586621679299238, t6989586621679299239, t6989586621679299240, t6989586621679299241, t6989586621679299242, t6989586621679299243) 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 (t6989586621679299345 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (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 (t6989586621679299345 :: (a3530822107858468865 :: Type)) (t6989586621679299346 :: (b3530822107858468866 :: Type)) (t6989586621679299347 :: (c3530822107858468867 :: Type)) (t6989586621679299348 :: (d3530822107858468868 :: Type)) (t6989586621679299349 :: (e3530822107858468869 :: Type)) (t6989586621679299350 :: (f3530822107858468870 :: Type)) :: forall (g3530822107858468871 :: Type). (~>) g3530822107858468871 ((a3530822107858468865 :: Type), (b3530822107858468866 :: Type), (c3530822107858468867 :: Type), (d3530822107858468868 :: Type), (e3530822107858468869 :: Type), (f3530822107858468870 :: Type), (g3530822107858468871 :: Type)) type Tuple7Sym7 (t6989586621679299345 :: a3530822107858468865) (t6989586621679299346 :: b3530822107858468866) (t6989586621679299347 :: c3530822107858468867) (t6989586621679299348 :: d3530822107858468868) (t6989586621679299349 :: e3530822107858468869) (t6989586621679299350 :: f3530822107858468870) (t6989586621679299351 :: g3530822107858468871) = '(t6989586621679299345, t6989586621679299346, t6989586621679299347, t6989586621679299348, t6989586621679299349, t6989586621679299350, t6989586621679299351) data FstSym0 :: forall a6989586621679356082 b6989586621679356083. (~>) (a6989586621679356082, b6989586621679356083) a6989586621679356082 type FstSym1 (a6989586621679356178 :: (a6989586621679356082, b6989586621679356083)) = Fst a6989586621679356178 data SndSym0 :: forall a6989586621679356080 b6989586621679356081. (~>) (a6989586621679356080, b6989586621679356081) b6989586621679356081 type SndSym1 (a6989586621679356175 :: (a6989586621679356080, b6989586621679356081)) = Snd a6989586621679356175 data CurrySym0 :: forall a6989586621679356077 b6989586621679356078 c6989586621679356079. (~>) ((~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) ((~>) a6989586621679356077 ((~>) b6989586621679356078 c6989586621679356079)) data CurrySym1 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) :: (~>) a6989586621679356077 ((~>) b6989586621679356078 c6989586621679356079) data CurrySym2 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) (a6989586621679356167 :: a6989586621679356077) :: (~>) b6989586621679356078 c6989586621679356079 type CurrySym3 (a6989586621679356166 :: (~>) (a6989586621679356077, b6989586621679356078) c6989586621679356079) (a6989586621679356167 :: a6989586621679356077) (a6989586621679356168 :: b6989586621679356078) = Curry a6989586621679356166 a6989586621679356167 a6989586621679356168 data UncurrySym0 :: forall a6989586621679356074 b6989586621679356075 c6989586621679356076. (~>) ((~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) ((~>) (a6989586621679356074, b6989586621679356075) c6989586621679356076) data UncurrySym1 (a6989586621679356181 :: (~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) :: (~>) (a6989586621679356074, b6989586621679356075) c6989586621679356076 type UncurrySym2 (a6989586621679356181 :: (~>) a6989586621679356074 ((~>) b6989586621679356075 c6989586621679356076)) (a6989586621679356182 :: (a6989586621679356074, b6989586621679356075)) = Uncurry a6989586621679356181 a6989586621679356182 data ErrorSym0 :: forall k06989586621679468164 k6989586621679468163. (~>) k06989586621679468164 k6989586621679468163 type ErrorSym1 (str6989586621679468165 :: k06989586621679468164) = Error str6989586621679468165 data ErrorWithoutStackTraceSym0 :: forall k06989586621679469214 k6989586621679469213. (~>) k06989586621679469214 k6989586621679469213 type ErrorWithoutStackTraceSym1 (str6989586621679469215 :: k06989586621679469214) = ErrorWithoutStackTrace str6989586621679469215 type UndefinedSym0 = Undefined type LTSym0 = 'LT type EQSym0 = 'EQ type GTSym0 = 'GT data CompareSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Ordering) data CompareSym1 (arg6989586621679380801 :: a6989586621679380707) :: (~>) a6989586621679380707 Ordering type CompareSym2 (arg6989586621679380801 :: a6989586621679380707) (arg6989586621679380802 :: a6989586621679380707) = Compare arg6989586621679380801 arg6989586621679380802 data (<@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 <@#@$ data (<@#@$$) (arg6989586621679380805 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 <@#@$$ type (<@#@$$$) (arg6989586621679380805 :: a6989586621679380707) (arg6989586621679380806 :: a6989586621679380707) = (<) arg6989586621679380805 arg6989586621679380806 data (<=@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 <=@#@$ data (<=@#@$$) (arg6989586621679380809 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 <=@#@$$ type (<=@#@$$$) (arg6989586621679380809 :: a6989586621679380707) (arg6989586621679380810 :: a6989586621679380707) = (<=) arg6989586621679380809 arg6989586621679380810 data (>@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 >@#@$ data (>@#@$$) (arg6989586621679380813 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 >@#@$$ type (>@#@$$$) (arg6989586621679380813 :: a6989586621679380707) (arg6989586621679380814 :: a6989586621679380707) = (>) arg6989586621679380813 arg6989586621679380814 data (>=@#@$) :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 Bool) infix 4 >=@#@$ data (>=@#@$$) (arg6989586621679380817 :: a6989586621679380707) :: (~>) a6989586621679380707 Bool infix 4 >=@#@$$ type (>=@#@$$$) (arg6989586621679380817 :: a6989586621679380707) (arg6989586621679380818 :: a6989586621679380707) = (>=) arg6989586621679380817 arg6989586621679380818 data MaxSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 a6989586621679380707) data MaxSym1 (arg6989586621679380821 :: a6989586621679380707) :: (~>) a6989586621679380707 a6989586621679380707 type MaxSym2 (arg6989586621679380821 :: a6989586621679380707) (arg6989586621679380822 :: a6989586621679380707) = Max arg6989586621679380821 arg6989586621679380822 data MinSym0 :: forall a6989586621679380707. (~>) a6989586621679380707 ((~>) a6989586621679380707 a6989586621679380707) data MinSym1 (arg6989586621679380825 :: a6989586621679380707) :: (~>) a6989586621679380707 a6989586621679380707 type MinSym2 (arg6989586621679380825 :: a6989586621679380707) (arg6989586621679380826 :: a6989586621679380707) = Min arg6989586621679380825 arg6989586621679380826 data (^@#@$) :: (~>) Nat ((~>) Nat Nat) infixr 8 ^@#@$ data (^@#@$$) (a3530822107858468865 :: Nat) :: (~>) Nat Nat infixr 8 ^@#@$$ type (^@#@$$$) (a3530822107858468865 :: Nat) (b3530822107858468866 :: Nat) = (^) a3530822107858468865 b3530822107858468866 data ShowsPrecSym0 :: forall a6989586621680260588. (~>) Nat ((~>) a6989586621680260588 ((~>) Symbol Symbol)) data ShowsPrecSym1 (arg6989586621680262538 :: Nat) :: forall a6989586621680260588. (~>) a6989586621680260588 ((~>) Symbol Symbol) data ShowsPrecSym2 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) :: (~>) Symbol Symbol type ShowsPrecSym3 (arg6989586621680262538 :: Nat) (arg6989586621680262539 :: a6989586621680260588) (arg6989586621680262540 :: Symbol) = ShowsPrec arg6989586621680262538 arg6989586621680262539 arg6989586621680262540 data Show_Sym0 :: forall a6989586621680260588. (~>) a6989586621680260588 Symbol type Show_Sym1 (arg6989586621680262544 :: a6989586621680260588) = Show_ arg6989586621680262544 data ShowListSym0 :: forall a6989586621680260588. (~>) [a6989586621680260588] ((~>) Symbol Symbol) data ShowListSym1 (arg6989586621680262546 :: [a6989586621680260588]) :: (~>) Symbol Symbol type ShowListSym2 (arg6989586621680262546 :: [a6989586621680260588]) (arg6989586621680262547 :: Symbol) = ShowList arg6989586621680262546 arg6989586621680262547 data ShowsSym0 :: forall a6989586621680260573. (~>) a6989586621680260573 ((~>) Symbol Symbol) data ShowsSym1 (a6989586621680262530 :: a6989586621680260573) :: (~>) Symbol Symbol type ShowsSym2 (a6989586621680262530 :: a6989586621680260573) (a6989586621680262531 :: Symbol) = Shows a6989586621680262530 a6989586621680262531 data ShowCharSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowCharSym1 (a6989586621680262472 :: Symbol) :: (~>) Symbol Symbol type ShowCharSym2 (a6989586621680262472 :: Symbol) (a6989586621680262473 :: Symbol) = ShowChar a6989586621680262472 a6989586621680262473 data ShowStringSym0 :: (~>) Symbol ((~>) Symbol Symbol) data ShowStringSym1 (a6989586621680262457 :: Symbol) :: (~>) Symbol Symbol type ShowStringSym2 (a6989586621680262457 :: Symbol) (a6989586621680262458 :: Symbol) = ShowString a6989586621680262457 a6989586621680262458 data ShowParenSym0 :: (~>) Bool ((~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol)) data ShowParenSym1 (a6989586621680262478 :: Bool) :: (~>) ((~>) Symbol Symbol) ((~>) Symbol Symbol) data ShowParenSym2 (a6989586621680262478 :: Bool) (a6989586621680262479 :: (~>) Symbol Symbol) :: (~>) Symbol Symbol data (<>@#@$) :: forall a6989586621679810357. (~>) a6989586621679810357 ((~>) a6989586621679810357 a6989586621679810357) infixr 6 <>@#@$ data (<>@#@$$) (arg6989586621679810842 :: a6989586621679810357) :: (~>) a6989586621679810357 a6989586621679810357 infixr 6 <>@#@$$ type (<>@#@$$$) (arg6989586621679810842 :: a6989586621679810357) (arg6989586621679810843 :: a6989586621679810357) = (<>) arg6989586621679810842 arg6989586621679810843 type MemptySym0 = Mempty data MappendSym0 :: forall a6989586621680329525. (~>) a6989586621680329525 ((~>) a6989586621680329525 a6989586621680329525) data MappendSym1 (arg6989586621680329910 :: a6989586621680329525) :: (~>) a6989586621680329525 a6989586621680329525 type MappendSym2 (arg6989586621680329910 :: a6989586621680329525) (arg6989586621680329911 :: a6989586621680329525) = Mappend arg6989586621680329910 arg6989586621680329911 data MconcatSym0 :: forall a6989586621680329525. (~>) [a6989586621680329525] a6989586621680329525 type MconcatSym1 (arg6989586621680329914 :: [a6989586621680329525]) = Mconcat arg6989586621680329914 data FmapSym0 :: forall a6989586621679545127 b6989586621679545128 f6989586621679545126. (~>) ((~>) a6989586621679545127 b6989586621679545128) ((~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128)) data FmapSym1 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) :: forall f6989586621679545126. (~>) (f6989586621679545126 a6989586621679545127) (f6989586621679545126 b6989586621679545128) type FmapSym2 (arg6989586621679545520 :: (~>) a6989586621679545127 b6989586621679545128) (arg6989586621679545521 :: f6989586621679545126 a6989586621679545127) = Fmap arg6989586621679545520 arg6989586621679545521 data (<$@#@$) :: forall a6989586621679545129 b6989586621679545130 f6989586621679545126. (~>) a6989586621679545129 ((~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129)) infixl 4 <$@#@$ data (<$@#@$$) (arg6989586621679545524 :: a6989586621679545129) :: forall b6989586621679545130 f6989586621679545126. (~>) (f6989586621679545126 b6989586621679545130) (f6989586621679545126 a6989586621679545129) infixl 4 <$@#@$$ type (<$@#@$$$) (arg6989586621679545524 :: a6989586621679545129) (arg6989586621679545525 :: f6989586621679545126 b6989586621679545130) = (<$) arg6989586621679545524 arg6989586621679545525 data (<$>@#@$) :: forall a6989586621679714518 b6989586621679714519 f6989586621679714517. (~>) ((~>) a6989586621679714518 b6989586621679714519) ((~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519)) infixl 4 <$>@#@$ data (<$>@#@$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) :: forall f6989586621679714517. (~>) (f6989586621679714517 a6989586621679714518) (f6989586621679714517 b6989586621679714519) infixl 4 <$>@#@$$ type (<$>@#@$$$) (a6989586621679714598 :: (~>) a6989586621679714518 b6989586621679714519) (a6989586621679714599 :: f6989586621679714517 a6989586621679714518) = (<$>) a6989586621679714598 a6989586621679714599 data PureSym0 :: forall a6989586621679545132 f6989586621679545131. (~>) a6989586621679545132 (f6989586621679545131 a6989586621679545132) type PureSym1 (arg6989586621679545544 :: a6989586621679545132) = Pure arg6989586621679545544 data (<*>@#@$) :: forall a6989586621679545133 b6989586621679545134 f6989586621679545131. (~>) (f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) ((~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134)) infixl 4 <*>@#@$ data (<*>@#@$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) :: (~>) (f6989586621679545131 a6989586621679545133) (f6989586621679545131 b6989586621679545134) infixl 4 <*>@#@$$ type (<*>@#@$$$) (arg6989586621679545546 :: f6989586621679545131 ((~>) a6989586621679545133 b6989586621679545134)) (arg6989586621679545547 :: f6989586621679545131 a6989586621679545133) = (<*>) arg6989586621679545546 arg6989586621679545547 data (*>@#@$) :: forall a6989586621679545138 b6989586621679545139 f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545138) ((~>) (f6989586621679545131 b6989586621679545139) (f6989586621679545131 b6989586621679545139)) infixl 4 *>@#@$ data (*>@#@$$) (arg6989586621679545556 :: f6989586621679545131 a6989586621679545138) :: forall b6989586621679545139. (~>) (f6989586621679545131 b6989586621679545139) (f6989586621679545131 b6989586621679545139) infixl 4 *>@#@$$ type (*>@#@$$$) (arg6989586621679545556 :: f6989586621679545131 a6989586621679545138) (arg6989586621679545557 :: f6989586621679545131 b6989586621679545139) = (*>) arg6989586621679545556 arg6989586621679545557 data (<*@#@$) :: forall a6989586621679545140 b6989586621679545141 f6989586621679545131. (~>) (f6989586621679545131 a6989586621679545140) ((~>) (f6989586621679545131 b6989586621679545141) (f6989586621679545131 a6989586621679545140)) infixl 4 <*@#@$ data (<*@#@$$) (arg6989586621679545560 :: f6989586621679545131 a6989586621679545140) :: forall b6989586621679545141. (~>) (f6989586621679545131 b6989586621679545141) (f6989586621679545131 a6989586621679545140) infixl 4 <*@#@$$ type (<*@#@$$$) (arg6989586621679545560 :: f6989586621679545131 a6989586621679545140) (arg6989586621679545561 :: f6989586621679545131 b6989586621679545141) = (<*) arg6989586621679545560 arg6989586621679545561 data (>>=@#@$) :: forall a6989586621679545156 b6989586621679545157 m6989586621679545155. (~>) (m6989586621679545155 a6989586621679545156) ((~>) ((~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) (m6989586621679545155 b6989586621679545157)) infixl 1 >>=@#@$ data (>>=@#@$$) (arg6989586621679545627 :: m6989586621679545155 a6989586621679545156) :: forall b6989586621679545157. (~>) ((~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) (m6989586621679545155 b6989586621679545157) infixl 1 >>=@#@$$ type (>>=@#@$$$) (arg6989586621679545627 :: m6989586621679545155 a6989586621679545156) (arg6989586621679545628 :: (~>) a6989586621679545156 (m6989586621679545155 b6989586621679545157)) = (>>=) arg6989586621679545627 arg6989586621679545628 data (>>@#@$) :: forall a6989586621679545158 b6989586621679545159 m6989586621679545155. (~>) (m6989586621679545155 a6989586621679545158) ((~>) (m6989586621679545155 b6989586621679545159) (m6989586621679545155 b6989586621679545159)) infixl 1 >>@#@$ data (>>@#@$$) (arg6989586621679545631 :: m6989586621679545155 a6989586621679545158) :: forall b6989586621679545159. (~>) (m6989586621679545155 b6989586621679545159) (m6989586621679545155 b6989586621679545159) infixl 1 >>@#@$$ type (>>@#@$$$) (arg6989586621679545631 :: m6989586621679545155 a6989586621679545158) (arg6989586621679545632 :: m6989586621679545155 b6989586621679545159) = (>>) arg6989586621679545631 arg6989586621679545632 data ReturnSym0 :: forall a6989586621679545160 m6989586621679545155. (~>) a6989586621679545160 (m6989586621679545155 a6989586621679545160) type ReturnSym1 (arg6989586621679545635 :: a6989586621679545160) = Return arg6989586621679545635 data FailSym0 :: forall a6989586621679545161 m6989586621679545155. (~>) Symbol (m6989586621679545155 a6989586621679545161) type FailSym1 (arg6989586621679545637 :: Symbol) = Fail arg6989586621679545637 data MapM_Sym0 :: forall a6989586621680452668 b6989586621680452669 m6989586621680452667 t6989586621680452666. (~>) ((~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) ((~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ())) data MapM_Sym1 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) :: forall t6989586621680452666. (~>) (t6989586621680452666 a6989586621680452668) (m6989586621680452667 ()) type MapM_Sym2 (a6989586621680453266 :: (~>) a6989586621680452668 (m6989586621680452667 b6989586621680452669)) (a6989586621680453267 :: t6989586621680452666 a6989586621680452668) = MapM_ a6989586621680453266 a6989586621680453267 data Sequence_Sym0 :: forall a6989586621680452658 m6989586621680452657 t6989586621680452656. (~>) (t6989586621680452656 (m6989586621680452657 a6989586621680452658)) (m6989586621680452657 ()) type Sequence_Sym1 (a6989586621680453258 :: t6989586621680452656 (m6989586621680452657 a6989586621680452658)) = Sequence_ a6989586621680453258 data (=<<@#@$) :: forall a6989586621679545078 b6989586621679545079 m6989586621679545077. (~>) ((~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) ((~>) (m6989586621679545077 a6989586621679545078) (m6989586621679545077 b6989586621679545079)) infixr 1 =<<@#@$ data (=<<@#@$$) (a6989586621679545473 :: (~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) :: (~>) (m6989586621679545077 a6989586621679545078) (m6989586621679545077 b6989586621679545079) infixr 1 =<<@#@$$ type (=<<@#@$$$) (a6989586621679545473 :: (~>) a6989586621679545078 (m6989586621679545077 b6989586621679545079)) (a6989586621679545474 :: m6989586621679545077 a6989586621679545078) = (=<<) a6989586621679545473 a6989586621679545474 data ElemSym0 :: forall a6989586621680452740 t6989586621680452723. (~>) a6989586621680452740 ((~>) (t6989586621680452723 a6989586621680452740) Bool) data ElemSym1 (arg6989586621680453390 :: a6989586621680452740) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452740) Bool type ElemSym2 (arg6989586621680453390 :: a6989586621680452740) (arg6989586621680453391 :: t6989586621680452723 a6989586621680452740) = Elem arg6989586621680453390 arg6989586621680453391 data FoldMapSym0 :: forall a6989586621680452726 m6989586621680452725 t6989586621680452723. (~>) ((~>) a6989586621680452726 m6989586621680452725) ((~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725) data FoldMapSym1 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452726) m6989586621680452725 type FoldMapSym2 (arg6989586621680453348 :: (~>) a6989586621680452726 m6989586621680452725) (arg6989586621680453349 :: t6989586621680452723 a6989586621680452726) = FoldMap arg6989586621680453348 arg6989586621680453349 data FoldrSym0 :: forall a6989586621680452727 b6989586621680452728 t6989586621680452723. (~>) ((~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) ((~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728)) data FoldrSym1 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) :: forall t6989586621680452723. (~>) b6989586621680452728 ((~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728) data FoldrSym2 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452727) b6989586621680452728 type FoldrSym3 (arg6989586621680453352 :: (~>) a6989586621680452727 ((~>) b6989586621680452728 b6989586621680452728)) (arg6989586621680453353 :: b6989586621680452728) (arg6989586621680453354 :: t6989586621680452723 a6989586621680452727) = Foldr arg6989586621680453352 arg6989586621680453353 arg6989586621680453354 data FoldlSym0 :: forall a6989586621680452732 b6989586621680452731 t6989586621680452723. (~>) ((~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) ((~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731)) data FoldlSym1 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) :: forall t6989586621680452723. (~>) b6989586621680452731 ((~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731) data FoldlSym2 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452732) b6989586621680452731 type FoldlSym3 (arg6989586621680453364 :: (~>) b6989586621680452731 ((~>) a6989586621680452732 b6989586621680452731)) (arg6989586621680453365 :: b6989586621680452731) (arg6989586621680453366 :: t6989586621680452723 a6989586621680452732) = Foldl arg6989586621680453364 arg6989586621680453365 arg6989586621680453366 data Foldr1Sym0 :: forall a6989586621680452735 t6989586621680452723. (~>) ((~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) ((~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735) data Foldr1Sym1 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452735) a6989586621680452735 type Foldr1Sym2 (arg6989586621680453376 :: (~>) a6989586621680452735 ((~>) a6989586621680452735 a6989586621680452735)) (arg6989586621680453377 :: t6989586621680452723 a6989586621680452735) = Foldr1 arg6989586621680453376 arg6989586621680453377 data Foldl1Sym0 :: forall a6989586621680452736 t6989586621680452723. (~>) ((~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) ((~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736) data Foldl1Sym1 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) :: forall t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452736) a6989586621680452736 type Foldl1Sym2 (arg6989586621680453380 :: (~>) a6989586621680452736 ((~>) a6989586621680452736 a6989586621680452736)) (arg6989586621680453381 :: t6989586621680452723 a6989586621680452736) = Foldl1 arg6989586621680453380 arg6989586621680453381 data MaximumSym0 :: forall a6989586621680452741 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452741) a6989586621680452741 type MaximumSym1 (arg6989586621680453394 :: t6989586621680452723 a6989586621680452741) = Maximum arg6989586621680453394 data MinimumSym0 :: forall a6989586621680452742 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452742) a6989586621680452742 type MinimumSym1 (arg6989586621680453396 :: t6989586621680452723 a6989586621680452742) = Minimum arg6989586621680453396 data SumSym0 :: forall a6989586621680452743 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452743) a6989586621680452743 type SumSym1 (arg6989586621680453398 :: t6989586621680452723 a6989586621680452743) = Sum arg6989586621680453398 data ProductSym0 :: forall a6989586621680452744 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452744) a6989586621680452744 type ProductSym1 (arg6989586621680453400 :: t6989586621680452723 a6989586621680452744) = Product arg6989586621680453400 data TraverseSym0 :: forall a6989586621680750996 b6989586621680750997 f6989586621680750995 t6989586621680750994. (~>) ((~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) ((~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997))) data TraverseSym1 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680750996) (f6989586621680750995 (t6989586621680750994 b6989586621680750997)) type TraverseSym2 (arg6989586621680751006 :: (~>) a6989586621680750996 (f6989586621680750995 b6989586621680750997)) (arg6989586621680751007 :: t6989586621680750994 a6989586621680750996) = Traverse arg6989586621680751006 arg6989586621680751007 data SequenceASym0 :: forall a6989586621680750999 f6989586621680750998 t6989586621680750994. (~>) (t6989586621680750994 (f6989586621680750998 a6989586621680750999)) (f6989586621680750998 (t6989586621680750994 a6989586621680750999)) type SequenceASym1 (arg6989586621680751010 :: t6989586621680750994 (f6989586621680750998 a6989586621680750999)) = SequenceA arg6989586621680751010 data MapMSym0 :: forall a6989586621680751001 b6989586621680751002 m6989586621680751000 t6989586621680750994. (~>) ((~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) ((~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002))) data MapMSym1 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) :: forall t6989586621680750994. (~>) (t6989586621680750994 a6989586621680751001) (m6989586621680751000 (t6989586621680750994 b6989586621680751002)) type MapMSym2 (arg6989586621680751012 :: (~>) a6989586621680751001 (m6989586621680751000 b6989586621680751002)) (arg6989586621680751013 :: t6989586621680750994 a6989586621680751001) = MapM arg6989586621680751012 arg6989586621680751013 data SequenceSym0 :: forall a6989586621680751004 m6989586621680751003 t6989586621680750994. (~>) (t6989586621680750994 (m6989586621680751003 a6989586621680751004)) (m6989586621680751003 (t6989586621680750994 a6989586621680751004)) type SequenceSym1 (arg6989586621680751016 :: t6989586621680750994 (m6989586621680751003 a6989586621680751004)) = Sequence arg6989586621680751016 data IdSym0 :: forall a6989586621679520925. (~>) a6989586621679520925 a6989586621679520925 type IdSym1 (a6989586621679521120 :: a6989586621679520925) = Id a6989586621679521120 data ConstSym0 :: forall a6989586621679520923 b6989586621679520924. (~>) a6989586621679520923 ((~>) b6989586621679520924 a6989586621679520923) data ConstSym1 (a6989586621679521105 :: a6989586621679520923) :: forall b6989586621679520924. (~>) b6989586621679520924 a6989586621679520923 type ConstSym2 (a6989586621679521105 :: a6989586621679520923) (a6989586621679521106 :: b6989586621679520924) = Const a6989586621679521105 a6989586621679521106 data (.@#@$) :: forall a6989586621679520922 b6989586621679520920 c6989586621679520921. (~>) ((~>) b6989586621679520920 c6989586621679520921) ((~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921)) infixr 9 .@#@$ data (.@#@$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) :: forall a6989586621679520922. (~>) ((~>) a6989586621679520922 b6989586621679520920) ((~>) a6989586621679520922 c6989586621679520921) infixr 9 .@#@$$ data (.@#@$$$) (a6989586621679521086 :: (~>) b6989586621679520920 c6989586621679520921) (a6989586621679521087 :: (~>) a6989586621679520922 b6989586621679520920) :: (~>) a6989586621679520922 c6989586621679520921 infixr 9 .@#@$$$ data ($@#@$) :: forall a6989586621679520914 b6989586621679520915. (~>) ((~>) a6989586621679520914 b6989586621679520915) ((~>) a6989586621679520914 b6989586621679520915) infixr 0 $@#@$ data ($@#@$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) :: (~>) a6989586621679520914 b6989586621679520915 infixr 0 $@#@$$ type ($@#@$$$) (a6989586621679521071 :: (~>) a6989586621679520914 b6989586621679520915) (a6989586621679521072 :: a6989586621679520914) = ($) a6989586621679521071 a6989586621679521072 data ($!@#@$) :: forall a6989586621679520912 b6989586621679520913. (~>) ((~>) a6989586621679520912 b6989586621679520913) ((~>) a6989586621679520912 b6989586621679520913) infixr 0 $!@#@$ data ($!@#@$$) (a6989586621679521062 :: (~>) a6989586621679520912 b6989586621679520913) :: (~>) a6989586621679520912 b6989586621679520913 infixr 0 $!@#@$$ type ($!@#@$$$) (a6989586621679521062 :: (~>) a6989586621679520912 b6989586621679520913) (a6989586621679521063 :: a6989586621679520912) = ($!) a6989586621679521062 a6989586621679521063 data FlipSym0 :: forall a6989586621679520917 b6989586621679520918 c6989586621679520919. (~>) ((~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) ((~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919)) data FlipSym1 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) :: (~>) b6989586621679520918 ((~>) a6989586621679520917 c6989586621679520919) data FlipSym2 (a6989586621679521077 :: (~>) a6989586621679520917 ((~>) b6989586621679520918 c6989586621679520919)) (a6989586621679521078 :: b6989586621679520918) :: (~>) a6989586621679520917 c6989586621679520919 data AsTypeOfSym0 :: forall a6989586621679520916. (~>) a6989586621679520916 ((~>) a6989586621679520916 a6989586621679520916) data AsTypeOfSym1 (a6989586621679521114 :: a6989586621679520916) :: (~>) a6989586621679520916 a6989586621679520916 type AsTypeOfSym2 (a6989586621679521114 :: a6989586621679520916) (a6989586621679521115 :: a6989586621679520916) = AsTypeOf a6989586621679521114 a6989586621679521115 data SeqSym0 :: forall a6989586621679520909 b6989586621679520910. (~>) a6989586621679520909 ((~>) b6989586621679520910 b6989586621679520910) infixr 0 `SeqSym0` data SeqSym1 (a6989586621679521031 :: a6989586621679520909) :: forall b6989586621679520910. (~>) b6989586621679520910 b6989586621679520910 infixr 0 `SeqSym1` type SeqSym2 (a6989586621679521031 :: a6989586621679520909) (a6989586621679521032 :: b6989586621679520910) = Seq a6989586621679521031 a6989586621679521032 data (:@#@$) :: forall (a3530822107858468865 :: Type). (~>) a3530822107858468865 ((~>) [a3530822107858468865] [(a3530822107858468865 :: Type)]) infixr 5 :@#@$ data (:@#@$$) (t6989586621679298917 :: (a3530822107858468865 :: Type)) :: (~>) [a3530822107858468865] [(a3530822107858468865 :: Type)] infixr 5 :@#@$$ type (:@#@$$$) (t6989586621679298917 :: a3530822107858468865) (t6989586621679298918 :: [a3530822107858468865]) = '(:) t6989586621679298917 t6989586621679298918 type NilSym0 = '[] data MapSym0 :: forall a6989586621679520927 b6989586621679520928. (~>) ((~>) a6989586621679520927 b6989586621679520928) ((~>) [a6989586621679520927] [b6989586621679520928]) data MapSym1 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) :: (~>) [a6989586621679520927] [b6989586621679520928] type MapSym2 (a6989586621679521131 :: (~>) a6989586621679520927 b6989586621679520928) (a6989586621679521132 :: [a6989586621679520927]) = Map a6989586621679521131 a6989586621679521132 data ReverseSym0 :: forall a6989586621679940137. (~>) [a6989586621679940137] [a6989586621679940137] type ReverseSym1 (a6989586621679950596 :: [a6989586621679940137]) = Reverse a6989586621679950596 data (++@#@$$) (a6989586621679521123 :: [a6989586621679520926]) :: (~>) [a6989586621679520926] [a6989586621679520926] infixr 5 ++@#@$$ data (++@#@$) :: forall a6989586621679520926. (~>) [a6989586621679520926] ((~>) [a6989586621679520926] [a6989586621679520926]) infixr 5 ++@#@$ data FilterSym0 :: forall a6989586621679940052. (~>) ((~>) a6989586621679940052 Bool) ((~>) [a6989586621679940052] [a6989586621679940052]) data FilterSym1 (a6989586621679949593 :: (~>) a6989586621679940052 Bool) :: (~>) [a6989586621679940052] [a6989586621679940052] type FilterSym2 (a6989586621679949593 :: (~>) a6989586621679940052 Bool) (a6989586621679949594 :: [a6989586621679940052]) = Filter a6989586621679949593 a6989586621679949594 data HeadSym0 :: forall a6989586621679940142. (~>) [a6989586621679940142] a6989586621679940142 type HeadSym1 (a6989586621679950665 :: [a6989586621679940142]) = Head a6989586621679950665 data LastSym0 :: forall a6989586621679940141. (~>) [a6989586621679940141] a6989586621679940141 type LastSym1 (a6989586621679950660 :: [a6989586621679940141]) = Last a6989586621679950660 data TailSym0 :: forall a6989586621679940140. (~>) [a6989586621679940140] [a6989586621679940140] type TailSym1 (a6989586621679950657 :: [a6989586621679940140]) = Tail a6989586621679950657 data InitSym0 :: forall a6989586621679940139. (~>) [a6989586621679940139] [a6989586621679940139] type InitSym1 (a6989586621679950643 :: [a6989586621679940139]) = Init a6989586621679950643 data NullSym0 :: forall a6989586621680452738 t6989586621680452723. (~>) (t6989586621680452723 a6989586621680452738) Bool type NullSym1 (arg6989586621680453386 :: t6989586621680452723 a6989586621680452738) = Null arg6989586621680453386 data ConcatSym0 :: forall a6989586621680452649 t6989586621680452648. (~>) (t6989586621680452648 [a6989586621680452649]) [a6989586621680452649] type ConcatSym1 (a6989586621680453234 :: t6989586621680452648 [a6989586621680452649]) = Concat a6989586621680453234 data ConcatMapSym0 :: forall a6989586621680452646 b6989586621680452647 t6989586621680452645. (~>) ((~>) a6989586621680452646 [b6989586621680452647]) ((~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647]) data ConcatMapSym1 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) :: forall t6989586621680452645. (~>) (t6989586621680452645 a6989586621680452646) [b6989586621680452647] type ConcatMapSym2 (a6989586621680453218 :: (~>) a6989586621680452646 [b6989586621680452647]) (a6989586621680453219 :: t6989586621680452645 a6989586621680452646) = ConcatMap a6989586621680453218 a6989586621680453219 data AndSym0 :: forall t6989586621680452644. (~>) (t6989586621680452644 Bool) Bool type AndSym1 (a6989586621680453209 :: t6989586621680452644 Bool) = And a6989586621680453209 data OrSym0 :: forall t6989586621680452643. (~>) (t6989586621680452643 Bool) Bool type OrSym1 (a6989586621680453200 :: t6989586621680452643 Bool) = Or a6989586621680453200 data AnySym0 :: forall a6989586621680452642 t6989586621680452641. (~>) ((~>) a6989586621680452642 Bool) ((~>) (t6989586621680452641 a6989586621680452642) Bool) data AnySym1 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) :: forall t6989586621680452641. (~>) (t6989586621680452641 a6989586621680452642) Bool type AnySym2 (a6989586621680453187 :: (~>) a6989586621680452642 Bool) (a6989586621680453188 :: t6989586621680452641 a6989586621680452642) = Any a6989586621680453187 a6989586621680453188 data AllSym0 :: forall a6989586621680452640 t6989586621680452639. (~>) ((~>) a6989586621680452640 Bool) ((~>) (t6989586621680452639 a6989586621680452640) Bool) data AllSym1 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) :: forall t6989586621680452639. (~>) (t6989586621680452639 a6989586621680452640) Bool type AllSym2 (a6989586621680453174 :: (~>) a6989586621680452640 Bool) (a6989586621680453175 :: t6989586621680452639 a6989586621680452640) = All a6989586621680453174 a6989586621680453175 data ScanlSym0 :: forall a6989586621679940120 b6989586621679940119. (~>) ((~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) ((~>) b6989586621679940119 ((~>) [a6989586621679940120] [b6989586621679940119])) data ScanlSym1 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) :: (~>) b6989586621679940119 ((~>) [a6989586621679940120] [b6989586621679940119]) data ScanlSym2 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) (a6989586621679950229 :: b6989586621679940119) :: (~>) [a6989586621679940120] [b6989586621679940119] type ScanlSym3 (a6989586621679950228 :: (~>) b6989586621679940119 ((~>) a6989586621679940120 b6989586621679940119)) (a6989586621679950229 :: b6989586621679940119) (a6989586621679950230 :: [a6989586621679940120]) = Scanl a6989586621679950228 a6989586621679950229 a6989586621679950230 data Scanl1Sym0 :: forall a6989586621679940118. (~>) ((~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) ((~>) [a6989586621679940118] [a6989586621679940118]) data Scanl1Sym1 (a6989586621679950242 :: (~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) :: (~>) [a6989586621679940118] [a6989586621679940118] type Scanl1Sym2 (a6989586621679950242 :: (~>) a6989586621679940118 ((~>) a6989586621679940118 a6989586621679940118)) (a6989586621679950243 :: [a6989586621679940118]) = Scanl1 a6989586621679950242 a6989586621679950243 data ScanrSym0 :: forall a6989586621679940116 b6989586621679940117. (~>) ((~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) ((~>) b6989586621679940117 ((~>) [a6989586621679940116] [b6989586621679940117])) data ScanrSym1 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) :: (~>) b6989586621679940117 ((~>) [a6989586621679940116] [b6989586621679940117]) data ScanrSym2 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) (a6989586621679950208 :: b6989586621679940117) :: (~>) [a6989586621679940116] [b6989586621679940117] type ScanrSym3 (a6989586621679950207 :: (~>) a6989586621679940116 ((~>) b6989586621679940117 b6989586621679940117)) (a6989586621679950208 :: b6989586621679940117) (a6989586621679950209 :: [a6989586621679940116]) = Scanr a6989586621679950207 a6989586621679950208 a6989586621679950209 data Scanr1Sym0 :: forall a6989586621679940115. (~>) ((~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) ((~>) [a6989586621679940115] [a6989586621679940115]) data Scanr1Sym1 (a6989586621679950183 :: (~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) :: (~>) [a6989586621679940115] [a6989586621679940115] type Scanr1Sym2 (a6989586621679950183 :: (~>) a6989586621679940115 ((~>) a6989586621679940115 a6989586621679940115)) (a6989586621679950184 :: [a6989586621679940115]) = Scanr1 a6989586621679950183 a6989586621679950184 data ReplicateSym0 :: forall a6989586621679940023. (~>) Nat ((~>) a6989586621679940023 [a6989586621679940023]) data ReplicateSym1 (a6989586621679949325 :: Nat) :: forall a6989586621679940023. (~>) a6989586621679940023 [a6989586621679940023] type ReplicateSym2 (a6989586621679949325 :: Nat) (a6989586621679949326 :: a6989586621679940023) = Replicate a6989586621679949325 a6989586621679949326 data TakeSym0 :: forall a6989586621679940039. (~>) Nat ((~>) [a6989586621679940039] [a6989586621679940039]) data TakeSym1 (a6989586621679949421 :: Nat) :: forall a6989586621679940039. (~>) [a6989586621679940039] [a6989586621679940039] type TakeSym2 (a6989586621679949421 :: Nat) (a6989586621679949422 :: [a6989586621679940039]) = Take a6989586621679949421 a6989586621679949422 data DropSym0 :: forall a6989586621679940038. (~>) Nat ((~>) [a6989586621679940038] [a6989586621679940038]) data DropSym1 (a6989586621679949407 :: Nat) :: forall a6989586621679940038. (~>) [a6989586621679940038] [a6989586621679940038] type DropSym2 (a6989586621679949407 :: Nat) (a6989586621679949408 :: [a6989586621679940038]) = Drop a6989586621679949407 a6989586621679949408 data SplitAtSym0 :: forall a6989586621679940037. (~>) Nat ((~>) [a6989586621679940037] ([a6989586621679940037], [a6989586621679940037])) data SplitAtSym1 (a6989586621679949435 :: Nat) :: forall a6989586621679940037. (~>) [a6989586621679940037] ([a6989586621679940037], [a6989586621679940037]) type SplitAtSym2 (a6989586621679949435 :: Nat) (a6989586621679949436 :: [a6989586621679940037]) = SplitAt a6989586621679949435 a6989586621679949436 data TakeWhileSym0 :: forall a6989586621679940044. (~>) ((~>) a6989586621679940044 Bool) ((~>) [a6989586621679940044] [a6989586621679940044]) data TakeWhileSym1 (a6989586621679949579 :: (~>) a6989586621679940044 Bool) :: (~>) [a6989586621679940044] [a6989586621679940044] type TakeWhileSym2 (a6989586621679949579 :: (~>) a6989586621679940044 Bool) (a6989586621679949580 :: [a6989586621679940044]) = TakeWhile a6989586621679949579 a6989586621679949580 data DropWhileSym0 :: forall a6989586621679940043. (~>) ((~>) a6989586621679940043 Bool) ((~>) [a6989586621679940043] [a6989586621679940043]) data DropWhileSym1 (a6989586621679949561 :: (~>) a6989586621679940043 Bool) :: (~>) [a6989586621679940043] [a6989586621679940043] type DropWhileSym2 (a6989586621679949561 :: (~>) a6989586621679940043 Bool) (a6989586621679949562 :: [a6989586621679940043]) = DropWhile a6989586621679949561 a6989586621679949562 data DropWhileEndSym0 :: forall a6989586621679940042. (~>) ((~>) a6989586621679940042 Bool) ((~>) [a6989586621679940042] [a6989586621679940042]) data DropWhileEndSym1 (a6989586621679950617 :: (~>) a6989586621679940042 Bool) :: (~>) [a6989586621679940042] [a6989586621679940042] type DropWhileEndSym2 (a6989586621679950617 :: (~>) a6989586621679940042 Bool) (a6989586621679950618 :: [a6989586621679940042]) = DropWhileEnd a6989586621679950617 a6989586621679950618 data SpanSym0 :: forall a6989586621679940041. (~>) ((~>) a6989586621679940041 Bool) ((~>) [a6989586621679940041] ([a6989586621679940041], [a6989586621679940041])) data SpanSym1 (a6989586621679949484 :: (~>) a6989586621679940041 Bool) :: (~>) [a6989586621679940041] ([a6989586621679940041], [a6989586621679940041]) type SpanSym2 (a6989586621679949484 :: (~>) a6989586621679940041 Bool) (a6989586621679949485 :: [a6989586621679940041]) = Span a6989586621679949484 a6989586621679949485 data BreakSym0 :: forall a6989586621679940040. (~>) ((~>) a6989586621679940040 Bool) ((~>) [a6989586621679940040] ([a6989586621679940040], [a6989586621679940040])) data BreakSym1 (a6989586621679949441 :: (~>) a6989586621679940040 Bool) :: (~>) [a6989586621679940040] ([a6989586621679940040], [a6989586621679940040]) type BreakSym2 (a6989586621679949441 :: (~>) a6989586621679940040 Bool) (a6989586621679949442 :: [a6989586621679940040]) = Break a6989586621679949441 a6989586621679949442 data NotElemSym0 :: forall a6989586621680452634 t6989586621680452633. (~>) a6989586621680452634 ((~>) (t6989586621680452633 a6989586621680452634) Bool) data NotElemSym1 (a6989586621680453116 :: a6989586621680452634) :: forall t6989586621680452633. (~>) (t6989586621680452633 a6989586621680452634) Bool type NotElemSym2 (a6989586621680453116 :: a6989586621680452634) (a6989586621680453117 :: t6989586621680452633 a6989586621680452634) = NotElem a6989586621680453116 a6989586621680453117 data ZipSym0 :: forall a6989586621679940098 b6989586621679940099. (~>) [a6989586621679940098] ((~>) [b6989586621679940099] [(a6989586621679940098, b6989586621679940099)]) data ZipSym1 (a6989586621679949926 :: [a6989586621679940098]) :: forall b6989586621679940099. (~>) [b6989586621679940099] [(a6989586621679940098, b6989586621679940099)] type ZipSym2 (a6989586621679949926 :: [a6989586621679940098]) (a6989586621679949927 :: [b6989586621679940099]) = Zip a6989586621679949926 a6989586621679949927 data Zip3Sym0 :: forall a6989586621679940095 b6989586621679940096 c6989586621679940097. (~>) [a6989586621679940095] ((~>) [b6989586621679940096] ((~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)])) data Zip3Sym1 (a6989586621679949914 :: [a6989586621679940095]) :: forall b6989586621679940096 c6989586621679940097. (~>) [b6989586621679940096] ((~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)]) data Zip3Sym2 (a6989586621679949914 :: [a6989586621679940095]) (a6989586621679949915 :: [b6989586621679940096]) :: forall c6989586621679940097. (~>) [c6989586621679940097] [(a6989586621679940095, b6989586621679940096, c6989586621679940097)] type Zip3Sym3 (a6989586621679949914 :: [a6989586621679940095]) (a6989586621679949915 :: [b6989586621679940096]) (a6989586621679949916 :: [c6989586621679940097]) = Zip3 a6989586621679949914 a6989586621679949915 a6989586621679949916 data ZipWithSym0 :: forall a6989586621679940092 b6989586621679940093 c6989586621679940094. (~>) ((~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) ((~>) [a6989586621679940092] ((~>) [b6989586621679940093] [c6989586621679940094])) data ZipWithSym1 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) :: (~>) [a6989586621679940092] ((~>) [b6989586621679940093] [c6989586621679940094]) data ZipWithSym2 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) (a6989586621679949904 :: [a6989586621679940092]) :: (~>) [b6989586621679940093] [c6989586621679940094] type ZipWithSym3 (a6989586621679949903 :: (~>) a6989586621679940092 ((~>) b6989586621679940093 c6989586621679940094)) (a6989586621679949904 :: [a6989586621679940092]) (a6989586621679949905 :: [b6989586621679940093]) = ZipWith a6989586621679949903 a6989586621679949904 a6989586621679949905 data ZipWith3Sym0 :: forall a6989586621679940088 b6989586621679940089 c6989586621679940090 d6989586621679940091. (~>) ((~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) ((~>) [a6989586621679940088] ((~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091]))) data ZipWith3Sym1 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) :: (~>) [a6989586621679940088] ((~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091])) data ZipWith3Sym2 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) (a6989586621679949889 :: [a6989586621679940088]) :: (~>) [b6989586621679940089] ((~>) [c6989586621679940090] [d6989586621679940091]) data ZipWith3Sym3 (a6989586621679949888 :: (~>) a6989586621679940088 ((~>) b6989586621679940089 ((~>) c6989586621679940090 d6989586621679940091))) (a6989586621679949889 :: [a6989586621679940088]) (a6989586621679949890 :: [b6989586621679940089]) :: (~>) [c6989586621679940090] [d6989586621679940091] data UnzipSym0 :: forall a6989586621679940086 b6989586621679940087. (~>) [(a6989586621679940086, b6989586621679940087)] ([a6989586621679940086], [b6989586621679940087]) type UnzipSym1 (a6989586621679949869 :: [(a6989586621679940086, b6989586621679940087)]) = Unzip a6989586621679949869 data UnlinesSym0 :: (~>) [Symbol] Symbol type UnlinesSym1 (a6989586621679949740 :: [Symbol]) = Unlines a6989586621679949740 data UnwordsSym0 :: (~>) [Symbol] Symbol type UnwordsSym1 (a6989586621679949729 :: [Symbol]) = Unwords a6989586621679949729 -- | 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]