'(=< (Crosshead_Bending_Moment ?X) (Sling_Bending_Moment_Maximum (Elevator.Sling ?X)))
(<= (Has-Constraint $X C-26) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint C-26) (Used-In-Constraint Crosshead_Bending_Moment C-26) (Used-In-Constraint Sling_Bending_Moment_Maximum C-26)