 ;; you'll get an lf-tri ugen that oscillates between 165 and 275 Hz
 ;; (165 is 55 below 220, and 275 is 55 above 220)
 (defsynth modulated-freq-tri [freq-bus 0 mid-freq 220 freq-amp 55]
-  (let [freq (+ mid-freq (* (in:ar freq-bus) freq-amp))]
+  (let [freq (+ mid-freq (* (in:kr freq-bus) freq-amp))]
     (out 0 (pan2 (lf-tri freq)))))
 
 

;; Switch the modulated-vol-tri instance to be modulated by the triangle
;; bus as well.
(comment
  (ctl mvt :vol-bus (:id tri-bus))
  )

;; Kill the two things that are making noise


;; Or can re-use them!
(comment
  (def mvt-2 (modulated-vol-tri :tgt later-g sin-bus 110))
  (kill mvt-2)
  )

