singletons-2.4.1: A framework for generating singleton types

Copyright(C) 2014 Jan Stolarek
LicenseBSD-style (see LICENSE)
MaintainerJan Stolarek (jan.stolarek@p.lodz.pl)
Stabilityexperimental
Portabilitynon-portable
Safe HaskellNone
LanguageHaskell2010

Data.Promotion.Prelude.Base

Contents

Description

Implements promoted 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 Prelude. Also, please excuse the apparent repeated variable names. This is due to an interaction between Template Haskell and Haddock.

Synopsis
  • type family Foldr (a :: TyFun a (TyFun b b -> Type) -> Type) (a :: b) (a :: [a]) :: b where ...
  • type family Map (a :: TyFun a b -> Type) (a :: [a]) :: [b] where ...
  • type family (a :: [a]) ++ (a :: [a]) :: [a] where ...
  • type family Otherwise :: Bool where ...
  • type family Id (a :: a) :: a where ...
  • type family Const (a :: a) (a :: b) :: a where ...
  • type family ((a :: TyFun b c -> Type) :. (a :: TyFun a b -> Type)) (a :: a) :: c where ...
  • type family (a :: TyFun a b -> Type) $ (a :: a) :: b where ...
  • type family (a :: TyFun a b -> Type) $! (a :: a) :: b where ...
  • type family Flip (a :: TyFun a (TyFun b c -> Type) -> Type) (a :: b) (a :: a) :: c where ...
  • type family Until (a :: TyFun a Bool -> Type) (a :: TyFun a a -> Type) (a :: a) :: a where ...
  • type family AsTypeOf (a :: a) (a :: a) :: a where ...
  • type family Seq (a :: a) (a :: b) :: b where ...
  • data FoldrSym0 (l :: TyFun (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> Type))
  • data FoldrSym1 (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (l :: TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type))
  • data FoldrSym2 (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (l :: b6989586621679435607) (l :: TyFun [a6989586621679435606] b6989586621679435607)
  • type FoldrSym3 (t :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (t :: b6989586621679435607) (t :: [a6989586621679435606]) = Foldr t t t
  • data MapSym0 (l :: TyFun (TyFun a6989586621679435604 b6989586621679435605 -> Type) (TyFun [a6989586621679435604] [b6989586621679435605] -> Type))
  • data MapSym1 (l :: TyFun a6989586621679435604 b6989586621679435605 -> Type) (l :: TyFun [a6989586621679435604] [b6989586621679435605])
  • type MapSym2 (t :: TyFun a6989586621679435604 b6989586621679435605 -> Type) (t :: [a6989586621679435604]) = Map t t
  • data (++@#@$) (l :: TyFun [a6989586621679435603] (TyFun [a6989586621679435603] [a6989586621679435603] -> Type))
  • data (l :: [a6989586621679435603]) ++@#@$$ (l :: TyFun [a6989586621679435603] [a6989586621679435603])
  • type (++@#@$$$) (t :: [a6989586621679435603]) (t :: [a6989586621679435603]) = (++) t t
  • type OtherwiseSym0 = Otherwise
  • data IdSym0 (l :: TyFun a6989586621679435602 a6989586621679435602)
  • type IdSym1 (t :: a6989586621679435602) = Id t
  • data ConstSym0 (l :: TyFun a6989586621679435600 (TyFun b6989586621679435601 a6989586621679435600 -> Type))
  • data ConstSym1 (l :: a6989586621679435600) (l :: TyFun b6989586621679435601 a6989586621679435600)
  • type ConstSym2 (t :: a6989586621679435600) (t :: b6989586621679435601) = Const t t
  • data (.@#@$) (l :: TyFun (TyFun b6989586621679435597 c6989586621679435598 -> Type) (TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> Type))
  • data (l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) .@#@$$ (l :: TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type))
  • data ((l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) .@#@$$$ (l :: TyFun a6989586621679435599 b6989586621679435597 -> Type)) (l :: TyFun a6989586621679435599 c6989586621679435598)
  • type (.@#@$$$$) (t :: TyFun b6989586621679435597 c6989586621679435598 -> Type) (t :: TyFun a6989586621679435599 b6989586621679435597 -> Type) (t :: a6989586621679435599) = (:.) t t t
  • data ($@#@$) (l :: TyFun (TyFun a6989586621679435591 b6989586621679435592 -> Type) (TyFun a6989586621679435591 b6989586621679435592 -> Type))
  • data (l :: TyFun a6989586621679435591 b6989586621679435592 -> Type) $@#@$$ (l :: TyFun a6989586621679435591 b6989586621679435592)
  • type ($@#@$$$) (t :: TyFun a6989586621679435591 b6989586621679435592 -> Type) (t :: a6989586621679435591) = ($) t t
  • data ($!@#@$) (l :: TyFun (TyFun a6989586621679435589 b6989586621679435590 -> Type) (TyFun a6989586621679435589 b6989586621679435590 -> Type))
  • data (l :: TyFun a6989586621679435589 b6989586621679435590 -> Type) $!@#@$$ (l :: TyFun a6989586621679435589 b6989586621679435590)
  • type ($!@#@$$$) (t :: TyFun a6989586621679435589 b6989586621679435590 -> Type) (t :: a6989586621679435589) = ($!) t t
  • data FlipSym0 (l :: TyFun (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> Type))
  • data FlipSym1 (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (l :: TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type))
  • data FlipSym2 (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (l :: b6989586621679435595) (l :: TyFun a6989586621679435594 c6989586621679435596)
  • type FlipSym3 (t :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (t :: b6989586621679435595) (t :: a6989586621679435594) = Flip t t t
  • data UntilSym0 (l :: TyFun (TyFun a6989586621679987157 Bool -> Type) (TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> Type))
  • data UntilSym1 (l :: TyFun a6989586621679987157 Bool -> Type) (l :: TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type))
  • data UntilSym2 (l :: TyFun a6989586621679987157 Bool -> Type) (l :: TyFun a6989586621679987157 a6989586621679987157 -> Type) (l :: TyFun a6989586621679987157 a6989586621679987157)
  • type UntilSym3 (t :: TyFun a6989586621679987157 Bool -> Type) (t :: TyFun a6989586621679987157 a6989586621679987157 -> Type) (t :: a6989586621679987157) = Until t t t
  • data AsTypeOfSym0 (l :: TyFun a6989586621679435593 (TyFun a6989586621679435593 a6989586621679435593 -> Type))
  • data AsTypeOfSym1 (l :: a6989586621679435593) (l :: TyFun a6989586621679435593 a6989586621679435593)
  • type AsTypeOfSym2 (t :: a6989586621679435593) (t :: a6989586621679435593) = AsTypeOf t t
  • data SeqSym0 (l :: TyFun a6989586621679435587 (TyFun b6989586621679435588 b6989586621679435588 -> Type))
  • data SeqSym1 (l :: a6989586621679435587) (l :: TyFun b6989586621679435588 b6989586621679435588)
  • type SeqSym2 (t :: a6989586621679435587) (t :: b6989586621679435588) = Seq t t

Promoted functions from GHC.Base

type family Foldr (a :: TyFun a (TyFun b b -> Type) -> Type) (a :: b) (a :: [a]) :: b where ... #

Equations

Foldr k z a_6989586621679435871 = Apply (Let6989586621679435876GoSym3 k z a_6989586621679435871) a_6989586621679435871 

type family Map (a :: TyFun a b -> Type) (a :: [a]) :: [b] where ... #

Equations

Map _ '[] = '[] 
Map f ((:) x xs) = Apply (Apply (:@#@$) (Apply f x)) (Apply (Apply MapSym0 f) xs) 

type family (a :: [a]) ++ (a :: [a]) :: [a] where ... #

Equations

'[] ++ ys = ys 
((:) x xs) ++ ys = Apply (Apply (:@#@$) x) (Apply (Apply (++@#@$) xs) ys) 

type family Otherwise :: Bool where ... #

Equations

Otherwise = TrueSym0 

type family Id (a :: a) :: a where ... #

Equations

Id x = x 

type family Const (a :: a) (a :: b) :: a where ... #

Equations

Const x _ = x 

type family ((a :: TyFun b c -> Type) :. (a :: TyFun a b -> Type)) (a :: a) :: c where ... #

Equations

(f :. g) a_6989586621679435774 = Apply (Apply (Apply (Apply Lambda_6989586621679435779Sym0 f) g) a_6989586621679435774) a_6989586621679435774 

type family (a :: TyFun a b -> Type) $ (a :: a) :: b where ... #

Equations

f $ x = Apply f x 

type family (a :: TyFun a b -> Type) $! (a :: a) :: b where ... #

Equations

f $! x = Apply f (Let6989586621679435722VxSym2 f x) 

type family Flip (a :: TyFun a (TyFun b c -> Type) -> Type) (a :: b) (a :: a) :: c where ... #

Equations

Flip f x y = Apply (Apply f y) x 

type family Until (a :: TyFun a Bool -> Type) (a :: TyFun a a -> Type) (a :: a) :: a where ... #

Equations

Until p f a_6989586621679987180 = Apply (Let6989586621679987185GoSym3 p f a_6989586621679987180) a_6989586621679987180 

type family AsTypeOf (a :: a) (a :: a) :: a where ... #

Equations

AsTypeOf a_6989586621679435811 a_6989586621679435813 = Apply (Apply ConstSym0 a_6989586621679435811) a_6989586621679435813 

type family Seq (a :: a) (a :: b) :: b where ... infixr 0 #

Equations

Seq _ x = x 

Defunctionalization symbols

data FoldrSym0 (l :: TyFun (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> Type)) #

Instances
SuppressUnusedWarnings (FoldrSym0 :: TyFun (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym0 :: TyFun (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> Type) -> *) (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym0 :: TyFun (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> Type) -> *) (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) = FoldrSym1 l

data FoldrSym1 (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (l :: TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type)) #

Instances
SuppressUnusedWarnings (FoldrSym1 :: (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) -> TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym1 l1 :: TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> *) (l2 :: b6989586621679435607) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym1 l1 :: TyFun b6989586621679435607 (TyFun [a6989586621679435606] b6989586621679435607 -> Type) -> *) (l2 :: b6989586621679435607) = FoldrSym2 l1 l2

data FoldrSym2 (l :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (l :: b6989586621679435607) (l :: TyFun [a6989586621679435606] b6989586621679435607) #

Instances
SuppressUnusedWarnings (FoldrSym2 :: (TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) -> b6989586621679435607 -> TyFun [a6989586621679435606] b6989586621679435607 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym2 l1 l2 :: TyFun [a] b -> *) (l3 :: [a]) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FoldrSym2 l1 l2 :: TyFun [a] b -> *) (l3 :: [a]) = Foldr l1 l2 l3

type FoldrSym3 (t :: TyFun a6989586621679435606 (TyFun b6989586621679435607 b6989586621679435607 -> Type) -> Type) (t :: b6989586621679435607) (t :: [a6989586621679435606]) = Foldr t t t #

data MapSym0 (l :: TyFun (TyFun a6989586621679435604 b6989586621679435605 -> Type) (TyFun [a6989586621679435604] [b6989586621679435605] -> Type)) #

Instances
SuppressUnusedWarnings (MapSym0 :: TyFun (TyFun a6989586621679435604 b6989586621679435605 -> Type) (TyFun [a6989586621679435604] [b6989586621679435605] -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (MapSym0 :: TyFun (TyFun a6989586621679435604 b6989586621679435605 -> Type) (TyFun [a6989586621679435604] [b6989586621679435605] -> Type) -> *) (l :: TyFun a6989586621679435604 b6989586621679435605 -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (MapSym0 :: TyFun (TyFun a6989586621679435604 b6989586621679435605 -> Type) (TyFun [a6989586621679435604] [b6989586621679435605] -> Type) -> *) (l :: TyFun a6989586621679435604 b6989586621679435605 -> Type) = MapSym1 l

data MapSym1 (l :: TyFun a6989586621679435604 b6989586621679435605 -> Type) (l :: TyFun [a6989586621679435604] [b6989586621679435605]) #

Instances
SuppressUnusedWarnings (MapSym1 :: (TyFun a6989586621679435604 b6989586621679435605 -> Type) -> TyFun [a6989586621679435604] [b6989586621679435605] -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (MapSym1 l1 :: TyFun [a] [b] -> *) (l2 :: [a]) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (MapSym1 l1 :: TyFun [a] [b] -> *) (l2 :: [a]) = Map l1 l2

type MapSym2 (t :: TyFun a6989586621679435604 b6989586621679435605 -> Type) (t :: [a6989586621679435604]) = Map t t #

data (++@#@$) (l :: TyFun [a6989586621679435603] (TyFun [a6989586621679435603] [a6989586621679435603] -> Type)) #

Instances
SuppressUnusedWarnings ((++@#@$) :: TyFun [a6989586621679435603] (TyFun [a6989586621679435603] [a6989586621679435603] -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((++@#@$) :: TyFun [a6989586621679435603] (TyFun [a6989586621679435603] [a6989586621679435603] -> Type) -> *) (l :: [a6989586621679435603]) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((++@#@$) :: TyFun [a6989586621679435603] (TyFun [a6989586621679435603] [a6989586621679435603] -> Type) -> *) (l :: [a6989586621679435603]) = (++@#@$$) l

data (l :: [a6989586621679435603]) ++@#@$$ (l :: TyFun [a6989586621679435603] [a6989586621679435603]) #

Instances
SuppressUnusedWarnings ((++@#@$$) :: [a6989586621679435603] -> TyFun [a6989586621679435603] [a6989586621679435603] -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((++@#@$$) l1 :: TyFun [a] [a] -> *) (l2 :: [a]) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((++@#@$$) l1 :: TyFun [a] [a] -> *) (l2 :: [a]) = l1 ++ l2

type (++@#@$$$) (t :: [a6989586621679435603]) (t :: [a6989586621679435603]) = (++) t t #

data IdSym0 (l :: TyFun a6989586621679435602 a6989586621679435602) #

Instances
SuppressUnusedWarnings (IdSym0 :: TyFun a6989586621679435602 a6989586621679435602 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (IdSym0 :: TyFun a a -> *) (l :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (IdSym0 :: TyFun a a -> *) (l :: a) = Id l

type IdSym1 (t :: a6989586621679435602) = Id t #

data ConstSym0 (l :: TyFun a6989586621679435600 (TyFun b6989586621679435601 a6989586621679435600 -> Type)) #

Instances
SuppressUnusedWarnings (ConstSym0 :: TyFun a6989586621679435600 (TyFun b6989586621679435601 a6989586621679435600 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (ConstSym0 :: TyFun a6989586621679435600 (TyFun b6989586621679435601 a6989586621679435600 -> Type) -> *) (l :: a6989586621679435600) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (ConstSym0 :: TyFun a6989586621679435600 (TyFun b6989586621679435601 a6989586621679435600 -> Type) -> *) (l :: a6989586621679435600) = (ConstSym1 l :: TyFun b6989586621679435601 a6989586621679435600 -> *)

data ConstSym1 (l :: a6989586621679435600) (l :: TyFun b6989586621679435601 a6989586621679435600) #

Instances
SuppressUnusedWarnings (ConstSym1 :: a6989586621679435600 -> TyFun b6989586621679435601 a6989586621679435600 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (ConstSym1 l1 :: TyFun b a -> *) (l2 :: b) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (ConstSym1 l1 :: TyFun b a -> *) (l2 :: b) = Const l1 l2

type ConstSym2 (t :: a6989586621679435600) (t :: b6989586621679435601) = Const t t #

data (.@#@$) (l :: TyFun (TyFun b6989586621679435597 c6989586621679435598 -> Type) (TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> Type)) #

Instances
SuppressUnusedWarnings ((.@#@$) :: TyFun (TyFun b6989586621679435597 c6989586621679435598 -> Type) (TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((.@#@$) :: TyFun (TyFun b6989586621679435597 c6989586621679435598 -> Type) (TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> Type) -> *) (l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((.@#@$) :: TyFun (TyFun b6989586621679435597 c6989586621679435598 -> Type) (TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> Type) -> *) (l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) = ((.@#@$$) l :: TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> *)

data (l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) .@#@$$ (l :: TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type)) #

Instances
SuppressUnusedWarnings ((.@#@$$) :: (TyFun b6989586621679435597 c6989586621679435598 -> Type) -> TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((.@#@$$) l1 :: TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> *) (l2 :: TyFun a6989586621679435599 b6989586621679435597 -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply ((.@#@$$) l1 :: TyFun (TyFun a6989586621679435599 b6989586621679435597 -> Type) (TyFun a6989586621679435599 c6989586621679435598 -> Type) -> *) (l2 :: TyFun a6989586621679435599 b6989586621679435597 -> Type) = l1 .@#@$$$ l2

data ((l :: TyFun b6989586621679435597 c6989586621679435598 -> Type) .@#@$$$ (l :: TyFun a6989586621679435599 b6989586621679435597 -> Type)) (l :: TyFun a6989586621679435599 c6989586621679435598) #

Instances
SuppressUnusedWarnings ((.@#@$$$) :: (TyFun b6989586621679435597 c6989586621679435598 -> Type) -> (TyFun a6989586621679435599 b6989586621679435597 -> Type) -> TyFun a6989586621679435599 c6989586621679435598 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (l1 .@#@$$$ l2 :: TyFun a c -> *) (l3 :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (l1 .@#@$$$ l2 :: TyFun a c -> *) (l3 :: a) = (l1 :. l2) l3

type (.@#@$$$$) (t :: TyFun b6989586621679435597 c6989586621679435598 -> Type) (t :: TyFun a6989586621679435599 b6989586621679435597 -> Type) (t :: a6989586621679435599) = (:.) t t t #

data ($@#@$) (l :: TyFun (TyFun a6989586621679435591 b6989586621679435592 -> Type) (TyFun a6989586621679435591 b6989586621679435592 -> Type)) #

Instances
SuppressUnusedWarnings (($@#@$) :: TyFun (TyFun a6989586621679435591 b6989586621679435592 -> Type) (TyFun a6989586621679435591 b6989586621679435592 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($@#@$) :: TyFun (TyFun a6989586621679435591 b6989586621679435592 -> Type) (TyFun a6989586621679435591 b6989586621679435592 -> Type) -> *) (l :: TyFun a6989586621679435591 b6989586621679435592 -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($@#@$) :: TyFun (TyFun a6989586621679435591 b6989586621679435592 -> Type) (TyFun a6989586621679435591 b6989586621679435592 -> Type) -> *) (l :: TyFun a6989586621679435591 b6989586621679435592 -> Type) = ($@#@$$) l

data (l :: TyFun a6989586621679435591 b6989586621679435592 -> Type) $@#@$$ (l :: TyFun a6989586621679435591 b6989586621679435592) #

Instances
SuppressUnusedWarnings (($@#@$$) :: (TyFun a6989586621679435591 b6989586621679435592 -> Type) -> TyFun a6989586621679435591 b6989586621679435592 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($@#@$$) l1 :: TyFun a b -> *) (l2 :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($@#@$$) l1 :: TyFun a b -> *) (l2 :: a) = l1 $ l2

type ($@#@$$$) (t :: TyFun a6989586621679435591 b6989586621679435592 -> Type) (t :: a6989586621679435591) = ($) t t #

data ($!@#@$) (l :: TyFun (TyFun a6989586621679435589 b6989586621679435590 -> Type) (TyFun a6989586621679435589 b6989586621679435590 -> Type)) #

Instances
SuppressUnusedWarnings (($!@#@$) :: TyFun (TyFun a6989586621679435589 b6989586621679435590 -> Type) (TyFun a6989586621679435589 b6989586621679435590 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($!@#@$) :: TyFun (TyFun a6989586621679435589 b6989586621679435590 -> Type) (TyFun a6989586621679435589 b6989586621679435590 -> Type) -> *) (l :: TyFun a6989586621679435589 b6989586621679435590 -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($!@#@$) :: TyFun (TyFun a6989586621679435589 b6989586621679435590 -> Type) (TyFun a6989586621679435589 b6989586621679435590 -> Type) -> *) (l :: TyFun a6989586621679435589 b6989586621679435590 -> Type) = ($!@#@$$) l

data (l :: TyFun a6989586621679435589 b6989586621679435590 -> Type) $!@#@$$ (l :: TyFun a6989586621679435589 b6989586621679435590) #

Instances
SuppressUnusedWarnings (($!@#@$$) :: (TyFun a6989586621679435589 b6989586621679435590 -> Type) -> TyFun a6989586621679435589 b6989586621679435590 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($!@#@$$) l1 :: TyFun a b -> *) (l2 :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (($!@#@$$) l1 :: TyFun a b -> *) (l2 :: a) = l1 $! l2

type ($!@#@$$$) (t :: TyFun a6989586621679435589 b6989586621679435590 -> Type) (t :: a6989586621679435589) = ($!) t t #

data FlipSym0 (l :: TyFun (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> Type)) #

Instances
SuppressUnusedWarnings (FlipSym0 :: TyFun (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym0 :: TyFun (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> Type) -> *) (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym0 :: TyFun (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> Type) -> *) (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) = FlipSym1 l

data FlipSym1 (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (l :: TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type)) #

Instances
SuppressUnusedWarnings (FlipSym1 :: (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) -> TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym1 l1 :: TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> *) (l2 :: b6989586621679435595) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym1 l1 :: TyFun b6989586621679435595 (TyFun a6989586621679435594 c6989586621679435596 -> Type) -> *) (l2 :: b6989586621679435595) = FlipSym2 l1 l2

data FlipSym2 (l :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (l :: b6989586621679435595) (l :: TyFun a6989586621679435594 c6989586621679435596) #

Instances
SuppressUnusedWarnings (FlipSym2 :: (TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) -> b6989586621679435595 -> TyFun a6989586621679435594 c6989586621679435596 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym2 l1 l2 :: TyFun a c -> *) (l3 :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (FlipSym2 l1 l2 :: TyFun a c -> *) (l3 :: a) = Flip l1 l2 l3

type FlipSym3 (t :: TyFun a6989586621679435594 (TyFun b6989586621679435595 c6989586621679435596 -> Type) -> Type) (t :: b6989586621679435595) (t :: a6989586621679435594) = Flip t t t #

data UntilSym0 (l :: TyFun (TyFun a6989586621679987157 Bool -> Type) (TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> Type)) #

Instances
SuppressUnusedWarnings (UntilSym0 :: TyFun (TyFun a6989586621679987157 Bool -> Type) (TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> Type) -> *) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym0 :: TyFun (TyFun a6989586621679987157 Bool -> Type) (TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> Type) -> *) (l :: TyFun a6989586621679987157 Bool -> Type) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym0 :: TyFun (TyFun a6989586621679987157 Bool -> Type) (TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> Type) -> *) (l :: TyFun a6989586621679987157 Bool -> Type) = UntilSym1 l

data UntilSym1 (l :: TyFun a6989586621679987157 Bool -> Type) (l :: TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type)) #

Instances
SuppressUnusedWarnings (UntilSym1 :: (TyFun a6989586621679987157 Bool -> Type) -> TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> *) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym1 l1 :: TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> *) (l2 :: TyFun a6989586621679987157 a6989586621679987157 -> Type) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym1 l1 :: TyFun (TyFun a6989586621679987157 a6989586621679987157 -> Type) (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> *) (l2 :: TyFun a6989586621679987157 a6989586621679987157 -> Type) = UntilSym2 l1 l2

data UntilSym2 (l :: TyFun a6989586621679987157 Bool -> Type) (l :: TyFun a6989586621679987157 a6989586621679987157 -> Type) (l :: TyFun a6989586621679987157 a6989586621679987157) #

Instances
SuppressUnusedWarnings (UntilSym2 :: (TyFun a6989586621679987157 Bool -> Type) -> (TyFun a6989586621679987157 a6989586621679987157 -> Type) -> TyFun a6989586621679987157 a6989586621679987157 -> *) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym2 l1 l2 :: TyFun a a -> *) (l3 :: a) # 
Instance details

Defined in Data.Promotion.Prelude.Base

type Apply (UntilSym2 l1 l2 :: TyFun a a -> *) (l3 :: a) = Until l1 l2 l3

type UntilSym3 (t :: TyFun a6989586621679987157 Bool -> Type) (t :: TyFun a6989586621679987157 a6989586621679987157 -> Type) (t :: a6989586621679987157) = Until t t t #

data AsTypeOfSym0 (l :: TyFun a6989586621679435593 (TyFun a6989586621679435593 a6989586621679435593 -> Type)) #

Instances
SuppressUnusedWarnings (AsTypeOfSym0 :: TyFun a6989586621679435593 (TyFun a6989586621679435593 a6989586621679435593 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (AsTypeOfSym0 :: TyFun a6989586621679435593 (TyFun a6989586621679435593 a6989586621679435593 -> Type) -> *) (l :: a6989586621679435593) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (AsTypeOfSym0 :: TyFun a6989586621679435593 (TyFun a6989586621679435593 a6989586621679435593 -> Type) -> *) (l :: a6989586621679435593) = AsTypeOfSym1 l

data AsTypeOfSym1 (l :: a6989586621679435593) (l :: TyFun a6989586621679435593 a6989586621679435593) #

Instances
SuppressUnusedWarnings (AsTypeOfSym1 :: a6989586621679435593 -> TyFun a6989586621679435593 a6989586621679435593 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (AsTypeOfSym1 l1 :: TyFun a a -> *) (l2 :: a) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (AsTypeOfSym1 l1 :: TyFun a a -> *) (l2 :: a) = AsTypeOf l1 l2

type AsTypeOfSym2 (t :: a6989586621679435593) (t :: a6989586621679435593) = AsTypeOf t t #

data SeqSym0 (l :: TyFun a6989586621679435587 (TyFun b6989586621679435588 b6989586621679435588 -> Type)) #

Instances
SuppressUnusedWarnings (SeqSym0 :: TyFun a6989586621679435587 (TyFun b6989586621679435588 b6989586621679435588 -> Type) -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (SeqSym0 :: TyFun a6989586621679435587 (TyFun b6989586621679435588 b6989586621679435588 -> Type) -> *) (l :: a6989586621679435587) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (SeqSym0 :: TyFun a6989586621679435587 (TyFun b6989586621679435588 b6989586621679435588 -> Type) -> *) (l :: a6989586621679435587) = (SeqSym1 l :: TyFun b6989586621679435588 b6989586621679435588 -> *)

data SeqSym1 (l :: a6989586621679435587) (l :: TyFun b6989586621679435588 b6989586621679435588) #

Instances
SuppressUnusedWarnings (SeqSym1 :: a6989586621679435587 -> TyFun b6989586621679435588 b6989586621679435588 -> *) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (SeqSym1 l1 :: TyFun b b -> *) (l2 :: b) # 
Instance details

Defined in Data.Singletons.Prelude.Base

type Apply (SeqSym1 l1 :: TyFun b b -> *) (l2 :: b) = Seq l1 l2

type SeqSym2 (t :: a6989586621679435587) (t :: b6989586621679435588) = Seq t t #