diff agda/laws.agda @ 113:47f144540d51

Delte trying code
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Fri, 30 Jan 2015 21:59:06 +0900
parents 0a3b6cb91a05
children e6bcc7467335
line wrap: on
line diff
--- a/agda/laws.agda	Fri Jan 30 21:57:31 2015 +0900
+++ b/agda/laws.agda	Fri Jan 30 21:59:06 2015 +0900
@@ -11,8 +11,6 @@
     preserve-id : {A : Set l} (x : F A) → fmap id x ≡ id x
     covariant   : {A B C : Set l} (f : A -> B) -> (g : B -> C) -> (x : F A)
                     -> fmap (g ∙ f) x ≡ ((fmap g) ∙ (fmap f)) x
-  field 
-    fmap-equiv : {A B : Set l} {f g : A -> B} -> ((x : A) -> f x ≡ g x) -> (x : F A) -> fmap f x ≡ fmap g x
 open Functor
 
 record NaturalTransformation {l : Level} (F G : {l' : Level} -> Set l' -> Set l')