| x = r0 + x0, path(r ' + x, H[r, ce]), (r ' + x).last ∈ H ⊦ r = null, ce.nxt = r, r = (r ' + x).last, ce.nxt ≠ null ∧ ce.nxt ∈ H ∧ reachable(ce.nxt, (r ' + x).last, H[r, ce]) |
(ce.nxt ' + x0).last ∈ H, path(ce.nxt ' + x0, H[r, ce]) ⊦ r = (ce.nxt ' + x0).last, ce.nxt = r, r = null, ce.nxt ≠ null ∧ ce.nxt ∈ H ∧ reachable(ce.nxt, (ce.nxt ' + x0).last, H[r, ce])
Used simplifier rules: path-cons: ⊦ path(r ' + r0 ' + x, H) ↔ ¬ ¬(r ∈ H ∧ r ≠ null ∧ H[r].nxt = r0 ∧ path(r0 ' + x, H));%At-same: ⊦ H[r, ce][r] = ce; from specification store[linheap]%insin: ⊦ r ∈ H[r, ce]; from specification store[linheap]%l-05: ⊦ (r ' + r0 ' + x0).last = (r0 ' + x0).last; from specification list-last[reflist]%a: ⊦ (x0 + x1) + x2 = x0 + x1 + x2; from specification list[reflist]%c: ⊦ r + x0 = r ' + x0; from specification list[reflist]