| # lpt ≤ n, ∀ n. n < # lpt → lpt[n].size ≤ LEB_SIZE ⊦ (∀ n0. n0 < # lpt → lpt[n, mklp(m, m0, lpf, m1)][n0].size ≤ LEB_SIZE) ↔ # lpt ≤ n ∨ m0 ≤ LEB_SIZE |
n0 < # lpt, LEB_SIZE < lpt[n0].size, n0 < n, # lpt ≤ n, ∀ n. n < # lpt → lpt[n].size ≤ LEB_SIZE ⊦
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% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ m ≤ n → (n < m ↔ false); (s)%m ≠ n ⊦ lpt[m, lp][n] = lpt[n]; (s)