| istore0[m0] = indexblock(indx, lax, m3), zh[rp] = mkznode(r, zbrar, boolvar, true, m), zh0[rp] = mkznode(r0, zbrar0, boolvar0, false, m4), remove-refsize0(gstore3) = gstore3, remove-refsize0(istore2) = istore2, elems nx ∩ ginval1 = ∅, dom remove-refsize0(gstore4) ∩ ginval1 = ∅, dom gstore3 ∪ elems nx = dom gstore4 ∪ ginval1, btree-inv(rp, adr, istore3[n, indexblock([], [], 0)], istore2, zh, ri, fi), btree-inv(rp, adr, istore3, istore2, zh, ri, fi), btree-inv(rp, @(m0, m1, m2), istore0, istore0, zh0, ri, ri), btree-inv(rp, adr, istore0[m0, indexblock(indx, lax, m3 - m2)], istore2, zh0[rp, mkznode(r0, zbrar0, boolvar0, true, m4)], ri, fi), inv(istore3[n, indexblock([], [], 0)]), inv(istore2), inv(istore3), inv(gstore3), inv(gstore4 \ ginval1), inv(istore0), rp ∈ zh, istore2 ⊑ istore0, istore2 ⊑ istore3[n, indexblock([], [], 0)], istore2 ⊑ istore3, istore3[n, indexblock([], [], 0)] ⊑ istore0, ⌊err⌋ , ¬ dups(nx), ¬ n ∈ istore3 ⊦ ⟪apersistence_get_iblock_refsize#(m0, adr, istore0, istore2, ginval1, gstore4, gstore3, nx, maxino2, ginval, readonly, true; ; maxino); apersistence_set_iblock_refsize#(m0, maxino - m2, adr, istore2, ginval1, gstore4, gstore3, nx, maxino2, ginval, readonly, true; istore0)⟫ ( (∃ ri0, fi0. btree-inv(rp, adr, istore0, istore2, zh0[rp, mkznode(r0, zbrar0, boolvar0, true, m4)], ri0, fi0)) ∧ inv(istore0) ∧ istore2 ⊑ istore0) |
syn ↔ true, zh0[rp] = mkznode(r0, zbrar0, boolvar0, false, m4), zh[rp] = mkznode(r, zbrar, boolvar, true, m), istore0[m0] = indexblock(indx, lax, m3), ginval0 = ginval1, gstore = gstore3, gstore0 = gstore4, istore = istore2, maxino = maxino2, maxino0 = m0, pstate = readonly, remove-refsize0(istore2) = istore2, remove-refsize0(gstore3) = gstore3, dom remove-refsize0(gstore4) ∩ ginval1 = ∅, elems nx ∩ ginval1 = ∅, dom gstore3 ∪ elems nx = dom gstore4 ∪ ginval1, btree-inv(rp, adr, istore0[m0, indexblock(indx, lax, m3 - m2)], istore2, zh0[rp, mkznode(r0, zbrar0, boolvar0, true, m4)], ri, fi), btree-inv(rp, @(m0, m1, m2), istore0, istore0, zh0, ri, ri), btree-inv(rp, adr, istore3, istore2, zh, ri, fi), btree-inv(rp, adr, istore3[n, indexblock([], [], 0)], istore2, zh, ri, fi), inv(istore0), inv(gstore4 \ ginval1), inv(gstore3), inv(istore3), inv(istore2), inv(istore3[n, indexblock([], [], 0)]), rp ∈ zh, istore3[n, indexblock([], [], 0)] ⊑ istore0, istore2 ⊑ istore3, istore2 ⊑ istore3[n, indexblock([], [], 0)], istore2 ⊑ istore0, ⌊err⌋ ⊦ ⟪if maxino0 ∈ istore0 then n := istore0[maxino0].ref-size else abort; apersistence_set_iblock_refsize#(m0, n - m2, adr, istore2, ginval1, gstore4, gstore3, nx, maxino2, ginval, readonly, true; istore0)⟫ ( (∃ ri0, fi0. btree-inv(rp, adr, istore0, istore2, zh0[rp, mkznode(r0, zbrar0, boolvar0, true, m4)], ri0, fi0)) ∧ inv(istore0) ∧ istore2 ⊑ istore0), dups(nx), n ∈ istore3
Used simplifier rules: apersistence_get_iblock_refsize# (LNUM, ROOTADR, ISTORE, ISTORE0, GINVAL, GSTORE, GSTORE0, NL, MAXINO, OS, PSTATE, PSYNCED ; ; N ) {if LNUM ∈ ISTORE then N := ISTORE[LNUM].ref-size else abort};