| Copyright | (C) 2013-2014 Richard Eisenberg Jan Stolarek |
|---|---|
| License | BSD-style (see LICENSE) |
| Maintainer | Richard Eisenberg (rae@cs.brynmawr.edu) |
| Stability | experimental |
| Portability | non-portable |
| Safe Haskell | None |
| Language | Haskell2010 |
Data.Singletons.Prelude.Maybe
Description
Defines functions and datatypes relating to the singleton for Maybe,
including a singletons version of all the definitions in Data.Maybe.
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.Maybe. Also, please excuse
the apparent repeated variable names. This is due to an interaction
between Template Haskell and Haddock.
Synopsis
- data family Sing (a :: k)
- type SMaybe = (Sing :: Maybe a -> Type)
- maybe_ :: b -> (a -> b) -> Maybe a -> b
- type family Maybe_ (a :: b) (a :: TyFun a b -> Type) (a :: Maybe a) :: b where ...
- sMaybe_ :: forall (t :: b) (t :: TyFun a b -> Type) (t :: Maybe a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply Maybe_Sym0 t) t) t :: b)
- type family IsJust (a :: Maybe a) :: Bool where ...
- sIsJust :: forall (t :: Maybe a). Sing t -> Sing (Apply IsJustSym0 t :: Bool)
- type family IsNothing (a :: Maybe a) :: Bool where ...
- sIsNothing :: forall (t :: Maybe a). Sing t -> Sing (Apply IsNothingSym0 t :: Bool)
- type family FromJust (a :: Maybe a) :: a where ...
- sFromJust :: forall (t :: Maybe a). Sing t -> Sing (Apply FromJustSym0 t :: a)
- type family FromMaybe (a :: a) (a :: Maybe a) :: a where ...
- sFromMaybe :: forall (t :: a) (t :: Maybe a). Sing t -> Sing t -> Sing (Apply (Apply FromMaybeSym0 t) t :: a)
- type family ListToMaybe (a :: [a]) :: Maybe a where ...
- sListToMaybe :: forall (t :: [a]). Sing t -> Sing (Apply ListToMaybeSym0 t :: Maybe a)
- type family MaybeToList (a :: Maybe a) :: [a] where ...
- sMaybeToList :: forall (t :: Maybe a). Sing t -> Sing (Apply MaybeToListSym0 t :: [a])
- type family CatMaybes (a :: [Maybe a]) :: [a] where ...
- sCatMaybes :: forall (t :: [Maybe a]). Sing t -> Sing (Apply CatMaybesSym0 t :: [a])
- type family MapMaybe (a :: TyFun a (Maybe b) -> Type) (a :: [a]) :: [b] where ...
- sMapMaybe :: forall (t :: TyFun a (Maybe b) -> Type) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply MapMaybeSym0 t) t :: [b])
- type NothingSym0 = Nothing
- data JustSym0 (l :: TyFun a3530822107858468865 (Maybe a3530822107858468865))
- type JustSym1 (t :: a3530822107858468865) = Just t
- data Maybe_Sym0 (l :: TyFun b6989586621679405849 (TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> Type))
- data Maybe_Sym1 (l :: b6989586621679405849) (l :: TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type))
- data Maybe_Sym2 (l :: b6989586621679405849) (l :: TyFun a6989586621679405850 b6989586621679405849 -> Type) (l :: TyFun (Maybe a6989586621679405850) b6989586621679405849)
- type Maybe_Sym3 (t :: b6989586621679405849) (t :: TyFun a6989586621679405850 b6989586621679405849 -> Type) (t :: Maybe a6989586621679405850) = Maybe_ t t t
- data IsJustSym0 (l :: TyFun (Maybe a6989586621679406970) Bool)
- type IsJustSym1 (t :: Maybe a6989586621679406970) = IsJust t
- data IsNothingSym0 (l :: TyFun (Maybe a6989586621679406969) Bool)
- type IsNothingSym1 (t :: Maybe a6989586621679406969) = IsNothing t
- data FromJustSym0 (l :: TyFun (Maybe a6989586621679406968) a6989586621679406968)
- type FromJustSym1 (t :: Maybe a6989586621679406968) = FromJust t
- data FromMaybeSym0 (l :: TyFun a6989586621679406967 (TyFun (Maybe a6989586621679406967) a6989586621679406967 -> Type))
- data FromMaybeSym1 (l :: a6989586621679406967) (l :: TyFun (Maybe a6989586621679406967) a6989586621679406967)
- type FromMaybeSym2 (t :: a6989586621679406967) (t :: Maybe a6989586621679406967) = FromMaybe t t
- data ListToMaybeSym0 (l :: TyFun [a6989586621679406965] (Maybe a6989586621679406965))
- type ListToMaybeSym1 (t :: [a6989586621679406965]) = ListToMaybe t
- data MaybeToListSym0 (l :: TyFun (Maybe a6989586621679406966) [a6989586621679406966])
- type MaybeToListSym1 (t :: Maybe a6989586621679406966) = MaybeToList t
- data CatMaybesSym0 (l :: TyFun [Maybe a6989586621679406964] [a6989586621679406964])
- type CatMaybesSym1 (t :: [Maybe a6989586621679406964]) = CatMaybes t
- data MapMaybeSym0 (l :: TyFun (TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (TyFun [a6989586621679406962] [b6989586621679406963] -> Type))
- data MapMaybeSym1 (l :: TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (l :: TyFun [a6989586621679406962] [b6989586621679406963])
- type MapMaybeSym2 (t :: TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (t :: [a6989586621679406962]) = MapMaybe t t
Documentation
data family Sing (a :: k) Source #
The singleton kind-indexed data family.
Instances
Though Haddock doesn't show it, the Sing instance above declares
constructors
SNothing :: Sing Nothing SJust :: Sing a -> Sing (Just a)
Singletons from Data.Maybe
sMaybe_ :: forall (t :: b) (t :: TyFun a b -> Type) (t :: Maybe a). Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply Maybe_Sym0 t) t) t :: b) Source #
The preceding two definitions are derived from the function maybe in
Data.Maybe. The extra underscore is to avoid name clashes with the type
Maybe.
sIsNothing :: forall (t :: Maybe a). Sing t -> Sing (Apply IsNothingSym0 t :: Bool) Source #
type family FromMaybe (a :: a) (a :: Maybe a) :: a where ... Source #
Equations
| FromMaybe d x = Case_6989586621679407199 d x x |
sFromMaybe :: forall (t :: a) (t :: Maybe a). Sing t -> Sing t -> Sing (Apply (Apply FromMaybeSym0 t) t :: a) Source #
type family ListToMaybe (a :: [a]) :: Maybe a where ... Source #
Equations
| ListToMaybe '[] = NothingSym0 | |
| ListToMaybe ((:) a _) = Apply JustSym0 a |
sListToMaybe :: forall (t :: [a]). Sing t -> Sing (Apply ListToMaybeSym0 t :: Maybe a) Source #
type family MaybeToList (a :: Maybe a) :: [a] where ... Source #
Equations
| MaybeToList Nothing = '[] | |
| MaybeToList (Just x) = Apply (Apply (:@#@$) x) '[] |
sMaybeToList :: forall (t :: Maybe a). Sing t -> Sing (Apply MaybeToListSym0 t :: [a]) Source #
sCatMaybes :: forall (t :: [Maybe a]). Sing t -> Sing (Apply CatMaybesSym0 t :: [a]) Source #
sMapMaybe :: forall (t :: TyFun a (Maybe b) -> Type) (t :: [a]). Sing t -> Sing t -> Sing (Apply (Apply MapMaybeSym0 t) t :: [b]) Source #
Defunctionalization symbols
type NothingSym0 = Nothing Source #
data JustSym0 (l :: TyFun a3530822107858468865 (Maybe a3530822107858468865)) Source #
data Maybe_Sym0 (l :: TyFun b6989586621679405849 (TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> Type)) Source #
Instances
| SuppressUnusedWarnings (Maybe_Sym0 :: TyFun b6989586621679405849 (TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> Type) -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (Maybe_Sym0 :: TyFun b6989586621679405849 (TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> Type) -> *) (l :: b6989586621679405849) Source # | |
Defined in Data.Singletons.Prelude.Maybe type Apply (Maybe_Sym0 :: TyFun b6989586621679405849 (TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> Type) -> *) (l :: b6989586621679405849) = (Maybe_Sym1 l :: TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> *) | |
data Maybe_Sym1 (l :: b6989586621679405849) (l :: TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type)) Source #
Instances
| SuppressUnusedWarnings (Maybe_Sym1 :: b6989586621679405849 -> TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (Maybe_Sym1 l1 :: TyFun (TyFun a6989586621679405850 b6989586621679405849 -> Type) (TyFun (Maybe a6989586621679405850) b6989586621679405849 -> Type) -> *) (l2 :: TyFun a6989586621679405850 b6989586621679405849 -> Type) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
data Maybe_Sym2 (l :: b6989586621679405849) (l :: TyFun a6989586621679405850 b6989586621679405849 -> Type) (l :: TyFun (Maybe a6989586621679405850) b6989586621679405849) Source #
Instances
| SuppressUnusedWarnings (Maybe_Sym2 :: b6989586621679405849 -> (TyFun a6989586621679405850 b6989586621679405849 -> Type) -> TyFun (Maybe a6989586621679405850) b6989586621679405849 -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (Maybe_Sym2 l1 l2 :: TyFun (Maybe a) b -> *) (l3 :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type Maybe_Sym3 (t :: b6989586621679405849) (t :: TyFun a6989586621679405850 b6989586621679405849 -> Type) (t :: Maybe a6989586621679405850) = Maybe_ t t t Source #
data IsJustSym0 (l :: TyFun (Maybe a6989586621679406970) Bool) Source #
Instances
| SuppressUnusedWarnings (IsJustSym0 :: TyFun (Maybe a6989586621679406970) Bool -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (IsJustSym0 :: TyFun (Maybe a) Bool -> *) (l :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type IsJustSym1 (t :: Maybe a6989586621679406970) = IsJust t Source #
data IsNothingSym0 (l :: TyFun (Maybe a6989586621679406969) Bool) Source #
Instances
| SuppressUnusedWarnings (IsNothingSym0 :: TyFun (Maybe a6989586621679406969) Bool -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (IsNothingSym0 :: TyFun (Maybe a) Bool -> *) (l :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type IsNothingSym1 (t :: Maybe a6989586621679406969) = IsNothing t Source #
data FromJustSym0 (l :: TyFun (Maybe a6989586621679406968) a6989586621679406968) Source #
Instances
| SuppressUnusedWarnings (FromJustSym0 :: TyFun (Maybe a6989586621679406968) a6989586621679406968 -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (FromJustSym0 :: TyFun (Maybe a) a -> *) (l :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type FromJustSym1 (t :: Maybe a6989586621679406968) = FromJust t Source #
data FromMaybeSym0 (l :: TyFun a6989586621679406967 (TyFun (Maybe a6989586621679406967) a6989586621679406967 -> Type)) Source #
Instances
| SuppressUnusedWarnings (FromMaybeSym0 :: TyFun a6989586621679406967 (TyFun (Maybe a6989586621679406967) a6989586621679406967 -> Type) -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (FromMaybeSym0 :: TyFun a6989586621679406967 (TyFun (Maybe a6989586621679406967) a6989586621679406967 -> Type) -> *) (l :: a6989586621679406967) Source # | |
Defined in Data.Singletons.Prelude.Maybe type Apply (FromMaybeSym0 :: TyFun a6989586621679406967 (TyFun (Maybe a6989586621679406967) a6989586621679406967 -> Type) -> *) (l :: a6989586621679406967) = FromMaybeSym1 l | |
data FromMaybeSym1 (l :: a6989586621679406967) (l :: TyFun (Maybe a6989586621679406967) a6989586621679406967) Source #
Instances
| SuppressUnusedWarnings (FromMaybeSym1 :: a6989586621679406967 -> TyFun (Maybe a6989586621679406967) a6989586621679406967 -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (FromMaybeSym1 l1 :: TyFun (Maybe a) a -> *) (l2 :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type FromMaybeSym2 (t :: a6989586621679406967) (t :: Maybe a6989586621679406967) = FromMaybe t t Source #
data ListToMaybeSym0 (l :: TyFun [a6989586621679406965] (Maybe a6989586621679406965)) Source #
Instances
| SuppressUnusedWarnings (ListToMaybeSym0 :: TyFun [a6989586621679406965] (Maybe a6989586621679406965) -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (ListToMaybeSym0 :: TyFun [a] (Maybe a) -> *) (l :: [a]) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type ListToMaybeSym1 (t :: [a6989586621679406965]) = ListToMaybe t Source #
data MaybeToListSym0 (l :: TyFun (Maybe a6989586621679406966) [a6989586621679406966]) Source #
Instances
| SuppressUnusedWarnings (MaybeToListSym0 :: TyFun (Maybe a6989586621679406966) [a6989586621679406966] -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (MaybeToListSym0 :: TyFun (Maybe a) [a] -> *) (l :: Maybe a) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type MaybeToListSym1 (t :: Maybe a6989586621679406966) = MaybeToList t Source #
data CatMaybesSym0 (l :: TyFun [Maybe a6989586621679406964] [a6989586621679406964]) Source #
Instances
| SuppressUnusedWarnings (CatMaybesSym0 :: TyFun [Maybe a6989586621679406964] [a6989586621679406964] -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (CatMaybesSym0 :: TyFun [Maybe a] [a] -> *) (l :: [Maybe a]) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
type CatMaybesSym1 (t :: [Maybe a6989586621679406964]) = CatMaybes t Source #
data MapMaybeSym0 (l :: TyFun (TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (TyFun [a6989586621679406962] [b6989586621679406963] -> Type)) Source #
Instances
| SuppressUnusedWarnings (MapMaybeSym0 :: TyFun (TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (TyFun [a6989586621679406962] [b6989586621679406963] -> Type) -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (MapMaybeSym0 :: TyFun (TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (TyFun [a6989586621679406962] [b6989586621679406963] -> Type) -> *) (l :: TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |
data MapMaybeSym1 (l :: TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) (l :: TyFun [a6989586621679406962] [b6989586621679406963]) Source #
Instances
| SuppressUnusedWarnings (MapMaybeSym1 :: (TyFun a6989586621679406962 (Maybe b6989586621679406963) -> Type) -> TyFun [a6989586621679406962] [b6989586621679406963] -> *) Source # | |
Defined in Data.Singletons.Prelude.Maybe Methods suppressUnusedWarnings :: () Source # | |
| type Apply (MapMaybeSym1 l1 :: TyFun [a] [b] -> *) (l2 :: [a]) Source # | |
Defined in Data.Singletons.Prelude.Maybe | |