| # lpt1 = # avol, # lpt0 = # avol, # buf0 = gndx0.flashsize, # gndx0 = # lax0, (elems nx ∪ dom gstore0) ++ n1 = dom gstore ∪ ginval, lpt1[n1] = mklp(m, # buf1, LP_GROUP_NODES, m3), avol[n1] = mapped(buf1), gstore[n1] = groupblock(gndx1, lax1, m), keyset(gch) = gc-heap(lpt1, nx + n1 '), pstate = journal(n1), remove-refsize0(istore1) = istore1, remove-refsize0(gstore0) = gstore0, ginval ∩ elems nx = ∅, n < gndx0.flashsize, ginval < # avol, n1 < # avol, abs-gstore(avol, lpt1, gstore, ginval), abs-istore(avol, lpt1, istore2), abs-nodes(buf0, # buf1, gndx0, lax0, false), awbuf-inv(avol[n1, mapped(buf1 + subarray(buf0, 0, n))], buffered(n1)), awbuf-inv(avol, buffered(n1)), bin-heap-inv(gch, lpt1), buf-ro-rw-mode(false, buffered(n1), lpt1, avol), bufs-log-only(buffered(n1), nx + n1 ', lpt1), flash-lpt-cons(lpt0, istore1, gstore0), freelist-cons(lpt1, freelist), inv(groupblock(gndx1, lax1, m)), inv(istore1), inv(istore2), inv(gstore0), inv(gstore \ ginval), is-aligned(# buf1 + n, EB_PAGE_SIZE), log-group-block(nx + n1 ', lpt1), lpt-free-unref(lpt1), lpt-free-unref(lpt0), lpt-leb-size(lpt1), lpt-leb-size(lpt0), lpt-ram-flash(lpt1, lpt0, nx + n1 '), n1 ∈ gstore, # buf1 + gndx0.flashsize ≤ LEB_SIZE, istore1 ⊑ istore2, ⌊err1⌋ , isbuf1 → synced(avol), abs-nodes(buf0, # buf1, gndx0, lax0, false) ∧ is-aligned(n, NODE_HEADER_SIZE) ∧ gndx0 ≠ [] ∧ # buf0 = gndx0.flashsize → (∃ n0. n0 < # gndx0 ∧ abs-nodes(subarray(buf0, 0, n), # buf1, prefixn(n0, gndx0), prefixn(n0, lax0), true)) ⊦ ∃ lax, err. (⌊err⌋ ∨ err = ESUCCESS) ∧ ¬ dups(lax1 + lax) ∧ # lax ≤ # lax0 ∧ inv-flashsize(prefixn(# lax, gndx0), lax) ∧ (err = ESUCCESS ↔ # lax = # lax0) ∧ ⟨ax := lax.to-adr(pstate.lnum), err0 := err; gstore[pstate.lnum].gndlist := gstore[pstate.lnum].gndlist + prefixn(# lax, gndx0); gstore[pstate.lnum].ladrlist := gstore[pstate.lnum].ladrlist + lax; if err0 ≠ ESUCCESS then ax := ?, pstate := readonly; isbuf1 := ?⟩ ( abs-gstore(avol[n1, mapped(avol[n1].data + subarray(buf0, 0, n))], lpt1[n1, mklp(m, LEB_SIZE, LP_GROUP_NODES, m3)], gstore, ginval) ∧ pstate = readonly ∧ lax0.to-adr(n1) = ax ∧ err1 = err0), gndx0 = [], n = 0, dups(nx), n1 ∈ ginval, n1 ∈ nx |
# gndx0 = # lax0, # buf0 = gndx0.flashsize, # lpt0 = # avol, # lpt1 = # avol, (elems nx ∪ dom gstore0) ++ n1 = dom gstore ∪ ginval, gstore[n1] = groupblock(gndx1, lax1, m), avol[n1] = mapped(buf1), lpt1[n1] = mklp(m, # buf1, LP_GROUP_NODES, m3), keyset(gch) = gc-heap(lpt1, nx + n1 '), pstate = journal(n1), remove-refsize0(gstore0) = gstore0, remove-refsize0(istore1) = istore1, ginval ∩ elems nx = ∅, gndx0 ≠ [], n ≠ 0, n1 < # avol, ginval < # avol, n < gndx0.flashsize, abs-gstore(avol, lpt1, gstore, ginval), abs-istore(avol, lpt1, istore2), abs-nodes(buf0, # buf1, gndx0, lax0, false), awbuf-inv(avol, buffered(n1)), awbuf-inv(avol[n1, mapped(buf1 + subarray(buf0, 0, n))], buffered(n1)), bin-heap-inv(gch, lpt1), buf-ro-rw-mode(false, buffered(n1), lpt1, avol), bufs-log-only(buffered(n1), nx + n1 ', lpt1), flash-lpt-cons(lpt0, istore1, gstore0), freelist-cons(lpt1, freelist), inv(gstore \ ginval), inv(gstore0), inv(istore2), inv(istore1), inv(groupblock(gndx1, lax1, m)), is-aligned(# buf1 + n, EB_PAGE_SIZE), log-group-block(nx + n1 ', lpt1), lpt-free-unref(lpt0), lpt-free-unref(lpt1), lpt-leb-size(lpt0), lpt-leb-size(lpt1), lpt-ram-flash(lpt1, lpt0, nx + n1 '), n1 ∈ gstore, # buf1 + gndx0.flashsize ≤ LEB_SIZE, istore1 ⊑ istore2, ⌊err1⌋ , ¬ dups(nx), ¬ n1 ∈ nx, ¬ n1 ∈ ginval, isbuf1 → synced(avol), is-aligned(n, NODE_HEADER_SIZE) → n0 < # lax0 ∧ abs-nodes(subarray(buf0, 0, n), # buf1, prefixn(n0, gndx0), prefixn(n0, lax0), true) ⊦ ∃ lax, err. (⌊err⌋ ∨ err = ESUCCESS) ∧ ¬ dups(lax1 + lax) ∧ # lax ≤ # lax0 ∧ inv-flashsize(prefixn(# lax, gndx0), lax) ∧ (err = ESUCCESS ↔ # lax = # lax0) ∧ ⟨ax := lax.to-adr(pstate.lnum), err0 := err; gstore[pstate.lnum].gndlist := gstore[pstate.lnum].gndlist + prefixn(# lax, gndx0); gstore[pstate.lnum].ladrlist := gstore[pstate.lnum].ladrlist + lax; if err0 ≠ ESUCCESS then ax := ?, pstate := readonly; isbuf1 := ?⟩ ( abs-gstore(avol[n1, mapped(avol[n1].data + subarray(buf0, 0, n))], lpt1[n1, mklp(m, LEB_SIZE, LP_GROUP_NODES, m3)], gstore, ginval) ∧ pstate = readonly ∧ lax0.to-adr(n1) = ax ∧ err1 = err0)
Used simplifier rules: ⊦ abs-nodes(buf, m, gndx, lax0, false) → ( abs-nodes(buf, m, gndx0, lax1, boolvar1) ↔ gndx = gndx0 ∧ lax0 = lax1); (s)