| (∅)[m] = mkblock(x, lax, m2), st[m] = mkblock(x0, lax0, 0), m ∈ st, @(m, m0, m1) ∈ st, @(m, m0, m1) ∈ as, as ⊆ dom nodes(st), @(m, m0, m1) ∈ as → @(m, m0, m1).size ≠ 0, ∀ n. n ∈ st → st[n].ref-size = (as | n).size ⊦ # as = 0, as = ∅ |
st[m] = mkblock(x0, lax0, 0), (∅)[m] = mkblock(x, lax, m2), @(m, m0, m1) ∈ as, @(m, m0, m1) ∈ st, m ∈ st, as ⊆ dom nodes(st), ∀ n. n ∈ st → st[n].ref-size = (as | n).size ⊦ # as = 0, as = ∅, m1 = 0
Used simplifier rules: ⊦ @(m, m0, m1).size = m1; (s)