Mercurial > hg > Papers > 2017 > atton-master

comparison paper/src/NatAddSym.agda @ 64:10a550bf7e4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mini fixes with ryokka-san
author atton <atton@cr.ie.u-ryukyu.ac.jp>
date Fri, 03 Feb 2017 14:49:58 +0900
parents 70bea06ebdf3
children
comparison
equal deleted inserted replaced
63:6d8825f3b051 64:10a550bf7e4a
6 module nat_add_sym where 6 module nat_add_sym where
7 7
8 addSym : (n m : Nat) -> n + m ≡ m + n 8 addSym : (n m : Nat) -> n + m ≡ m + n
9 addSym O O = refl 9 addSym O O = refl
10 addSym O (S m) = cong S (addSym O m) 10 addSym O (S m) = cong S (addSym O m)
11 addSym (S n) O = cong S (addSym n O) 11 addSym (S n) O = cong S (addSym n O)
12 addSym (S n) (S m) = {!!} 12 addSym (S n) (S m) = {!!} -- 後述
13
14