| ⊦ n0 + n < (m + 2) * n ↔ n0 < (m + 1) * n |
Used simplifier rules: dist: ⊦ m0 * (m + n) = m0 * m + m0 * n;%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%numeral-24: m1 ≠ 0 ⊦ m + n < (* m1) * m + n0 ↔ n < (m1 - 1) * m + n0;%one: ⊦ m0 * 1 = m0;%rsucc-01: ⊦ (m + 1) * n = m * n + n;%c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2