Define Coyoneda

This commit is contained in:
Kiana Sheibani 2023-03-06 22:05:33 -05:00
parent fec58179c6
commit 038a4c588a
Signed by: toki
GPG key ID: 6CB106C25E86A9F7

View file

@ -9,3 +9,8 @@ public export
record Yoneda p a b where
constructor MkYoneda
runYoneda : forall x, y. (x -> a) -> (b -> y) -> p x y
public export
data Coyoneda : (p : Type -> Type -> Type) -> Type -> Type -> Type where
MkCoyoneda : (a -> x) -> (y -> b) -> p x y -> Coyoneda p a b