| ⊦ reachable(r, r0, H) ↔ (∃ x. path(r ' + x, H) ∧ (r ' + x).last = r0 ∧ ¬ dups(r ' + x)) |
⊦ reachable(r, r0, H) ↔ (∃ x. path(r ' + x, H) ∧ (r ' + x).last = r0 ∧ ¬ r ∈ x ∧ ¬ dups(x))
Used simplifier rules: a: ⊦ (x0 + x1) + x2 = x0 + x1 + x2; from specification list[reflist]%rec: ⊦ dups(r ' + x0) ↔ ¬ ¬(r ∈ x0 ∨ dups(x0)); from specification list-dup[reflist]