| ∀ H. # H < # x0 ∧ path(x0, H) → x0 = [] ∨ dups(x0), # H < # (r + x0), path(r + x0, H) ⊦ r + x0 = [], dups(r + x0) |
path(r ' + x0, H), # H ≤ # x0, (∃ H0. # H0 < # x0 ∧ path(x0, H0)) → x0 = [] ⊦ dups(x0), r ∈ x0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ m < n ↔ n ≤ m], [CSIMPSEQ : ⊦ dups(r ' + x0) ↔ dups(x0) ∨ r ∈ x0], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m < n + 1 ↔ ¬ n < m], [CSIMPSEQ : ⊦ # r ' = 0 +1], [CSIMPSEQ : ⊦ # (x0 + x1) = # x0 + # x1], [CSIMPSEQ : ⊦ (x0 + x1) + x2 = x0 + x1 + x2], [CSIMPSEQ : ⊦ r ' + x0 ≠ []], [CSIMPSEQ : ⊦ r + x0 = r ' + x0])]]