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