| ¬ dirty ∨ rp = null ⊦ inv(istore) ∧ inv(istore0) ∧ zh[rp] = mkznode(rp0, zbrar, boolvar, dirty, nused) ∧ btree-inv(rp, adr, istore, istore0, zh, ri, fi) ∧ istore0 ⊑ istore → btree-inv(rp, adr, remove-refsize0(istore), remove-refsize0(istore), zh, ri, fi) |
zh[rp] = mkznode(rp0, zbrar, boolvar, dirty, nused), btree-inv(rp, adr, istore, istore0, zh, ri, fi), inv(istore), inv(istore0), istore0 ⊑ istore, ¬ dirty ∨ rp = null ⊦ btree-inv(rp, adr, remove-refsize0(istore), remove-refsize0(istore), zh, ri, fi)