| ⊦ r = val .refval, okreftype(val, mkarraytype(ty0), addarray(r, ty, vals, st)) ∧ val .refval ≠ jvmref ∧ val .refval -- _length ∈ st ∧ st[val .refval -- _length] = intval(i) ∧ 0 ≤ i ∧ is_arrayref(val .refval, i, st) ∧ (∀ j. ¬ j < 0 ∧ ¬ i ≤ j → oktype(st[val .refval -- j '], ty0, addarray(r, ty, vals, st))) ↔ okreftype(val, mkarraytype(ty0), st) ∧ val .refval ≠ jvmref ∧ (val .refval -- _length) × intval(i) ∈ st ∧ 0 ≤ i ∧ is_arrayref(val .refval, i, st) ∧ (∀ j. 0 ≤ j ∧ j < i → oktype(st[val .refval -- j '], ty0, st)) |
st[val .refval -- _length] = intval(i), is_arrayref(val .refval, i, st), val .refval -- _length ∈ st, 0 ≤ i, val .refval ∈ st ⊦ val .refval = jvmref, r = val .refval, okreftype(val, mkarraytype(ty0), addarray(r, ty, vals, st)) ∧ (∀ j. ¬ j < 0 ∧ ¬ i ≤ j → oktype(st[val .refval -- j '], ty0, addarray(r, ty, vals, st))) ↔ okreftype(val, mkarraytype(ty0), st) ∧ (∀ j. 0 ≤ j ∧ j < i → oktype(st[val .refval -- j '], ty0, st))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ rk × val ∈ st ↔ ¬ ¬ (rk ∈ st ∧ st[rk] = val)])]]