Pandora.Pattern.Functor.Adjoint

Documentation

type (-|) = Adjoint infixl 4

class (Covariant t, Covariant u) => Adjoint t u where

When providing a new instance, you should ensure it satisfies the four laws:
* Left adjunction identity: phi cozero ≡ identity
* Right adjunction identity: psi zero ≡ identity
* Left adjunction interchange: phi f ≡ comap f . eta
* Right adjunction interchange: psi f ≡ epsilon . comap f

Minimal complete definition

(-|), (|-)

Methods

(-|) :: a -> (t a -> b) -> u b infixl 4

Left adjunction

(|-) :: t a -> (a -> u b) -> b infixl 4

Right adjunction

phi :: (t a -> b) -> a -> u b

Prefix and flipped version of -|

psi :: (a -> u b) -> t a -> b

Prefix and flipped version of |-

eta :: a -> (u :. t) := a

Also known as unit

epsilon :: ((t :. u) := a) -> a

Also known as counit

Instances

Adjoint Identity Identity

Defined in Pandora.Paradigm.Primary.Functor.Identity

Methods

(-|) :: a -> (Identity a -> b) -> Identity b

(|-) :: Identity a -> (a -> Identity b) -> b

phi :: (Identity a -> b) -> a -> Identity b

psi :: (a -> Identity b) -> Identity a -> b

eta :: a -> (Identity :. Identity) := a

epsilon :: ((Identity :. Identity) := a) -> a

(Extractable t, Pointable t, Extractable u, Pointable u) => Adjoint (Yoneda t) (Yoneda u)

Defined in Pandora.Paradigm.Primary.Transformer.Yoneda

Methods

(-|) :: a -> (Yoneda t a -> b) -> Yoneda u b

(|-) :: Yoneda t a -> (a -> Yoneda u b) -> b

phi :: (Yoneda t a -> b) -> a -> Yoneda u b

psi :: (a -> Yoneda u b) -> Yoneda t a -> b

eta :: a -> (Yoneda u :. Yoneda t) := a

epsilon :: ((Yoneda t :. Yoneda u) := a) -> a

Adjoint (Equipment e) (Environment e)

Defined in Pandora.Paradigm.Inventory

Methods

(-|) :: a -> (Equipment e a -> b) -> Environment e b

(|-) :: Equipment e a -> (a -> Environment e b) -> b

phi :: (Equipment e a -> b) -> a -> Environment e b

psi :: (a -> Environment e b) -> Equipment e a -> b

eta :: a -> (Environment e :. Equipment e) := a

epsilon :: ((Equipment e :. Environment e) := a) -> a

Adjoint (Accumulator e) (Imprint e)

Defined in Pandora.Paradigm.Inventory

Methods

(-|) :: a -> (Accumulator e a -> b) -> Imprint e b

(|-) :: Accumulator e a -> (a -> Imprint e b) -> b

phi :: (Accumulator e a -> b) -> a -> Imprint e b

psi :: (a -> Imprint e b) -> Accumulator e a -> b

eta :: a -> (Imprint e :. Accumulator e) := a

epsilon :: ((Accumulator e :. Imprint e) := a) -> a

Adjoint (Store s) (State s)

Defined in Pandora.Paradigm.Inventory

Methods

(-|) :: a -> (Store s a -> b) -> State s b

(|-) :: Store s a -> (a -> State s b) -> b

phi :: (Store s a -> b) -> a -> State s b

psi :: (a -> State s b) -> Store s a -> b

eta :: a -> (State s :. Store s) := a

epsilon :: ((Store s :. State s) := a) -> a

Adjoint (Product s) ((->) s :: Type -> Type)

Defined in Pandora.Paradigm.Primary.Functor

Methods

(-|) :: a -> (Product s a -> b) -> s -> b

(|-) :: Product s a -> (a -> s -> b) -> b

phi :: (Product s a -> b) -> a -> s -> b

psi :: (a -> s -> b) -> Product s a -> b

eta :: a -> ((->) s :. Product s) := a

epsilon :: ((Product s :. (->) s) := a) -> a

(Covariant (t <.:> v), Covariant (w <:.> u), Adjoint v u, Adjoint t w) => Adjoint (t <.:> v) (w <:.> u)

Defined in Pandora.Paradigm.Schemes

Methods

(-|) :: a -> ((t <.:> v) a -> b) -> (w <:.> u) b

(|-) :: (t <.:> v) a -> (a -> (w <:.> u) b) -> b

phi :: ((t <.:> v) a -> b) -> a -> (w <:.> u) b

psi :: (a -> (w <:.> u) b) -> (t <.:> v) a -> b

eta :: a -> ((w <:.> u) :. (t <.:> v)) := a

epsilon :: (((t <.:> v) :. (w <:.> u)) := a) -> a

(Covariant (t <.:> v), Covariant (w <.:> u), Adjoint t u, Adjoint v w) => Adjoint (t <.:> v) (w <.:> u)

Defined in Pandora.Paradigm.Schemes

Methods

(-|) :: a -> ((t <.:> v) a -> b) -> (w <.:> u) b

(|-) :: (t <.:> v) a -> (a -> (w <.:> u) b) -> b

phi :: ((t <.:> v) a -> b) -> a -> (w <.:> u) b

psi :: (a -> (w <.:> u) b) -> (t <.:> v) a -> b

eta :: a -> ((w <.:> u) :. (t <.:> v)) := a

epsilon :: (((t <.:> v) :. (w <.:> u)) := a) -> a

(Covariant (v <:.> t), Covariant (w <.:> u), Adjoint t u, Adjoint v w) => Adjoint (v <:.> t) (w <.:> u)

Defined in Pandora.Paradigm.Schemes

Methods

(-|) :: a -> ((v <:.> t) a -> b) -> (w <.:> u) b

(|-) :: (v <:.> t) a -> (a -> (w <.:> u) b) -> b

phi :: ((v <:.> t) a -> b) -> a -> (w <.:> u) b

psi :: (a -> (w <.:> u) b) -> (v <:.> t) a -> b

eta :: a -> ((w <.:> u) :. (v <:.> t)) := a

epsilon :: (((v <:.> t) :. (w <.:> u)) := a) -> a

(Covariant (v <:.> t), Covariant (u <:.> w), Adjoint t u, Adjoint v w) => Adjoint (v <:.> t) (u <:.> w)

Defined in Pandora.Paradigm.Schemes

Methods

(-|) :: a -> ((v <:.> t) a -> b) -> (u <:.> w) b

(|-) :: (v <:.> t) a -> (a -> (u <:.> w) b) -> b

phi :: ((v <:.> t) a -> b) -> a -> (u <:.> w) b

psi :: (a -> (u <:.> w) b) -> (v <:.> t) a -> b

eta :: a -> ((u <:.> w) :. (v <:.> t)) := a

epsilon :: (((v <:.> t) :. (u <:.> w)) := a) -> a

(Covariant ((t <:<.>:> u) t'), Covariant ((v <:<.>:> w) v'), Adjoint t w, Adjoint t' v', Adjoint t v, Adjoint u v, Adjoint v' t') => Adjoint ((t <:<.>:> u) t') ((v <:<.>:> w) v')

Defined in Pandora.Paradigm.Schemes

Methods

(-|) :: a -> ((t <:<.>:> u) t' a -> b) -> (v <:<.>:> w) v' b

(|-) :: (t <:<.>:> u) t' a -> (a -> (v <:<.>:> w) v' b) -> b

phi :: ((t <:<.>:> u) t' a -> b) -> a -> (v <:<.>:> w) v' b

psi :: (a -> (v <:<.>:> w) v' b) -> (t <:<.>:> u) t' a -> b

eta :: a -> ((v <:<.>:> w) v' :. (t <:<.>:> u) t') := a

epsilon :: (((t <:<.>:> u) t' :. (v <:<.>:> w) v') := a) -> a