| lpt[n] = mklp(n0, n1, LP_GROUP_NODES, n2), n < m, m ≤ # lpt ⊦ gc-heap(lpt[n, mklp(m0, m1, LP_GROUP_NODES, m2)], nx, m) = (gc-heap(lpt, nx, m) -- key-index(n0, n)) ++ key-index(m0, n), n ∈ nx |
lpt[n] = mklp(n0, n1, LP_GROUP_NODES, n2), n < m, n < # lpt, m ≤ # lpt ⊦ gc-heap(lpt[n, mklp(m0, m1, LP_GROUP_NODES, m2)], nx, m) = (gc-heap(lpt, nx, m) -- key-index(n0, n)) ++ key-index(m0, n), n ∈ nx
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%fle: ⊦ m < n ∧ n ≤ n0 → m < n0; (forward) from specification nat%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic