Data.Tuple.Singletons

Defines functions and datatypes relating to the singleton for tuples, including singled versions of all the definitions in Data.Tuple.

Because many of these definitions are produced by Template Haskell, it is not possible to create proper Haddock documentation. Please look up the corresponding operation in Data.Tuple. Also, please excuse the apparent repeated variable names. This is due to an interaction between Template Haskell and Haddock.

Singleton definitions

See Sing for more info.

type family Sing :: k -> Type

The singleton kind-indexed type family.

Instances

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SBool

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SOrdering

type Sing

Defined in GHC.TypeLits.Singletons.Internal

type Sing = SNat

type Sing

Defined in GHC.TypeLits.Singletons.Internal

type Sing = SSymbol

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple0

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SVoid

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SAll

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SAny

type Sing

Defined in Data.Singletons.Base.TypeError

type Sing = SErrorMessage

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SList :: [a] -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SMaybe :: Maybe a -> Type

type Sing

A choice of singleton for the kind TYPE rep (for some RuntimeRep rep), an instantiation of which is the famous kind Type.

Conceivably, one could generalize this instance to `Sing @k` for any kind k, and remove all other Sing instances. We don't adopt this design, however, since it is far more convenient in practice to work with explicit singleton values than TypeReps (for instance, TypeReps are more difficult to pattern match on, and require extra runtime checks).

We cannot produce explicit singleton values for everything in TYPE rep, however, since it is an open kind, so we reach for TypeRep in this one particular case.

Defined in Data.Singletons.Base.TypeRepTYPE

type Sing = TypeRep :: TYPE rep -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SMin :: Min a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SMax :: Max a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SFirst :: First a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SLast :: Last a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SWrappedMonoid :: WrappedMonoid m -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SIdentity :: Identity a -> Type

type Sing

Defined in Data.Monoid.Singletons

type Sing = SFirst :: First a -> Type

type Sing

Defined in Data.Monoid.Singletons

type Sing = SLast :: Last a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SDual :: Dual a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SSum :: Sum a -> Type

type Sing

Defined in Data.Semigroup.Singletons.Internal

type Sing = SProduct :: Product a -> Type

type Sing

Defined in Data.Ord.Singletons

type Sing = SDown :: Down a -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SNonEmpty :: NonEmpty a -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = SEither :: Either a b -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple2 :: (a, b) -> Type

type Sing

Defined in Data.Semigroup.Singletons

type Sing = SArg :: Arg a b -> Type

type Sing

Defined in Data.Proxy.Singletons

type Sing = SProxy :: Proxy t -> Type

type Sing

Defined in Data.Singletons

type Sing = SWrappedSing :: WrappedSing a -> Type

type Sing

Defined in Data.Singletons

type Sing = SLambda :: (k1 ~> k2) -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple3 :: (a, b, c) -> Type

type Sing

Defined in Data.Functor.Const.Singletons

type Sing = SConst :: Const a b -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple4 :: (a, b, c, d) -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple5 :: (a, b, c, d, e) -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple6 :: (a, b, c, d, e, f) -> Type

type Sing

Defined in Data.Singletons.Base.Instances

type Sing = STuple7 :: (a, b, c, d, e, f, g) -> Type

data STuple0 :: () -> Type where

Constructors

STuple0 :: STuple0 ('() :: ())

Instances

TestCoercion STuple0

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a :: k) (b :: k). STuple0 a -> STuple0 b -> Maybe (Coercion a b)

TestEquality STuple0

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a :: k) (b :: k). STuple0 a -> STuple0 b -> Maybe (a :~: b)

Show (STuple0 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple0 z -> ShowS

show :: STuple0 z -> String

showList :: [STuple0 z] -> ShowS

data STuple2 :: forall (a :: Type) (b :: Type). (a, b) -> Type where

Constructors

STuple2 :: forall (a :: Type) (b :: Type) (n :: a) (n :: b). (Sing n) -> (Sing n) -> STuple2 ('(n, n) :: (a :: Type, b :: Type))

Instances

(SDecide a, SDecide b) => TestCoercion (STuple2 :: (a, b) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple2 a0 -> STuple2 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b) => TestEquality (STuple2 :: (a, b) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple2 a0 -> STuple2 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b) => Show (STuple2 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple2 z -> ShowS

show :: STuple2 z -> String

showList :: [STuple2 z] -> ShowS

data STuple3 :: forall (a :: Type) (b :: Type) (c :: Type). (a, b, c) -> Type where

Constructors

STuple3 :: forall (a :: Type) (b :: Type) (c :: Type) (n :: a) (n :: b) (n :: c). (Sing n) -> (Sing n) -> (Sing n) -> STuple3 ('(n, n, n) :: (a :: Type, b :: Type, c :: Type))

Instances

(SDecide a, SDecide b, SDecide c) => TestCoercion (STuple3 :: (a, b, c) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple3 a0 -> STuple3 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b, SDecide c) => TestEquality (STuple3 :: (a, b, c) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple3 a0 -> STuple3 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b, ShowSing c) => Show (STuple3 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple3 z -> ShowS

show :: STuple3 z -> String

showList :: [STuple3 z] -> ShowS

data STuple4 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type). (a, b, c, d) -> Type where

Constructors

STuple4 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (n :: a) (n :: b) (n :: c) (n :: d). (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> STuple4 ('(n, n, n, n) :: (a :: Type, b :: Type, c :: Type, d :: Type))

Instances

(SDecide a, SDecide b, SDecide c, SDecide d) => TestCoercion (STuple4 :: (a, b, c, d) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple4 a0 -> STuple4 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b, SDecide c, SDecide d) => TestEquality (STuple4 :: (a, b, c, d) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple4 a0 -> STuple4 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b, ShowSing c, ShowSing d) => Show (STuple4 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple4 z -> ShowS

show :: STuple4 z -> String

showList :: [STuple4 z] -> ShowS

data STuple5 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type). (a, b, c, d, e) -> Type where

Constructors

STuple5 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type) (n :: a) (n :: b) (n :: c) (n :: d) (n :: e). (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> STuple5 ('(n, n, n, n, n) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type))

Instances

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e) => TestCoercion (STuple5 :: (a, b, c, d, e) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple5 a0 -> STuple5 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e) => TestEquality (STuple5 :: (a, b, c, d, e) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple5 a0 -> STuple5 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b, ShowSing c, ShowSing d, ShowSing e) => Show (STuple5 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple5 z -> ShowS

show :: STuple5 z -> String

showList :: [STuple5 z] -> ShowS

data STuple6 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type) (f :: Type). (a, b, c, d, e, f) -> Type where

Constructors

STuple6 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type) (f :: Type) (n :: a) (n :: b) (n :: c) (n :: d) (n :: e) (n :: f). (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> STuple6 ('(n, n, n, n, n, n) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type))

Instances

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e, SDecide f) => TestCoercion (STuple6 :: (a, b, c, d, e, f) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple6 a0 -> STuple6 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e, SDecide f) => TestEquality (STuple6 :: (a, b, c, d, e, f) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple6 a0 -> STuple6 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b, ShowSing c, ShowSing d, ShowSing e, ShowSing f) => Show (STuple6 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple6 z -> ShowS

show :: STuple6 z -> String

showList :: [STuple6 z] -> ShowS

data STuple7 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type) (f :: Type) (g :: Type). (a, b, c, d, e, f, g) -> Type where

Constructors

STuple7 :: forall (a :: Type) (b :: Type) (c :: Type) (d :: Type) (e :: Type) (f :: Type) (g :: Type) (n :: a) (n :: b) (n :: c) (n :: d) (n :: e) (n :: f) (n :: g). (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> (Sing n) -> STuple7 ('(n, n, n, n, n, n, n) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type))

Instances

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e, SDecide f, SDecide g) => TestCoercion (STuple7 :: (a, b, c, d, e, f, g) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testCoercion :: forall (a0 :: k) (b0 :: k). STuple7 a0 -> STuple7 b0 -> Maybe (Coercion a0 b0)

(SDecide a, SDecide b, SDecide c, SDecide d, SDecide e, SDecide f, SDecide g) => TestEquality (STuple7 :: (a, b, c, d, e, f, g) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

testEquality :: forall (a0 :: k) (b0 :: k). STuple7 a0 -> STuple7 b0 -> Maybe (a0 :~: b0)

(ShowSing a, ShowSing b, ShowSing c, ShowSing d, ShowSing e, ShowSing f, ShowSing g) => Show (STuple7 z)

Defined in Data.Singletons.Base.Instances

Methods

showsPrec :: Int -> STuple7 z -> ShowS

show :: STuple7 z -> String

showList :: [STuple7 z] -> ShowS

Singletons from Data.Tuple

type family Fst (a :: (a, b)) :: a where ...

Equations

Fst '(x, _) = x

sFst :: forall a b (t :: (a, b)). Sing t -> Sing (Apply FstSym0 t :: a)

type family Snd (a :: (a, b)) :: b where ...

Equations

Snd '(_, y) = y

sSnd :: forall a b (t :: (a, b)). Sing t -> Sing (Apply SndSym0 t :: b)

type family Curry (a :: (~>) (a, b) c) (a :: a) (a :: b) :: c where ...

Equations

Curry f x y = Apply f (Apply (Apply Tuple2Sym0 x) y)

sCurry :: forall a b c (t :: (~>) (a, b) c) (t :: a) (t :: b). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply CurrySym0 t) t) t :: c)

type family Uncurry (a :: (~>) a ((~>) b c)) (a :: (a, b)) :: c where ...

Equations

Uncurry f p = Apply (Apply f (Apply FstSym0 p)) (Apply SndSym0 p)

sUncurry :: forall a b c (t :: (~>) a ((~>) b c)) (t :: (a, b)). Sing t -> Sing t -> Sing (Apply (Apply UncurrySym0 t) t :: c)

type family Swap (a :: (a, b)) :: (b, a) where ...

Equations

Swap '(a, b) = Apply (Apply Tuple2Sym0 b) a

sSwap :: forall a b (t :: (a, b)). Sing t -> Sing (Apply SwapSym0 t :: (b, a))

Defunctionalization symbols

type family Tuple0Sym0 :: () where ...

Equations

Tuple0Sym0 = '()

data Tuple2Sym0 :: (~>) a ((~>) b (a :: Type, b :: Type))

Instances

SingI (Tuple2Sym0 :: TyFun a (b ~> (a, b)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple2Sym0

SuppressUnusedWarnings (Tuple2Sym0 :: TyFun a (b ~> (a, b)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple2Sym0 :: TyFun a (b ~> (a, b)) -> Type) (a6989586621679042302 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple2Sym0 :: TyFun a (b ~> (a, b)) -> Type) (a6989586621679042302 :: a) = Tuple2Sym1 a6989586621679042302 :: TyFun b (a, b) -> Type

data Tuple2Sym1 (a6989586621679042302 :: a) :: (~>) b (a :: Type, b :: Type)

Instances

SingI d => SingI (Tuple2Sym1 d :: TyFun b (a, b) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple2Sym1 d)

SuppressUnusedWarnings (Tuple2Sym1 a6989586621679042302 :: TyFun b (a, b) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple2Sym1 a6989586621679042302 :: TyFun k2 (k1, k2) -> Type) (a6989586621679042303 :: k2)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple2Sym1 a6989586621679042302 :: TyFun k2 (k1, k2) -> Type) (a6989586621679042303 :: k2) = '(a6989586621679042302, a6989586621679042303)

type family Tuple2Sym2 (a6989586621679042302 :: a) (a6989586621679042303 :: b) :: (a :: Type, b :: Type) where ...

Equations

Tuple2Sym2 a6989586621679042302 a6989586621679042303 = '(a6989586621679042302, a6989586621679042303)

data Tuple3Sym0 :: (~>) a ((~>) b ((~>) c (a :: Type, b :: Type, c :: Type)))

Instances

SingI (Tuple3Sym0 :: TyFun a (b ~> (c ~> (a, b, c))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple3Sym0

SuppressUnusedWarnings (Tuple3Sym0 :: TyFun a (b ~> (c ~> (a, b, c))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple3Sym0 :: TyFun a (b ~> (c ~> (a, b, c))) -> Type) (a6989586621679042332 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple3Sym0 :: TyFun a (b ~> (c ~> (a, b, c))) -> Type) (a6989586621679042332 :: a) = Tuple3Sym1 a6989586621679042332 :: TyFun b (c ~> (a, b, c)) -> Type

data Tuple3Sym1 (a6989586621679042332 :: a) :: (~>) b ((~>) c (a :: Type, b :: Type, c :: Type))

Instances

SingI d => SingI (Tuple3Sym1 d :: TyFun b (c ~> (a, b, c)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple3Sym1 d)

SuppressUnusedWarnings (Tuple3Sym1 a6989586621679042332 :: TyFun b (c ~> (a, b, c)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple3Sym1 a6989586621679042332 :: TyFun b (c ~> (a, b, c)) -> Type) (a6989586621679042333 :: b)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple3Sym1 a6989586621679042332 :: TyFun b (c ~> (a, b, c)) -> Type) (a6989586621679042333 :: b) = Tuple3Sym2 a6989586621679042332 a6989586621679042333 :: TyFun c (a, b, c) -> Type

data Tuple3Sym2 (a6989586621679042332 :: a) (a6989586621679042333 :: b) :: (~>) c (a :: Type, b :: Type, c :: Type)

Instances

(SingI d1, SingI d2) => SingI (Tuple3Sym2 d1 d2 :: TyFun c (a, b, c) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple3Sym2 d1 d2)

SuppressUnusedWarnings (Tuple3Sym2 a6989586621679042332 a6989586621679042333 :: TyFun c (a, b, c) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple3Sym2 a6989586621679042332 a6989586621679042333 :: TyFun k3 (k1, k2, k3) -> Type) (a6989586621679042334 :: k3)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple3Sym2 a6989586621679042332 a6989586621679042333 :: TyFun k3 (k1, k2, k3) -> Type) (a6989586621679042334 :: k3) = '(a6989586621679042332, a6989586621679042333, a6989586621679042334)

type family Tuple3Sym3 (a6989586621679042332 :: a) (a6989586621679042333 :: b) (a6989586621679042334 :: c) :: (a :: Type, b :: Type, c :: Type) where ...

Equations

Tuple3Sym3 a6989586621679042332 a6989586621679042333 a6989586621679042334 = '(a6989586621679042332, a6989586621679042333, a6989586621679042334)

data Tuple4Sym0 :: (~>) a ((~>) b ((~>) c ((~>) d (a :: Type, b :: Type, c :: Type, d :: Type))))

Instances

SingI (Tuple4Sym0 :: TyFun a (b ~> (c ~> (d ~> (a, b, c, d)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple4Sym0

SuppressUnusedWarnings (Tuple4Sym0 :: TyFun a (b ~> (c ~> (d ~> (a, b, c, d)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple4Sym0 :: TyFun a (b ~> (c ~> (d ~> (a, b, c, d)))) -> Type) (a6989586621679042377 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple4Sym0 :: TyFun a (b ~> (c ~> (d ~> (a, b, c, d)))) -> Type) (a6989586621679042377 :: a) = Tuple4Sym1 a6989586621679042377 :: TyFun b (c ~> (d ~> (a, b, c, d))) -> Type

data Tuple4Sym1 (a6989586621679042377 :: a) :: (~>) b ((~>) c ((~>) d (a :: Type, b :: Type, c :: Type, d :: Type)))

Instances

SingI d1 => SingI (Tuple4Sym1 d1 :: TyFun b (c ~> (d2 ~> (a, b, c, d2))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple4Sym1 d1)

SuppressUnusedWarnings (Tuple4Sym1 a6989586621679042377 :: TyFun b (c ~> (d ~> (a, b, c, d))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple4Sym1 a6989586621679042377 :: TyFun b (c ~> (d ~> (a, b, c, d))) -> Type) (a6989586621679042378 :: b)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple4Sym1 a6989586621679042377 :: TyFun b (c ~> (d ~> (a, b, c, d))) -> Type) (a6989586621679042378 :: b) = Tuple4Sym2 a6989586621679042377 a6989586621679042378 :: TyFun c (d ~> (a, b, c, d)) -> Type

data Tuple4Sym2 (a6989586621679042377 :: a) (a6989586621679042378 :: b) :: (~>) c ((~>) d (a :: Type, b :: Type, c :: Type, d :: Type))

Instances

(SingI d1, SingI d2) => SingI (Tuple4Sym2 d1 d2 :: TyFun c (d3 ~> (a, b, c, d3)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple4Sym2 d1 d2)

SuppressUnusedWarnings (Tuple4Sym2 a6989586621679042377 a6989586621679042378 :: TyFun c (d ~> (a, b, c, d)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple4Sym2 a6989586621679042377 a6989586621679042378 :: TyFun c (d ~> (a, b, c, d)) -> Type) (a6989586621679042379 :: c)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple4Sym2 a6989586621679042377 a6989586621679042378 :: TyFun c (d ~> (a, b, c, d)) -> Type) (a6989586621679042379 :: c) = Tuple4Sym3 a6989586621679042377 a6989586621679042378 a6989586621679042379 :: TyFun d (a, b, c, d) -> Type

data Tuple4Sym3 (a6989586621679042377 :: a) (a6989586621679042378 :: b) (a6989586621679042379 :: c) :: (~>) d (a :: Type, b :: Type, c :: Type, d :: Type)

Instances

(SingI d1, SingI d2, SingI d3) => SingI (Tuple4Sym3 d1 d2 d3 :: TyFun d4 (a, b, c, d4) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple4Sym3 d1 d2 d3)

SuppressUnusedWarnings (Tuple4Sym3 a6989586621679042377 a6989586621679042378 a6989586621679042379 :: TyFun d (a, b, c, d) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple4Sym3 a6989586621679042377 a6989586621679042378 a6989586621679042379 :: TyFun k4 (k1, k2, k3, k4) -> Type) (a6989586621679042380 :: k4)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple4Sym3 a6989586621679042377 a6989586621679042378 a6989586621679042379 :: TyFun k4 (k1, k2, k3, k4) -> Type) (a6989586621679042380 :: k4) = '(a6989586621679042377, a6989586621679042378, a6989586621679042379, a6989586621679042380)

type family Tuple4Sym4 (a6989586621679042377 :: a) (a6989586621679042378 :: b) (a6989586621679042379 :: c) (a6989586621679042380 :: d) :: (a :: Type, b :: Type, c :: Type, d :: Type) where ...

Equations

Tuple4Sym4 a6989586621679042377 a6989586621679042378 a6989586621679042379 a6989586621679042380 = '(a6989586621679042377, a6989586621679042378, a6989586621679042379, a6989586621679042380)

data Tuple5Sym0 :: (~>) a ((~>) b ((~>) c ((~>) d ((~>) e (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type)))))

Instances

SingI (Tuple5Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (a, b, c, d, e))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple5Sym0

SuppressUnusedWarnings (Tuple5Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (a, b, c, d, e))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple5Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (a, b, c, d, e))))) -> Type) (a6989586621679042439 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple5Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (a, b, c, d, e))))) -> Type) (a6989586621679042439 :: a) = Tuple5Sym1 a6989586621679042439 :: TyFun b (c ~> (d ~> (e ~> (a, b, c, d, e)))) -> Type

data Tuple5Sym1 (a6989586621679042439 :: a) :: (~>) b ((~>) c ((~>) d ((~>) e (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type))))

Instances

SingI d1 => SingI (Tuple5Sym1 d1 :: TyFun b (c ~> (d2 ~> (e ~> (a, b, c, d2, e)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple5Sym1 d1)

SuppressUnusedWarnings (Tuple5Sym1 a6989586621679042439 :: TyFun b (c ~> (d ~> (e ~> (a, b, c, d, e)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple5Sym1 a6989586621679042439 :: TyFun b (c ~> (d ~> (e ~> (a, b, c, d, e)))) -> Type) (a6989586621679042440 :: b)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple5Sym1 a6989586621679042439 :: TyFun b (c ~> (d ~> (e ~> (a, b, c, d, e)))) -> Type) (a6989586621679042440 :: b) = Tuple5Sym2 a6989586621679042439 a6989586621679042440 :: TyFun c (d ~> (e ~> (a, b, c, d, e))) -> Type

data Tuple5Sym2 (a6989586621679042439 :: a) (a6989586621679042440 :: b) :: (~>) c ((~>) d ((~>) e (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type)))

Instances

(SingI d1, SingI d2) => SingI (Tuple5Sym2 d1 d2 :: TyFun c (d3 ~> (e ~> (a, b, c, d3, e))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple5Sym2 d1 d2)

SuppressUnusedWarnings (Tuple5Sym2 a6989586621679042439 a6989586621679042440 :: TyFun c (d ~> (e ~> (a, b, c, d, e))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple5Sym2 a6989586621679042439 a6989586621679042440 :: TyFun c (d ~> (e ~> (a, b, c, d, e))) -> Type) (a6989586621679042441 :: c)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple5Sym2 a6989586621679042439 a6989586621679042440 :: TyFun c (d ~> (e ~> (a, b, c, d, e))) -> Type) (a6989586621679042441 :: c) = Tuple5Sym3 a6989586621679042439 a6989586621679042440 a6989586621679042441 :: TyFun d (e ~> (a, b, c, d, e)) -> Type

data Tuple5Sym3 (a6989586621679042439 :: a) (a6989586621679042440 :: b) (a6989586621679042441 :: c) :: (~>) d ((~>) e (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type))

Instances

(SingI d1, SingI d2, SingI d3) => SingI (Tuple5Sym3 d1 d2 d3 :: TyFun d4 (e ~> (a, b, c, d4, e)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple5Sym3 d1 d2 d3)

SuppressUnusedWarnings (Tuple5Sym3 a6989586621679042439 a6989586621679042440 a6989586621679042441 :: TyFun d (e ~> (a, b, c, d, e)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple5Sym3 a6989586621679042439 a6989586621679042440 a6989586621679042441 :: TyFun d (e ~> (a, b, c, d, e)) -> Type) (a6989586621679042442 :: d)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple5Sym3 a6989586621679042439 a6989586621679042440 a6989586621679042441 :: TyFun d (e ~> (a, b, c, d, e)) -> Type) (a6989586621679042442 :: d) = Tuple5Sym4 a6989586621679042439 a6989586621679042440 a6989586621679042441 a6989586621679042442 :: TyFun e (a, b, c, d, e) -> Type

data Tuple5Sym4 (a6989586621679042439 :: a) (a6989586621679042440 :: b) (a6989586621679042441 :: c) (a6989586621679042442 :: d) :: (~>) e (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type)

Instances

(SingI d1, SingI d2, SingI d3, SingI d5) => SingI (Tuple5Sym4 d1 d2 d3 d5 :: TyFun e (a, b, c, d4, e) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple5Sym4 d1 d2 d3 d5)

SuppressUnusedWarnings (Tuple5Sym4 a6989586621679042439 a6989586621679042440 a6989586621679042441 a6989586621679042442 :: TyFun e (a, b, c, d, e) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple5Sym4 a6989586621679042439 a6989586621679042440 a6989586621679042441 a6989586621679042442 :: TyFun k5 (k1, k2, k3, k4, k5) -> Type) (a6989586621679042443 :: k5)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple5Sym4 a6989586621679042439 a6989586621679042440 a6989586621679042441 a6989586621679042442 :: TyFun k5 (k1, k2, k3, k4, k5) -> Type) (a6989586621679042443 :: k5) = '(a6989586621679042439, a6989586621679042440, a6989586621679042441, a6989586621679042442, a6989586621679042443)

type family Tuple5Sym5 (a6989586621679042439 :: a) (a6989586621679042440 :: b) (a6989586621679042441 :: c) (a6989586621679042442 :: d) (a6989586621679042443 :: e) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type) where ...

Equations

Tuple5Sym5 a6989586621679042439 a6989586621679042440 a6989586621679042441 a6989586621679042442 a6989586621679042443 = '(a6989586621679042439, a6989586621679042440, a6989586621679042441, a6989586621679042442, a6989586621679042443)

data Tuple6Sym0 :: (~>) a ((~>) b ((~>) c ((~>) d ((~>) e ((~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type))))))

Instances

SingI (Tuple6Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f)))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple6Sym0

SuppressUnusedWarnings (Tuple6Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f)))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f)))))) -> Type) (a6989586621679042520 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f)))))) -> Type) (a6989586621679042520 :: a) = Tuple6Sym1 a6989586621679042520 :: TyFun b (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f))))) -> Type

data Tuple6Sym1 (a6989586621679042520 :: a) :: (~>) b ((~>) c ((~>) d ((~>) e ((~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type)))))

Instances

SingI d1 => SingI (Tuple6Sym1 d1 :: TyFun b (c ~> (d2 ~> (e ~> (f ~> (a, b, c, d2, e, f))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple6Sym1 d1)

SuppressUnusedWarnings (Tuple6Sym1 a6989586621679042520 :: TyFun b (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym1 a6989586621679042520 :: TyFun b (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f))))) -> Type) (a6989586621679042521 :: b)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym1 a6989586621679042520 :: TyFun b (c ~> (d ~> (e ~> (f ~> (a, b, c, d, e, f))))) -> Type) (a6989586621679042521 :: b) = Tuple6Sym2 a6989586621679042520 a6989586621679042521 :: TyFun c (d ~> (e ~> (f ~> (a, b, c, d, e, f)))) -> Type

data Tuple6Sym2 (a6989586621679042520 :: a) (a6989586621679042521 :: b) :: (~>) c ((~>) d ((~>) e ((~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type))))

Instances

(SingI d1, SingI d2) => SingI (Tuple6Sym2 d1 d2 :: TyFun c (d3 ~> (e ~> (f ~> (a, b, c, d3, e, f)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple6Sym2 d1 d2)

SuppressUnusedWarnings (Tuple6Sym2 a6989586621679042520 a6989586621679042521 :: TyFun c (d ~> (e ~> (f ~> (a, b, c, d, e, f)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym2 a6989586621679042520 a6989586621679042521 :: TyFun c (d ~> (e ~> (f ~> (a, b, c, d, e, f)))) -> Type) (a6989586621679042522 :: c)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym2 a6989586621679042520 a6989586621679042521 :: TyFun c (d ~> (e ~> (f ~> (a, b, c, d, e, f)))) -> Type) (a6989586621679042522 :: c) = Tuple6Sym3 a6989586621679042520 a6989586621679042521 a6989586621679042522 :: TyFun d (e ~> (f ~> (a, b, c, d, e, f))) -> Type

data Tuple6Sym3 (a6989586621679042520 :: a) (a6989586621679042521 :: b) (a6989586621679042522 :: c) :: (~>) d ((~>) e ((~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type)))

Instances

(SingI d1, SingI d2, SingI d3) => SingI (Tuple6Sym3 d1 d2 d3 :: TyFun d4 (e ~> (f ~> (a, b, c, d4, e, f))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple6Sym3 d1 d2 d3)

SuppressUnusedWarnings (Tuple6Sym3 a6989586621679042520 a6989586621679042521 a6989586621679042522 :: TyFun d (e ~> (f ~> (a, b, c, d, e, f))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym3 a6989586621679042520 a6989586621679042521 a6989586621679042522 :: TyFun d (e ~> (f ~> (a, b, c, d, e, f))) -> Type) (a6989586621679042523 :: d)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym3 a6989586621679042520 a6989586621679042521 a6989586621679042522 :: TyFun d (e ~> (f ~> (a, b, c, d, e, f))) -> Type) (a6989586621679042523 :: d) = Tuple6Sym4 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 :: TyFun e (f ~> (a, b, c, d, e, f)) -> Type

data Tuple6Sym4 (a6989586621679042520 :: a) (a6989586621679042521 :: b) (a6989586621679042522 :: c) (a6989586621679042523 :: d) :: (~>) e ((~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type))

Instances

(SingI d1, SingI d2, SingI d3, SingI d5) => SingI (Tuple6Sym4 d1 d2 d3 d5 :: TyFun e (f ~> (a, b, c, d4, e, f)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple6Sym4 d1 d2 d3 d5)

SuppressUnusedWarnings (Tuple6Sym4 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 :: TyFun e (f ~> (a, b, c, d, e, f)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym4 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 :: TyFun e (f ~> (a, b, c, d, e, f)) -> Type) (a6989586621679042524 :: e)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym4 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 :: TyFun e (f ~> (a, b, c, d, e, f)) -> Type) (a6989586621679042524 :: e) = Tuple6Sym5 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 a6989586621679042524 :: TyFun f (a, b, c, d, e, f) -> Type

data Tuple6Sym5 (a6989586621679042520 :: a) (a6989586621679042521 :: b) (a6989586621679042522 :: c) (a6989586621679042523 :: d) (a6989586621679042524 :: e) :: (~>) f (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type)

Instances

(SingI d1, SingI d2, SingI d3, SingI d5, SingI d6) => SingI (Tuple6Sym5 d1 d2 d3 d5 d6 :: TyFun f (a, b, c, d4, e, f) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple6Sym5 d1 d2 d3 d5 d6)

SuppressUnusedWarnings (Tuple6Sym5 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 a6989586621679042524 :: TyFun f (a, b, c, d, e, f) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple6Sym5 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 a6989586621679042524 :: TyFun k6 (k1, k2, k3, k4, k5, k6) -> Type) (a6989586621679042525 :: k6)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple6Sym5 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 a6989586621679042524 :: TyFun k6 (k1, k2, k3, k4, k5, k6) -> Type) (a6989586621679042525 :: k6) = '(a6989586621679042520, a6989586621679042521, a6989586621679042522, a6989586621679042523, a6989586621679042524, a6989586621679042525)

type family Tuple6Sym6 (a6989586621679042520 :: a) (a6989586621679042521 :: b) (a6989586621679042522 :: c) (a6989586621679042523 :: d) (a6989586621679042524 :: e) (a6989586621679042525 :: f) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type) where ...

Equations

Tuple6Sym6 a6989586621679042520 a6989586621679042521 a6989586621679042522 a6989586621679042523 a6989586621679042524 a6989586621679042525 = '(a6989586621679042520, a6989586621679042521, a6989586621679042522, a6989586621679042523, a6989586621679042524, a6989586621679042525)

data Tuple7Sym0 :: (~>) a ((~>) b ((~>) c ((~>) d ((~>) e ((~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type)))))))

Instances

SingI (Tuple7Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing Tuple7Sym0

SuppressUnusedWarnings (Tuple7Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))))) -> Type) (a6989586621679042622 :: a)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym0 :: TyFun a (b ~> (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))))) -> Type) (a6989586621679042622 :: a) = Tuple7Sym1 a6989586621679042622 :: TyFun b (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))))) -> Type

data Tuple7Sym1 (a6989586621679042622 :: a) :: (~>) b ((~>) c ((~>) d ((~>) e ((~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type))))))

Instances

SingI d1 => SingI (Tuple7Sym1 d1 :: TyFun b (c ~> (d2 ~> (e ~> (f ~> (g ~> (a, b, c, d2, e, f, g)))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym1 d1)

SuppressUnusedWarnings (Tuple7Sym1 a6989586621679042622 :: TyFun b (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym1 a6989586621679042622 :: TyFun b (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))))) -> Type) (a6989586621679042623 :: b)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym1 a6989586621679042622 :: TyFun b (c ~> (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))))) -> Type) (a6989586621679042623 :: b) = Tuple7Sym2 a6989586621679042622 a6989586621679042623 :: TyFun c (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))) -> Type

data Tuple7Sym2 (a6989586621679042622 :: a) (a6989586621679042623 :: b) :: (~>) c ((~>) d ((~>) e ((~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type)))))

Instances

(SingI d1, SingI d2) => SingI (Tuple7Sym2 d1 d2 :: TyFun c (d3 ~> (e ~> (f ~> (g ~> (a, b, c, d3, e, f, g))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym2 d1 d2)

SuppressUnusedWarnings (Tuple7Sym2 a6989586621679042622 a6989586621679042623 :: TyFun c (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym2 a6989586621679042622 a6989586621679042623 :: TyFun c (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))) -> Type) (a6989586621679042624 :: c)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym2 a6989586621679042622 a6989586621679042623 :: TyFun c (d ~> (e ~> (f ~> (g ~> (a, b, c, d, e, f, g))))) -> Type) (a6989586621679042624 :: c) = Tuple7Sym3 a6989586621679042622 a6989586621679042623 a6989586621679042624 :: TyFun d (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))) -> Type

data Tuple7Sym3 (a6989586621679042622 :: a) (a6989586621679042623 :: b) (a6989586621679042624 :: c) :: (~>) d ((~>) e ((~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type))))

Instances

(SingI d1, SingI d2, SingI d3) => SingI (Tuple7Sym3 d1 d2 d3 :: TyFun d4 (e ~> (f ~> (g ~> (a, b, c, d4, e, f, g)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym3 d1 d2 d3)

SuppressUnusedWarnings (Tuple7Sym3 a6989586621679042622 a6989586621679042623 a6989586621679042624 :: TyFun d (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym3 a6989586621679042622 a6989586621679042623 a6989586621679042624 :: TyFun d (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))) -> Type) (a6989586621679042625 :: d)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym3 a6989586621679042622 a6989586621679042623 a6989586621679042624 :: TyFun d (e ~> (f ~> (g ~> (a, b, c, d, e, f, g)))) -> Type) (a6989586621679042625 :: d) = Tuple7Sym4 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 :: TyFun e (f ~> (g ~> (a, b, c, d, e, f, g))) -> Type

data Tuple7Sym4 (a6989586621679042622 :: a) (a6989586621679042623 :: b) (a6989586621679042624 :: c) (a6989586621679042625 :: d) :: (~>) e ((~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type)))

Instances

(SingI d1, SingI d2, SingI d3, SingI d5) => SingI (Tuple7Sym4 d1 d2 d3 d5 :: TyFun e (f ~> (g ~> (a, b, c, d4, e, f, g))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym4 d1 d2 d3 d5)

SuppressUnusedWarnings (Tuple7Sym4 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 :: TyFun e (f ~> (g ~> (a, b, c, d, e, f, g))) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym4 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 :: TyFun e (f ~> (g ~> (a, b, c, d, e, f, g))) -> Type) (a6989586621679042626 :: e)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym4 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 :: TyFun e (f ~> (g ~> (a, b, c, d, e, f, g))) -> Type) (a6989586621679042626 :: e) = Tuple7Sym5 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 :: TyFun f (g ~> (a, b, c, d, e, f, g)) -> Type

data Tuple7Sym5 (a6989586621679042622 :: a) (a6989586621679042623 :: b) (a6989586621679042624 :: c) (a6989586621679042625 :: d) (a6989586621679042626 :: e) :: (~>) f ((~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type))

Instances

(SingI d1, SingI d2, SingI d3, SingI d5, SingI d6) => SingI (Tuple7Sym5 d1 d2 d3 d5 d6 :: TyFun f (g ~> (a, b, c, d4, e, f, g)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym5 d1 d2 d3 d5 d6)

SuppressUnusedWarnings (Tuple7Sym5 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 :: TyFun f (g ~> (a, b, c, d, e, f, g)) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym5 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 :: TyFun f (g ~> (a, b, c, d, e, f, g)) -> Type) (a6989586621679042627 :: f)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym5 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 :: TyFun f (g ~> (a, b, c, d, e, f, g)) -> Type) (a6989586621679042627 :: f) = Tuple7Sym6 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 a6989586621679042627 :: TyFun g (a, b, c, d, e, f, g) -> Type

data Tuple7Sym6 (a6989586621679042622 :: a) (a6989586621679042623 :: b) (a6989586621679042624 :: c) (a6989586621679042625 :: d) (a6989586621679042626 :: e) (a6989586621679042627 :: f) :: (~>) g (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type)

Instances

(SingI d1, SingI d2, SingI d3, SingI d5, SingI d6, SingI d7) => SingI (Tuple7Sym6 d1 d2 d3 d5 d6 d7 :: TyFun g (a, b, c, d4, e, f, g) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

sing :: Sing (Tuple7Sym6 d1 d2 d3 d5 d6 d7)

SuppressUnusedWarnings (Tuple7Sym6 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 a6989586621679042627 :: TyFun g (a, b, c, d, e, f, g) -> Type)

Defined in Data.Singletons.Base.Instances

Methods

suppressUnusedWarnings :: ()

type Apply (Tuple7Sym6 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 a6989586621679042627 :: TyFun k7 (k1, k2, k3, k4, k5, k6, k7) -> Type) (a6989586621679042628 :: k7)

Defined in Data.Singletons.Base.Instances

type Apply (Tuple7Sym6 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 a6989586621679042627 :: TyFun k7 (k1, k2, k3, k4, k5, k6, k7) -> Type) (a6989586621679042628 :: k7) = '(a6989586621679042622, a6989586621679042623, a6989586621679042624, a6989586621679042625, a6989586621679042626, a6989586621679042627, a6989586621679042628)

type family Tuple7Sym7 (a6989586621679042622 :: a) (a6989586621679042623 :: b) (a6989586621679042624 :: c) (a6989586621679042625 :: d) (a6989586621679042626 :: e) (a6989586621679042627 :: f) (a6989586621679042628 :: g) :: (a :: Type, b :: Type, c :: Type, d :: Type, e :: Type, f :: Type, g :: Type) where ...

Equations

Tuple7Sym7 a6989586621679042622 a6989586621679042623 a6989586621679042624 a6989586621679042625 a6989586621679042626 a6989586621679042627 a6989586621679042628 = '(a6989586621679042622, a6989586621679042623, a6989586621679042624, a6989586621679042625, a6989586621679042626, a6989586621679042627, a6989586621679042628)

data FstSym0 :: (~>) (a, b) a

Instances

SingI (FstSym0 :: TyFun (a, b) a -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing FstSym0

SuppressUnusedWarnings (FstSym0 :: TyFun (a, b) a -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (FstSym0 :: TyFun (a, b) a -> Type) (a6989586621679266788 :: (a, b))

Defined in Data.Tuple.Singletons

type Apply (FstSym0 :: TyFun (a, b) a -> Type) (a6989586621679266788 :: (a, b)) = Fst a6989586621679266788

type family FstSym1 (a6989586621679266788 :: (a, b)) :: a where ...

Equations

FstSym1 a6989586621679266788 = Fst a6989586621679266788

data SndSym0 :: (~>) (a, b) b

Instances

SingI (SndSym0 :: TyFun (a, b) b -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing SndSym0

SuppressUnusedWarnings (SndSym0 :: TyFun (a, b) b -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (SndSym0 :: TyFun (a, b) b -> Type) (a6989586621679266784 :: (a, b))

Defined in Data.Tuple.Singletons

type Apply (SndSym0 :: TyFun (a, b) b -> Type) (a6989586621679266784 :: (a, b)) = Snd a6989586621679266784

type family SndSym1 (a6989586621679266784 :: (a, b)) :: b where ...

Equations

SndSym1 a6989586621679266784 = Snd a6989586621679266784

data CurrySym0 :: (~>) ((~>) (a, b) c) ((~>) a ((~>) b c))

Instances

SingI (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing CurrySym0

SuppressUnusedWarnings (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type) (a6989586621679266776 :: (a, b) ~> c)

Defined in Data.Tuple.Singletons

type Apply (CurrySym0 :: TyFun ((a, b) ~> c) (a ~> (b ~> c)) -> Type) (a6989586621679266776 :: (a, b) ~> c) = CurrySym1 a6989586621679266776

data CurrySym1 (a6989586621679266776 :: (~>) (a, b) c) :: (~>) a ((~>) b c)

Instances

SingI d => SingI (CurrySym1 d :: TyFun a (b ~> c) -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing (CurrySym1 d)

SuppressUnusedWarnings (CurrySym1 a6989586621679266776 :: TyFun a (b ~> c) -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (CurrySym1 a6989586621679266776 :: TyFun a (b ~> c) -> Type) (a6989586621679266777 :: a)

Defined in Data.Tuple.Singletons

type Apply (CurrySym1 a6989586621679266776 :: TyFun a (b ~> c) -> Type) (a6989586621679266777 :: a) = CurrySym2 a6989586621679266776 a6989586621679266777

data CurrySym2 (a6989586621679266776 :: (~>) (a, b) c) (a6989586621679266777 :: a) :: (~>) b c

Instances

(SingI d1, SingI d2) => SingI (CurrySym2 d1 d2 :: TyFun b c -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing (CurrySym2 d1 d2)

SuppressUnusedWarnings (CurrySym2 a6989586621679266776 a6989586621679266777 :: TyFun b c -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (CurrySym2 a6989586621679266776 a6989586621679266777 :: TyFun b c -> Type) (a6989586621679266778 :: b)

Defined in Data.Tuple.Singletons

type Apply (CurrySym2 a6989586621679266776 a6989586621679266777 :: TyFun b c -> Type) (a6989586621679266778 :: b) = Curry a6989586621679266776 a6989586621679266777 a6989586621679266778

type family CurrySym3 (a6989586621679266776 :: (~>) (a, b) c) (a6989586621679266777 :: a) (a6989586621679266778 :: b) :: c where ...

Equations

CurrySym3 a6989586621679266776 a6989586621679266777 a6989586621679266778 = Curry a6989586621679266776 a6989586621679266777 a6989586621679266778

data UncurrySym0 :: (~>) ((~>) a ((~>) b c)) ((~>) (a, b) c)

Instances

SingI (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing UncurrySym0

SuppressUnusedWarnings (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type) (a6989586621679266768 :: a ~> (b ~> c))

Defined in Data.Tuple.Singletons

type Apply (UncurrySym0 :: TyFun (a ~> (b ~> c)) ((a, b) ~> c) -> Type) (a6989586621679266768 :: a ~> (b ~> c)) = UncurrySym1 a6989586621679266768

data UncurrySym1 (a6989586621679266768 :: (~>) a ((~>) b c)) :: (~>) (a, b) c

Instances

SingI d => SingI (UncurrySym1 d :: TyFun (a, b) c -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing (UncurrySym1 d)

SuppressUnusedWarnings (UncurrySym1 a6989586621679266768 :: TyFun (a, b) c -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (UncurrySym1 a6989586621679266768 :: TyFun (a, b) c -> Type) (a6989586621679266769 :: (a, b))

Defined in Data.Tuple.Singletons

type Apply (UncurrySym1 a6989586621679266768 :: TyFun (a, b) c -> Type) (a6989586621679266769 :: (a, b)) = Uncurry a6989586621679266768 a6989586621679266769

type family UncurrySym2 (a6989586621679266768 :: (~>) a ((~>) b c)) (a6989586621679266769 :: (a, b)) :: c where ...

Equations

UncurrySym2 a6989586621679266768 a6989586621679266769 = Uncurry a6989586621679266768 a6989586621679266769

data SwapSym0 :: (~>) (a, b) (b, a)

Instances

SingI (SwapSym0 :: TyFun (a, b) (b, a) -> Type)

Defined in Data.Tuple.Singletons

Methods

sing :: Sing SwapSym0

SuppressUnusedWarnings (SwapSym0 :: TyFun (a, b) (b, a) -> Type)

Defined in Data.Tuple.Singletons

Methods

suppressUnusedWarnings :: ()

type Apply (SwapSym0 :: TyFun (a, b) (b, a) -> Type) (a6989586621679266762 :: (a, b))

Defined in Data.Tuple.Singletons

type Apply (SwapSym0 :: TyFun (a, b) (b, a) -> Type) (a6989586621679266762 :: (a, b)) = Swap a6989586621679266762

type family SwapSym1 (a6989586621679266762 :: (a, b)) :: (b, a) where ...

Equations

SwapSym1 a6989586621679266762 = Swap a6989586621679266762