| q = str0 + q0 ⊦ q ∈ dnode(md, sdt[str, tree0]) ↔ (str ' ⊑ q ⊃ q.tail ∈ tree0;q ∈ dnode(md, sdt)) |
⊦ str ' + p ∈ dnode(md, sdt) ↔ str ∈ sdt ∧ p ∈ sdt[str]
⊦ str0 ∈ sdt[str, tree0] ∧ q0 ∈ sdt[str, tree0][str0] ↔ (str = str0 ⊃ q0 ∈ tree0;str0 ∈ sdt ∧ q0 ∈ sdt[str0])
Used simplifier rules: in-dnode: ⊦ str ' + p ∈ dnode(md, sdt) ↔ str ∈ sdt ∧ p ∈ sdt[str];% ⊦ (str ' + p).tail = p; (s)% ⊦ str ' ⊑ str0 ' + p ↔ str = str0; (s)%a: ⊦ (p + p0) + p1 = p + p0 + p1; from specification list[path]% ⊦ str + p = str ' + p; (s)