| err0 = ESUCCESS, m2 < # avols[default-volid], ebm-cons(avols), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), default-volid ∈ avols, m1 + n ≤ LEB_SIZE, n + n2 ≤ # buf, avols[default-volid][m2].mapped? → avols[default-volid][m2].fill ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [if avols[default-volid][m2].mapped? then if n ≠ 0 then avols[default-volid][m2] := mapped(subarray(avols[default-volid][m2].data, 0, m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n) else avols[default-volid][m2] := mapped(mkempbuf(m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n)] (ebm-cons(avols) → default-volid ∈ avols) |
err0 = ESUCCESS, avols[default-volid][m2].mapped?, m2 < # avols[default-volid], ebm-cons(avols), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), default-volid ∈ avols, n + n2 ≤ # buf, m1 + n ≤ LEB_SIZE, avols[default-volid][m2].mapped? → avols[default-volid][m2].fill ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [if n ≠ 0 then avols[default-volid][m2] := mapped(subarray(avols[default-volid][m2].data, 0, m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n)] (ebm-cons(avols) → default-volid ∈ avols)
err0 = ESUCCESS, m2 < # avols[default-volid], ebm-cons(avols), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), default-volid ∈ avols, n + n2 ≤ # buf, m1 + n ≤ LEB_SIZE, avols[default-volid][m2].mapped? → avols[default-volid][m2].fill ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [avols[default-volid][m2] := mapped(mkempbuf(m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n)] (ebm-cons(avols) → default-volid ∈ avols), avols[default-volid][m2].mapped?