| st[r -- _type] .type .type = st[r0 -- _type] .type, st[r -- i '] = refval(r0), is_array(str1, r, st), 0 ≤ i, 0 < st[r -- _length] .intval, is_array(str, r, st), i < st[r -- _length] .intval, junkrefs(str, r0 ' + refs1, st[r0 -- _type] .type, st), has_classtype(st[r0 -- _type] .type), ∀ str1, st0, r1, str, refs. # refs < # (r0 + refs1) → ( junkrefs(str, r1 ' + refs, st0[r1 -- _type] .type, st0) → has_classtype(st0[r1 -- _type] .type) ∨ junkrefs(str1, r1 ' + refs, st0[r1 -- _type] .type, st0)) ⊦ r = jvmref, has_classtype(st[r -- _type] .type), junkrefs(str1, r0 ' + refs1, st[r0 -- _type] .type, st) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_arraytype (st[r -- _type] .type) → ¬ is_array(str, r, st)], [CSIMPSEQ : ⊦ is_arraytype(mkarraytype(ty))], [CSIMPSEQ : ⊦ has_classtype(mkarraytype(ty)) ↔ has_classtype(ty)], [CSIMPELIM : ⊦ is_arraytype(ty) → ( ty0 = ty .type ↔ ty = mkarraytype(ty0))])], [EXTRATERMS : (st[r -- _type] .type, ty)]]