 
 (defn add-synths-to-instrument
   [instrument]
-  (assoc (reduce (fn [a x] (assoc-in a [:piano-keys x :synth] (create-note-synth x)))
-                 instrument
-                 (-> instrument :piano-keys keys))
-    :sound-ready true))
+  (reduce (fn [a x] (assoc-in a [:piano-keys x :synth] (create-note-synth x)))
+          instrument
+          (-> instrument :piano-keys keys)))
 
 (defn play-piano-key
   [instrument freq]

                                                 scale))
     :notes ()
     :w 0 :h 0
     :sound-ready false
     :px-per-ms 0.1
     :scroll-touch-id nil
     :start start


(defn maybe-init-synths
  [instrument]
  (if (sound-ready? instrument)
    instrument
    (add-synths-to-instrument instrument)))

