| m < # avol, avol[m].mapped?, # avol[m].data ≤ m0, is-aligned(m0, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), m0 + n ≤ LEB_SIZE, n0 + n ≤ # buf, m1 = sb.maxino, adr = sb.indexaddr, # avol0 = sb.main + # avol, avol = subarray(avol0, sb.main, # avol0 - sb.main), is-encoded(plog, avol0[sb.log].data), is-encoded(lpt, lebs(avol0, sb.lpt, lptlebs(# avol, LEB_SIZE))), is-encoded-pad(ns, sb.orphsize, avol0[sb.orph].data), ebm-vol-inv(avol), # lpt = # avol, ∃ lpt0, log, orphans. persistence-io-inv(sb, logoff, avol0, lpt0, log, orphans), m2 = EB_PAGE_SIZE, m3 = LEB_SIZE, ebm-vol-inv(avol0) ⊦ ⟪persistence_io_write#(m, m0, n0, n, buf, sb; avol0; err)⟫ ⟨apersistence_io_write#(m, m0, n0, n, buf, adr, m1, plog, lpt, ns; avol; err0)⟩ ( ( m1 = sb.maxino ∧ adr = sb.indexaddr ∧ # avol0 = sb.main + # avol ∧ avol = subarray(avol0, sb.main, # avol0 - sb.main) ∧ is-encoded(plog, avol0[sb.log].data) ∧ is-encoded(lpt, lebs(avol0, sb.lpt, lptlebs(# avol, LEB_SIZE))) ∧ is-encoded-pad(ns, sb.orphsize, avol0[sb.orph].data)) ∧ err = err0) |