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} )