| avol = abs(avols[default-volid]), v = default-volid, m < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), is-aligned(n, EB_PAGE_SIZE), default-volid ∈ avols, n ≤ LEB_SIZE, n ≤ # buf ⊦ ⟪if v ∈ avols ∧ m < # avols[v] ∧ n ≤ LEB_SIZE ∧ n ≤ # buf ∧ is-aligned(n, EB_PAGE_SIZE) then {fail_or_success#(; ; err); if err = ESUCCESS then avols[v][m] := mapped(subarray(buf, 0, n) + mkempbuf(LEB_SIZE - n), n)} else abort⟫ ⟨ebm_avol_change#(m, n, buf; avol; err0)⟩ (avol = abs(avols[default-volid]) ∧ err = err0) |
avol = abs(avols[default-volid]), v = default-volid, m < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), is-aligned(n, EB_PAGE_SIZE), default-volid ∈ avols, n ≤ # buf, n ≤ LEB_SIZE ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then avols[v][m] := mapped(subarray(buf, 0, n) + mkempbuf(LEB_SIZE - n), n)⟫ ⟨ebm_avol_change#(m, n, buf; avol; err0)⟩ (avol = abs(avols[default-volid]) ∧ err = err0)