| ⟨fail_or_success#(; ; err)⟩ (err = err2), # apebs = # wlar, vols[v][vtblpnum2] = unmapped, avols = avols0, buf = mkbuf(0), err2 = err1, n0 = 0, n1 = 0, vtblpnum = 0, vtblpnum0 = vtblpnum2, vtblpnum2 < # avols[v], vtblpnum2 < # vols[v], abs(avols0, apebs0, vols0, q0), 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, v ∈ vols ⊦ ∃ err0. (⌊err0⌋ ∨ err0 = ESUCCESS) ∧ ⟨err := err0; if err = ESUCCESS then avols[v][vtblpnum2] := mapped(emptyleb, 0)⟩ (abs(avols, apebs0, vols0, q0) ∧ err1 = err), err2 = ESUCCESS, avols[v][vtblpnum2].mapped?, VTBL_VOLID ∈ vols |
⟨fail_or_success#(; ; err)⟩ (err = err1), # apebs = # wlar, vols[v][vtblpnum2] = unmapped, err1 ≠ ESUCCESS, vtblpnum2 < # avols0[v], vtblpnum2 < # vols[v], abs(avols0, apebs0, vols0, q0), abs(avols0, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols0), 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 ∈ avols0, v ∈ vols, ¬ avols0[v][vtblpnum2].mapped?, ¬ VTBL_VOLID ∈ vols ⊦ ∃ err0. (⌊err0⌋ ∨ err0 = ESUCCESS) ∧ ⟨err := err0; if err = ESUCCESS then avols0[v][vtblpnum2] := mapped(emptyleb, 0)⟩ (abs(avols0, apebs0, vols0, q0) ∧ err1 = err)
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%abs-vols-unmapped: ⊦ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = unmapped ∧ abs(avols, apebs, vols, q) → ¬ avols[v][m].mapped?; (forward) from specification ubi-abs%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic