#N struct 1004-template float x float y float w array nodes 1004-node ; #N struct 1004-node float y; #N canvas 343 103 1055 689 10; #N canvas 303 409 628 300 \$0-node 0; #X obj 127 112 filledcurve 777 333 1 -5 -5 5 -5 5 5 -5 5; #X obj 25 27 struct \$0-node float y; #X obj 23 165 outlet; #X obj 113 79 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X restore 130 204 pd \$0-node; #N canvas 63 259 834 647 \$0-templates 0; #X text 94 107 constrain y 0 to -150; #X obj 53 19 struct \$0-template float x float y float w array nodes \$0-node; #X obj 51 195 outlet; #X obj 96 88 plot -y y(0:170) nodes 333 w 0 0 15; #X connect 1 0 2 0; #X restore 5 204 pd \$0-templates; #X obj 130 241 unpack s p f; #X obj 298 314 print; #X obj 6 414 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #N canvas 472 360 336 313 \$0-subpatch 0; #X scalar 1004-template 12 0 3 \; 8 \; 18 \; 26 \; 33 \; 47 \; 131 \; 149 \; 122 \; 107 \; 86 \; 96 \; 112 \; 122 \; 137 \; 142 \; 0 \; \;; #X coords 0 0 250 170 250 170 2 0 0; #X restore 10 10 pd \$0-subpatch; #X obj 5 235 route click; #X obj 263 243 bng 15 250 250 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 263 221 route click; #X text 332 273 divide the output by 2...?; #N canvas 0 50 450 250 (subpatch) 0; #X array \$0-array 16 float 1; #A 0 8 18 26 33 47 131 149 122 107 86 96 112 122 137 142 0; #X coords 0 0 15 170 200 140 1 0 0; #X restore 458 15 graph; #X msg 282 366 8 18 26 33 47 131 149 122 107 86 96 112 122 137 142 0; #X obj 282 274 * 0.5; #X obj 6 562 s pd-\$0-subpatch; #X obj 45 429 tgl 15 0 empty empty prevent_infinite_loop 17 7 0 10 -262144 -1 -1 0 1; #X obj 6 505 spigot; #X obj 6 476 delay 1000; #X obj 309 118 r pd-\$0-subpatch; #X obj 309 144 bng 15 250 250 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 83 476 short delays are worse; #X symbolatom 132 375 10 0 0 0 - - -, f 10; #X msg 282 339 add2 \$1 \, bang; #X msg 181 315 set; #X obj 800 202 pointer; #X obj 777 36 loadbang; #X obj 775 12 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X msg 668 299 16; #X obj 668 330 setsize \$0-template nodes; #X obj 777 61 f \$0; #X obj 777 88 t b f f; #X msg 823 121 \; pd-\$1-subpatch clear; #X msg 800 169 traverse pd-\$1-subpatch \, bang; #X obj 668 241 append \$0-template x y w; #X obj 668 181 delay; #X msg 668 214 12 0 3; #X text 211 537 bad \, naughty \, works!!; #X msg 46 374 symbol ...; #X msg 6 537 vis 1 \, mouse 0 0 0 0 \, vis 0; #X obj 668 270 t b p; #X obj 282 485 array set \$0-array; #X connect 0 0 2 0; #X connect 0 0 8 0; #X connect 1 0 6 0; #X connect 2 0 20 0; #X connect 2 2 12 0; #X connect 4 0 14 0; #X connect 4 0 16 0; #X connect 6 0 22 0; #X connect 6 0 4 0; #X connect 6 0 36 0; #X connect 8 0 7 0; #X connect 11 0 39 0; #X connect 12 0 21 0; #X connect 14 0 15 1; #X connect 15 0 37 0; #X connect 16 0 15 0; #X connect 17 0 18 0; #X connect 21 0 11 0; #X connect 22 0 11 0; #X connect 23 0 32 3; #X connect 24 0 28 0; #X connect 25 0 28 0; #X connect 26 0 27 0; #X connect 28 0 29 0; #X connect 29 0 33 0; #X connect 29 1 31 0; #X connect 29 2 30 0; #X connect 31 0 23 0; #X connect 32 0 38 0; #X connect 33 0 34 0; #X connect 34 0 32 0; #X connect 36 0 20 0; #X connect 37 0 13 0; #X connect 38 0 26 0; #X connect 38 1 27 1; #X coords 0 -1 1 1 250 170 2 10 10;