poohbar
(let [[p1 p2] my-line [x1 y1] p1 [x2 y2] p2] (println "Line from (" x1 "," y1 ") to (" x2 ", " y2 ")"))