| lpt[n] = mklp(m, m0, lpf, m1), n0 < # lpt ⊦ (n0 ∈ elems nx ++ n ∧ n0 < # lpt ⊃ mklp(lpt[n0].ref-size, LEB_SIZE, LP_GROUP_NODES, lpt[n0].gcheapidx);lpt[n0]) = lpt.mapIndices(elems nx, λ lp. mklp(lp.ref-size, LEB_SIZE, LP_GROUP_NODES, lp.gcheapidx))[n, mklp(m, LEB_SIZE, LP_GROUP_NODES, m1)][n0], n ∈ nx |
lpt[n] = mklp(m, m0, lpf, m1), n0 < # lpt ⊦ (n0 = n ∨ n0 ∈ nx ⊃ mklp(lpt[n0].ref-size, LEB_SIZE, LP_GROUP_NODES, lpt[n0].gcheapidx);lpt[n0]) = lpt.mapIndices(elems nx, λ lp. mklp(lp.ref-size, LEB_SIZE, LP_GROUP_NODES, lp.gcheapidx))[n, mklp(m, LEB_SIZE, LP_GROUP_NODES, m1)][n0], n ∈ nx
Used simplifier rules: ⊦ n ∈ elems nx ↔ n ∈ nx; (s)% ⊦ n ∈ ns ++ n0 ↔ n = n0 ∨ n ∈ ns; (s)