Mercurial > hg > Papers > 2015 > atton-thesis

view src/delta_fmap.agda @ 50:37a832dff044

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add DeltaM example
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Sun, 15 Feb 2015 17:56:51 +0900
parents 4cc65012412f
children
line wrap: on
line source

delta-fmap : {l : Level} {A B : Set l} {n : Nat} ->
             (A -> B) -> (Delta A (S n)) -> (Delta B (S n))
delta-fmap f (mono x)    = mono  (f x)
delta-fmap f (delta x d) = delta (f x) (delta-fmap f d)