Mercurial > hg > Papers > 2019 > ryokka-sigss
view Paper/src/zero.agda.replaced @ 8:83d000399c9d
fix invisible char
author | ryokka |
---|---|
date | Tue, 18 Dec 2018 04:08:28 +0900 |
parents | |
children |
line wrap: on
line source
+zero : { y : @$\mathbb{N}$@ } → y + zero @$\equiv$@ y +zero {zero} = refl +zero {suc y} = cong ( @$\lambda$@ x → suc x ) ( +zero {y} )