view paper/src/function.agda.replaced @ 4:b5fffa8ae875

fix chapter hoare
author ryokka
date Wed, 29 Jan 2020 22:36:17 +0900
parents c7acb9211784
children
line wrap: on
line source

_-_ :@$\mathbb{N}$@ @$\rightarrow$@@$\mathbb{N}$@ @$\rightarrow$@@$\mathbb{N}$@
x - zero  = x
zero - _  = zero
(suc x) - (suc y)  = x - y