| path(a ' + y), b ∈ succ(y .last), reach(a, y .last, # y) ⊦ y = [], succ(y .last) = ∅, # succ(y .last) = 0, path(a + (y + b)) ∧ # (a + (y + b)) = 2 + # y ∧ (a + (y + b)) .first = a ∧ (a + (y + b)) .last = b |
path(a ' + y), b ∈ succ(y .last), reach(a, y .last, # y) ⊦ y = [], succ(y .last) = ∅, # succ(y .last) = 0, path(a ' + y + b ')
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (a ' + x + b ') .last = b], [CSIMPSEQ : ⊦ (a ' + x) .first = a], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n = m + n0 ↔ n = n0], [CSIMPSEQ : ⊦ (x + y) + z = x + y + z], [CSIMPSEQ : ⊦ # a ' = 0 +1], [CSIMPSEQ : ⊦ # (x + y) = # x + # y], [CSIMPSEQ : ⊦ a + x = a ' + x], [CSIMPSEQ : ⊦ x + a = x + a '])]]