Copyright | (c) 2010-2011 Patrick Bahr Tom Hvitved |
---|---|
License | BSD3 |
Maintainer | Tom Hvitved <hvitved@diku.dk> |
Stability | experimental |
Portability | non-portable (GHC Extensions) |
Safe Haskell | None |
Language | Haskell98 |
This module defines annotations on signatures.
Synopsis
- data (f :&: p) (a :: * -> *) (b :: * -> *) i = (f a b i) :&: p
- data (f :*: g) a b i = (f a b i) :*: (g a b i)
- class DistAnn (s :: (* -> *) -> (* -> *) -> * -> *) p s' | s' -> s, s' -> p where
- class RemA (s :: (* -> *) -> (* -> *) -> * -> *) s' | s -> s' where
- liftA :: RemA s s' => (s' a b :-> t) -> s a b :-> t
- liftA' :: (DistAnn s' p s, HDifunctor s') => (s' a b :-> Cxt h s' c d) -> s a b :-> Cxt h s c d
- stripA :: (RemA g f, HDifunctor g) => CxtFun g f
- propAnn :: (DistAnn f p f', DistAnn g p g', HDifunctor g) => Hom f g -> Hom f' g'
- propAnnM :: (DistAnn f p f', DistAnn g p g', HDifunctor g, Monad m) => HomM m f g -> HomM m f' g'
- ann :: (DistAnn f p g, HDifunctor f) => p -> CxtFun f g
- project' :: (RemA f f', s :<: f') => Cxt h f a b i -> Maybe (s a (Cxt h f a b) i)
Documentation
data (f :&: p) (a :: * -> *) (b :: * -> *) i infixr 7 Source #
This data type adds a constant product to a signature.
(f a b i) :&: p infixr 7 |
Instances
DistAnn f p (f :&: p) Source # | |
HDifunctor f => HDifunctor (f :&: p) Source # | |
(ShowHD f, Show p) => ShowHD (f :&: p) Source # | |
HDitraversable f => HDitraversable (f :&: p) Source # | |
RemA (f :&: p) f Source # | |
Defined in Data.Comp.Param.Multi.Ops | |
DistAnn s p s' => DistAnn (f :+: s) p ((f :&: p) :+: s') Source # | |
RemA s s' => RemA ((f :&: p) :+: s) (f :+: s') Source # | |
data (f :*: g) a b i infixr 8 Source #
Formal product of signatures (higher-order difunctors).
(f a b i) :*: (g a b i) infixr 8 |
class DistAnn (s :: (* -> *) -> (* -> *) -> * -> *) p s' | s' -> s, s' -> p where Source #
This class defines how to distribute an annotation over a sum of signatures.
injectA :: p -> s a b :-> s' a b Source #
Inject an annotation over a signature.
projectA :: s' a b :-> (s a b :&: p) Source #
Project an annotation from a signature.
liftA :: RemA s s' => (s' a b :-> t) -> s a b :-> t Source #
Transform a function with a domain constructed from a higher-order difunctor to a function with a domain constructed with the same higher-order difunctor, but with an additional annotation.
liftA' :: (DistAnn s' p s, HDifunctor s') => (s' a b :-> Cxt h s' c d) -> s a b :-> Cxt h s c d Source #
Transform a function with a domain constructed from a higher-order difunctor to a function with a domain constructed with the same higher-order difunctor, but with an additional annotation.
stripA :: (RemA g f, HDifunctor g) => CxtFun g f Source #
Strip the annotations from a term over a higher-order difunctor with annotations.
propAnn :: (DistAnn f p f', DistAnn g p g', HDifunctor g) => Hom f g -> Hom f' g' Source #
Lift a term homomorphism over signatures f
and g
to a term homomorphism
over the same signatures, but extended with annotations.
propAnnM :: (DistAnn f p f', DistAnn g p g', HDifunctor g, Monad m) => HomM m f g -> HomM m f' g' Source #
Lift a monadic term homomorphism over signatures f
and g
to a monadic
term homomorphism over the same signatures, but extended with annotations.