| ⊦ i0 < i ∧ i < i0 + j ∧ i0 ≤ j0 ∧ j0 < i0 + j → (arraycopy(r, i, r, i0, j, st)[r -- j0 ']) = st[r -- (i + j - (i0 + j - j0 + 1) % (i - i0) + 1) '] |
true, ∀ j1, i0, i, j0, r, st. i→n(j1) < i→n(j) → ( true → ( i0 < i ∧ i < i0 + j1 ∧ i0 ≤ j0 ∧ j0 < i0 + j1 → (arraycopy(r, i, r, i0, j1, st)[r -- j0 ']) = st[r -- (i + j1 - (i0 + j1 - j0 + 1) % (i - i0) + 1) '])) ⊦ i0 < i ∧ i < i0 + j ∧ i0 ≤ j0 ∧ j0 < i0 + j → (arraycopy(r, i, r, i0, j, st)[r -- j0 ']) = st[r -- (i + j - (i0 + j - j0 + 1) % (i - i0) + 1) ']
[[CONCRETESIMPRULES : ([CSIMPLESSPRED : <])], [EXTRATERMS : (i→n(j))]]