| 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, st) ∧ st[r -- _type] .type ≤ ty → ( junkrefs(str, r ' + refs, ty, st) ↔ refs ≠ [] ∧ (∃ i. 0 ≤ i ∧ i < st[r -- _length] .intval ∧ is_referencevalue(st[r -- i ']) ∧ refs .first = st[r -- i '] .refval ∧ junkrefs(str, refs, st[r -- _type] .type .type, st)))
¬ (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
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), refs0 ≠ [] ∧ (∃ i. 0 ≤ i ∧ i < (addarray(r, ty, vals, st)[r -- _length]) .intval ∧ is_referencevalue(addarray(r, ty, vals, st)[r -- i ']) ∧ refs0 .first = (addarray(r, ty, vals, st)[r -- i ']) .refval ∧ junkrefs(str, refs0, (addarray(r, ty, vals, st)[r -- _type]) .type .type, 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
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addarray(r, ty, vals, st), mkarraytype(ty), refs0, r, str)]]