Data.Promotion.Prelude.Bool

Defines promoted functions and datatypes relating to Bool, including a promoted version of all the definitions in Data.Bool.

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

Documentation

type family If (cond :: Bool) (tru :: k) (fls :: k) :: k where ...

Type-level If. If True a b ==> a; If False a b ==> b

Equations

If True (tru :: k) (fls :: k) = tru

If False (tru :: k) (fls :: k) = fls

Promoted functions from Data.Bool

type family Bool_ (a :: a) (a :: a) (a :: Bool) :: a where ...

Equations

Bool_ fls _tru False = fls

Bool_ _fls tru True = tru

bool_ :: a -> a -> Bool -> a

The preceding two definitions are derived from the function bool in Data.Bool. The extra underscore is to avoid name clashes with the type Bool.

type family Not (a :: Bool) = (res :: Bool) | res -> a where ...

Type-level "not". An injective type family since 4.10.0.0.

Since: base-4.7.0.0

Equations

Not False = True

Not True = False

type family (a :: Bool) && (b :: Bool) :: Bool where ... infixr 3

Type-level "and"

Equations

False && a = False

True && a = a

a && False = False

a && True = a

a && a = a

type family (a :: Bool) || (b :: Bool) :: Bool where ... infixr 2

Type-level "or"

Equations

False || a = a

True || a = True

a || False = a

a || True = True

a || a = a

type family Otherwise :: Bool where ...

Equations

Otherwise = TrueSym0

Defunctionalization symbols

type TrueSym0 = True

type FalseSym0 = False

data NotSym0 (l :: TyFun Bool Bool)

Instances

SuppressUnusedWarnings NotSym0

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply NotSym0 (l :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply NotSym0 (l :: Bool) = Not l

type NotSym1 (t :: Bool) = Not t

data (&&@#@$) (l :: TyFun Bool (TyFun Bool Bool -> Type))

Instances

SuppressUnusedWarnings (&&@#@$)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply (&&@#@$) (l :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply (&&@#@$) (l :: Bool) = (&&@#@$$) l

data (l :: Bool) &&@#@$$ (l :: TyFun Bool Bool)

Instances

SuppressUnusedWarnings (&&@#@$$)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply ((&&@#@$$) l1 :: TyFun Bool Bool -> *) (l2 :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply ((&&@#@$$) l1 :: TyFun Bool Bool -> *) (l2 :: Bool) = l1 && l2

type (&&@#@$$$) (t :: Bool) (t :: Bool) = (&&) t t

data (||@#@$) (l :: TyFun Bool (TyFun Bool Bool -> Type))

Instances

SuppressUnusedWarnings (||@#@$)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply (||@#@$) (l :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply (||@#@$) (l :: Bool) = (||@#@$$) l

data (l :: Bool) ||@#@$$ (l :: TyFun Bool Bool)

Instances

SuppressUnusedWarnings (||@#@$$)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply ((||@#@$$) l1 :: TyFun Bool Bool -> *) (l2 :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply ((||@#@$$) l1 :: TyFun Bool Bool -> *) (l2 :: Bool) = l1 || l2

type (||@#@$$$) (t :: Bool) (t :: Bool) = (||) t t

data Bool_Sym0 (l :: TyFun a6989586621679308852 (TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> Type))

Instances

SuppressUnusedWarnings (Bool_Sym0 :: TyFun a6989586621679308852 (TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> Type) -> *)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply (Bool_Sym0 :: TyFun a6989586621679308852 (TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> Type) -> *) (l :: a6989586621679308852)

Defined in Data.Singletons.Prelude.Bool

type Apply (Bool_Sym0 :: TyFun a6989586621679308852 (TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> Type) -> *) (l :: a6989586621679308852) = Bool_Sym1 l

data Bool_Sym1 (l :: a6989586621679308852) (l :: TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type))

Instances

SuppressUnusedWarnings (Bool_Sym1 :: a6989586621679308852 -> TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> *)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply (Bool_Sym1 l1 :: TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> *) (l2 :: a6989586621679308852)

Defined in Data.Singletons.Prelude.Bool

type Apply (Bool_Sym1 l1 :: TyFun a6989586621679308852 (TyFun Bool a6989586621679308852 -> Type) -> *) (l2 :: a6989586621679308852) = Bool_Sym2 l1 l2

data Bool_Sym2 (l :: a6989586621679308852) (l :: a6989586621679308852) (l :: TyFun Bool a6989586621679308852)

Instances

SuppressUnusedWarnings (Bool_Sym2 :: a6989586621679308852 -> a6989586621679308852 -> TyFun Bool a6989586621679308852 -> *)

Defined in Data.Singletons.Prelude.Bool

Methods

suppressUnusedWarnings :: ()

type Apply (Bool_Sym2 l1 l2 :: TyFun Bool a -> *) (l3 :: Bool)

Defined in Data.Singletons.Prelude.Bool

type Apply (Bool_Sym2 l1 l2 :: TyFun Bool a -> *) (l3 :: Bool) = Bool_ l1 l2 l3

type Bool_Sym3 (t :: a6989586621679308852) (t :: a6989586621679308852) (t :: Bool) = Bool_ t t t

type OtherwiseSym0 = Otherwise