Skip to content

Commit

Permalink
Muck around with the harmonics of the canon.
Browse files Browse the repository at this point in the history
  • Loading branch information
ctford committed Jul 24, 2012
1 parent 12e0ec8 commit a2b67f6
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/goldberg/variations/canone_alla_quarta.clj
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@
;(midi->hz 69)

(defn play [notes]
(let [play-at (fn [[ms midi]] (at ms (bell (midi->hz midi) 4.0 0.0)))]
(let [play-at (fn [[ms midi]] (at ms (bell (midi->hz midi) 3.5 0.1 0.6 0.0)))]
(->> notes (map play-at) dorun)
notes))

Expand Down

0 comments on commit a2b67f6

Please sign in to comment.