(<= (Model-Id $X Crosshead_Model_M03) (Crosshead_Model_M03 $X)) (<= (Has-Parameter-Slot $X Crosshead_Height) (Crosshead_Model_M03 $X)) (<= (Crosshead_Height $X 8.0) (Crosshead_Model_M03 $X))