| 2 * m = m0 + 1, reachable-n(H, m0 * n, r1, r1), reachable-n(H, n, r2, r2), reachable-n(H, n + m, r, r2), reachable-n(H, m * n, r, r1), reachable-n(H, m, r, r2), ∀ n0. reachable-n(H, m + n0 * n, r, r2) ⊦ n = 0, m = 0, reachable-n(H, m * n, r1, r1), reachable-n(H, 2 * m * n, r, r1), reachable-n(H, m * n - m, r2, r1) |
m * n = n1 + m ∧ m ≤ m * n, 2 * m = m0 + 1, reachable-n(H, m0 * n, r1, r1), reachable-n(H, n, r2, r2), reachable-n(H, n + m, r, r2), reachable-n(H, m * n, r, r1), reachable-n(H, m, r, r2), ∀ n0. reachable-n(H, m + n0 * n, r, r2) ⊦ n = 0, m = 0, reachable-n(H, m * n, r1, r1), reachable-n(H, 2 * m * n, r, r1), reachable-n(H, n1, r2, r1)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ m ≤ n ↔ n < m], [CSIMPSEQ : ⊦ m < n → n ≠ 0], [CSIMPSEQ : ⊦ m0 * m < m ↔ m0 = 0 ∧ m ≠ 0], [CSIMPSEQ : ⊦ m0 * m * n = (m0 * m) * n], [CSIMPSEQ : ⊦ m * n = n * m], [CSIMPELIM : n ≤ m ⊦ n0 = m - n ↔ m = n0 + n])], [EXTRATERMS : (m * n, m, n1)]]