| x + H[r1].nxt ' + r0 ' + y ≠ [], (r1 ' + x0).last = (r ' + x).last, x1 + r2 ' + x2 = (x + H[r1].nxt ' + r0 ' + y).butlast ∧ r1 = (x + H[r1].nxt ' + r0 ' + y).last, (r ' + x1).last = (r ' + x).last, path(r1 ' + x0, H), r1 ∈ H, H[r1].nxt ∈ H, path(r ' + x1 + r2 ' + x2 + r1 ', H), path(r ' + x + H[r1].nxt ', H), path(r ' + x1, H), (r ' + x).last ∈ H, r1 = H[r1].nxt ∨ r1 = r0 ∨ r1 ∈ y ⊦ r2 = r1, r = r2, r1 = r, H[r1].nxt = null, dups(x2), dups(x1), dups(x1 + x2), r1 ∈ x2, r1 ∈ x1, r2 ∈ x2, r2 ∈ x1, r ∈ x2, r ∈ x1, dups(x0), r1 ∈ x0, r1 ∈ x |
x1 + r2 ' + x2 = x + H[(r0 ' + y).last].nxt ' + (r0 ' + y).butlast, ((r0 ' + y).last ' + x0).last = (r ' + x).last, (r ' + x1).last = (r ' + x).last, (r ' + x).last ∈ H, path(r ' + x1, H), path(r ' + x + H[(r0 ' + y).last].nxt ', H), path(r ' + x1 + r2 ' + x2 + (r0 ' + y).last ', H), H[(r0 ' + y).last].nxt ∈ H, (r0 ' + y).last ∈ H, path((r0 ' + y).last ' + x0, H), (r0 ' + y).last = H[(r0 ' + y).last].nxt ∨ (r0 ' + y).last = r0 ∨ (r0 ' + y).last ∈ y ⊦ H[(r0 ' + y).last].nxt = null, (r0 ' + y).last = r, r = r2, r2 = (r0 ' + y).last, (r0 ' + y).last ∈ x, (r0 ' + y).last ∈ x0, dups(x0), r ∈ x1, r ∈ x2, r2 ∈ x1, r2 ∈ x2, (r0 ' + y).last ∈ x1, (r0 ' + y).last ∈ x2, dups(x1 + x2), dups(x1), dups(x2)
Used simplifier rules: e-03: ⊦ x0 + r ' + x1 ≠ []; from specification list[reflist]%l-05: ⊦ (r ' + r0 ' + x0).last = (r0 ' + x0).last; from specification list-last[reflist]%lapp-01: ⊦ (x0 + r ' + x1).last = (r ' + x1).last; from specification list-last[reflist]%a: ⊦ (x0 + x1) + x2 = x0 + x1 + x2; from specification list[reflist]%btwo: ⊦ (r ' + r0 ' + x0).butlast = r ' + (r0 ' + x0).butlast; from specification list-last[reflist]%bin: ⊦ (x0 + r ' + x1).butlast = x0 + (r ' + x1).butlast; from specification list-last[reflist]