| class+∃(str, st[r0 -- _type] .type .class) ∧ ¬ is_abstract(st[r0 -- _type] .type .class) ∧ is_obj(r0, st) ∨ type∃(str, st[r0 -- _type] .type) ∧ st[r0 -- _type] .type .jtelemtype ≠ void_type ∧ st[r0 -- _type] .type .jtelemtype ≠ abstract_type ∧ is_array(r0, st), i < 0 ⊦ (is_obj(r0, st) ∨ is_array(r0, st[r0 -- i ', val])) ∧ ( class+∃(str, st[r0 -- _type] .type .class) ∧ ¬ is_abstract(st[r0 -- _type] .type .class) ∧ is_obj(r0, st) ∨ type∃(str, st[r0 -- _type] .type) ∧ st[r0 -- _type] .type .jtelemtype ≠ void_type ∧ st[r0 -- _type] .type .jtelemtype ≠ abstract_type ∧ is_array(r0, st[r0 -- i ', val])) |
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : okfuns, , isarray-put-array-badindex, ⊦ i < 0 → ( is_array (r0, st[r -- i ', val]) ↔ is_array(r0, st))])]]