HomeAboutCodePastes

Paste on 2021-11-05T17:24:48

(defun get-closest (p1 points)
  (loop :for p2 :in points
        :minimize (distance p1 p2)))

plain