| st[r -- _type] = typeval(mkarraytype(ty)), st[r -- _length] = intval(i0), 0 ≤ i0, r -- _length ∈ st, is_arrayref(r, i0, st), r -- _type ∈ st, st ⊆ st0, r ∈ st, 0 ≤ i, i + j ≤ i0, ∀ j0. ¬ j0 < 0 ∧ ¬ i0 ≤ j0 → okval(st[r -- j0 '], ty) ⊦ getarray(r, i, j, st) = getarray(r, i, j, st0), r = jvmref, ∀ j0. 0 ≤ j0 ∧ j0 < i + j → r -- j0 ' ∈ st |
st[r -- _length] = intval(i0), st[r -- _type] = typeval(mkarraytype(ty)), j0 < i0, 0 < i + j, 0 ≤ j0, i + j ≤ i0, 0 ≤ i, r ∈ st, st ⊆ st0, r -- _type ∈ st, is_arrayref(r, i0, st), r -- _length ∈ st, 0 ≤ i0, j0 < i + j, 0 < i0, ∀ j0. ¬ j0 < 0 ∧ ¬ i0 ≤ j0 → okval(st[r -- j0 '], ty) ⊦ r = jvmref, getarray(r, i, j, st) = getarray(r, i, j, st0), r -- j0 ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 < i → 0 < j], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPFORWARD : ⊦ i < j ∧ j ≤ j0 → i < j0], [CSIMPSEQ : ⊦ i + j = j + i])]]