| path(x1[m0] ' + x1, H), m0 < # x1 ⊦ x1 = [], path(x1[m0] ' + firstn(m0 + 1, x1) + restn(m0 + 1, x1), H), reachable-n(H, m0 + 1, x1[m0], x1[m0]), path(x1[m0] ' + firstn(m0 + 1, x1), H) |
⊦ n ≤ # x0 → firstn(n, x0) + restn(n, x0) = x0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + 1 ≤ n ↔ m < n], [CSIMPSEQ : ⊦ ¬ m < n ↔ n ≤ m], [CSIMPSEQ : ⊦ m < n → (n ≤ m ↔ false)], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n = n + m])], [EXTRATERMS : (x1, m0 + 1)]]