1 2 3 4 5 6 7 8
open nat def add : nat → nat → nat | m zero := m | m (succ n) := succ (add m n) -- encode definition as an axiom axiom add_zero (n : nat) : n + 0 = n