     29 "D3"
     42 "Eb4")
 
-  (is (true? (-> (st/check-var #'audio/semitone->note) :result))))
+  (let [res (-> (st/check-var #'audio/semitone->note) :result)]
+    (is (true? res) res)))

(om/defui ChordMetronome
  Object
  (initLocalState [_]
    {:note nil
     :interval 60})

  (render [this]

    "D#4" 42
    "C8" 87)

  (let [res (-> (st/check-var #'audio/note->semitone) :result)]
    (is (true? res) res)))

(deftest test-semitone->note
  (are [note semitone] (= (audio/semitone->note note) semitone)
