| 0 < i0, 0 < i, r -- i ' ∈ addarray(r, ty, val ' + mklist(initial_value(ty), i→n(i0)), st), 0 ≤ i0, i ≤ i0 ⊦ i = 0, r -- i ' ∈ addarray(r, ty, 1 + i0, st) |
⊦ 0 ≤ j ∧ j < i → r -- j ' ∈ addarray(r, ty, i, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : ⊦ i < j → ¬ j < i], [CSIMPSEQ : ⊦ i < j + 1 ↔ i ≤ j], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i + j = j + i])], [EXTRATERMS : (st, 1 + i0, ty, i, r)]]