| # lpt = # avol, avol[m3] = mapped(buf), m3 < # avol, awbuf-inv(avol, bleb), bleb ≠ nobuffer → avol[bleb.leb].mapped? ∧ bleb.leb < # avol ∧ bleb.isbuf?, bleb = nobuffer ∨ is-aligned(# avol[bleb.leb].data, EB_PAGE_SIZE) ⊦ (∀ n. n < # avol ∧ avol[n].mapped? → # avol[n].data ≤ LEB_SIZE ∧ (buffered(n) ≠ buffered(m3) → is-aligned(# avol[n].data, EB_PAGE_SIZE))) ∧ (buffered(m3) ≠ nobuffer → buffered(m3).leb < # avol ∧ avol[buffered(m3).leb].mapped?) |
# lpt = # avol, avol[n] = mapped(buf0), avol[m3] = mapped(buf), n < # avol, m3 < # avol, awbuf-inv(avol, bleb), # buf0 ≤ LEB_SIZE, bleb ≠ nobuffer → avol[bleb.leb].mapped? ∧ bleb.leb < # avol ∧ bleb.isbuf?, bleb = nobuffer ∨ is-aligned(# avol[bleb.leb].data, EB_PAGE_SIZE) ⊦ n = m3, is-aligned(# buf0, EB_PAGE_SIZE)
Used simplifier rules: ⊦ awbuf-inv(avol, bleb) ∧ n < # avol ∧ avol[n] = mapped(buf) → ¬ LEB_SIZE < # buf; (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ mapped(buf).data = buf; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic% ⊦ aleb.mapped? ↔ (∃ buf. aleb = mapped(buf)); (as)% ⊦ mapped(buf).mapped?; (s)% ⊦ buffered(m).leb = m; (s)% ⊦ nobuffer ≠ buffered(m); (s)% ⊦ buffered(m) = buffered(m0) ↔ m = m0; (s)