| st[m] = mkblock(x, lax, m2), m ∈ st, @(m0, m1) ∈ lax ⊦ (st -- n)[@(m, m0, m1)] = x[pos(@(m0, m1), lax)], n = m, @(m, m0, m1) ∈ st -- n |
st[m] = mkblock(x, lax, m2), @(m0, m1) ∈ lax, m ∈ st ⊦ (st -- n)[@(m, m0, m1)] = x[pos(@(m0, m1), lax)], n = m, @(m, m0, m1) ∈ st -- n