| ∀ 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, # lpt ≤ n |
n < # lpt, ∀ n. n < # lpt → lpt[n].size ≤ LEB_SIZE ⊦ (∀ n0. n0 < # lpt → lpt[n, mklp(m, m0, lpf, m1)][n0].size ≤ LEB_SIZE) ↔ m0 ≤ LEB_SIZE
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)