| lpt[n] = mklp(n0, n1, LP_GROUP_NODES, n2), lpt[n, mklp(m0, m1, LP_GROUP_NODES, m2)][n3] = mklp(m, m3, lpf, m4), n < # lpt, n3 ∈ nx, ∀ n. n ∈ nx → n < # lpt ∧ lpt[n].flags = LP_GROUP_NODES ⊦ n3 < # lpt ∧ lpf = LP_GROUP_NODES |
lpt[n, mklp(m0, m1, LP_GROUP_NODES, m2)][n3] = mklp(m, m3, lpf, m4), lpt[n] = mklp(n0, n1, LP_GROUP_NODES, n2), n < # lpt, n3 ∈ nx, ∀ n. n ∈ nx → n < # lpt ∧ lpt[n].flags = LP_GROUP_NODES ⊦ n3 = n, n3 < # lpt ∧ lpf = LP_GROUP_NODES
Used simplifier rules: ⊦ m < # lpt → lpt[m, lp][m] = lp; (s)%⊦ mklp(m, m0, lpf, m1) = mklp(m2, m3, lpf0, m4) ↔ m = m2 ∧ m0 = m3 ∧ lpf = lpf0 ∧ m1 = m4; (ws) Used formulas: n3 = n