| m < # avol, ebm-vol-inv(avol), avol ⊆ avol0 ⊦ ⟨if m < # avol then {fail_or_success#(; ; err); if err = ESUCCESS then avol[m] := mapped(mkbuf(0)) else {skip or avol[m] := unmapped}} else abort⟩ (avol ⊆ avol0) |
m < # avol, ebm-vol-inv(avol), avol ⊆ avol0 ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then avol[m] := mapped(mkbuf(0)) else {skip or avol[m] := unmapped}⟩ (avol ⊆ avol0)
Used simplifier rules: ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m < n → (n ≤ m ↔ false); (s)