age-of-sail/scratches/bootstrap.clj

;; you should be in age-of-sail.core>

(def virginia-woolfe (ref {:position [0. 0.]
                           :name "Virginia Woolfe"
                           :heading (normalize [1.0 1.0])
                           :slots [{:type :downwind-sail :length 2 :furl 1.0}]
                           :velocity [1. 0.]}))

(def revenge (ref {:position [0. 0.]
                   :name "Revenge"
                   :heading (normalize [1.0 1.0])
                   :slots [{:type :downwind-sail :length 2 :furl 1.0}]
                   :velocity [1. 0.]}))

(reset! ships [virginia-woolfe revenge])

(show-ui)

@tracked-ship