| reachable-n(H, n, r2, r2) ∧ reachable-n(H, m * n - m, r2, r1) → (¬ reachable-n(H, (m + m - 1) * n, r1, r1) ↔ false), 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, 2 * m * n, r, 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), reachable-n(H, m * n - m, r2, r1) → reachable-n(H, (2 * m - 1) * n, r1, r1) ⊦ n = 0, m = 0, reachable-n(H, 2 * m * n, r, r1)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + m = 2 * m])]]