Mercurial > hg > Members > kono > Proof > category

diff code-data.agda @ 690:3d41a8edbf63

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix universal mapping done.
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 12 Nov 2017 01:29:47 +0900
parents 71c817f28bc6
children
line wrap: on
line diff
--- a/code-data.agda	Sun Nov 12 00:53:32 2017 +0900
+++ b/code-data.agda	Sun Nov 12 01:29:47 2017 +0900
@@ -178,8 +178,10 @@
 eta-map a = id1 A a
 
 
-Lemma1 :  UniversalMapping A DataCategory U F eta-map
+Lemma1 :  UniversalMapping A DataCategory U 
 Lemma1 = record {
+         F = F ;
+         η = eta-map ;
          _* =  solution ;
          isUniversalMapping = record {
                     universalMapping  = \{a} {b} {f} -> universalMapping {a} {b} {f} ;