     * Overtone
 "
   (:use overtone.live)
-  (:require [codemash.graphs :as graph]
-            [codemash.art :as art]
+  (:require [codemash.art :as art]
             [codemash.voice :as voice]))
 
 (use 'overtone.live)

(buffer-write! bass-notes-b    (take 128 (cycle (map note bass-score))))
(buffer-write! bass-notes-b    (take 128 (cycle (map #(+ -12 (note %)) score))))

(buffer-write! score-b    (take 128 (cycle (map #(+ 0 ( note %)) score))))
(buffer-write! duration-b (take 128 (cycle duration)))

(ctl root-trigger :rate 100)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;Go forth and make sounds ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(do (voice/the-end) (println art/end))
