<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css" style="display:none;"> P {margin-top:0;margin-bottom:0;} </style>
</head>
<body dir="ltr">
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Hi,</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
re: make-polyshape</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Very cool. At least three ways to get the coeffs parameter working. I don't why I couldn't figure that out earlier.</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Thanks<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
JIm</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
(with-sound ()
<div> (let ((gen (make-polyshape 400.0 :coeffs (float-vector -1.0 -5.0 18.0 8.0 -48.0 0.0 32.0) )))</div>
<div> (do ((i 0 (+ i 1)))</div>
<div> ((= i 88200))</div>
<div> (outa i (* .5 (polyshape gen 0.25))))))</div>
<div><br>
</div>
<div>(with-sound ()</div>
<div> (let ((gen (make-polyshape 400.0 :coeffs #r(-1.0 -5.0 18.0 8.0 -48.0 0.0 32.0) )))</div>
<div> (do ((i 0 (+ i 1)))</div>
<div> ((= i 88200))</div>
<div> (outa i (* .5 (polyshape gen 0.25))))))</div>
<div><br>
</div>
<div>(with-sound ()</div>
<div> (let ((gen (make-polyshape 400.0 :coeffs (partials->polynomial '(1 1 3 2 6 1) mus-chebyshev-second-kind))))</div>
<div> (do ((i 0 (+ i 1)))</div>
<div> ((= i 88200))</div>
(outa i (* .5 (polyshape gen 0.25))))))<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div>
<div id="appendonsend"></div>
<div style="font-family:Calibri,Helvetica,sans-serif; font-size:12pt; color:rgb(0,0,0)">
<br>
</div>
<hr tabindex="-1" style="display:inline-block; width:98%">
</div>
</body>
</html>