| 0 ≤ i0, ∃ i. sk = i ' ⊦ sk = 0 ', (addarray(r, ty, 1 + i0, st)[r -- sk]) = (addarray(r, ty, val ' + mklist(initial_value(ty), i→n(i0)), st)[r -- sk]), sk = _length, sk = _type |
0 ≤ i0 ⊦ (addarray(r, ty, 1 + i0, st)[r -- i ']) = (addarray(r, ty, val ' + mklist(initial_value(ty), i→n(i0)), st)[r -- i ']), i = 0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ _type ≠ i '], [CSIMPSEQ : ⊦ _length ≠ i '], [CSIMPSEQ : ⊦ i ' = i0 ' ↔ i = i0])]]