| same-subclasses(class, str, str0), class0 ≤ class, tdname+∃(str0, class), ∀ class0. contains(str0, mkclasstype(class), mkclasstype(class0)) → same-subclasses(class0, str, str0) ⊦ same-subclasses(class0, str, str0) |
⊦ same-subclasses(class, str, str0) ∧ class0 ≤ class → same-subclasses(class0, str, str0)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (class, str, str0, class0)]]