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