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