(setq pt1 '(0.0 0.0 0.0)) how do I select an entity based on pt1 and be able to use that for an entget assoc car 10 for the object