| ∃ refs. dups(refs) ∧ refs .first = r ∧ validrefs(str, refs, (addarray(r, ty, vals, st)[r -- _type]) .type, addarray(r, ty, vals, st)), newref(r, st), type∃(str, ty), is_reftype(ty), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ ¬ cyclic(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ ty) ⊦ ty .jtelemtype = abstract_type, ty .jtelemtype = void_type, r = jvmref |
newref(refs .first, st), type∃(str, ty), is_reftype(ty), dups(refs), validrefs(str, refs, mkarraytype(ty), addarray(refs .first, ty, vals, st)), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ ¬ cyclic(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ ty) ⊦ ty .jtelemtype = abstract_type, ty .jtelemtype = void_type, refs .first = jvmref
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ newref(r, st) → r ≠ jvmref], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ⊦ (addarray(r, ty, vals, st) [r -- _type ] ) = typeval(mkarraytype(ty))])]]