'(=> (= (Car_Intercom_Spec ?X) yes) (= (Model-Id (Elevator.Intercom ?X)) Car_Intercom_M02))
(<= (Has-Constraint $X Car_Intercom_C03) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Car_Intercom_C03) (Used-In-Constraint Car_Intercom_Spec Car_Intercom_C03) (Used-In-Constraint Model-Id Car_Intercom_C03)