| gstore = gstore0, remove-refsize0(gstore2) = gstore2, remove-refsize0(istore0) = istore0, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore0 ∪ ginval0, btree-inv(rp, adr, istore, istore0, zh, fi, fi0), inv(gstore0 \ ginval0), inv(gstore2), inv(istore), inv(istore0), ri-inj(fi), ri-inj(fi0), maxino ∈ gstore0, istore0 ⊑ istore, ¬ dups(nx0), pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore0, pstate.index? → pstate.lnum ∈ istore, pstate = unbuffered → syn0 ⊦ ⟪btree_set_gblock_refsize#(maxino, n, adr, istore, istore0, ginval0, gstore2, nx0, maxino1, ginval2, pstate, syn0; gstore0)⟫ ⟨index_set_gblock_refsize#(maxino, n, fi, fi0, ginval0, gstore2, nx0, maxino1, ginval2, syn0; gstore)⟩ (gstore = gstore0) |
syn ↔ syn0, ginval = ginval2, gstore = gstore3, gstore0 = gstore2, gstore1 = gstore3, istore = istore1, istore0 = istore2, maxino = maxino1, maxino0 = maxino2, nx = nx0, remove-refsize0(istore1) = istore1, remove-refsize0(gstore2) = gstore2, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore3 ∪ ginval0, btree-inv(rp, adr, istore2, istore1, zh, fi, fi0), inv(istore1), inv(istore2), inv(gstore2), inv(gstore3 \ ginval0), ri-inj(fi0), ri-inj(fi), maxino2 ∈ gstore3, istore1 ⊑ istore2, pstate = unbuffered → syn0, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore3 ⊦ ⟪if maxino0 ∈ gstore then apersistence_set_gblock_refsize#(maxino0, n, adr, istore0, istore, ginval0, gstore0, nx, maxino, ginval, pstate, syn; gstore) else abort⟫ ⟨index_set_gblock_refsize#(maxino2, n, fi, fi0, ginval0, gstore2, nx0, maxino1, ginval2, syn0; gstore1)⟩ (gstore1 = gstore), dups(nx0)
Used simplifier rules: btree_set_gblock_refsize# (LNUM, N, ROOTADR, ISTORE, ISTORE0, GINVAL, GSTORE0, NL, MAXINO, OS, PSTATE, PSYNCED ; GSTORE ) {if LNUM ∈ GSTORE then apersistence_set_gblock_refsize# (LNUM, N, ROOTADR, ISTORE, ISTORE0, GINVAL, GSTORE0, NL, MAXINO, OS, PSTATE, PSYNCED ; GSTORE) else abort };