'(=> (= (Model-Id (Elevator.Machine ?X)) Machine_Model_M01) (Member (Model-Id (Elevator.Motor ?X)) (Setof Motor_Model_M01 Motor_Model_M02)))