2cb0d67b2cfa

--- a/flax.asd	Sun Feb 04 00:02:49 2018 -0500
+++ b/flax.asd	Sun Feb 04 00:51:37 2018 -0500
@@ -22,5 +22,6 @@
                  (:file "drawing")
                  (:module "looms" :serial nil
                   :components
-                  ((:file "001-triangles")))))))
+                  ((:file "001-triangles")
+                   (:file "002-wobbly-lines")))))))
 

--- a/src/looms/002-wobbly-lines.lisp	Sun Feb 04 00:02:49 2018 -0500
+++ b/src/looms/002-wobbly-lines.lisp	Sun Feb 04 00:51:37 2018 -0500
@@ -7,6 +7,7 @@
 
 (define-with-macro (line :conc-name "") points)
 
+
 ;;;; Element Conversion -------------------------------------------------------
 (defun convert (line total-ticks)
   (list (flax.drawing::path (coerce (points line) 'list)
@@ -20,6 +21,7 @@
       (for x :from 0.0 :to (+ 1.0 least-positive-single-float) :by (/ 1.0 segments))
       (collect (coord x 0.5) :result-type 'vector))))
 
+
 ;;;; Tick ---------------------------------------------------------------------
 (defun perturb-line (line)
   (map nil (lambda (c)