1(defmethod {print point} RIGHT 2 (lambda (self) 3 (with ((point x y) self) 4 (printf "{ChangeMe x:~a y:~a}~n" x y))))