| ¬ i→n(i) + # vals ≤ # vals0, fs ' = _length, i + n→i(# vals) ≤ n→i(# vals0), 0 ≤ i ⊦ n→i(# vals0) = i + n→i(# vals) + n→i(# restn(i→n(i) + # vals, vals0)) |
fs ' = _length, # vals0 < i→n(i) + # vals, 0 ≤ i, i + n→i(# vals) ≤ n→i(# vals0) ⊦ n→i(# vals0) = i + n→i(# vals) + n→i(# restn(i→n(i) + # vals, vals0))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < n → n ≠ 0], [CSIMPFORWARD : ⊦ m < n → n ≠ 0], [CSIMPSEQ : ⊦ ¬ m ≤ n ↔ n < m])]]