| n < # avol, ebm-vol-inv(avol), err = ESUCCESS → is-encoded-pad(orphans0, # orphans0, buf0) ∧ # buf0 ≤ LEB_SIZE, err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪m1 := n; avol0 := avol; if err = ESUCCESS then ebm_avol_remap#(m1; avol; err); if err = ESUCCESS then ebm_avol_write#(m1, 0, 0, # buf0, buf0; avol; err)⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ebm-vol-inv(avol) ∧ id○(avol, avol0, n) ∧ (err = ESUCCESS → avol[n].mapped? ∧ is-encoded-pad(orphans0, # orphans0, avol[n].data))) |
m1 = n, n < # avol, ebm-vol-inv(avol), err = ESUCCESS → is-encoded-pad(orphans0, # orphans0, buf0) ∧ # buf0 ≤ LEB_SIZE, err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪avol0 := avol; if err = ESUCCESS then ebm_avol_remap#(m1; avol; err); if err = ESUCCESS then ebm_avol_write#(m1, 0, 0, # buf0, buf0; avol; err)⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ebm-vol-inv(avol) ∧ id○(avol, avol0, n) ∧ (err = ESUCCESS → avol[n].mapped? ∧ is-encoded-pad(orphans0, # orphans0, avol[n].data)))