Copyright | (C) 2011-2013 Edward Kmett, |
---|---|
License | BSD-style (see the file LICENSE) |
Maintainer | Edward Kmett <ekmett@gmail.com> |
Stability | provisional |
Portability | portable |
Safe Haskell | Trustworthy |
Language | Haskell2010 |
For a good explanation of profunctors in Haskell see Dan Piponi's article:
http://blog.sigfpe.com/2011/07/profunctors-in-haskell.html
For more information on strength and costrength, see:
http://comonad.com/reader/2008/deriving-strength-from-laziness/
- class Profunctor p where
- class Profunctor p => Strong p where
- class Profunctor p => Choice p where
- class Profunctor p => Costrong p where
- class Profunctor p => Cochoice p where
- newtype Star f d c = Star {
- runStar :: d -> f c
- newtype Costar f d c = Costar {
- runCostar :: f d -> c
- newtype WrappedArrow p a b = WrapArrow {
- unwrapArrow :: p a b
- newtype Forget r a b = Forget {
- runForget :: a -> r
- type (:->) p q = forall a b. p a b -> q a b
Profunctors
class Profunctor p where Source
Formally, the class Profunctor
represents a profunctor
from Hask
-> Hask
.
Intuitively it is a bifunctor where the first argument is contravariant and the second argument is covariant.
You can define a Profunctor
by either defining dimap
or by defining both
lmap
and rmap
.
If you supply dimap
, you should ensure that:
dimap
id
id
≡id
If you supply lmap
and rmap
, ensure:
lmap
id
≡id
rmap
id
≡id
If you supply both, you should also ensure:
dimap
f g ≡lmap
f.
rmap
g
These ensure by parametricity:
dimap
(f.
g) (h.
i) ≡dimap
g h.
dimap
f ilmap
(f.
g) ≡lmap
g.
lmap
frmap
(f.
g) ≡rmap
f.
rmap
g
Profunctor (->) | |
Monad m => Profunctor (Kleisli m) | |
Functor w => Profunctor (Cokleisli w) | |
Profunctor (Tagged *) | |
Profunctor (Forget r) | |
Arrow p => Profunctor (WrappedArrow p) | |
Functor f => Profunctor (Costar f) | |
Functor f => Profunctor (Star f) | |
Profunctor p => Profunctor (Environment p) | |
Profunctor p => Profunctor (Closure p) | |
Profunctor p => Profunctor (Codensity p) | |
Profunctor p => Profunctor (Copastro p) | |
Profunctor p => Profunctor (Cotambara p) | |
Profunctor p => Profunctor (Pastro p) | |
Profunctor p => Profunctor (Tambara p) | |
(Functor f, Profunctor p) => Profunctor (Cayley f p) | |
(Profunctor p, Profunctor q) => Profunctor (Rift p q) | |
(Profunctor p, Profunctor q) => Profunctor (Procompose p q) | |
(Profunctor p, Profunctor q) => Profunctor (Ran p q) |
Profunctorial Strength
class Profunctor p => Strong p where Source
Generalizing Star
of a strong Functor
Note: Every Functor
in Haskell is strong with respect to (,)
.
This describes profunctor strength with respect to the product structure of Hask.
http://www-kb.is.s.u-tokyo.ac.jp/~asada/papers/arrStrMnd.pdf
class Profunctor p => Choice p where Source
The generalization of Costar
of Functor
that is strong with respect
to Either
.
Note: This is also a notion of strength, except with regards to another monoidal structure that we can choose to equip Hask with: the cocartesian coproduct.
Choice (->) | |
Monad m => Choice (Kleisli m) | |
Comonad w => Choice (Cokleisli w) |
|
Choice (Tagged *) | |
Monoid r => Choice (Forget r) | |
ArrowChoice p => Choice (WrappedArrow p) | |
Traversable w => Choice (Costar w) | |
Applicative f => Choice (Star f) | |
Profunctor p => Choice (Cotambara p) | |
Choice p => Choice (Tambara p) | |
(Functor f, Choice p) => Choice (Cayley f p) | |
(Choice p, Choice q) => Choice (Procompose p q) |
Profunctorial Costrength
class Profunctor p => Costrong p where Source
Costrong (->) | |
MonadFix m => Costrong (Kleisli m) | |
Functor f => Costrong (Cokleisli f) | |
Costrong (Tagged *) | |
ArrowLoop p => Costrong (WrappedArrow p) | |
Functor f => Costrong (Costar f) | |
(Corepresentable p, Corepresentable q) => Costrong (Procompose p q) |
class Profunctor p => Cochoice p where Source
Cochoice (->) | |
Applicative f => Cochoice (Costar f) | |
Traversable f => Cochoice (Star f) |
Common Profunctors
Lift a Functor
into a Profunctor
(forwards).
Functor f => Profunctor (Star f) | |
Traversable f => Cochoice (Star f) | |
Applicative f => Choice (Star f) | |
Functor m => Strong (Star m) | |
Distributive f => Closed (Star f) | |
Functor f => Representable (Star f) | |
Functor f => Sieve (Star f) f | |
Alternative f => Alternative (Star f a) | |
Monad f => Monad (Star f a) | |
Functor f => Functor (Star f a) | |
MonadPlus f => MonadPlus (Star f a) | |
Applicative f => Applicative (Star f a) | |
Distributive f => Distributive (Star f a) | |
type Rep (Star f) = f |
Lift a Functor
into a Profunctor
(backwards).
Functor f => Profunctor (Costar f) | |
Applicative f => Cochoice (Costar f) | |
Functor f => Costrong (Costar f) | |
Traversable w => Choice (Costar w) | |
Functor f => Closed (Costar f) | |
Functor f => Corepresentable (Costar f) | |
Functor f => Cosieve (Costar f) f | |
Monad (Costar f a) | |
Functor (Costar f a) | |
Applicative (Costar f a) | |
Distributive (Costar f d) | |
type Corep (Costar f) = f |
newtype WrappedArrow p a b Source
Wrap an arrow for use as a Profunctor
.
WrapArrow | |
|
Category * p => Category * (WrappedArrow p) | |
Arrow p => Arrow (WrappedArrow p) | |
ArrowZero p => ArrowZero (WrappedArrow p) | |
ArrowChoice p => ArrowChoice (WrappedArrow p) | |
ArrowApply p => ArrowApply (WrappedArrow p) | |
ArrowLoop p => ArrowLoop (WrappedArrow p) | |
Arrow p => Profunctor (WrappedArrow p) | |
ArrowLoop p => Costrong (WrappedArrow p) | |
ArrowChoice p => Choice (WrappedArrow p) | |
Arrow p => Strong (WrappedArrow p) |