| ¬ (is_array(str, r, addarray(r, ty, vals, st)) ∧ (addarray(r, ty, vals, st)[r -- _type]) .type ≤ mkarraytype(ty)), 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 |
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, is_array(str, r, addarray(r, ty, vals, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ty ≤ ty], [CSIMPSEQ : ⊦ mkarraytype(ty) ≤ mkarraytype(ty0) ↔ ty ≤ ty0], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ⊦ (addarray(r, ty, vals, st) [r -- _type ] ) = typeval(mkarraytype(ty))])]]