#N canvas 500 48 593 563 12;
#X declare -stdpath ./;
#X floatatom 272 369 5 0 0 0 - dur - 0;
#X floatatom 217 369 5 0 0 0 - pitch - 0;
#X text 41 12 ADDITIVE SYNTHESIS;
#X text 174 370 pitch;
#X obj 163 481 output~;
#X text 15 41 This patch demonstrates using an abstraction \, "partial"
\, to make a simple additive synthesis instrument originally from Jean-Claude
Risset., f 78;
#X obj 84 280 bng 20 250 50 0 empty empty empty 0 -6 0 8 #dfdfdf #000000
#000000;
#X obj 402 207 declare -stdpath ./;
#X text 351 508 updated for Pd version 0.52;
#X msg 84 312 all bang;
#X obj 163 436 clone 11 partial;
#X msg 217 404 all \$1;
#X msg 272 404 all \$1;
#X obj 360 324 text define -k partials;
#A set 0 1 1 0.56 0 \; 1 0.67 0.9 0.56 1 \; 2 1 0.65 0.92 0 \; 3 1.8
0.55 0.92 1.7 \; 4 2.67 0.32 1.19 0 \; 5 1.67 0.35 1.7 0 \; 6 1.46
0.25 2 0 \; 7 1.33 0.2 2.74 0 \; 8 1.33 0.15 3 0 \; 9 1 0.1 3.76 0
\; 10 1.33 0.075 4.07 0;
#X obj 163 322 text sequence partials;
#X msg 163 288 line 0 \, bang;
#X text 19 282 play -->;
#X obj 272 224 loadbang;
#X msg 272 260 \; pitch 72 \; dur 40;
#X text 317 362 duration (tenths of seconds), f 17;
#X text 15 81 We use [clone] to create 11 copies of the abstraction
and send list messages from a [text] object whose arguments are: instance
number \, amplitude \, relative duration \, relative frequency and
detuning frequency - click [text define] to see this. The usage of
[text] is merely cosmetical as you can more easily read the lines than
if it were a single or many messages. The messages are "dumped" with
[text sequence]. You set absolute duration and pitch using the number
box controls below. Click the bang to make sound., f 78;
#X connect 0 0 12 0;
#X connect 1 0 11 0;
#X connect 6 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 4 0;
#X connect 10 0 4 1;
#X connect 11 0 10 1;
#X connect 12 0 10 2;
#X connect 14 0 10 0;
#X connect 15 0 14 0;
#X connect 17 0 15 0;
#X connect 17 0 18 0;
