'(>= (Motor_Horsepower (Elevator.Motor ?X)) (Motor_Horsepower_Required ?X))
(<= (Has-Constraint $X Motor_Horsepower_C) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Motor_Horsepower_C) (Used-In-Constraint Motor_Horsepower Motor_Horsepower_C) (Used-In-Constraint Motor_Horsepower_Required Motor_Horsepower_C)