| i ≠ i0 + j ∨ r ≠ r0, 0 ≤ j ⊦ (arraycopy(r1, i1, r0, i0, j, st)[r -- i ']) = (arraycopy(r1, i1, r0, i0, j, st[r0 -- (i0 + j) ', st[r1 -- (i1 + j) ']])[r -- i ']), r1 = r0 |
⊦ r1 ≠ r0 → (arraycopy(r, i, r0, i0, j, st)[r1 -- sk]) = st[r1 -- sk]
0 ≤ j ⊦ i = i0 + j, r1 = r0, (arraycopy(r1, i1, r0, i0, j, st)[r0 -- i ']) = (arraycopy(r1, i1, r0, i0, j, st[r0 -- (i0 + j) ', st[r1 -- (i1 + j) ']])[r0 -- i '])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ r0 → (st[r0 -- sk0, val][r -- sk]) = st[r -- sk]])]]