Copyright | (C) 2014 Jan Stolarek |
---|---|
License | BSD-style (see LICENSE) |
Maintainer | Jan Stolarek (jan.stolarek@p.lodz.pl) |
Stability | experimental |
Portability | non-portable |
Safe Haskell | None |
Language | Haskell2010 |
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.
Synopsis
- type family Foldr (a :: (~>) a ((~>) b b)) (a :: b) (a :: [a]) :: b where ...
- sFoldr :: forall a b (t :: (~>) a ((~>) b b)) (t :: b) (t :: [a]). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply FoldrSym0 t) t) t :: b)
- type family Map (a :: (~>) a b) (a :: [a]) :: [b] where ...
- sMap :: forall a b (t :: (~>) a b) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply MapSym0 t) t :: [b])
- type family (a :: [a]) ++ (a :: [a]) :: [a] where ...
- (%++) :: forall a (t :: [a]) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply (++@#@$) t) t :: [a])
- type family Otherwise :: Bool where ...
- sOtherwise :: Sing (OtherwiseSym0 :: Bool)
- type family Id (a :: a) :: a where ...
- sId :: forall a (t :: a). Sing t -> Sing (Apply IdSym0 t :: a)
- type family Const (a :: a) (a :: b) :: a where ...
- sConst :: forall a b (t :: a) (t :: b). Sing t -> Sing t -> Sing (Apply (Apply ConstSym0 t) t :: a)
- type family ((a :: (~>) b c) . (a :: (~>) a b)) (a :: a) :: c where ...
- (%.) :: forall b c a (t :: (~>) b c) (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply (.@#@$) t) t) t :: c)
- type family (a :: (~>) a b) $ (a :: a) :: b where ...
- type family (a :: (~>) a b) $! (a :: a) :: b where ...
- (%$) :: forall a b (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply ($@#@$) t) t :: b)
- (%$!) :: forall a b (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply ($!@#@$) t) t :: b)
- type family Until (a :: (~>) a Bool) (a :: (~>) a a) (a :: a) :: a where ...
- sUntil :: forall a (t :: (~>) a Bool) (t :: (~>) a a) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply UntilSym0 t) t) t :: a)
- type family Flip (a :: (~>) a ((~>) b c)) (a :: b) (a :: a) :: c where ...
- sFlip :: forall a b c (t :: (~>) a ((~>) b c)) (t :: b) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply FlipSym0 t) t) t :: c)
- type family AsTypeOf (a :: a) (a :: a) :: a where ...
- sAsTypeOf :: forall a (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply AsTypeOfSym0 t) t :: a)
- type family Seq (a :: a) (a :: b) :: b where ...
- sSeq :: forall a b (t :: a) (t :: b). Sing t -> Sing t -> Sing (Apply (Apply SeqSym0 t) t :: b)
- data FoldrSym0 :: forall a6989586621679545436 b6989586621679545437. (~>) ((~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) ((~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437))
- data FoldrSym1 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) :: (~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437)
- data FoldrSym2 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) :: (~>) [a6989586621679545436] b6989586621679545437
- type FoldrSym3 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) (a6989586621679545647 :: [a6989586621679545436]) = Foldr a6989586621679545645 a6989586621679545646 a6989586621679545647
- data MapSym0 :: forall a6989586621679545434 b6989586621679545435. (~>) ((~>) a6989586621679545434 b6989586621679545435) ((~>) [a6989586621679545434] [b6989586621679545435])
- data MapSym1 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) :: (~>) [a6989586621679545434] [b6989586621679545435]
- type MapSym2 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) (a6989586621679545639 :: [a6989586621679545434]) = Map a6989586621679545638 a6989586621679545639
- data (++@#@$) :: forall a6989586621679545433. (~>) [a6989586621679545433] ((~>) [a6989586621679545433] [a6989586621679545433])
- data (++@#@$$) (a6989586621679545630 :: [a6989586621679545433]) :: (~>) [a6989586621679545433] [a6989586621679545433]
- type (++@#@$$$) (a6989586621679545630 :: [a6989586621679545433]) (a6989586621679545631 :: [a6989586621679545433]) = (++) a6989586621679545630 a6989586621679545631
- type OtherwiseSym0 = Otherwise
- data IdSym0 :: forall a6989586621679545432. (~>) a6989586621679545432 a6989586621679545432
- type IdSym1 (a6989586621679545627 :: a6989586621679545432) = Id a6989586621679545627
- data ConstSym0 :: forall a6989586621679545430 b6989586621679545431. (~>) a6989586621679545430 ((~>) b6989586621679545431 a6989586621679545430)
- data ConstSym1 (a6989586621679545622 :: a6989586621679545430) :: forall b6989586621679545431. (~>) b6989586621679545431 a6989586621679545430
- type ConstSym2 (a6989586621679545622 :: a6989586621679545430) (a6989586621679545623 :: b6989586621679545431) = Const a6989586621679545622 a6989586621679545623
- data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428))
- data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)
- data (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) .@#@$$$ (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428
- type (.@#@$$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) (a6989586621679545605 :: a6989586621679545429) = (.) a6989586621679545603 a6989586621679545604 a6989586621679545605
- data ($@#@$) :: forall a6989586621679545421 b6989586621679545422. (~>) ((~>) a6989586621679545421 b6989586621679545422) ((~>) a6989586621679545421 b6989586621679545422)
- data ($@#@$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) :: (~>) a6989586621679545421 b6989586621679545422
- type ($@#@$$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) (a6989586621679545579 :: a6989586621679545421) = ($) a6989586621679545578 a6989586621679545579
- data ($!@#@$) :: forall a6989586621679545419 b6989586621679545420. (~>) ((~>) a6989586621679545419 b6989586621679545420) ((~>) a6989586621679545419 b6989586621679545420)
- data ($!@#@$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) :: (~>) a6989586621679545419 b6989586621679545420
- type ($!@#@$$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) (a6989586621679545570 :: a6989586621679545419) = ($!) a6989586621679545569 a6989586621679545570
- data UntilSym0 :: forall a6989586621679545418. (~>) ((~>) a6989586621679545418 Bool) ((~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418))
- data UntilSym1 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) :: (~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418)
- data UntilSym2 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) :: (~>) a6989586621679545418 a6989586621679545418
- type UntilSym3 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) (a6989586621679545545 :: a6989586621679545418) = Until a6989586621679545543 a6989586621679545544 a6989586621679545545
- data FlipSym0 :: forall a6989586621679545424 b6989586621679545425 c6989586621679545426. (~>) ((~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) ((~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426))
- data FlipSym1 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) :: (~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426)
- data FlipSym2 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) :: (~>) a6989586621679545424 c6989586621679545426
- type FlipSym3 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) (a6989586621679545596 :: a6989586621679545424) = Flip a6989586621679545594 a6989586621679545595 a6989586621679545596
- data AsTypeOfSym0 :: forall a6989586621679545423. (~>) a6989586621679545423 ((~>) a6989586621679545423 a6989586621679545423)
- data AsTypeOfSym1 (a6989586621679545588 :: a6989586621679545423) :: (~>) a6989586621679545423 a6989586621679545423
- type AsTypeOfSym2 (a6989586621679545588 :: a6989586621679545423) (a6989586621679545589 :: a6989586621679545423) = AsTypeOf a6989586621679545588 a6989586621679545589
- data SeqSym0 :: forall a6989586621679545416 b6989586621679545417. (~>) a6989586621679545416 ((~>) b6989586621679545417 b6989586621679545417)
- data SeqSym1 (a6989586621679545538 :: a6989586621679545416) :: forall b6989586621679545417. (~>) b6989586621679545417 b6989586621679545417
- type SeqSym2 (a6989586621679545538 :: a6989586621679545416) (a6989586621679545539 :: b6989586621679545417) = Seq a6989586621679545538 a6989586621679545539
Basic functions
sFoldr :: forall a b (t :: (~>) a ((~>) b b)) (t :: b) (t :: [a]). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply FoldrSym0 t) t) t :: b) Source #
sMap :: forall a b (t :: (~>) a b) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply MapSym0 t) t :: [b]) Source #
(%++) :: forall a (t :: [a]) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply (++@#@$) t) t :: [a]) infixr 5 Source #
sOtherwise :: Sing (OtherwiseSym0 :: Bool) Source #
sConst :: forall a b (t :: a) (t :: b). Sing t -> Sing t -> Sing (Apply (Apply ConstSym0 t) t :: a) Source #
(%.) :: forall b c a (t :: (~>) b c) (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply (.@#@$) t) t) t :: c) infixr 9 Source #
(%$) :: forall a b (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply ($@#@$) t) t :: b) infixr 0 Source #
(%$!) :: forall a b (t :: (~>) a b) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply ($!@#@$) t) t :: b) infixr 0 Source #
sUntil :: forall a (t :: (~>) a Bool) (t :: (~>) a a) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply UntilSym0 t) t) t :: a) Source #
sFlip :: forall a b c (t :: (~>) a ((~>) b c)) (t :: b) (t :: a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply FlipSym0 t) t) t :: c) Source #
sAsTypeOf :: forall a (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply AsTypeOfSym0 t) t :: a) Source #
sSeq :: forall a b (t :: a) (t :: b). Sing t -> Sing t -> Sing (Apply (Apply SeqSym0 t) t :: b) infixr 0 Source #
Defunctionalization symbols
data FoldrSym0 :: forall a6989586621679545436 b6989586621679545437. (~>) ((~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) ((~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437)) Source #
Instances
SingI (FoldrSym0 :: TyFun (a ~> (b ~> b)) (b ~> ([a] ~> b)) -> Type) Source # | |
SuppressUnusedWarnings (FoldrSym0 :: TyFun (a6989586621679545436 ~> (b6989586621679545437 ~> b6989586621679545437)) (b6989586621679545437 ~> ([a6989586621679545436] ~> b6989586621679545437)) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FoldrSym0 :: TyFun (a6989586621679545436 ~> (b6989586621679545437 ~> b6989586621679545437)) (b6989586621679545437 ~> ([a6989586621679545436] ~> b6989586621679545437)) -> Type) (a6989586621679545645 :: a6989586621679545436 ~> (b6989586621679545437 ~> b6989586621679545437)) Source # | |
Defined in Data.Singletons.Prelude.Base type Apply (FoldrSym0 :: TyFun (a6989586621679545436 ~> (b6989586621679545437 ~> b6989586621679545437)) (b6989586621679545437 ~> ([a6989586621679545436] ~> b6989586621679545437)) -> Type) (a6989586621679545645 :: a6989586621679545436 ~> (b6989586621679545437 ~> b6989586621679545437)) = FoldrSym1 a6989586621679545645 |
data FoldrSym1 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) :: (~>) b6989586621679545437 ((~>) [a6989586621679545436] b6989586621679545437) Source #
Instances
SingI d => SingI (FoldrSym1 d :: TyFun b ([a] ~> b) -> Type) Source # | |
SuppressUnusedWarnings (FoldrSym1 a6989586621679545645 :: TyFun b6989586621679545437 ([a6989586621679545436] ~> b6989586621679545437) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FoldrSym1 a6989586621679545645 :: TyFun b6989586621679545437 ([a6989586621679545436] ~> b6989586621679545437) -> Type) (a6989586621679545646 :: b6989586621679545437) Source # | |
data FoldrSym2 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) :: (~>) [a6989586621679545436] b6989586621679545437 Source #
Instances
(SingI d1, SingI d2) => SingI (FoldrSym2 d1 d2 :: TyFun [a] b -> Type) Source # | |
SuppressUnusedWarnings (FoldrSym2 a6989586621679545646 a6989586621679545645 :: TyFun [a6989586621679545436] b6989586621679545437 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FoldrSym2 a6989586621679545646 a6989586621679545645 :: TyFun [a] b -> Type) (a6989586621679545647 :: [a]) Source # | |
type FoldrSym3 (a6989586621679545645 :: (~>) a6989586621679545436 ((~>) b6989586621679545437 b6989586621679545437)) (a6989586621679545646 :: b6989586621679545437) (a6989586621679545647 :: [a6989586621679545436]) = Foldr a6989586621679545645 a6989586621679545646 a6989586621679545647 Source #
data MapSym0 :: forall a6989586621679545434 b6989586621679545435. (~>) ((~>) a6989586621679545434 b6989586621679545435) ((~>) [a6989586621679545434] [b6989586621679545435]) Source #
Instances
SingI (MapSym0 :: TyFun (a ~> b) ([a] ~> [b]) -> Type) Source # | |
SuppressUnusedWarnings (MapSym0 :: TyFun (a6989586621679545434 ~> b6989586621679545435) ([a6989586621679545434] ~> [b6989586621679545435]) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (MapSym0 :: TyFun (a6989586621679545434 ~> b6989586621679545435) ([a6989586621679545434] ~> [b6989586621679545435]) -> Type) (a6989586621679545638 :: a6989586621679545434 ~> b6989586621679545435) Source # | |
data MapSym1 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) :: (~>) [a6989586621679545434] [b6989586621679545435] Source #
Instances
SingI d => SingI (MapSym1 d :: TyFun [a] [b] -> Type) Source # | |
SuppressUnusedWarnings (MapSym1 a6989586621679545638 :: TyFun [a6989586621679545434] [b6989586621679545435] -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (MapSym1 a6989586621679545638 :: TyFun [a] [b] -> Type) (a6989586621679545639 :: [a]) Source # | |
type MapSym2 (a6989586621679545638 :: (~>) a6989586621679545434 b6989586621679545435) (a6989586621679545639 :: [a6989586621679545434]) = Map a6989586621679545638 a6989586621679545639 Source #
data (++@#@$) :: forall a6989586621679545433. (~>) [a6989586621679545433] ((~>) [a6989586621679545433] [a6989586621679545433]) infixr 5 Source #
Instances
SingI ((++@#@$) :: TyFun [a] ([a] ~> [a]) -> Type) Source # | |
SuppressUnusedWarnings ((++@#@$) :: TyFun [a6989586621679545433] ([a6989586621679545433] ~> [a6989586621679545433]) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply ((++@#@$) :: TyFun [a6989586621679545433] ([a6989586621679545433] ~> [a6989586621679545433]) -> Type) (a6989586621679545630 :: [a6989586621679545433]) Source # | |
data (++@#@$$) (a6989586621679545630 :: [a6989586621679545433]) :: (~>) [a6989586621679545433] [a6989586621679545433] infixr 5 Source #
Instances
SingI d => SingI ((++@#@$$) d :: TyFun [a] [a] -> Type) Source # | |
SuppressUnusedWarnings ((++@#@$$) a6989586621679545630 :: TyFun [a6989586621679545433] [a6989586621679545433] -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply ((++@#@$$) a6989586621679545630 :: TyFun [a] [a] -> Type) (a6989586621679545631 :: [a]) Source # | |
type (++@#@$$$) (a6989586621679545630 :: [a6989586621679545433]) (a6989586621679545631 :: [a6989586621679545433]) = (++) a6989586621679545630 a6989586621679545631 Source #
type OtherwiseSym0 = Otherwise Source #
data IdSym0 :: forall a6989586621679545432. (~>) a6989586621679545432 a6989586621679545432 Source #
Instances
SingI (IdSym0 :: TyFun a a -> Type) Source # | |
SuppressUnusedWarnings (IdSym0 :: TyFun a6989586621679545432 a6989586621679545432 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (IdSym0 :: TyFun a a -> Type) (a6989586621679545627 :: a) Source # | |
data ConstSym0 :: forall a6989586621679545430 b6989586621679545431. (~>) a6989586621679545430 ((~>) b6989586621679545431 a6989586621679545430) Source #
Instances
SingI (ConstSym0 :: TyFun a (b ~> a) -> Type) Source # | |
SuppressUnusedWarnings (ConstSym0 :: TyFun a6989586621679545430 (b6989586621679545431 ~> a6989586621679545430) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (ConstSym0 :: TyFun a6989586621679545430 (b6989586621679545431 ~> a6989586621679545430) -> Type) (a6989586621679545622 :: a6989586621679545430) Source # | |
Defined in Data.Singletons.Prelude.Base |
data ConstSym1 (a6989586621679545622 :: a6989586621679545430) :: forall b6989586621679545431. (~>) b6989586621679545431 a6989586621679545430 Source #
Instances
SingI d => SingI (ConstSym1 d b :: TyFun b a -> Type) Source # | |
SuppressUnusedWarnings (ConstSym1 a6989586621679545622 b6989586621679545431 :: TyFun b6989586621679545431 a6989586621679545430 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (ConstSym1 a6989586621679545622 b :: TyFun b a -> Type) (a6989586621679545623 :: b) Source # | |
type ConstSym2 (a6989586621679545622 :: a6989586621679545430) (a6989586621679545623 :: b6989586621679545431) = Const a6989586621679545622 a6989586621679545623 Source #
data (.@#@$) :: forall b6989586621679545427 c6989586621679545428 a6989586621679545429. (~>) ((~>) b6989586621679545427 c6989586621679545428) ((~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428)) infixr 9 Source #
Instances
SingI ((.@#@$) :: TyFun (b ~> c) ((a ~> b) ~> (a ~> c)) -> Type) Source # | |
SuppressUnusedWarnings ((.@#@$) :: TyFun (b6989586621679545427 ~> c6989586621679545428) ((a6989586621679545429 ~> b6989586621679545427) ~> (a6989586621679545429 ~> c6989586621679545428)) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply ((.@#@$) :: TyFun (b6989586621679545427 ~> c6989586621679545428) ((a6989586621679545429 ~> b6989586621679545427) ~> (a6989586621679545429 ~> c6989586621679545428)) -> Type) (a6989586621679545603 :: b6989586621679545427 ~> c6989586621679545428) Source # | |
Defined in Data.Singletons.Prelude.Base type Apply ((.@#@$) :: TyFun (b6989586621679545427 ~> c6989586621679545428) ((a6989586621679545429 ~> b6989586621679545427) ~> (a6989586621679545429 ~> c6989586621679545428)) -> Type) (a6989586621679545603 :: b6989586621679545427 ~> c6989586621679545428) = a6989586621679545603 .@#@$$ a6989586621679545429 :: TyFun (a6989586621679545429 ~> b6989586621679545427) (a6989586621679545429 ~> c6989586621679545428) -> Type |
data (.@#@$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) :: forall a6989586621679545429. (~>) ((~>) a6989586621679545429 b6989586621679545427) ((~>) a6989586621679545429 c6989586621679545428) infixr 9 Source #
Instances
SingI d => SingI (d .@#@$$ a :: TyFun (a ~> b) (a ~> c) -> Type) Source # | |
SuppressUnusedWarnings (a6989586621679545603 .@#@$$ a6989586621679545429 :: TyFun (a6989586621679545429 ~> b6989586621679545427) (a6989586621679545429 ~> c6989586621679545428) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (a6989586621679545603 .@#@$$ a6989586621679545429 :: TyFun (a6989586621679545429 ~> b6989586621679545427) (a6989586621679545429 ~> c6989586621679545428) -> Type) (a6989586621679545604 :: a6989586621679545429 ~> b6989586621679545427) Source # | |
Defined in Data.Singletons.Prelude.Base |
data (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) .@#@$$$ (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) :: (~>) a6989586621679545429 c6989586621679545428 infixr 9 Source #
Instances
(SingI d1, SingI d2) => SingI (d1 .@#@$$$ d2 :: TyFun a c -> Type) Source # | |
SuppressUnusedWarnings (a6989586621679545604 .@#@$$$ a6989586621679545603 :: TyFun a6989586621679545429 c6989586621679545428 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (a6989586621679545604 .@#@$$$ a6989586621679545603 :: TyFun a c -> Type) (a6989586621679545605 :: a) Source # | |
type (.@#@$$$$) (a6989586621679545603 :: (~>) b6989586621679545427 c6989586621679545428) (a6989586621679545604 :: (~>) a6989586621679545429 b6989586621679545427) (a6989586621679545605 :: a6989586621679545429) = (.) a6989586621679545603 a6989586621679545604 a6989586621679545605 Source #
data ($@#@$) :: forall a6989586621679545421 b6989586621679545422. (~>) ((~>) a6989586621679545421 b6989586621679545422) ((~>) a6989586621679545421 b6989586621679545422) infixr 0 Source #
Instances
SingI (($@#@$) :: TyFun (a ~> b) (a ~> b) -> Type) Source # | |
SuppressUnusedWarnings (($@#@$) :: TyFun (a6989586621679545421 ~> b6989586621679545422) (a6989586621679545421 ~> b6989586621679545422) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (($@#@$) :: TyFun (a6989586621679545421 ~> b6989586621679545422) (a6989586621679545421 ~> b6989586621679545422) -> Type) (a6989586621679545578 :: a6989586621679545421 ~> b6989586621679545422) Source # | |
data ($@#@$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) :: (~>) a6989586621679545421 b6989586621679545422 infixr 0 Source #
Instances
SingI d => SingI (($@#@$$) d :: TyFun a b -> Type) Source # | |
SuppressUnusedWarnings (($@#@$$) a6989586621679545578 :: TyFun a6989586621679545421 b6989586621679545422 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (($@#@$$) a6989586621679545578 :: TyFun a b -> Type) (a6989586621679545579 :: a) Source # | |
type ($@#@$$$) (a6989586621679545578 :: (~>) a6989586621679545421 b6989586621679545422) (a6989586621679545579 :: a6989586621679545421) = ($) a6989586621679545578 a6989586621679545579 Source #
data ($!@#@$) :: forall a6989586621679545419 b6989586621679545420. (~>) ((~>) a6989586621679545419 b6989586621679545420) ((~>) a6989586621679545419 b6989586621679545420) infixr 0 Source #
Instances
SingI (($!@#@$) :: TyFun (a ~> b) (a ~> b) -> Type) Source # | |
SuppressUnusedWarnings (($!@#@$) :: TyFun (a6989586621679545419 ~> b6989586621679545420) (a6989586621679545419 ~> b6989586621679545420) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (($!@#@$) :: TyFun (a6989586621679545419 ~> b6989586621679545420) (a6989586621679545419 ~> b6989586621679545420) -> Type) (a6989586621679545569 :: a6989586621679545419 ~> b6989586621679545420) Source # | |
data ($!@#@$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) :: (~>) a6989586621679545419 b6989586621679545420 infixr 0 Source #
Instances
SingI d => SingI (($!@#@$$) d :: TyFun a b -> Type) Source # | |
SuppressUnusedWarnings (($!@#@$$) a6989586621679545569 :: TyFun a6989586621679545419 b6989586621679545420 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (($!@#@$$) a6989586621679545569 :: TyFun a b -> Type) (a6989586621679545570 :: a) Source # | |
type ($!@#@$$$) (a6989586621679545569 :: (~>) a6989586621679545419 b6989586621679545420) (a6989586621679545570 :: a6989586621679545419) = ($!) a6989586621679545569 a6989586621679545570 Source #
data UntilSym0 :: forall a6989586621679545418. (~>) ((~>) a6989586621679545418 Bool) ((~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418)) Source #
Instances
SingI (UntilSym0 :: TyFun (a ~> Bool) ((a ~> a) ~> (a ~> a)) -> Type) Source # | |
SuppressUnusedWarnings (UntilSym0 :: TyFun (a6989586621679545418 ~> Bool) ((a6989586621679545418 ~> a6989586621679545418) ~> (a6989586621679545418 ~> a6989586621679545418)) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (UntilSym0 :: TyFun (a6989586621679545418 ~> Bool) ((a6989586621679545418 ~> a6989586621679545418) ~> (a6989586621679545418 ~> a6989586621679545418)) -> Type) (a6989586621679545543 :: a6989586621679545418 ~> Bool) Source # | |
data UntilSym1 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) :: (~>) ((~>) a6989586621679545418 a6989586621679545418) ((~>) a6989586621679545418 a6989586621679545418) Source #
Instances
SingI d => SingI (UntilSym1 d :: TyFun (a ~> a) (a ~> a) -> Type) Source # | |
SuppressUnusedWarnings (UntilSym1 a6989586621679545543 :: TyFun (a6989586621679545418 ~> a6989586621679545418) (a6989586621679545418 ~> a6989586621679545418) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (UntilSym1 a6989586621679545543 :: TyFun (a6989586621679545418 ~> a6989586621679545418) (a6989586621679545418 ~> a6989586621679545418) -> Type) (a6989586621679545544 :: a6989586621679545418 ~> a6989586621679545418) Source # | |
Defined in Data.Singletons.Prelude.Base |
data UntilSym2 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) :: (~>) a6989586621679545418 a6989586621679545418 Source #
Instances
(SingI d1, SingI d2) => SingI (UntilSym2 d1 d2 :: TyFun a a -> Type) Source # | |
SuppressUnusedWarnings (UntilSym2 a6989586621679545544 a6989586621679545543 :: TyFun a6989586621679545418 a6989586621679545418 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (UntilSym2 a6989586621679545544 a6989586621679545543 :: TyFun a a -> Type) (a6989586621679545545 :: a) Source # | |
type UntilSym3 (a6989586621679545543 :: (~>) a6989586621679545418 Bool) (a6989586621679545544 :: (~>) a6989586621679545418 a6989586621679545418) (a6989586621679545545 :: a6989586621679545418) = Until a6989586621679545543 a6989586621679545544 a6989586621679545545 Source #
data FlipSym0 :: forall a6989586621679545424 b6989586621679545425 c6989586621679545426. (~>) ((~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) ((~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426)) Source #
Instances
SingI (FlipSym0 :: TyFun (a ~> (b ~> c)) (b ~> (a ~> c)) -> Type) Source # | |
SuppressUnusedWarnings (FlipSym0 :: TyFun (a6989586621679545424 ~> (b6989586621679545425 ~> c6989586621679545426)) (b6989586621679545425 ~> (a6989586621679545424 ~> c6989586621679545426)) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FlipSym0 :: TyFun (a6989586621679545424 ~> (b6989586621679545425 ~> c6989586621679545426)) (b6989586621679545425 ~> (a6989586621679545424 ~> c6989586621679545426)) -> Type) (a6989586621679545594 :: a6989586621679545424 ~> (b6989586621679545425 ~> c6989586621679545426)) Source # | |
Defined in Data.Singletons.Prelude.Base type Apply (FlipSym0 :: TyFun (a6989586621679545424 ~> (b6989586621679545425 ~> c6989586621679545426)) (b6989586621679545425 ~> (a6989586621679545424 ~> c6989586621679545426)) -> Type) (a6989586621679545594 :: a6989586621679545424 ~> (b6989586621679545425 ~> c6989586621679545426)) = FlipSym1 a6989586621679545594 |
data FlipSym1 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) :: (~>) b6989586621679545425 ((~>) a6989586621679545424 c6989586621679545426) Source #
Instances
SingI d => SingI (FlipSym1 d :: TyFun b (a ~> c) -> Type) Source # | |
SuppressUnusedWarnings (FlipSym1 a6989586621679545594 :: TyFun b6989586621679545425 (a6989586621679545424 ~> c6989586621679545426) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FlipSym1 a6989586621679545594 :: TyFun b6989586621679545425 (a6989586621679545424 ~> c6989586621679545426) -> Type) (a6989586621679545595 :: b6989586621679545425) Source # | |
data FlipSym2 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) :: (~>) a6989586621679545424 c6989586621679545426 Source #
Instances
(SingI d1, SingI d2) => SingI (FlipSym2 d1 d2 :: TyFun a c -> Type) Source # | |
SuppressUnusedWarnings (FlipSym2 a6989586621679545595 a6989586621679545594 :: TyFun a6989586621679545424 c6989586621679545426 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (FlipSym2 a6989586621679545595 a6989586621679545594 :: TyFun a c -> Type) (a6989586621679545596 :: a) Source # | |
type FlipSym3 (a6989586621679545594 :: (~>) a6989586621679545424 ((~>) b6989586621679545425 c6989586621679545426)) (a6989586621679545595 :: b6989586621679545425) (a6989586621679545596 :: a6989586621679545424) = Flip a6989586621679545594 a6989586621679545595 a6989586621679545596 Source #
data AsTypeOfSym0 :: forall a6989586621679545423. (~>) a6989586621679545423 ((~>) a6989586621679545423 a6989586621679545423) Source #
Instances
SingI (AsTypeOfSym0 :: TyFun a (a ~> a) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base sing :: Sing AsTypeOfSym0 Source # | |
SuppressUnusedWarnings (AsTypeOfSym0 :: TyFun a6989586621679545423 (a6989586621679545423 ~> a6989586621679545423) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (AsTypeOfSym0 :: TyFun a6989586621679545423 (a6989586621679545423 ~> a6989586621679545423) -> Type) (a6989586621679545588 :: a6989586621679545423) Source # | |
Defined in Data.Singletons.Prelude.Base type Apply (AsTypeOfSym0 :: TyFun a6989586621679545423 (a6989586621679545423 ~> a6989586621679545423) -> Type) (a6989586621679545588 :: a6989586621679545423) = AsTypeOfSym1 a6989586621679545588 |
data AsTypeOfSym1 (a6989586621679545588 :: a6989586621679545423) :: (~>) a6989586621679545423 a6989586621679545423 Source #
Instances
SingI d => SingI (AsTypeOfSym1 d :: TyFun a a -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base sing :: Sing (AsTypeOfSym1 d) Source # | |
SuppressUnusedWarnings (AsTypeOfSym1 a6989586621679545588 :: TyFun a6989586621679545423 a6989586621679545423 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (AsTypeOfSym1 a6989586621679545588 :: TyFun a a -> Type) (a6989586621679545589 :: a) Source # | |
Defined in Data.Singletons.Prelude.Base type Apply (AsTypeOfSym1 a6989586621679545588 :: TyFun a a -> Type) (a6989586621679545589 :: a) = AsTypeOf a6989586621679545588 a6989586621679545589 |
type AsTypeOfSym2 (a6989586621679545588 :: a6989586621679545423) (a6989586621679545589 :: a6989586621679545423) = AsTypeOf a6989586621679545588 a6989586621679545589 Source #
data SeqSym0 :: forall a6989586621679545416 b6989586621679545417. (~>) a6989586621679545416 ((~>) b6989586621679545417 b6989586621679545417) infixr 0 Source #
Instances
SingI (SeqSym0 :: TyFun a (b ~> b) -> Type) Source # | |
SuppressUnusedWarnings (SeqSym0 :: TyFun a6989586621679545416 (b6989586621679545417 ~> b6989586621679545417) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (SeqSym0 :: TyFun a6989586621679545416 (b6989586621679545417 ~> b6989586621679545417) -> Type) (a6989586621679545538 :: a6989586621679545416) Source # | |
Defined in Data.Singletons.Prelude.Base |
data SeqSym1 (a6989586621679545538 :: a6989586621679545416) :: forall b6989586621679545417. (~>) b6989586621679545417 b6989586621679545417 infixr 0 Source #
Instances
SingI d => SingI (SeqSym1 d b :: TyFun b b -> Type) Source # | |
SuppressUnusedWarnings (SeqSym1 a6989586621679545538 b6989586621679545417 :: TyFun b6989586621679545417 b6989586621679545417 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Base suppressUnusedWarnings :: () Source # | |
type Apply (SeqSym1 a6989586621679545538 b :: TyFun b b -> Type) (a6989586621679545539 :: b) Source # | |