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 [email protected] https://cm-mail.stanford.edu/mailman/listinfo/cmdist
