Data.Singletons.Bool
Bool
data family Sing a
type SBool z
type family If cond tru fls :: k
sIf
Data.Bool
type family Not a :: Bool
sNot
type a :&& b
type a :|| b
(%:&&)
(%:||)
type family Bool_ a a a :: a
sBool_
type Otherwise
sOtherwise