| # x2 = n + 1, path(H[r].nxt ' + x2, H), r ∈ H ⊦ r = null, x2 = [], ∃ r0. reachable-1(H, r, r0) ∧ (∃ r1. reachable-1(H, r0, r1) ∧ reachable-n(H, n, r1, x2.last)), ∃ x. path(x, H) ∧ hd x = H[r].nxt ∧ x.last = x2.last ∧ # x = 2 + n, ∃ r3. reachable-1(H, H[r].nxt, r3) ∧ reachable-n(H, n, r3, x2.last) |
Used simplifier rules: ⊦ r + x0 = r ' + x0; (s)% ⊦ hd(r ' + x0) = r; (s)%a: ⊦ (x0 + x1) + x2 = x0 + x1 + x2; from specification list[reflist]% ⊦ x0 ≠ [] → (r ' + x0).last = x0.last; (s)% ⊦ #(x0 + x1) = # x0 + # x1; (s)% ⊦ # r ' = 0 +1; (s)%n < n0 ⊦ m + (* n) = m0 + (* n0) ↔ m = m0 + (n0 - n); (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic Used terms: H[r].nxt + x2