| avol[0] = mapped(buf0), buf = mkbuf(m0), m0 = LEB_SIZE, m1 = EB_PAGE_SIZE, ebm-vol-inv(avol), is-encoded(sb0, buf0) ⊦ ⟪ebm_avol_read#(0, 0, 0, m0, avol; buf; err); if err = ESUCCESS then let m = ? in decode_superblock#(0, buf, m1; sb, m; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → sb = sb0)), # avol = 0 |
avol[0] = mapped(buf1), buf = mkbuf(m2), buf0 = buf, m = 0, m0 = 0, m1 = EB_PAGE_SIZE, m2 = LEB_SIZE, n = m2, n0 = 0, ebm-vol-inv(avol), is-encoded(sb0, buf1) ⊦ ⟪if m0 < # avol ∧ avol[m0].mapped? ∧ n0 + n ≤ # buf0 ∧ m + n ≤ LEB_SIZE then {fail_or_success#(; ; err); if err = ESUCCESS then buf0 := copy(avol[m0].data + mkempbuf(LEB_SIZE - # avol[m0].data), m, buf0, n0, n) else choose buf with # buf = # buf0 ∧ range=(buf0, 0, buf, 0, n0) ∧ range=(buf0, n0 + n, buf, n0 + n, # buf0 - n0 + n) in buf0 := buf} else abort; if err = ESUCCESS then let m = ? in decode_superblock#(0, buf0, m1; sb, m; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → sb = sb0)), # avol = 0
Used simplifier rules: ebm_avol_read#(LNUM, OFFSET, N0, N, AVOL; BUF; ERR) {if LNUM < # AVOL ∧ AVOL[LNUM].mapped? ∧ N0 + N ≤ # BUF ∧ OFFSET + N ≤ LEB_SIZE then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then BUF := copy ( AVOL[LNUM].data + mkempbuf(LEB_SIZE - # AVOL[LNUM].data), OFFSET, BUF, N0, N) else choose BUF0 with # BUF0 = # BUF ∧ range=(BUF, 0, BUF0, 0, N0) ∧ range=(BUF, N0 + N, BUF0, N0 + N, # BUF - N0 + N) in BUF := BUF0} else abort };