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