| # lpt2 = # avol0, # lpt0 = # avol0, lpt2[n0] = mklp(0, m3, LP_FREE, m2), err = err0, freelist = (n0 ' + nx0).tail, keyset(gch) = gc-heap(lpt2, log0), lpt1 = lpt2[n0, lpt2[n0, mklp(lpt2[n0].ref-size, 0, lpt2[n0].flags, lpt2[n0].gcheapidx)][n0].ref-size:= 0], n0 < # lpt2, n0 < # lpt2[n0, mklp(lpt2[n0].ref-size, 0, lpt2[n0].flags, lpt2[n0].gcheapidx)], n0 < # avol0, awbuf-inv(avol0[n0, mapped(mkbuf(0))], bleb), awbuf-inv(avol0, bleb), bin-heap-inv(gch, lpt2), buf-ro-rw-mode(false, bleb, lpt2, avol0), bufs-log-only(bleb, log0, lpt2), freelist-cons(lpt2, n0 ' + nx0), log-group-block(log0, lpt2), lpt-free-unref(lpt0), lpt-free-unref(lpt2), lpt-leb-size(lpt0), lpt-leb-size(lpt2), lpt-ram-flash(lpt2, lpt0, log0), synced(avol0), bleb ≠ nobuffer → avol0[n0, mapped(mkbuf(0))][bleb.leb].mapped? ∧ bleb.leb < # avol0 ∧ bleb.isbuf?, bleb = nobuffer ∨ is-aligned(# avol0[n0, mapped(mkbuf(0))][bleb.leb].data, EB_PAGE_SIZE), ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪if err ≠ ESUCCESS then freelist := n0 ' + freelist else lpt1[n0].flags := LP_INDEX_NODES⟫ ( lpt-free-unref(lpt1) ∧ freelist-cons(lpt1, freelist) ∧ bin-heap-inv(gch, lpt1) ∧ keyset(gch) = gc-heap(lpt1, log0) ∧ bufs-log-only(bleb, log0, lpt1) ∧ # lpt1 = # avol0 ∧ log-group-block(log0, lpt1) ∧ buf-ro-rw-mode(false, bleb, lpt1, avol0[n0, mapped(mkbuf(0))]) ∧ lpt-leb-size(lpt1) ∧ lpt-ram-flash(lpt1, lpt0, log0)), n0 ' + nx0 = [], buffered(n0) = bleb, err = ESUCCESS |
# lpt0 = # avol0, # lpt2 = # avol0, lpt2[n0] = mklp(0, m3, LP_FREE, m2), err = err0, freelist = (n0 ' + nx0).tail, keyset(gch) = gc-heap(lpt2, log0), lpt1 = lpt2[n0, lpt2[n0, mklp(lpt2[n0].ref-size, 0, lpt2[n0].flags, lpt2[n0].gcheapidx)][n0].ref-size:= 0], n0 < # avol0, n0 < # lpt2[n0, mklp(lpt2[n0].ref-size, 0, lpt2[n0].flags, lpt2[n0].gcheapidx)], n0 < # lpt2, awbuf-inv(avol0, bleb), awbuf-inv(avol0[n0, mapped(mkbuf(0))], bleb), bin-heap-inv(gch, lpt2), buf-ro-rw-mode(false, bleb, lpt2, avol0), bufs-log-only(bleb, log0, lpt2), freelist-cons(lpt2, n0 ' + nx0), log-group-block(log0, lpt2), lpt-free-unref(lpt2), lpt-free-unref(lpt0), lpt-leb-size(lpt2), lpt-leb-size(lpt0), lpt-ram-flash(lpt2, lpt0, log0), synced(avol0), bleb ≠ nobuffer → avol0[n0, mapped(mkbuf(0))][bleb.leb].mapped? ∧ bleb.leb < # avol0 ∧ bleb.isbuf?, ⌊err0⌋ ∨ err0 = ESUCCESS, bleb = nobuffer ∨ is-aligned(# avol0[n0, mapped(mkbuf(0))][bleb.leb].data, EB_PAGE_SIZE) ⊦ ⟪freelist := n0 ' + freelist⟫ ( lpt-free-unref(lpt1) ∧ freelist-cons(lpt1, freelist) ∧ bin-heap-inv(gch, lpt1) ∧ keyset(gch) = gc-heap(lpt1, log0) ∧ bufs-log-only(bleb, log0, lpt1) ∧ # lpt1 = # avol0 ∧ log-group-block(log0, lpt1) ∧ buf-ro-rw-mode(false, bleb, lpt1, avol0[n0, mapped(mkbuf(0))]) ∧ lpt-leb-size(lpt1) ∧ lpt-ram-flash(lpt1, lpt0, log0)), n0 ' + nx0 = [], buffered(n0) = bleb, err = ESUCCESS