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