 
 (comment
   (fx-chorus)
+  (fx-distortion)
   (live/jam (var geb))
   (def geb nil)
   )

      (+ (* 1/8 (sin-osc (* 5.01 freq))))
      (+ (* 2 (sin-osc (* 0.5 freq))))
      (clip2 0.7)
      (lpf 1000)
      (hpf 100)
      (* (env-gen (adsr 0.01 0.3 0.9 0.2) (line:kr 1 0 dur) :action FREE))
      (* vol)))


  (some-> midi midi->hz (overchauffeur seconds)))

(defn book [initial]
  (({\G (sample "samples/godel.wav" :start 4000)
     \E (sample "samples/escher.wav")
     \B (sample "samples/bach.wav")}
    initial)))
