| m < # avol, avol = abs(avols[v]), ebm-vol-inv(avol), v ∈ avols, v = default-volid, ebm-cons(avols) ⊦ ⟪ebm_vol_unmap#(m, v; avols)⟫ ⟨ebm_avol_unmap#(m; avol)⟩ (avol = abs(avols[v])) |
avol = abs(avols[v]), v = default-volid, m < # avol, ebm-cons(avols), ebm-vol-inv(avol), v ∈ avols ⊦ ⟪ebm_vol_unmap#(m, v; avols)⟫ ⟨ebm_avol_unmap#(m; avol)⟩ (avol = abs(avols[v]))