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