[CM] polyoid-partial-amps-and-phases gen

[James Hearon]

Hi,
I was looking at "other generators" in generators.scm, and became confused a bit by the example:

(with-sound (:clipped #f :channels 2)
  (let* ((samps 44100)
(n 10)
(gen (make-noid 1.0 n 'min-peak))
(gen2 (make-oscil n ((polyoid-partial-amps-and-phases gen) (- (length (polyoid-partial-amps-and-phases gen)) 1)))))
    (do ((i 0 (+ i 1)))
((= i samps))
      (outa i (noid gen))
      (outb i (oscil gen2)))))

I can do something like:
         (gen2 (make-oscil n 0.25)) )

to get an output, but seems like that polyoid-partial-amps-and-phases gen may be something old or no longer in use?  But the example seems interesting in terms of phase so was trying to unravel it to try to understand what it was meant to demonstrate.

Regards,
Jim
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20211001/abfb730e/attachment.html>