| st[r -- _type] = typeval(ty), tdname+∃(str0, class), same-subclasses-contains(class, str, str0), junkref(str, r, st), r -- _type ∈ st, is_classtype(ty), ty .class ≤ class, r ∈ st ⊦ r = jvmref, class = `java.lang.Object' .class, junkref(str0, r, st), same-subclasses-contains(ty .class, str, str0) |
ty = mkclasstype(class0), st[r -- _type] = typeval(ty), tdname+∃(str0, class), same-subclasses-contains(class, str, str0), junkref(str, r, st), r -- _type ∈ st, is_classtype(ty), class0 ≤ class, r ∈ st ⊦ r = jvmref, class = `java.lang.Object' .class, junkref(str0, r, st), same-subclasses-contains(class0, str, str0)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_classtype(ty) → ( class = ty .class ↔ ty = mkclasstype(class))])], [EXTRATERMS : (ty, class0)]]