   (:require-macros [cljs.core.async.macros :refer [go]])
   (:require [goog.dom :as dom]
             [goog.events :as events]
-            [cljs.core.async :refer [<! put! chan timeout merge sliding-buffer]]
+            [cljs.core.async :refer [<! put! chan timeout merge sliding-buffer close!]]
             [musicbox.util :as util]
             [musicbox.scales :as scales]))
 

               (recur instrument)))))))

  (go
   (<! c-app-state)
   (loop [instrument (update-size (create-instrument (scales/c-minor)) canvas-id)]
     (>! c-instrument instrument)
     (let [[data c] (alts! [c-touch-start c-touch-end
                            c-orientation-change])]
       (condp = c
         c-orientation-change (recur (update-size instrument canvas-id))
         (recur (reduce fire-event-on-instrument
                        instrument

             {:light "#D35E4C" :dark "#692B22"}
             {:light "#E18C43" :dark "#6B401C"}
             {:light "#E1B040" :dark "#69511A"}])

(defn piano-key-width
  [piano-keys w]
