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