| tdname+∃(str0, class), same-subclasses-contains(class, str, str0), okreftype(refval(r), mkclasstype(class), st), junkref(str, r, st) ⊦ junkref(str0, r, st), same-subclasses-contains(st[r -- _type] .type .jtelemtype .class, str, str0) |
⊦ okreftype(val, ty, st) ↔ is_referencevalue(val) ∧ (val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ ty)
tdname+∃(str0, class), same-subclasses-contains(class, str, str0), is_referencevalue(refval(r)) ∧ ( refval(r) .refval ≠ jvmref → refval(r) .refval -- _type ∈ st ∧ is_typevalue(st[refval(r) .refval -- _type]) ∧ st[refval(r) .refval -- _type] .type ≤ mkclasstype(class)), junkref(str, r, st) ⊦ junkref(str0, r, st), same-subclasses-contains(st[r -- _type] .type .jtelemtype .class, str, str0)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, mkclasstype(class), refval(r))]]