btree-inv(r, adr, istore, istore0, zh, ri, fi), istore0 ⊑ istore, r = null ∨ ¬ zh[r].dirty ⊦ ri = fi