toki/idris2-profunctors
1
0
Fork 0
Code Issues Pull requests Activity

Fix profunctor record declarations

Browse source
This commit is contained in:
Kiana Sheibani 2023-03-04 23:56:35 -05:00
parent daf9eaef6e
commit c8dfbb5189
Signed by: toki
GPG key ID: 6CB106C25E86A9F7
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Data/Profunctor/Types.idr
View file

@ -44,7 +44,7 @@ Functor f => Profunctor (Kleislimorphism f) where
-- Examples of profunctors -- Examples of profunctors
public export public export
record Star (f : k -> Type) a (b : k) where record Star {0 k : Type} (f : k -> Type) a (b : k) where
constructor MkStar constructor MkStar
applyStar : a -> f b applyStar : a -> f b
@ -76,7 +76,7 @@ Functor f => Profunctor (Star f) where
public export public export
record Costar (f : k -> Type) (a : k) b where record Costar {0 k : Type} (f : k -> Type) (a : k) b where
constructor MkCostar constructor MkCostar
applyCostar : f a -> b applyCostar : f a -> b
@ -101,7 +101,7 @@ Functor f => Profunctor (Costar f) where
public export public export
record Tagged (a : k) b where record Tagged {0 k : Type} (a : k) b where
constructor Tag constructor Tag
getTagged : b getTagged : b