| reachable-n(H, 2 * n, r, r0), reachable-n(H, n, r, r0) ⊦ n = 0, ∃ m, n, r0. m < n ∧ reachable-n(H, m, r, r0) ∧ reachable-n(H, n, r, r0) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m * n = n * m], [CSIMPSEQ : ⊦ m0 ≠ 0 → (m0 < m0 * m ↔ 1 < m)], [CSIMPSEQ : ⊦ m0 * m * n = (m0 * m) * n])], [EXTRATERMS : (n, 2 * n, r0)]]