| # lpt = # avol, m0 = # avol[m].data, avol[m].mapped?, m < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪awbuf_add_log_leb#(m, m0, adr, m1, avol, lpt, ns, isbuf; nx, bleb; err)⟫ awbuf-inv(avol, bleb) |
# lpt = # avol, m = m2, m0 = # avol[m3].data, m1 = m3, avol[m3].mapped?, m3 < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪if m1 < # avol ∧ avol[m1].mapped? ∧ m0 = # avol[m1].data ∧ synced(avol) then {fail_or_success#(; ; err); if err = ESUCCESS then nx := nx + m1, bleb := buffered(m1)} else abort⟫ awbuf-inv(avol, bleb)
Used simplifier rules: add-log-leb: ⊦ ;