| n1 + m1 * m = m0 * m, n2 < m ⊦ m * (m0 - m1) = n1, n1 = 0, m1 ≤ m0 |
n1 + m1 * m = m0 * m, m0 < m1, n2 < m ⊦ m * (m0 - m1) = n1, n1 = 0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)