Here's an example using polywave: (let ((g (make-polywave 100 '(1 1 3 1/3 5 1/5 7 1/7 9 1/9) :type mus-chebyshev-second-kind))) (with-sound () (do ((i 0 (+ i 1))) ((= i 44100)) (outa i (polywave g)))))
You need to set the type to the second kind to get a sum of sines, rather than cosines. There are examples of the other generators in snd-test.scm. _______________________________________________ Cmdist mailing list Cmdist@ccrma.stanford.edu https://cm-mail.stanford.edu/mailman/listinfo/cmdist