     [center-x center-y theta magnitude]
     [(+ center-x (* magnitude (cos theta)))
      (+ center-y (* magnitude (sin theta)))])
+
+  (defn point-dist
+    "Returns the euclidean distance between two points"
+    [[x1 y1] [x2 y2]]
+    (dist x1 y1 x2 y2))

      nil
      (/ (- y2 y1) (- x2 x1))))

  (defn y-intercept
    "Returns the y-intercept of a line with a given slope
     and one point on the line (x1, y1)"

                angle (+ angle (if (neg? x-delta) PI 0))]
            (mod angle TWO-PI))))))

  (defn point-angle
    "Returns the angle between two points in radians"
    [[x1 y1] [x2 y2]]
    (angle x1 y1 x2 y2))

  (defn angular-coords
    "Returns an [x y] vector representing a point that is
     offset from a center ([center-x center-y]) by a given
