| avol = abs(avols[default-volid]), m < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), default-volid ∈ avols ⊦ ⟨ebm_avol_unmap#(m; avol)⟩ (avol = abs(avols[default-volid][m, unmapped])) |
avol = abs(avols[default-volid]), m < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), default-volid ∈ avols ⊦ ⟨if m < # avol then avol[m] := unmapped else abort⟩ (avol = abs(avols[default-volid][m, unmapped]))
Used simplifier rules: ebm_avol_unmap#(LNUM; AVOL) {if LNUM < # AVOL then AVOL[LNUM] := unmapped else abort};