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