| 0 ≤ i, 0 ≤ i0 + n→i(# vals), 0 ≤ i0 + i + n→i(# vals), 0 < i0, n→i(n) < n→i(# vals) + i0, 0 < i + n→i(# vals) + i0, 0 < n→i(# vals) + i0, # vals ≤ n, 0 ≤ n→i(n) + i ⊦ initial_value(ty) = (vals + mklist(initial_value(ty), i→n(i0)))[n] |
⊦ n < # vals → (vals + vals0)[n] = vals[n]
¬ n < # vals, 0 ≤ i, 0 ≤ i0 + n→i(# vals), 0 ≤ i0 + i + n→i(# vals), 0 < i0, n→i(n) < n→i(# vals) + i0, 0 < i + n→i(# vals) + i0, 0 < n→i(# vals) + i0, # vals ≤ n, 0 ≤ n→i(n) + i ⊦ initial_value(ty) = (vals + mklist(initial_value(ty), i→n(i0)))[n]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m ≤ n → (n < m ↔ false)])], [EXTRATERMS : (n, mklist(initial_value(ty), i→n(i0)), vals)]]