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