| n1 ≤ m0 +1, n ≤ n0, ∀ n, n0, n1. n ≤ n0 ∧ n1 ≤ m0 → n + n1 ≤ n0 + m0 ⊦ n + n1 ≤ n0 + m0 +1 |
n0 + m0 + 1 < n + n1, n1 ≤ m0 + 1, n ≤ n0, ∀ n, n0, n1. n ≤ n0 ∧ n1 ≤ m0 → n + n1 ≤ n0 + m0 ⊦
Used simplifier rules: le-def: ⊦ m ≤ n ↔ ¬ n < m;% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m +1 = m + 1; (s)