diff agda/delta/functor.agda @ 97:f26a954cd068

Update Natural Transformation definitions
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Tue, 20 Jan 2015 16:27:55 +0900
parents 8d92ed54a94f
children ebd0d6e2772c
line wrap: on
line diff
--- a/agda/delta/functor.agda	Tue Jan 20 16:25:53 2015 +0900
+++ b/agda/delta/functor.agda	Tue Jan 20 16:27:55 2015 +0900
@@ -22,7 +22,7 @@
 functor-law-2 f g (mono x)    = refl
 functor-law-2 f g (delta x d) = cong (delta (f (g x))) (functor-law-2 f g d)
 
-delta-is-functor : {l : Level} -> Functor (Delta {l})
+delta-is-functor : {l : Level} -> Functor {l} Delta 
 delta-is-functor = record {  fmap = delta-fmap ;
                              preserve-id = functor-law-1;
                              covariant  = \f g -> functor-law-2 g f}