| # lpt = # avol, # lpt0 = # avol, # gndx = # lax, (elems nx ∪ dom gstore0) ++ n = dom gstore ∪ ginval, lpt[n] = mklp(m, m0, LP_GROUP_NODES, m1), gstore[n] = groupblock(gndx, lax, m), avol[n] = mapped(buf), keyset(gch) = gc-heap(lpt, nx + n '), remove-refsize0(gstore0) = gstore0, remove-refsize0(istore0) = istore0, ginval ∩ elems nx = ∅, n < # avol, ginval < # avol, abs-istore(avol, lpt, istore), abs-nodes(buf, gndx, lax, m0 = LEB_SIZE), awbuf-inv(avol, buffered(n)), bin-heap-inv(gch, lpt), flash-lpt-cons(lpt0, istore0, gstore0), freelist-cons(lpt, freelist), inv(groupblock(gndx, lax, m)), inv(gstore \ ginval), inv(gstore0), inv(istore), inv(istore0), log-group-block(nx + n ', lpt), lpt-free-unref(lpt), lpt-free-unref(lpt0), lpt-leb-size(lpt), lpt-leb-size(lpt0), lpt-ram-flash(lpt, lpt0, nx + n '), n ∈ gstore, # buf ≤ LEB_SIZE, istore0 ⊑ istore, m0 ≠ LEB_SIZE → m0 = # buf, isbuf → synced(avol), buffered(n).isbuf? → buffered(n).leb < # lpt ∧ (false ∧ lpt[buffered(n).leb].size = LEB_SIZE ∨ lpt[buffered(n).leb].size = # avol[buffered(n).leb].data) ⊦ dups(nx), n ∈ nx, n ∈ ginval, is-aligned(# buf, 2 * NODE_HEADER_SIZE) ∧ m0 = # buf |
# gndx = # lax, # lpt0 = # avol, # lpt = # avol, (elems nx ∪ dom gstore0) ++ n = dom gstore ∪ ginval, avol[n] = mapped(buf), gstore[n] = groupblock(gndx, lax, m), lpt[n] = mklp(m, # buf, LP_GROUP_NODES, m1), keyset(gch) = gc-heap(lpt, nx + n '), remove-refsize0(istore0) = istore0, remove-refsize0(gstore0) = gstore0, ginval ∩ elems nx = ∅, ginval < # avol, n < # avol, abs-istore(avol, lpt, istore), abs-nodes(buf, gndx, lax, # buf = LEB_SIZE), awbuf-inv(avol, buffered(n)), bin-heap-inv(gch, lpt), flash-lpt-cons(lpt0, istore0, gstore0), freelist-cons(lpt, freelist), inv(istore0), inv(istore), inv(gstore0), inv(gstore \ ginval), inv(groupblock(gndx, lax, m)), log-group-block(nx + n ', lpt), lpt-free-unref(lpt0), lpt-free-unref(lpt), lpt-leb-size(lpt0), lpt-leb-size(lpt), lpt-ram-flash(lpt, lpt0, nx + n '), n ∈ gstore, # buf ≤ LEB_SIZE, istore0 ⊑ istore, isbuf → synced(avol) ⊦ dups(nx), is-aligned(# buf, 2 * NODE_HEADER_SIZE), n ∈ ginval, n ∈ nx
Used simplifier rules: ⊦ mapped(buf).data = buf; (s)% ⊦ mklp(n2, n3, lpf, m).size = n3; (s)% ⊦ buffered(m).leb = m; (s)% ⊦ buffered(m).isbuf?; (s)