| LEB_SIZE = n0 + n, avol = abs(avols[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 ⊦ ⟨ebm_avol_change#(m, n, buf; avol; err1)⟩ (avol = abs(avols[default-volid][m, mapped(subarray(buf, 0, n) + mkempbuf(n0), n)]) ∧ ESUCCESS = err1) |
LEB_SIZE = n0 + n, avol = abs(avols[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 m < # avol ∧ n ≤ # buf ∧ n ≤ LEB_SIZE ∧ is-aligned(n, EB_PAGE_SIZE) then {fail_or_success#(; ; err); if err = ESUCCESS then avol[m] := mapped(subarray(buf, 0, n))} else abort⟩ (avol = abs(avols[default-volid][m, mapped(subarray(buf, 0, n) + mkempbuf(n0), n)]) ∧ ESUCCESS = err)
Used simplifier rules: ebm_avol_change#(LNUM, N, BUF; AVOL; ERR) {if LNUM < # AVOL ∧ N ≤ # BUF ∧ N ≤ LEB_SIZE ∧ is-aligned(N, EB_PAGE_SIZE) then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then AVOL[LNUM] := mapped(subarray(BUF, 0, N))} else abort };