| # lpt = # avol, m < # avol, ebm-vol-inv(avol) ⊦ ⟪apersistence_io_unmap#(m, adr, m0, plog, lpt, ns; avol)⟫ (ebm-vol-inv(avol) ∧ # lpt = # avol) |
# lpt = # avol, m = m1, m0 = m2, m2 < # avol, ebm-vol-inv(avol) ⊦ ⟪if m0 < # avol then avol[m0] := unmapped else abort⟫ (ebm-vol-inv(avol) ∧ # lpt = # avol)
Used simplifier rules: unmap: ⊦ ;