| newref(r, st), validrefs(str, r ' + refs0, mkarraytype(ty), addarray(r, ty, i, st)), is_valid_ref(str, r, addarray(r, ty, i, st)) ⊦ r = jvmref, ¬ r ∈ refs0 ∧ ¬ dups(refs0), type∃(str, ty) ∧ ¬ i < 0 ∧ ty .jtelemtype ≠ void_type ∧ ty .jtelemtype ≠ abstract_type |
⊦ is_valid_ref(str, r, st) ↔ is_obj(str, r, st) ∨ is_array(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_obj (str, r, addarray(r, ty, i, st))], [CSIMPSEQ : ⊦ is_array (str, r, addarray(r, ty, i, st)) ↔ ¬ ¬ ( type∃(str, ty) ∧ 0 ≤ i ∧ r ≠ jvmref ∧ ty .jtelemtype ≠ void_type ∧ ty .jtelemtype ≠ abstract_type)], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)])], [EXTRATERMS : (addarray(r, ty, i, st), r, str)]]