| val = refval(r) ∧ is_referencevalue(val), st ⊆ st0, okarray(val, ty, i, st) ⊦ r = jvmref, (0 ≤ j ∧ j < i → okval(st0[r -- j '], ty)) ∧ is_arrayref(r, i, st0) ∧ ¬ i < 0 ∧ st0[r -- _length] = intval(i) ∧ r -- _length ∈ st0 ∧ okreftype(val, mkarraytype(ty), st0) |
⊦ okarray(refval(r), ty, i, st) → st[r -- _length] .intval = i
⊦ okarray(refval(r), ty, i, st) → r ≠ jvmref
st ⊆ st0, okarray(refval(r), ty, st[r -- _length] .intval, st) ⊦ r = jvmref, (0 ≤ j ∧ j < st[r -- _length] .intval → okval(st0[r -- j '], ty)) ∧ is_arrayref(r, st[r -- _length] .intval, st0) ∧ ¬ st[r -- _length] .intval < 0 ∧ st0[r -- _length] = intval(st[r -- _length] .intval) ∧ r -- _length ∈ st0 ∧ okreftype(refval(r), mkarraytype(ty), st0)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]