'(=> (= (Machine_Beam_Support_Type ?X) steel) (= (Machine_Beam_Support_Bottom_To_Machine_Room_Top ?X) (Machine_Beam_Support_Bottom_To_Machine_Room_Top_Spec ?X)))
(<= (Has-Constraint $X Machine_Beam_Support_Bottom_To_Machine_Room_Top_C) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Machine_Beam_Support_Bottom_To_Machine_Room_Top_C) (Used-In-Constraint Machine_Beam_Support_Bottom_To_Machine_Room_Top_Spec Machine_Beam_Support_Bottom_To_Machine_Room_Top_C) (Used-In-Constraint Machine_Beam_Support_Type Machine_Beam_Support_Bottom_To_Machine_Room_Top_C) (Used-In-Constraint Machine_Beam_Support_Bottom_To_Machine_Room_Top Machine_Beam_Support_Bottom_To_Machine_Room_Top_C)