| avol0 = avol, m = LEB_SIZE, m0 = EB_PAGE_SIZE, m1 = n, orphans0 = orphans, n < # avol, ebm-vol-inv(avol) ⊦ ⟪let buf = mkbuf(0) in {persistence_io_encode_orphans#(m0, m; orphans, buf; err); if err = ESUCCESS then ebm_avol_remap#(m1; avol; err); if err = ESUCCESS then ebm_avol_write#(m1, 0, 0, # buf, buf; 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))) |
avol0 = avol, buf = mkbuf(0), m = LEB_SIZE, m0 = EB_PAGE_SIZE, m1 = n, orphans0 = orphans, n < # avol, ebm-vol-inv(avol) ⊦ ⟪persistence_io_encode_orphans#(m0, m; orphans, buf; err); if err = ESUCCESS then ebm_avol_remap#(m1; avol; err); if err = ESUCCESS then ebm_avol_write#(m1, 0, 0, # buf, buf; 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)))