Skip to content
Snippets Groups Projects
Commit 1af46529 authored by Eric Giovannini's avatar Eric Giovannini
Browse files

define infix map

parent df1a8c00
No related branches found
No related tags found
No related merge requests found
......@@ -44,6 +44,7 @@ _⊛_ f x a = f a (x a)
map▹ : (f : A → B) → ▹ k , A → ▹ k , B
map▹ f x α = f (x α)
_<$>_ = map▹
-- The behaviour of fix is encoded with rewrite rules, following the
-- definitional equalities of Clocked CTT.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment