(<= (Has-Parameter-Slot $X Door_Opening_Type) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Parameter-Slot Door_Opening_Type) (Inherited-Facet-Value Slot-Value-Type Elevator Door_Opening_Type String) (Inherited-Facet-Value Slot-Cardinality Elevator Door_Opening_Type 1)