(<= (Model-Id $X Counterweight_Guiderail_Model_M01)
(Counterweight_Guiderail_Model_M01 $X))
(<= (Has-Parameter-Slot $X Counterweight_Weight_Limit)
(Counterweight_Guiderail_Model_M01 $X))
(<= (Counterweight_Weight_Limit $X 15000)
(Counterweight_Guiderail_Model_M01 $X))
(<= (Counterweight_Guiderail_Unit_Weight $X 8)
(Counterweight_Guiderail_Model_M01 $X))