| gstore = gstore3, 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, ¬ dups(nx0), pstate = unbuffered → syn0, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore3 ⊦ ⟨index_set_gblock_refsize#(maxino2, n, fi, fi0, ginval0, gstore2, nx0, maxino1, ginval2, syn0; gstore3)⟩ (gstore3 = gstore[maxino2, gstore[maxino2].ref-size:= n]) |
syn ↔ syn0, fi = fi1, fi0 = fi2, ginval = ginval2, gstore = gstore3, gstore0 = gstore2, gstore1 = gstore3, maxino = maxino1, maxino0 = maxino2, nx = nx0, remove-refsize0(gstore2) = gstore2, remove-refsize0(istore1) = istore1, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore3 ∪ ginval0, btree-inv(rp, adr, istore2, istore1, zh, fi2, fi1), inv(gstore3 \ ginval0), inv(gstore2), inv(istore2), inv(istore1), ri-inj(fi2), ri-inj(fi1), maxino2 ∈ gstore3, istore1 ⊑ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore3, pstate.index? → pstate.lnum ∈ istore2, pstate = unbuffered → syn0 ⊦ ⟨if maxino0 ∈ gstore then gstore[maxino0].ref-size := n else abort⟩ (gstore = gstore1[maxino2, gstore1[maxino2].ref-size:= n]), dups(nx0)
Used simplifier rules: index_set_gblock_refsize# (LNUM, N, PRI, PFI, PINVAL, PSTORE0, PNL, PMAXINO, P_OS, ISYNCED ; PSTORE ) {if LNUM ∈ PSTORE then PSTORE[LNUM].ref-size := N else abort};