| # avol1 = n3 + n5 + n2 + n4, # buf = (n2 + n4) * LEB_SIZE, # avol0 = # avol1, avol = avol0[n5 + n4, mapped(mkbuf(0))], err = err0, lebs(avol0, n5, n4) = subarray(buf, 0, n4 * LEB_SIZE), n5 + n4 < # avol0, n5 + n4 < # avol1, ebm-vol-inv(avol0), ebm-vol-inv(avol1), ebm-vol-inv(avol0[n5 + n4, mapped(mkbuf(0))]), is-aligned(LEB_SIZE, EB_PAGE_SIZE), mapped-full?(avol0, n5, n4), range=(avol0, 0, avol1, 0, n5), range=(avol0, n5 + n2 + n4, avol1, n5 + n2 + n4, n3), n5 + n2 + n4 ≤ # avol1, n4 * LEB_SIZE + LEB_SIZE ≤ # buf, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [n1 := n4 * LEB_SIZE; n0 := LEB_SIZE; m0 := n5 + n4; m := 0; choose n with n < n0 ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then avol[m0] := mapped(avol[m0].data + mkempbuf(m - # avol[m0].data) + subarray(buf, n1, n)) ifnone skip] ( ebm-vol-inv(avol) → ⟪n := n4 + 1⟫ ( n ≤ n2 + n4 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # avol = # avol1 ∧ range=(avol, 0, avol1, 0, n5) ∧ range=(avol, n5 + n2 + n4, avol1, n5 + n2 + n4, n3) ∧ (err = ESUCCESS → lebs(avol, n5, n) = subarray(buf, 0, n * LEB_SIZE) ∧ mapped-full?(avol, n5, n)) ∧ n4 < n)), n3 + n2 = 0, err = ESUCCESS, n2 = 0 |
# avol0 = # avol1, # buf = (n2 + n4) * LEB_SIZE, # avol1 = n3 + n5 + n2 + n4, avol = avol0[n5 + n4, mapped(mkbuf(0))], err = err0, lebs(avol0, n5, n4) = subarray(buf, 0, n4 * LEB_SIZE), n1 = n4 * LEB_SIZE, n5 + n4 < # avol1, n5 + n4 < # avol0, ebm-vol-inv(avol0[n5 + n4, mapped(mkbuf(0))]), ebm-vol-inv(avol1), ebm-vol-inv(avol0), is-aligned(LEB_SIZE, EB_PAGE_SIZE), mapped-full?(avol0, n5, n4), range=(avol0, n5 + n2 + n4, avol1, n5 + n2 + n4, n3), range=(avol0, 0, avol1, 0, n5), n4 * LEB_SIZE + LEB_SIZE ≤ # buf, n5 + n2 + n4 ≤ # avol1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [n0 := LEB_SIZE; m0 := n5 + n4; m := 0; choose n with n < n0 ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then avol[m0] := mapped(avol[m0].data + mkempbuf(m - # avol[m0].data) + subarray(buf, n1, n)) ifnone skip] ( ebm-vol-inv(avol) → ⟪n := n4 + 1⟫ ( n ≤ n2 + n4 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # avol = # avol1 ∧ range=(avol, 0, avol1, 0, n5) ∧ range=(avol, n5 + n2 + n4, avol1, n5 + n2 + n4, n3) ∧ (err = ESUCCESS → lebs(avol, n5, n) = subarray(buf, 0, n * LEB_SIZE) ∧ mapped-full?(avol, n5, n)) ∧ n4 < n)), n3 + n2 = 0, err = ESUCCESS, n2 = 0