really a pirate game

scratches/bootstrap.clj

@@ -0,0 +1,16 @@
+;; you should be in space-sim.core>
+
+(def my-ship (ref {:position [0. 0.]
+                   :heading (normalize [1.0 1.0])
+                   :slots [{:type :downwind-sail :length 2 :furl 1.0}]
+                   :velocity [1. 0.]}))
+
+(reset! ships [my-ship])
+
+(start-program)
+@my-ship
+(dosync (alter my-ship assoc :heading (normalize [0. 1.])))
+(stop-program)
+
+
+(show-ui)