| gstore0[maxino2] = groupblock(gndx1, lax, m), ax = ax0, gndx = gndx0, remove-refsize0(istore1) = istore1, remove-refsize0(gstore2) = gstore2, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore0 ∪ ginval0, btree-inv(rp, adr, istore2, istore1, zh, fi, fi0), inv(istore1), inv(istore2), inv(gstore2), inv(gstore0 \ ginval0), ri-inj(fi0), ri-inj(fi), maxino2 ∈ gstore0, istore1 ⊑ istore2, pstate = unbuffered → syn0, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore0 ⊦ ⟨index_read_gblock_nodes#(maxino2, fi, fi0, ginval0, gstore0, gstore2, nx0, maxino1, ginval2, syn0; ax0, gndx0; err1)⟩ (ax + lax.to-adr(maxino2) = ax0 ∧ gndx + gndx1 = gndx0 ∧ ESUCCESS = err1), dups(nx0), maxino2 ∈ ginval0 |
gstore0[maxino2] = groupblock(gndx1, lax, m), ax = ax0, gndx = gndx0, remove-refsize0(gstore2) = gstore2, remove-refsize0(istore1) = istore1, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore0 ∪ ginval0, btree-inv(rp, adr, istore2, istore1, zh, fi, fi0), inv(gstore0 \ ginval0), inv(gstore2), inv(istore2), inv(istore1), inv(groupblock(gndx1, lax, m)), ri-inj(fi), ri-inj(fi0), maxino2 ∈ gstore0, istore1 ⊑ istore2, ¬ dups(nx0), ¬ maxino2 ∈ ginval0, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore0, pstate.index? → pstate.lnum ∈ istore2, pstate = unbuffered → syn0 ⊦ ⟨index_read_gblock_nodes#(maxino2, fi, fi0, ginval0, gstore0, gstore2, nx0, maxino1, ginval2, syn0; ax0, gndx0; err1)⟩ (ax + lax.to-adr(maxino2) = ax0 ∧ gndx + gndx1 = gndx0 ∧ ESUCCESS = err1)
Used simplifier rules: fwd-inv-gblock-rem: ⊦ inv(gstore \ ginval) ∧ n ∈ gstore ∧ ¬ n ∈ ginval ∧ gstore[n] = gblock → inv(gblock); (forward) from specification apersistence-base