open import nat module nat_add where _+_ : Nat !$\rightarrow$! Nat !$\rightarrow$! Nat O + m = m (S n) + m = S (n + m)