| err = ESUCCESS, ginval = ginval3, gstore = gstore3, nx = nx0, remove-refsize0(gstore2) = gstore2, remove-refsize0(istore1) = istore1, elems nx0 ∩ ginval3 = ∅, dom gstore2 ∪ elems nx0 = dom gstore3 ∪ ginval3, btree-inv(rp, adr, istore2, istore1, zh, fi2, fi1), inv(gstore3 \ ginval3), inv(gstore2), inv(istore2), inv(istore1), inv(gstore3[n, groupblock([], [], 0)] \ (ginval3 -- n)), ri-inj(fi2), ri-inj(fi1), istore1 ⊑ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore3, pstate.index? → pstate.lnum ∈ istore2 ⊦ ⟨choose n with ¬ n ∈ gstore in gstore[n] := groupblock([], [], 0), nx := nx + n, ginval := ginval -- n⟩ (ginval = ginval3 -- n ∧ gstore = gstore3[n, groupblock([], [], 0)] ∧ nx = nx0 + n ' ∧ ESUCCESS = err), pstate = readonly, dups(nx0), n ∈ gstore3, n ∈ nx0 |
err = ESUCCESS, ginval = ginval3, gstore = gstore3, nx = nx0, remove-refsize0(istore1) = istore1, remove-refsize0(gstore2) = gstore2, elems nx0 ∩ ginval3 = ∅, dom gstore2 ∪ elems nx0 = dom gstore3 ∪ ginval3, btree-inv(rp, adr, istore2, istore1, zh, fi2, fi1), inv(gstore3[n0, groupblock([], [], 0)] \ (ginval3 -- n0)), inv(istore1), inv(istore2), inv(gstore2), inv(gstore3 \ ginval3), ri-inj(fi1), ri-inj(fi2), istore1 ⊑ istore2, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore3 ⊦ ∃ n. ¬ n ∈ gstore ∧ ⟨gstore[n] := groupblock([], [], 0), nx := nx + n, ginval := ginval -- n⟩ (ginval = ginval3 -- n0 ∧ gstore = gstore3[n0, groupblock([], [], 0)] ∧ nx = nx0 + n0 ' ∧ ESUCCESS = err), pstate = readonly, dups(nx0), n0 ∈ nx0, n0 ∈ gstore3