| newref(r, st), class∃(str, class), junkrefs(str, r ' + refs0, mkarraytype(mkclasstype(class)), addarray(r, mkclasstype(class), vals, st)), tdname+∃(str, class), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ mkclasstype(class)) ⊦ r = jvmref, is_arrayref(r, n→i(# vals), addarray(r, mkclasstype(class), vals, st)) |
⊦ i ≤ n→i(# vals) → is_arrayref(r, i, addarray(r, ty, vals, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ n→i(m) ≤ n→i(n) ↔ m ≤ n], [CSIMPSEQ : ⊦ ¬ m ≤ n ↔ n < m], [CSIMPSEQ : ⊦ ¬ n < n])], [EXTRATERMS : (st, vals, mkclasstype(class), n→i(# vals), r)]]