| m * n1 = dist(n0, m0), m * n2 = dist(n, m0) ⊦ m | dist(n, n0), n ≤ m0 |
m * n1 = dist(n0, m0), m * n2 = dist(n, m0), m0 < n ⊦ 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)