| # lpt = # avol, avol[m].mapped?, m < # avol, ebm-vol-inv(avol), wbuf-cons(bleb, wbuf, avol, rofs), m0 + n ≤ LEB_SIZE, n ≤ # buf ⊦ ⟪wbuf_read_buf#(m, m0, n, bleb, wbuf, adr, m1, plog, avol, lpt, ns; buf; err)⟫ true |
# wbuf.content = EB_PAGE_SIZE, # lpt = # avol, avol[m] = mapped(buf0), m < # avol, ebm-vol-inv(avol), m0 + n ≤ LEB_SIZE, n ≤ # buf, bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol[bleb.leb], rofs) ⊦ ⟪wbuf_read_buf#(m, m0, n, bleb, wbuf, adr, m1, plog, avol, lpt, ns; buf; err)⟫ true
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)