| # lpt0 = # lpt, lpt[n] = mklp(n0, m, lpf, n2), n < # lpt, ∀ n1. n1 < # lpt ∧ lpt0[n1].flags = LP_GROUP_NODES ∧ lpt[n, mklp(m0, m, lpf, m2)][n1].flags = LP_GROUP_NODES ∧ ¬ n1 ∈ nx → lpt[n, mklp(m0, m, lpf, m2)][n1].size = lpt0[n1].size ⊦ ∀ n. n < # lpt ∧ lpt0[n].flags = LP_GROUP_NODES ∧ lpt[n].flags = LP_GROUP_NODES ∧ ¬ n ∈ nx → lpt[n].size = lpt0[n].size |
# lpt0 = # lpt, lpt[n1].flags = LP_GROUP_NODES, lpt0[n1].flags = LP_GROUP_NODES, lpt[n] = mklp(n0, m, lpf, n2), n < # lpt, n1 < # lpt, ∀ n1. n1 < # lpt ∧ lpt0[n1].flags = LP_GROUP_NODES ∧ lpt[n, mklp(m0, m, lpf, m2)][n1].flags = LP_GROUP_NODES ∧ ¬ n1 ∈ nx → lpt[n, mklp(m0, m, lpf, m2)][n1].size = lpt0[n1].size ⊦ lpt[n1].size = lpt0[n1].size, n1 ∈ nx
Used simplifier rules: lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic