i have a function that subdivide a line between a list of points.
(defn subdivide [points] (vec (for [i (range (count points))] (let [A (nth poin