代数的データ型としてℕ︎をz∈ℕ︎, n∈ℕ︎⇒s(n)∈ℕ︎と定義して
+:ℕ︎→ℕ︎をwell-definedに定義してs(z)+s(z)=s(s(z))を示すだけ