| avols[default-volid][m2] = mapped(buf1, n1), m2 < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), default-volid ∈ avols, m1 + n2 ≤ LEB_SIZE, n3 + n2 ≤ # buf2, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪err := err0; buf := buf2; if err = ESUCCESS then if ¬ avols[default-volid][m2].mapped? then buf := fill(buf, empty, n3, n2) else buf := copy(avols[default-volid][m2].data, m1, buf, n3, n2) else {n0 := n3; n := n2; choose buf1 with # buf1 = # buf ∧ range=(buf1, 0, buf, 0, n0) ∧ range=(buf1, n0 + n, buf, n0 + n, # buf - n0 + n) in buf := buf1}⟫ ⟨ebm_avol_read#(m2, m1, n3, n2, abs(avols[default-volid]); buf2; err1)⟩ (buf = buf2 ∧ err = err1) |
avols[default-volid][m2] = mapped(buf1, n1), err = err0, m2 < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), default-volid ∈ avols, n3 + n2 ≤ # buf2, m1 + n2 ≤ LEB_SIZE, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪buf := buf2; if err = ESUCCESS then if ¬ avols[default-volid][m2].mapped? then buf := fill(buf, empty, n3, n2) else buf := copy(avols[default-volid][m2].data, m1, buf, n3, n2) else {n0 := n3; n := n2; choose buf1 with # buf1 = # buf ∧ range=(buf1, 0, buf, 0, n0) ∧ range=(buf1, n0 + n, buf, n0 + n, # buf - n0 + n) in buf := buf1}⟫ ⟨ebm_avol_read#(m2, m1, n3, n2, abs(avols[default-volid]); buf2; err1)⟩ (buf = buf2 ∧ err = err1)