'(= (Compensation_Cable_Load_Car_Side_Car_Top ?X) (* (* (Compensation_Cable_Quantity ?X) (Compensation_Cable_Unit_Weight (Elevator.Compensationcable ?X))) (+ (Hoistway_Pit_Depth ?X) (Hoistway_Travel ?X))))
(<= (Has-Constraint $X Compensation_Cable_Load_Car_Top) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Compensation_Cable_Load_Car_Top) (Used-In-Constraint Compensation_Cable_Unit_Weight Compensation_Cable_Load_Car_Top) (Used-In-Constraint Compensation_Cable_Load_Car_Side_Car_Top Compensation_Cable_Load_Car_Top) (Used-In-Constraint Compensation_Cable_Quantity Compensation_Cable_Load_Car_Top) (Used-In-Constraint Hoistway_Pit_Depth Compensation_Cable_Load_Car_Top) (Used-In-Constraint Hoistway_Travel Compensation_Cable_Load_Car_Top)