Mercurial > hg > Members > kono > Proof > category

diff cat-utility.agda @ 202:58ee98bbb333

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove an extensionality
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 01 Sep 2013 13:26:30 +0900
parents ae1a4f7e5203
children 24e83b8b81be
line wrap: on
line diff
--- a/cat-utility.agda	Sat Aug 31 12:53:35 2013 +0900
+++ b/cat-utility.agda	Sun Sep 01 13:26:30 2013 +0900
@@ -56,6 +56,10 @@
                          : Set (suc (c₁ ⊔ c₂ ⊔ ℓ ⊔ c₁' ⊔ c₂' ⊔ ℓ' )) where
             field
                isAdjunction : IsAdjunction A B U F η ε
+            U-functor =  U
+            F-functor =  F
+            Eta = η
+            Epsiron = ε
 
 
         record IsMonad {c₁ c₂ ℓ : Level} (A : Category c₁ c₂ ℓ)