| is_referencevalue(val) ∧ val .refval -- _type ∈ st[r -- sk, val0] ∧ is_typevalue(st[r -- sk, val0][val .refval -- _type]) ∧ is_arraytype((st[r -- sk, val0][val .refval -- _type]) .type) ∧ (st[r -- sk, val0][val .refval -- _type]) .type .type ≤ ty ∧ val .refval ≠ jvmref ∧ val .refval -- _length ∈ st[r -- sk, val0] ∧ (st[r -- sk, val0][val .refval -- _length]) = intval(i) ∧ 0 ≤ i ∧ is_arrayref(val .refval, i, st[r -- sk, val0]) ∧ (∀ j. ¬ j < 0 ∧ ¬ i ≤ j → okval(st[r -- sk, val0][val .refval -- j '], ty)) ⊦ okarray(val, ty, i, st), refval(r) = val |
(st[r -- sk, val0][val .refval -- _length]) = intval(i), is_referencevalue(val), val .refval -- _type ∈ st[r -- sk, val0], is_typevalue(st[r -- sk, val0][val .refval -- _type]), is_arraytype((st[r -- sk, val0][val .refval -- _type]) .type), (st[r -- sk, val0][val .refval -- _type]) .type .type ≤ ty, val .refval -- _length ∈ st[r -- sk, val0], is_arrayref(val .refval, i, st[r -- sk, val0]), val .refval ∈ st[r -- sk, val0], 0 ≤ i, ∀ j. ¬ j < 0 ∧ ¬ i ≤ j → okval(st[r -- sk, val0][val .refval -- j '], ty) ⊦ refval(r) = val, val .refval = jvmref, okarray(val, ty, i, st)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j])]]