Wind first pass

scratches/bootstrap.clj

@@ -8,12 +8,10 @@
 
 (def revenge (ref {:position [0. 0.]
                    :name "Revenge"
-                   :heading (normalize [1.0 1.0])
+                   :heading (normalize [0. 1.0])
                    :slots [{:type :downwind-sail :length 2 :furl 1.0}]
                    :velocity [1. 0.]}))
 
 (reset! ships [virginia-woolfe revenge])
 
 (show-ui)
-
-@tracked-ship