'(Member (Door_Opening_Type ?X) (Setof side center))
(<= (Has-Constraint $X Door_Opening_Type_C) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Door_Opening_Type_C) (Used-In-Constraint Door_Opening_Type Door_Opening_Type_C)