| # lpt0 = # avol, # buf1 = 2 * NODE_HEADER_SIZE + ind.alignedsize, # lpt1 = # avol, isbuf ↔ isbuf1, avol[m1] = mapped(buf), lpt1[m1] = mklp(m, # buf, LP_INDEX_NODES, m5), istore[m1] = indexblock(indx, lax, m), adr = adr2, adr1 = adr2, gstore = gstore1, gstore0 = gstore2, keyset(gch) = gc-heap(lpt1, log1), log = log1, maxino = m0, ns = ns0, pstate = index(m1), remove-refsize0(gstore1) = gstore1, remove-refsize0(istore0) = istore0, elems log1 ∩ ginval = ∅, dom gstore1 ∪ elems log1 = dom gstore2 ∪ ginval, m1 < # avol, n < # buf1, ginval < # avol, abs-gstore(avol, lpt1, gstore2, ginval), abs-istore(avol, lpt1, istore), abs-node(buf1, ind), awbuf-inv(avol[m1, mapped(buf + subarray(buf1, 0, n))], buffered(m1)), awbuf-inv(avol, buffered(m1)), bin-heap-inv(gch, lpt1), buf-ro-rw-mode(false, buffered(m1), lpt1, avol), bufs-log-only(buffered(m1), log1, lpt1), flash-lpt-cons(lpt0, istore0, gstore1), freelist-cons(lpt1, freelist), inv(indexblock(indx, lax, m)), inv(gstore2 \ ginval), inv(gstore1), inv(istore), inv(istore0), is-aligned(# buf + n, EB_PAGE_SIZE), log-group-block(log1, lpt1), lpt-free-unref(lpt0), lpt-free-unref(lpt1), lpt-leb-size(lpt0), lpt-leb-size(lpt1), lpt-ram-flash(lpt1, lpt0, log1), lpt-ram-flash(lpt1[m1, mklp(m, LEB_SIZE, LP_INDEX_NODES, m5)], lpt0, log1), m1 ∈ istore, # buf + # buf1 ≤ LEB_SIZE, istore0 ⊑ istore, ⌊err⌋ , isbuf1 → synced(avol) ⊦ ⟨if pstate.index? ∨ pstate = readonly then if pstate = readonly then err0 := EROFS else {choose m, err with ¬ @(pstate.lnum, m, ind.flashsize) ∈ istore ∧ err = ESUCCESS ∨ ⌊err⌋ in adr := @(pstate.lnum, m, ind.flashsize), err0 := err; if err0 = ESUCCESS then {istore[pstate.lnum].indlist := istore[pstate.lnum].indlist + ind; istore[pstate.lnum].ladrlist := istore[pstate.lnum].ladrlist + @(adr.pos, adr.size)} else adr := ?, pstate := readonly; isbuf := ?} else abort⟩ ( abs-istore(avol[m1, mapped(avol[m1].data + subarray(buf1, 0, n))], lpt1[m1, mklp(m, LEB_SIZE, LP_INDEX_NODES, m5)], istore) ∧ pstate = readonly ∧ adr1 = adr ∧ err = err0), buf1 = mkbuf(0), n = 0, dups(log1) |
# lpt1 = # avol, # buf1 = 2 * NODE_HEADER_SIZE + ind.alignedsize, # lpt0 = # avol, isbuf ↔ isbuf1, istore[m1] = indexblock(indx, lax, m), lpt1[m1] = mklp(m, # buf, LP_INDEX_NODES, m5), avol[m1] = mapped(buf), adr = adr2, adr1 = adr2, gstore = gstore1, gstore0 = gstore2, keyset(gch) = gc-heap(lpt1, log1), log = log1, maxino = m0, ns = ns0, pstate = index(m1), remove-refsize0(istore0) = istore0, remove-refsize0(gstore1) = gstore1, elems log1 ∩ ginval = ∅, dom gstore1 ∪ elems log1 = dom gstore2 ∪ ginval, ginval < # avol, n < # buf1, m1 < # avol, abs-gstore(avol, lpt1, gstore2, ginval), abs-istore(avol, lpt1, istore), abs-node(buf1, ind), awbuf-inv(avol, buffered(m1)), awbuf-inv(avol[m1, mapped(buf + subarray(buf1, 0, n))], buffered(m1)), bin-heap-inv(gch, lpt1), buf-ro-rw-mode(false, buffered(m1), lpt1, avol), bufs-log-only(buffered(m1), log1, lpt1), flash-lpt-cons(lpt0, istore0, gstore1), freelist-cons(lpt1, freelist), inv(istore0), inv(istore), inv(gstore1), inv(gstore2 \ ginval), inv(indexblock(indx, lax, m)), is-aligned(# buf + n, EB_PAGE_SIZE), log-group-block(log1, lpt1), lpt-free-unref(lpt1), lpt-free-unref(lpt0), lpt-leb-size(lpt1), lpt-leb-size(lpt0), lpt-ram-flash(lpt1[m1, mklp(m, LEB_SIZE, LP_INDEX_NODES, m5)], lpt0, log1), lpt-ram-flash(lpt1, lpt0, log1), m1 ∈ istore, # buf + # buf1 ≤ LEB_SIZE, istore0 ⊑ istore, ⌊err⌋ , isbuf1 → synced(avol) ⊦ ⟨if pstate = readonly then err0 := EROFS else {choose m, err with ¬ @(pstate.lnum, m, ind.flashsize) ∈ istore ∧ err = ESUCCESS ∨ ⌊err⌋ in adr := @(pstate.lnum, m, ind.flashsize), err0 := err; if err0 = ESUCCESS then {istore[pstate.lnum].indlist := istore[pstate.lnum].indlist + ind; istore[pstate.lnum].ladrlist := istore[pstate.lnum].ladrlist + @(adr.pos, adr.size)} else adr := ?, pstate := readonly; isbuf := ?}⟩ ( abs-istore(avol[m1, mapped(avol[m1].data + subarray(buf1, 0, n))], lpt1[m1, mklp(m, LEB_SIZE, LP_INDEX_NODES, m5)], istore) ∧ pstate = readonly ∧ adr1 = adr ∧ err = err0), buf1 = mkbuf(0), n = 0, dups(log1)
Used simplifier rules: ⊦ index(m).index?; (s)