| newref(r, st), is_classtype(ty), class∃(str, ty .class), junkrefs(str, r ' + refs0, mkarraytype(ty), addarray(r, ty, vals, st)), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ ty) ⊦ r = jvmref, type∃(str, (addarray(r, ty, vals, st)[r -- _type]) .type) ∧ (addarray(r, ty, vals, st)[r -- _type]) .type .jtelemtype ≠ void_type ∧ (addarray(r, ty, vals, st)[r -- _type]) .type .jtelemtype ≠ abstract_type ∧ is_array(r, addarray(r, ty, vals, st)) |
newref(r, st), is_classtype(ty), class∃(str, ty .class), junkrefs(str, r ' + refs0, mkarraytype(ty), addarray(r, ty, vals, st)), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ ty) ⊦ r = jvmref, ty = abstract_type, ty = void_type, is_array(r, addarray(r, ty, vals, st)) ∧ type∃(str, ty)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_classtype(abstract_type)], [CSIMPSEQ : ⊦ ¬ is_classtype(void_type)], [CSIMPSEQ : ⊦ is_classtype(ty) → ty .jtelemtype = ty], [CSIMPSEQ : ⊦ mkarraytype(ty) .jtelemtype = ty .jtelemtype], [CSIMPSEQ : ⊦ type∃(str, mkarraytype(ty)) ↔ type∃(str, ty)], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ⊦ (addarray(r, ty, vals, st) [r -- _type ] ) = typeval(mkarraytype(ty))])]]