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