| syn0 ↔ true, zh[rp] = mkznode(r, zbrar, boolvar, boolvar0, m), adr = adr3, adr0 = adr3, err1 = err, err1 = ESUCCESS, ginval = ginval4, gstore = gstore1, gstore0 = gstore2, istore = istore1, istore0 = istore2, nx = [], pstate = unbuffered, remove-refsize0(remove-refsize0(gstore0)) = remove-refsize0(gstore0), remove-refsize0(remove-refsize0(istore0)) = remove-refsize0(istore0), remove-refsize0(istore1) = istore1, remove-refsize0(gstore1) = gstore1, elems nx ∩ ∅ = ∅, elems nx0 ∩ ginval4 = ∅, dom remove-refsize0(gstore2) ∩ ginval4 = ∅, dom remove-refsize0(gstore0) ∪ elems nx = dom remove-refsize0(gstore0) ∪ ∅, dom gstore1 ∪ elems nx0 = dom gstore2 ∪ ginval4, btree-inv(rp, adr3, istore2, istore1, zh, ri, fi), inv(remove-refsize0(gstore0) \ ∅), inv(remove-refsize0(gstore0)), inv(remove-refsize0(istore0)), inv(istore1), inv(istore2), inv(gstore1), inv(gstore2 \ ginval4), remove-refsize0(istore0) ⊑ remove-refsize0(istore0), istore1 ⊑ istore2, pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ remove-refsize0(gstore0), pstate.index? → pstate.lnum ∈ remove-refsize0(istore0), ⌊err⌋ ∨ err = ESUCCESS ⊦ ⟪maxino2 := maxino0, gstore1 := remove-refsize0(gstore0), gstore2 := remove-refsize0(gstore0), ginval4 := ∅, istore1 := remove-refsize0(istore0), istore2 := remove-refsize0(istore0); if err1 = ESUCCESS then adr := adr3 else if false then {zh[rp].dirty := true; let maxino = 0 in {apersistence_get_iblock_refsize# (adr3.lnum, adr0, istore2, istore1, ginval4, gstore2, gstore1, nx, maxino2, ginval1, pstate, syn0; ; maxino); apersistence_set_iblock_refsize# (adr3.lnum, maxino - adr3.size, adr0, istore1, ginval4, gstore2, gstore1, nx, maxino2, ginval1, pstate, syn0; istore2)}}⟫ ( (∃ ri, fi. btree-inv(rp, adr0, istore2, istore1, zh, ri, fi)) ∧ inv(istore2) ∧ istore1 ⊑ istore2 ∧ (pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore2) ∧ (pstate.index? → pstate.lnum ∈ istore2) ∧ (pstate = unbuffered → syn0)), dups(nx0), dups(nx), rp ≠ null ∧ boolvar0 |
syn0 ↔ true, zh[rp] = mkznode(r, zbrar, boolvar, boolvar0, m), adr = adr3, adr0 = adr3, err1 = ESUCCESS, err1 = err, ginval = ginval0, ginval4 = ∅, gstore = gstore3, gstore0 = gstore4, gstore1 = remove-refsize0(gstore0), gstore2 = remove-refsize0(gstore0), istore = istore3, istore0 = istore4, istore1 = remove-refsize0(istore0), istore2 = remove-refsize0(istore0), maxino2 = maxino0, nx = [], pstate = unbuffered, remove-refsize0(gstore3) = gstore3, remove-refsize0(istore3) = istore3, remove-refsize0(remove-refsize0(istore0)) = remove-refsize0(istore0), remove-refsize0(remove-refsize0(gstore0)) = remove-refsize0(gstore0), dom remove-refsize0(gstore4) ∩ ginval0 = ∅, elems nx0 ∩ ginval0 = ∅, elems nx ∩ ∅ = ∅, dom gstore3 ∪ elems nx0 = dom gstore4 ∪ ginval0, dom remove-refsize0(gstore0) ∪ elems nx = dom remove-refsize0(gstore0) ∪ ∅, btree-inv(rp, adr3, istore4, istore3, zh, ri, fi), inv(gstore4 \ ginval0), inv(gstore3), inv(istore4), inv(istore3), inv(remove-refsize0(istore0)), inv(remove-refsize0(gstore0)), inv(remove-refsize0(gstore0) \ ∅), istore3 ⊑ istore4, remove-refsize0(istore0) ⊑ remove-refsize0(istore0), pstate.index? → pstate.lnum ∈ remove-refsize0(istore0), pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ remove-refsize0(gstore0), ⌊err⌋ ∨ err = ESUCCESS ⊦ ⟪if err1 = ESUCCESS then adr := adr3 else if false then {zh[rp].dirty := true; let maxino = 0 in {apersistence_get_iblock_refsize# (adr3.lnum, adr0, istore2, istore1, ginval4, gstore2, gstore1, nx, maxino2, ginval1, pstate, syn0; ; maxino); apersistence_set_iblock_refsize# (adr3.lnum, maxino - adr3.size, adr0, istore1, ginval4, gstore2, gstore1, nx, maxino2, ginval1, pstate, syn0; istore2)}}⟫ ( (∃ ri, fi. btree-inv(rp, adr0, istore2, istore1, zh, ri, fi)) ∧ inv(istore2) ∧ istore1 ⊑ istore2 ∧ (pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore2) ∧ (pstate.index? → pstate.lnum ∈ istore2) ∧ (pstate = unbuffered → syn0)), dups(nx), dups(nx0), rp ≠ null ∧ boolvar0