| 2 * i0 + j = (i + j0) + 1, (arraycopy(r, i, r, i0, j - 1, st[r -- (i0 + j - 1) ', st[r -- (i + j - 1) ']])[r -- j0 ']) = ((2 * i0 + j = (i + j0) + 1 ⊃ st[r -- (i + j - 1) ']; st[r -- (i + j0 - i0) '])), j0 < i0 + j, i0 ≤ j0, i0 + j ≤ i, j0 < i, i0 < i, 0 < j, ∀ j1, i0, i, j0, r, st. i→n(j1) < i→n(j) → (true → (i0 + j1 ≤ i ∧ i0 ≤ j0 ∧ j0 < i0 + j1 → (arraycopy(r, i, r, i0, j1, st)[r -- j0 ']) = st[r -- ((j0 - i0) + i) '])) ⊦ st[r -- (i + j - 1) '] = st[r -- (i + j0 - i0) '] |
2 * i0 + j = (i + j0) + 1, (arraycopy(r, i, r, i0, j - 1, st[r -- (i0 + j - 1) ', st[r -- (i + j - 1) ']])[r -- j0 ']) = st[r -- (i + j - 1) '], j0 < i0 + j, i0 ≤ j0, i0 + j ≤ i, j0 < i, i0 < i, 0 < j, ∀ j1, i0, i, j0, r, st. i→n(j1) < i→n(j) → (true → (i0 + j1 ≤ i ∧ i0 ≤ j0 ∧ j0 < i0 + j1 → (arraycopy(r, i, r, i0, j1, st)[r -- j0 ']) = st[r -- ((j0 - i0) + i) '])) ⊦ st[r -- (i + j - 1) '] = st[r -- (i + j0 - i0) ']
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i + j = j + i])]]