| r -- _type ∈ st, is_typevalue(st[r -- _type]), is_classtype(st[r -- _type] .type), is_obj(r, st[r -- _type] .type .class, st), is_array(r, st), r ∈ st ⊦ r = jvmref |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_array(r, st) → st[r -- _type] .type ≠ mkclasstype(class)], [CSIMPELIM : ⊦ is_classtype(ty) → ( class = ty .class ↔ ty = mkclasstype(class))])], [EXTRATERMS : (st[r -- _type] .type, class)]]