| n < i→n(j), i + j ≤ n→i(# ints), i→n(i) + i→n(j) < # ints, 0 ≤ i, 0 < j, # sublist(i→n(i), i→n(j), ints) ≤ n, # sublist(i→n(i), i→n(j), ints) < i→n(j) ⊦ (mkjavavalues(is2bs(ints))[i→n(i) + n]) .byteval = (is2bs(sublist(i→n(i), i→n(j), ints))[n]), ints = [], j = 0 |
⊦ m + n ≤ # ints → # sublist(m, n, ints) = n
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < n → ¬ n < m], [CSIMPSEQ : ⊦ ¬ m ≤ n ↔ n < m], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ m < n → m ≤ n], [CSIMPSEQ : ⊦ m ≤ n → (n < m ↔ false)])], [EXTRATERMS : (ints, i→n(j), i→n(i))]]