| ⊦ okprimtype(val, ty) ∧ 0 ≤ j ∧ j < i ∧ okarray(refval(r), ty, i, st) → okarray(refval(r), ty, i, st[r -- j ', val]) |
⊦ okarray(refval(r), ty, i, st) → r ≠ jvmref
⊦ okarray(refval(r), ty, i, st) → st[r -- _length] .intval = i
0 < st[r -- _length] .intval, okprimtype(val, ty), j < st[r -- _length] .intval, okarray(refval(r), ty, st[r -- _length] .intval, st), 0 ≤ j ⊦ r = jvmref, okarray(refval(r), ty, st[r -- _length] .intval, st[r -- j ', val])
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j])]]