'(=> (= (Car_Lantern_Spec ?X) no) (= (Model-Id (Elevator.Lantern ?X)) Car_Lantern_M01))
(<= (Has-Constraint $X Car_Lantern_C02) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Car_Lantern_C02) (Used-In-Constraint Car_Lantern_Spec Car_Lantern_C02) (Used-In-Constraint Model-Id Car_Lantern_C02)