| ((btree(rp, r, adr, height, dirty, fi, iast, as, alladrs, nstat) * P))(zh) ⊦ ∃ r1, zh1, zbrar, dirty, nused. (r = null ⊃ ¬ dirty ∧ P(zh);r1 = r ∧ zh1 = zh) ∧ (dirty → true) ∧ (adr ∈ as ↔ ¬ dirty) ∧ adr ∈ alladrs ∧ nsize(nused, nstat) ∧ unmodified(adr, mkznode(rp, zbrar, height = 0, dirty, nused), iast) ∧ (( r1 => mkznode(rp, zbrar, height = 0, dirty, nused) * bnode(r1, zbrar, 0, nused, nused, height, dirty, fi, iast, as -- adr, alladrs -- adr) * P) )(zh1) |
((btree(rp, r, adr, height, dirty, fi, iast, as, alladrs, nstat) * P))(zh) ⊦ ∃ r0, zh0, zbrar, dirty0, nused. (r = null ⊃ ¬ dirty0 ∧ P(zh);r0 = r ∧ zh0 = zh) ∧ (adr ∈ as ↔ ¬ dirty0) ∧ adr ∈ alladrs ∧ nsize(nused, nstat) ∧ unmodified(adr, mkznode(rp, zbrar, height = 0, dirty0, nused), iast) ∧ (( r0 => mkznode(rp, zbrar, height = 0, dirty0, nused) * bnode(r0, zbrar, 0, nused, nused, height, dirty0, fi, iast, as -- adr, alladrs -- adr) * P) )(zh0)