                       path))
           [0 0 0])))
 
-;; as well as the velocity at each point along the path, we also need
+;; As well as the velocity at each point along the path, we also need
 ;; how much paint there is falling. Again to keep life simple we are
 ;; going to model this as a linear flow along the path with there
 ;; always being no paint left.

                                      total-distance))]
    (vector-divide-by-const difference-vector time-between)))

;; this calculation will leave off the last points velocity, so for
;; now we can just set it to 0

(defn path-velocities [path total-time]
  (let [total-distance   (path-length path)


;; ## Motion, going through the paces

;; All the points along the generated path should have an associated
;; velocity. To start with we can generate a linear velocity along the
;; path, given a randomised total time to traverse the path and the
;; total length of the path.
