| ∃ r1. reachable-n(H, m, r, r1) ∧ reachable-n(H, n - m, r1, r0), reachable-n(H, n, r, r0), reachable-n(H, m, r, r0), m < n ⊦ ∃ m, r0. reachable-n(H, m, r, r0) ∧ (∃ n. n ≠ 0 ∧ (∀ n0. reachable-n(H, m + n0 * n, r, r0))) |
m < n, reachable-n(H, n, r, r0), reachable-n(H, n - m, r0, r0), reachable-n(H, m, r, r0) ⊦ ∃ m, r0. reachable-n(H, m, r, r0) ∧ (∃ n. n ≠ 0 ∧ (∀ n0. reachable-n(H, m + n0 * n, r, r0)))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ reachable-n(H, n, r, r0) ∧ reachable-n(H, n, r, r1) → r0 = r1])]]