| ∀ m. m * n0 ≤ n0 ↔ m ≤ 1 ⊦ m * n0 + m ≤ n0 + 1 ↔ m ≤ 1, m = 0, n0 = 0 |
m * n0 + m ≤ n0 + 1, ∀ m. m * n0 ≤ n0 ↔ m ≤ 1 ⊦ m = 0, m = 1, n0 = 0
Used simplifier rules: one: ⊦ m0 * 1 = m0;%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m + n ≤ m + n0 ↔ n ≤ n0; (s)% ⊦ m ≠ 0 → (m ≤ 1 ↔ m = 1); (s)