| n ≠ 0 ∧ (m + n) / n * n ≤ m + n ⊦ m + n - (m + n) / n * n = m % n, n = 0 |
n * m / n ≤ m ⊦ n = 0, m - n * m / n = m % n
Used simplifier rules: add: n ≠ 0 ⊦ (n0 + n) / n = n0 / n + 1;%lep-02: ⊦ m + n ≤ m + n0 ↔ n ≤ n0; from specification nat%cancel-01: ⊦ m + n - n + n1 = m - n1; from specification nat%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult%rsucc-02: ⊦ m * (n + 1) = m * n + m; from specification nat-mult%c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2