| ((btree(rp, r, adr, height, dirty, fi, iast, as, alladrs, nstat) * P))(zh), as ⊆ dom iast, as ⊆ alladrs ⊦ r = null, r ∈ zh |
⊦ ((btree(rp, r0, adr, height, dirty0, ri, iast, as, alladrs, nstat) * P))(zh0) ↔ (∃ r, zh, zbrar, dirty, nused. (r0 = null ⊃ ¬ dirty ∧ P(zh0);r = r0 ∧ zh = zh0) ∧ (dirty → dirty0) ∧ (adr ∈ as ↔ ¬ dirty) ∧ adr ∈ alladrs ∧ nsize(nused, nstat) ∧ unmodified(adr, mkznode(rp, zbrar, height = 0, dirty, nused), iast) ∧ (( r => mkznode(rp, zbrar, height = 0, dirty, nused) * bnode(r, zbrar, 0, nused, nused, height, dirty, ri, iast, as -- adr, alladrs -- adr) * P) )(zh))
Used simplifier rules: maplet-null: ⊦ ((r => znd * P))(zh) → r ≠ null;%ne-01: ⊦ adr ∈ as → as ≠ ∅; (forward) from specification set-basic[node-store]%sep-ass: ⊦ (P * P3) * P4 = P * P3 * P4; from specification heap-sep[zheap]%sep-com: ⊦ P * P2 = P2 * P; from specification heap-sep[zheap]% ⊦ ((r => znd * P0))(zh) → r ∈ zh; (s)% ⊦ unmodified(adr, mkznode(rp, zbrar, bv, true, nused), iast); (s) Used terms: zh, P, nstat, alladrs, as, iast, fi, dirty, height, adr, r, rp