| syn0 ↔ true, syn ↔ true, err0 = ESUCCESS, ginval = ∅, ginval0 = ∅, ginval1 = ∅, ginval2 = ∅, gstore = ∅, gstore0 = ∅, gstore1 = ∅, gstore2 = ∅, ind = indexnode(mkbrarray(BRANCH_SIZE), true, 0), istore = ∅, istore0 = ∅, istore1 = ∅, istore2 = ∅, maxino = maxino4, maxino0 = maxino4, maxino1 = ind.flashsize, nx = [], nx0 = [], pstate = unbuffered, pstate0 = unbuffered ⊦ ⟪if err0 = ESUCCESS then apersistence_allocate_ind#(adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval, syn; istore0, pstate; err0); if err0 = ESUCCESS then apersistence_add_ind#(ind, adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval; adr0, istore0, pstate, syn; err0); if err0 = ESUCCESS then apersistence_set_iblock_refsize#(adr0.lnum, maxino1, adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval, pstate, syn; istore0); if err0 = ESUCCESS then apersistence_sync#(adr, istore0, istore, ginval0, gstore0, gstore, nx, maxino, ginval; pstate, syn; err0); if err0 = ESUCCESS then let ns = ∅ in apersistence_commit#(adr0, maxino4, syn; ns, istore0, ginval0, gstore0, adr, istore, gstore, nx, maxino, ginval; pstate, err0)⟫ ( ( err0 = ESUCCESS → syn ∧ (∃ ri, fi. btree-inv(null, adr, istore0, istore, zh, ri, fi)) ∧ inv(gstore0 \ ginval0) ∧ inv(gstore) ∧ elems nx ∩ ginval0 = ∅ ∧ ¬ dups(nx) ∧ dom gstore ∪ elems nx = dom gstore0 ∪ ginval0 ∧ remove-refsize0(gstore) = gstore ∧ inv(istore0) ∧ inv(istore) ∧ istore ⊑ istore0 ∧ remove-refsize0(istore) = istore ∧ (pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore0) ∧ (pstate.index? → pstate.lnum ∈ istore0)) ∧ (err0 = ESUCCESS ∨ ⌊err0⌋ ) ∧ (err0 = ESUCCESS → btree-inv(null, adr, istore0, istore, zh, ∅, ∅) ∧ gstore0 = ∅ ∧ ginval0 = ∅ ∧ maxino = maxino4 ∧ nx = [] ∧ ginval = ∅)), LEB_SIZE < maxino1 |
syn ↔ true, syn0 ↔ true, err0 = ESUCCESS, ginval = ∅, ginval0 = ∅, ginval1 = ∅, ginval2 = ∅, gstore = ∅, gstore0 = ∅, gstore1 = ∅, gstore2 = ∅, ind = indexnode(mkbrarray(BRANCH_SIZE), true, 0), istore = ∅, istore0 = ∅, istore1 = ∅, istore2 = ∅, maxino = maxino4, maxino0 = maxino4, maxino1 = ind.flashsize, nx = [], nx0 = [], pstate = unbuffered, pstate0 = unbuffered ⊦ ⟪apersistence_allocate_ind#(adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval, syn; istore0, pstate; err0); if err0 = ESUCCESS then apersistence_add_ind#(ind, adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval; adr0, istore0, pstate, syn; err0); if err0 = ESUCCESS then apersistence_set_iblock_refsize#(adr0.lnum, maxino1, adr, istore, ginval0, gstore0, gstore, nx, maxino, ginval, pstate, syn; istore0); if err0 = ESUCCESS then apersistence_sync#(adr, istore0, istore, ginval0, gstore0, gstore, nx, maxino, ginval; pstate, syn; err0); if err0 = ESUCCESS then let ns = ∅ in apersistence_commit#(adr0, maxino4, syn; ns, istore0, ginval0, gstore0, adr, istore, gstore, nx, maxino, ginval; pstate, err0)⟫ ( ( err0 = ESUCCESS → syn ∧ (∃ ri, fi. btree-inv(null, adr, istore0, istore, zh, ri, fi)) ∧ inv(gstore0 \ ginval0) ∧ inv(gstore) ∧ elems nx ∩ ginval0 = ∅ ∧ ¬ dups(nx) ∧ dom gstore ∪ elems nx = dom gstore0 ∪ ginval0 ∧ remove-refsize0(gstore) = gstore ∧ inv(istore0) ∧ inv(istore) ∧ istore ⊑ istore0 ∧ remove-refsize0(istore) = istore ∧ (pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore0) ∧ (pstate.index? → pstate.lnum ∈ istore0)) ∧ (err0 = ESUCCESS ∨ ⌊err0⌋ ) ∧ (err0 = ESUCCESS → btree-inv(null, adr, istore0, istore, zh, ∅, ∅) ∧ gstore0 = ∅ ∧ ginval0 = ∅ ∧ maxino = maxino4 ∧ nx = [] ∧ ginval = ∅)), LEB_SIZE < maxino1