| 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)) ⊦ 0 ≤ j ∧ j < n→i(# vals) → is_referencevalue(vals[i→n(j)]), r = jvmref |
0 ≤ j, tdname+∃(str, class), junkrefs(str, r ' + refs0, mkarraytype(mkclasstype(class)), addarray(r, mkclasstype(class), vals, st)), class∃(str, class), newref(r, st), j < n→i(# vals), ∀ val. val ∈ vals → ¬ junkref(str, val .refval, st) ∧ is_referencevalue(val) ∧ (val .refval ≠ jvmref → st[val .refval -- _type] .type ≤ mkclasstype(class)) ⊦ r = jvmref, vals = [], is_referencevalue(vals[i→n(j)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ # vals = 0 ↔ vals = []], [CSIMPSEQ : ⊦ 0 < n ↔ n ≠ 0], [CSIMPSEQ : 0 ≤ i ⊦ ((* i)) < n→i(n) ↔ i→n(i) < n], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j])]]