| # apebs = # wlar, vtblpnum < # avols[v], abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum0), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum0), valid-wl(apebs, wlar), v ∈ avols, ¬ avols[v][vtblpnum].mapped?, ¬ VTBL_VOLID ∈ vols ⊦ ⟪ubi_map#(v, vtblpnum, EB_PAGE_SIZE; vols, wlar, q, bflipset, vtblpnum0, sqnum, apebs; err)⟫ ⟨ebm_map#(v, vtblpnum; avols; err0)⟩ (abs(avols, apebs, vols, q) ∧ err = err0) |
# apebs = # wlar, vtblpnum = vtblpnum3, vtblpnum0 = EB_PAGE_SIZE, vtblpnum1 = vtblpnum2, vtblpnum2 < # avols[v], abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum3), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum3), valid-wl(apebs, wlar), v ∈ avols ⊦ ⟪if v ∈ vols ∧ vtblpnum1 < # vols[v] ∧ vols[v][vtblpnum1] = unmapped then let buf = mkbuf(0) in ubi_write#(v, vtblpnum1, 0, 0, 0, buf, vtblpnum0; vols, wlar, q, bflipset, vtblpnum, sqnum, apebs; err) else abort⟫ ⟨ebm_map#(v, vtblpnum2; avols; err0)⟩ (abs(avols, apebs, vols, q) ∧ err = err0), avols[v][vtblpnum2].mapped?, VTBL_VOLID ∈ vols
Used simplifier rules: ubi_map# (VOLID, LNUM, PAGESIZE ; VOLS, WLARRAY, ERASEQ, BFLIPSET, VTBLPNUM, SQNUM, APEBS ; ERR ) {if VOLID ∈ VOLS ∧ LNUM < # VOLS[VOLID] ∧ VOLS[VOLID][LNUM] = unmapped then let BUF = mkbuf(0) in ubi_write# (VOLID, LNUM, 0, 0, 0, BUF, PAGESIZE ; VOLS, WLARRAY, ERASEQ, BFLIPSET, VTBLPNUM, SQNUM, APEBS ; ERR) else abort };