| # lpt0 = # avol0, # lpt = # avol, rofs0 ↔ rofs, adr = adr0, bleb0 = bleb, buf = buf0, lpt = lpt0, m1 = m2, m3 = EB_PAGE_SIZE, ns = ns0, plog = plog0, avol[m].mapped?, m < # avol, abs(avol, bleb, wbuf, avol0, rofs), awbuf-inv(avol, bleb0), ebm-vol-inv(avol0), wbuf-cons(bleb, wbuf, avol0, rofs), m0 + n ≤ LEB_SIZE, n ≤ # buf ⊦ ⟪wbuf_read_buf#(m, m0, n, bleb, wbuf, adr0, m2, plog0, avol0, lpt0, ns0; buf; err)⟫ ⟨awbuf_read_buf#(m, m0, n, adr, m1, plog, avol, lpt, ns, bleb0, rofs0; buf0; err0)⟩ ( (abs(avol, bleb, wbuf, avol0, rofs) ∧ bleb0 = bleb ∧ adr = adr0 ∧ m1 = m2 ∧ plog = plog0 ∧ lpt = lpt0 ∧ ns = ns0 ∧ (rofs0 ↔ rofs)) ∧ buf = buf0 ∧ err = err0) |
# wbuf.content = EB_PAGE_SIZE, # lpt0 = # avol, # avol0 = # avol, avol[m] = mapped(buf1), buf = buf0, m < # avol, abs(avol, bleb, wbuf, avol0, rofs), awbuf-inv(avol, bleb), ebm-vol-inv(avol0), m0 + n ≤ LEB_SIZE, n ≤ # buf0, bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol0[bleb.leb], rofs) ⊦ ⟪wbuf_read_buf#(m, m0, n, bleb, wbuf, adr0, m2, plog0, avol0, lpt0, ns0; buf; err)⟫ ⟨awbuf_read_buf#(m, m0, n, adr0, m2, plog0, avol, lpt0, ns0, bleb, rofs; buf0; err0)⟩ (buf = buf0 ∧ err = err0)
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ aleb.mapped? ↔ (∃ buf. aleb = mapped(buf)); (as)%⊦ wbuf-cons(bleb, wbuf, avol, rofs) ↔ # wbuf.content = EB_PAGE_SIZE ∧ ( bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol[bleb.leb], rofs)); (s)