| avol0 = avol, err = err0, n < # avol, ebm-vol-inv(avol), is-encoded-pad(orphans0, # orphans0, buf0), # buf0 ≤ LEB_SIZE, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ [avol[n] := unmapped] ( ebm-vol-inv(avol) → ⟪if err = ESUCCESS then ebm_avol_write#(n, 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)))), err = ESUCCESS |
avol = avol1[n, unmapped], avol0 = avol1, err = err0, n < # avol1, ebm-vol-inv(avol), ebm-vol-inv(avol1), is-encoded-pad(orphans0, # orphans0, buf0), # buf0 ≤ LEB_SIZE, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪if err = ESUCCESS then ebm_avol_write#(n, 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))), err = ESUCCESS