| # lpt0 = # avol, # lpt = # avol, avol[m0] = mapped(buf), adr = @(m0, m1, m2), m0 < # avol, abs-node(subarray(buf, m1, m2), ind), awbuf-inv(avol, bleb), buf-ro-rw-mode(isbuf, bleb, lpt0, avol), bufs-log-only(bleb, log0, lpt0), lpt-free-unref(lpt), lpt-leb-size(lpt), lpt-ram-flash(lpt0, lpt, log0), m1 + m2 ≤ # buf ⊦ ⟪persistence_read_ind#(adr, adr0, m, log0, avol, lpt, ns, bleb, isbuf; ind0; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ind = ind0)) |
# lpt0 = # avol, # lpt = # avol, avol[m0] = mapped(buf), m0 < # avol, abs-node(subarray(buf, m1, m2), ind), awbuf-inv(avol, bleb), buf-ro-rw-mode(isbuf, bleb, lpt0, avol), bufs-log-only(bleb, log0, lpt0), lpt-free-unref(lpt), lpt-leb-size(lpt), lpt-ram-flash(lpt0, lpt, log0), m1 + m2 ≤ # buf ⊦ ⟪persistence_read_ind#(@(m0, m1, m2), adr0, m, log0, avol, lpt, ns, bleb, isbuf; ind0; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ind = ind0))
Used simplifier rules: lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic