| avol[m2] = mapped(buf0), n1 < n, m2 < # avol, ebm-vol-inv(avol), is-aligned(n1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), n2 + n ≤ # buf, m1 + n ≤ LEB_SIZE, # buf0 ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪if n1 ≠ 0 then avol[m2] := mapped(avol[m2].data + mkempbuf(m1 - # avol[m2].data) + subarray(buf, n2, n1))⟫ ebm-vol-inv(avol), err0 = ESUCCESS |
avol[m2] = mapped(buf0), m2 < # avol, n1 < n, ebm-vol-inv(avol), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), is-aligned(n1, EB_PAGE_SIZE), # buf0 ≤ m1, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪avol[m2] := mapped(avol[m2].data + mkempbuf(m1 - # avol[m2].data) + subarray(buf, n2, n1))⟫ ebm-vol-inv(avol), err0 = ESUCCESS, n1 = 0
avol[m2] = mapped(buf0), n1 = 0, m2 < # avol, n1 < n, ebm-vol-inv(avol), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), is-aligned(n1, EB_PAGE_SIZE), # buf0 ≤ m1, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪skip⟫ ebm-vol-inv(avol), err0 = ESUCCESS