| m0 % n = 0, m1 < (m1 % n = 0 ⊃ m1;n * m1 / n + n), m0 < n * m1 / n + n, m1 ≤ m0 ⊦ m1 % n = 0, n = 0 |
m0 % n = 0, m1 < n * m1 / n + n, m0 < n * m1 / n + n, m1 ≤ m0 ⊦ m1 % n = 0, n = 0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%fle-01: ⊦ m ≤ n ∧ n < n0 → m < n0; (forward) from specification nat%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic