| st[r -- _length] = intval(st[r -- _length] .intval), r ∈ st, okarray(refval(r), ty, st[r -- _length] .intval, st), r -- _length ∈ st ⊦ r = jvmref, (0 ≤ j ∧ j < st[r -- _length] .intval → oktype((st0 ∪ st)[r -- j '], ty, st0 ∪ st)) ∧ is_arrayref(r, st[r -- _length] .intval, st0 ∪ st) ∧ ¬ st[r -- _length] .intval < 0 ∧ is_referencevalue(refval(r)) ∧ ( refval(r) .refval ≠ jvmref → refval(r) .refval -- _type ∈ st0 ∪ st ∧ is_typevalue((st0 ∪ st)[refval(r) .refval -- _type]) ∧ (st0 ∪ st)[refval(r) .refval -- _type] .type ≤ mkarraytype(ty)) |
st[r -- _length] = intval(st[r -- _length] .intval), r ∈ st, okarray(refval(r), ty, st[r -- _length] .intval, st), r -- _length ∈ st ⊦ r = jvmref, (0 ≤ j ∧ j < st[r -- _length] .intval → oktype((st0 ∪ st)[r -- j '], ty, st0 ∪ st)) ∧ is_arrayref(r, st[r -- _length] .intval, st0 ∪ st) ∧ ¬ st[r -- _length] .intval < 0 ∧ (r -- _type ∈ st0 ∨ r -- _type ∈ st) ∧ is_typevalue((st0 ∪ st)[r -- _type]) ∧ (st0 ∪ st)[r -- _type] .type ≤ mkarraytype(ty)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk ∈ st ∪ st0 ↔ rk ∈ st ∨ rk ∈ st0], [CSIMPSEQ : ⊦ refval(r) .refval = r], [CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]