| # lpt0 = # avol, # lpt = # avol, avol[m0] = mapped(buf0), buf = mkbuf(m2), m0 < # avol, abs-node(subarray(buf0, 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 ≤ # buf0 ⊦ ⟪awbuf_read_buf#(m0, m1, m2, adr, m, log0, avol, lpt, ns, bleb, isbuf; buf; err); if err = ESUCCESS then decode_index_node#(0, m2, buf; ind0; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ind = ind0)) |
# lpt = # avol, # lpt0 = # avol, avol[m4] = mapped(buf1), buf = mkbuf(m2), buf0 = buf, log = log0, m0 = m3, m1 = m4, n = m2, m4 < # avol, abs-node(subarray(buf1, m3, 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), m3 + m2 ≤ # buf1 ⊦ ⟪if m1 < # avol ∧ n ≤ # buf0 ∧ m0 + n ≤ LEB_SIZE ∧ avol[m1].mapped? then {fail_or_success#(; ; err); if err = ESUCCESS then buf0 := copy(avol[m1].data + mkempbuf(LEB_SIZE - # avol[m1].data), m0, buf0, 0, n) else choose buf with # buf = # buf0 ∧ range=(buf, n, buf0, n, # buf0 - n) in buf0 := buf} else abort; if err = ESUCCESS then decode_index_node#(0, m2, buf0; ind0; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ind = ind0))
Used simplifier rules: awbuf_read_buf# (LNUM, OFFSET, N, WROOTADR, WMAXINO, WLOG, WVOL, WLPT, WORPHANS, WBUFLEB, AROFS ; BUF ; ERR ) {if LNUM < # WVOL ∧ N ≤ # BUF ∧ OFFSET + N ≤ LEB_SIZE ∧ WVOL[LNUM].mapped? then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then BUF := copy ( WVOL[LNUM].data + mkempbuf(LEB_SIZE - # WVOL[LNUM].data), OFFSET, BUF, 0, N) else choose BUF0 with # BUF0 = # BUF ∧ range=(BUF0, N, BUF, N, # BUF - N) in BUF := BUF0} else abort };