Mercurial > hg > Members > kono > Proof > automaton
diff a02/agda/equality.agda @ 141:b3f05cd08d24
clean up
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 27 Dec 2020 13:26:44 +0900 |
parents | 3be1afb87f82 |
children | 407684f806e4 |
line wrap: on
line diff
--- a/a02/agda/equality.agda Sat Mar 14 19:42:27 2020 +0900 +++ b/a02/agda/equality.agda Sun Dec 27 13:26:44 2020 +0900 @@ -19,8 +19,8 @@ subst : {A : Set } → { x y : A } → ( f : A → Set ) → x == y → f x → f y subst {A} {x} {y} f refl fx = fx -ex5 : {A : Set} {x y z : A } → x == y → y == z → x == z -ex5 {A} {x} {y} {z} x==y y==z = subst {!!} {!!} {!!} +-- ex5 : {A : Set} {x y z : A } → x == y → y == z → x == z +-- ex5 {A} {x} {y} {z} x==y y==z = subst (λ refl → {!!} ) x==y {!!}