| ty .jtelemtype .class = `java.lang.Object' .class, same-subclasses-contains(`java.lang.Object' .class, str, str0), junkref(str, r, st), has_classtype(st[r -- _type] .type), ty .jtdims < st[r -- _type] .type .jtdims, has_classtype(ty), is_valid_ref(str0, r, st), type∃(str0, st[r -- _type] .type) ⊦ r = jvmref, tdname+∃(str0, st[r -- _type] .type .jtelemtype .class), junkref(str0, r, st), same-subclasses-contains(st[r -- _type] .type .jtelemtype .class, str, str0), st[r -- _type] .type .jtelemtype .class ≤ `java.lang.Object' .class |
⊦ type∃(str, ty) ↔ ¬ has_classtype(ty) ∨ tdname+∃(str, ty .jtclass)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ty .jtclass = ty .jtelemtype .class])], [EXTRATERMS : (st[r -- _type] .type, str0)]]