| ∃ r1. reachable-n(H, m * n, r, r1) ∧ reachable-n(H, m + m * n - m * n, r1, r0), reachable-n(H, m, r, r0), reachable-n(H, m + m * n, r, r0) ⊦ ∃ r1. reachable-n(H, m * n, r, r1), n = 0, ∃ n, r0. n ≠ 0 ∧ reachable-n(H, n, r, r0) ∧ reachable-n(H, 2 * n, r, r0) |
reachable-n(H, m, r, r0), reachable-n(H, m + m * n, r, r0), reachable-n(H, m * n, r, r1), reachable-n(H, m, r1, r0) ⊦ n = 0, ∃ r1. reachable-n(H, m * n, r, r1), ∃ n, r0. n ≠ 0 ∧ reachable-n(H, n, r, r0) ∧ reachable-n(H, 2 * n, r, r0)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n - m = n], [CSIMPSEQ : ⊦ m * n = n * m])]]