Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
executable file 1419 lines (1418 sloc) 33 KB
#N canvas 242 45 964 330 10;
#X obj 16 6 inlet~;
#X obj 16 59 outlet~;
#X obj 588 116 s \$0-gain;
#N canvas 0 22 774 606 rgb 0;
#X obj 296 207 * 256;
#X obj 344 180 * 256;
#X obj 346 201 * 256;
#X obj 312 270 +;
#X obj 298 228 t b f;
#X obj 312 293 +;
#X obj 346 223 t b f;
#X obj 252 186 int;
#X msg 263 68 0;
#X obj 252 163 * -1;
#X obj 296 162 * -1;
#X obj 343 158 * -1;
#X obj 103 123 vsl 10 40 1 255 0 0 ertteetyeyterttretretrrtrtrtrtrt
hhghghghghghghgggggh empty 0 -8 0 10 -4160 -262144 -1 0 0;
#X obj 115 123 vsl 10 40 1 255 0 0 ertteetyeyterttretretrrtrtrtrtrt
hhghghghghghghgggggh empty 0 -8 0 10 -4034 -262144 -1 0 0;
#X obj 127 123 vsl 10 40 1 255 0 0 ertteetyeyterttretretrrtrtrtrtrt
hhghghghghghghgggggh empty 0 -8 0 10 -258113 -262144 -1 0 0;
#X obj 252 144 int;
#X obj 293 142 int;
#X obj 342 138 int;
#N canvas 0 22 474 324 list-enumerate 0;
#X obj 107 63 t a b;
#N canvas 473 338 454 304 count 0;
#X obj 131 154 f 0;
#X obj 156 153 + 1;
#X msg 147 133 0;
#X obj 131 183 outlet;
#X obj 131 59 inlet;
#X obj 131 96 b;
#X obj 178 61 inlet;
#X obj 178 98 b;
#X connect 0 0 1 0;
#X connect 0 0 3 0;
#X connect 1 0 0 1;
#X connect 2 0 0 1;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X restore 186 155 pd count;
#X obj 107 113 t a b;
#X obj 107 33 inlet;
#X obj 107 181 list prepend;
#X obj 126 264 outlet;
#X obj 184 264 outlet;
#N canvas 0 22 537 411 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 110 88 pd drip;
#X obj 68 155 list prepend color;
#X msg 69 135 \$1 0 28;
#X connect 0 0 7 0;
#X connect 0 1 1 1;
#X connect 1 0 4 1;
#X connect 2 0 9 0;
#X connect 2 1 1 0;
#X connect 3 0 0 0;
#X connect 4 0 5 0;
#X connect 7 0 2 0;
#X connect 7 1 6 0;
#X connect 8 0 4 0;
#X connect 9 0 8 0;
#X restore 294 389 pd list-enumerate;
#X obj 299 419 s \$0-controls;
#X msg 306 356 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1 \$1
\$1 \$1 \$1;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 5 0 20 0;
#X connect 6 0 3 0;
#X connect 6 1 5 1;
#X connect 7 0 3 0;
#X connect 8 0 12 0;
#X connect 8 0 13 0;
#X connect 8 0 14 0;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 1 0;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 9 0;
#X connect 16 0 10 0;
#X connect 17 0 11 0;
#X connect 18 0 19 0;
#X connect 20 0 18 0;
#X coords 0 -1 1 1 40 70 1 100 100;
#X restore 61 238 pd rgb;
#X obj 658 6 inlet modulation-add;
#X obj 786 6 inlet modulation-multiply;
#X obj 480 8 r \$0-values;
#X obj 659 26 list prepend add;
#X obj 787 27 list prepend mul;
#X text 110 29 outlet audio~;
#X text 104 14 inlets audio~ \, control \, add \, multiply;
#X obj 369 13 inlet controls;
#X obj 368 47 s \$0-controls;
#N canvas 47 74 1072 591 modulate.oOo..oOo..oOo.. 0;
#X obj 101 271 +;
#X obj 101 250 t b f;
#X obj 82 82 route 0 1 2 3 4 5 6 7;
#X obj 244 216 route 0 1 2 3 4 5 6 7;
#X obj 138 271 +;
#X obj 138 250 t b f;
#X obj 175 271 +;
#X obj 175 250 t b f;
#X obj 212 271 +;
#X obj 212 250 t b f;
#X obj 248 271 +;
#X obj 248 250 t b f;
#X obj 286 271 +;
#X obj 286 250 t b f;
#X obj 323 271 +;
#X obj 323 250 t b f;
#X obj 360 271 +;
#X obj 360 250 t b f;
#X obj 61 8 inlet;
#X obj 99 490 outlet;
#X obj 155 486 outlet;
#X obj 208 489 outlet;
#X obj 264 489 outlet;
#X obj 318 486 outlet;
#X obj 370 486 outlet;
#X obj 425 485 outlet;
#X obj 492 484 outlet;
#X obj 78 409 clip 0 1;
#X obj 132 411 clip 0 1;
#X obj 186 412 clip 0 1;
#X obj 240 414 clip 0 1;
#X obj 294 416 clip 0 1;
#X obj 348 418 clip 0 1;
#X obj 402 419 clip 0 1;
#X obj 456 421 clip 0 1;
#X obj 418 177 route add mul;
#X obj 117 332 t b f;
#X obj 156 335 t b f;
#X obj 193 335 t b f;
#X obj 230 335 t b f;
#X obj 266 335 t b f;
#X obj 304 335 t b f;
#X obj 341 335 t b f;
#X obj 378 335 t b f;
#X obj 118 356 * 1;
#X obj 156 356 * 1;
#X obj 193 356 * 1;
#X obj 231 355 * 1;
#X obj 266 356 * 1;
#X obj 304 356 * 1;
#X obj 341 356 * 1;
#X obj 378 356 * 1;
#X obj 397 275 route 0 1 2 3 4 5 6 7;
#X obj 550 262 +;
#X obj 550 241 t b f;
#X obj 587 262 +;
#X obj 587 241 t b f;
#X obj 624 262 +;
#X obj 624 241 t b f;
#X obj 661 262 +;
#X obj 661 241 t b f;
#X obj 697 262 +;
#X obj 697 241 t b f;
#X obj 735 262 +;
#X obj 735 241 t b f;
#X obj 772 262 +;
#X obj 772 241 t b f;
#X obj 809 262 +;
#X obj 809 241 t b f;
#X obj 548 481 outlet;
#X obj 604 477 outlet;
#X obj 657 480 outlet;
#X obj 713 480 outlet;
#X obj 767 477 outlet;
#X obj 819 477 outlet;
#X obj 874 476 outlet;
#X obj 941 475 outlet;
#X obj 527 400 clip 0 1;
#X obj 581 402 clip 0 1;
#X obj 635 403 clip 0 1;
#X obj 689 405 clip 0 1;
#X obj 743 407 clip 0 1;
#X obj 797 409 clip 0 1;
#X obj 851 410 clip 0 1;
#X obj 905 412 clip 0 1;
#X obj 867 168 route add mul;
#X obj 566 323 t b f;
#X obj 605 326 t b f;
#X obj 642 326 t b f;
#X obj 679 326 t b f;
#X obj 715 326 t b f;
#X obj 753 326 t b f;
#X obj 790 326 t b f;
#X obj 827 326 t b f;
#X obj 567 347 * 1;
#X obj 605 347 * 1;
#X obj 642 347 * 1;
#X obj 680 346 * 1;
#X obj 715 347 * 1;
#X obj 753 347 * 1;
#X obj 790 347 * 1;
#X obj 827 347 * 1;
#X obj 693 206 route 8 9 10 11 12 13 14 5;
#X obj 846 266 route 8 9 10 11 12 13 14 15;
#X msg 79 110 \$1 20;
#X msg 92 130 \$1 20;
#X msg 120 111 \$1 20;
#X msg 133 131 \$1 20;
#X msg 161 110 \$1 20;
#X msg 174 130 \$1 20;
#X msg 202 111 \$1 20;
#X msg 215 131 \$1 20;
#X obj 92 171 line 0 1;
#X obj 109 194 line 0 1;
#X obj 149 166 line 0 1;
#X obj 166 189 line 0 1;
#X obj 207 163 line 0 1;
#X obj 224 186 line 0 1;
#X obj 264 158 line 0 1;
#X obj 281 181 line 0 1;
#X msg 501 51 \$1 20;
#X msg 514 71 \$1 20;
#X msg 542 52 \$1 20;
#X msg 555 72 \$1 20;
#X msg 583 51 \$1 20;
#X msg 596 71 \$1 20;
#X msg 624 52 \$1 20;
#X msg 637 72 \$1 20;
#X obj 512 111 line 0 1;
#X obj 571 107 line 0 1;
#X obj 588 130 line 0 1;
#X obj 629 104 line 0 1;
#X obj 646 127 line 0 1;
#X obj 686 99 line 0 1;
#X obj 703 122 line 0 1;
#X obj 504 22 route 8 9 10 11 12 13 14 15;
#X obj 530 132 line 0 1;
#X obj 845 94 list trim;
#X obj 849 72 inlet;
#X connect 0 0 44 0;
#X connect 1 0 0 0;
#X connect 1 1 0 1;
#X connect 2 0 104 0;
#X connect 2 1 105 0;
#X connect 2 2 106 0;
#X connect 2 3 107 0;
#X connect 2 4 108 0;
#X connect 2 5 109 0;
#X connect 2 6 110 0;
#X connect 2 7 111 0;
#X connect 3 0 0 0;
#X connect 3 1 4 0;
#X connect 3 2 6 0;
#X connect 3 3 8 0;
#X connect 3 4 10 0;
#X connect 3 5 12 0;
#X connect 3 6 14 0;
#X connect 3 7 16 0;
#X connect 4 0 45 0;
#X connect 5 0 4 0;
#X connect 5 1 4 1;
#X connect 6 0 46 0;
#X connect 7 0 6 0;
#X connect 7 1 6 1;
#X connect 8 0 47 0;
#X connect 9 0 8 0;
#X connect 9 1 8 1;
#X connect 10 0 48 0;
#X connect 11 0 10 0;
#X connect 11 1 10 1;
#X connect 12 0 49 0;
#X connect 13 0 12 0;
#X connect 13 1 12 1;
#X connect 14 0 50 0;
#X connect 15 0 14 0;
#X connect 15 1 14 1;
#X connect 16 0 51 0;
#X connect 17 0 16 0;
#X connect 17 1 16 1;
#X connect 18 0 2 0;
#X connect 18 0 135 0;
#X connect 27 0 19 0;
#X connect 28 0 20 0;
#X connect 29 0 21 0;
#X connect 30 0 22 0;
#X connect 31 0 23 0;
#X connect 32 0 24 0;
#X connect 33 0 25 0;
#X connect 34 0 26 0;
#X connect 35 0 3 0;
#X connect 35 1 52 0;
#X connect 36 0 44 0;
#X connect 36 1 44 1;
#X connect 37 0 45 0;
#X connect 37 1 45 1;
#X connect 38 0 46 0;
#X connect 38 1 46 1;
#X connect 39 0 47 0;
#X connect 39 1 47 1;
#X connect 40 0 48 0;
#X connect 40 1 48 1;
#X connect 41 0 49 0;
#X connect 41 1 49 1;
#X connect 42 0 50 0;
#X connect 42 1 50 1;
#X connect 43 0 51 0;
#X connect 43 1 51 1;
#X connect 44 0 27 0;
#X connect 45 0 28 0;
#X connect 46 0 29 0;
#X connect 47 0 30 0;
#X connect 48 0 31 0;
#X connect 49 0 32 0;
#X connect 50 0 33 0;
#X connect 51 0 34 0;
#X connect 52 0 36 0;
#X connect 52 1 37 0;
#X connect 52 2 38 0;
#X connect 52 3 39 0;
#X connect 52 4 40 0;
#X connect 52 5 41 0;
#X connect 52 6 42 0;
#X connect 52 7 43 0;
#X connect 53 0 94 0;
#X connect 54 0 53 0;
#X connect 54 1 53 1;
#X connect 55 0 95 0;
#X connect 56 0 55 0;
#X connect 56 1 55 1;
#X connect 57 0 96 0;
#X connect 58 0 57 0;
#X connect 58 1 57 1;
#X connect 59 0 97 0;
#X connect 60 0 59 0;
#X connect 60 1 59 1;
#X connect 61 0 98 0;
#X connect 62 0 61 0;
#X connect 62 1 61 1;
#X connect 63 0 99 0;
#X connect 64 0 63 0;
#X connect 64 1 63 1;
#X connect 65 0 100 0;
#X connect 66 0 65 0;
#X connect 66 1 65 1;
#X connect 67 0 101 0;
#X connect 68 0 67 0;
#X connect 68 1 67 1;
#X connect 77 0 69 0;
#X connect 78 0 70 0;
#X connect 79 0 71 0;
#X connect 80 0 72 0;
#X connect 81 0 73 0;
#X connect 82 0 74 0;
#X connect 83 0 75 0;
#X connect 84 0 76 0;
#X connect 85 0 102 0;
#X connect 85 1 103 0;
#X connect 86 0 94 0;
#X connect 86 1 94 1;
#X connect 87 0 95 0;
#X connect 87 1 95 1;
#X connect 88 0 96 0;
#X connect 88 1 96 1;
#X connect 89 0 97 0;
#X connect 89 1 97 1;
#X connect 90 0 98 0;
#X connect 90 1 98 1;
#X connect 91 0 99 0;
#X connect 91 1 99 1;
#X connect 92 0 100 0;
#X connect 92 1 100 1;
#X connect 93 0 101 0;
#X connect 93 1 101 1;
#X connect 94 0 77 0;
#X connect 95 0 78 0;
#X connect 96 0 79 0;
#X connect 97 0 80 0;
#X connect 98 0 81 0;
#X connect 99 0 82 0;
#X connect 100 0 83 0;
#X connect 101 0 84 0;
#X connect 102 0 53 0;
#X connect 102 1 55 0;
#X connect 102 2 57 0;
#X connect 102 3 59 0;
#X connect 102 4 61 0;
#X connect 102 5 63 0;
#X connect 102 6 65 0;
#X connect 102 7 67 0;
#X connect 103 0 86 0;
#X connect 103 1 87 0;
#X connect 103 2 88 0;
#X connect 103 3 89 0;
#X connect 103 4 90 0;
#X connect 103 5 91 0;
#X connect 103 6 92 0;
#X connect 103 7 93 0;
#X connect 104 0 112 0;
#X connect 105 0 113 0;
#X connect 106 0 114 0;
#X connect 107 0 115 0;
#X connect 108 0 116 0;
#X connect 109 0 117 0;
#X connect 110 0 118 0;
#X connect 111 0 119 0;
#X connect 112 0 1 0;
#X connect 113 0 5 0;
#X connect 114 0 7 0;
#X connect 115 0 9 0;
#X connect 116 0 11 0;
#X connect 117 0 13 0;
#X connect 118 0 15 0;
#X connect 119 0 17 0;
#X connect 120 0 128 0;
#X connect 121 0 136 0;
#X connect 122 0 129 0;
#X connect 123 0 130 0;
#X connect 124 0 131 0;
#X connect 125 0 132 0;
#X connect 126 0 133 0;
#X connect 127 0 134 0;
#X connect 128 0 54 0;
#X connect 129 0 58 0;
#X connect 130 0 60 0;
#X connect 131 0 62 0;
#X connect 132 0 64 0;
#X connect 133 0 66 0;
#X connect 134 0 68 0;
#X connect 135 0 120 0;
#X connect 135 1 121 0;
#X connect 135 2 122 0;
#X connect 135 3 123 0;
#X connect 135 4 124 0;
#X connect 135 5 125 0;
#X connect 135 6 126 0;
#X connect 135 7 127 0;
#X connect 136 0 56 0;
#X connect 137 0 35 0;
#X connect 137 0 85 0;
#X connect 138 0 137 0;
#X restore 482 68 pd modulate.oOo..oOo..oOo..;
#X obj 529 161 s \$0-bitdepth;
#X obj 558 137 s \$0-samplerate;
#X msg 402 235 bitdepth samplerate gain;
#X msg 602 232 1 1 0.49;
#N canvas 237 55 667 704 workings 0;
#X obj 130 590 outlet~;
#X obj 218 448 r \$0-gain;
#N canvas 0 22 466 316 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
#X obj 20 130 +;
#X obj 98 87 log;
#X obj 194 84 log;
#X obj 123 123 t b f;
#X obj 123 145 -;
#X obj 20 183 outlet;
#X obj 20 19 inlet;
#X obj 98 23 inlet;
#X obj 194 24 inlet;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 1 1;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 193 527 pd rh_scalelog;
#X msg 265 494 0.1;
#X msg 311 494 10;
#X obj 73 187 inlet~;
#X obj 106 274 wrap~;
#X obj 75 317 -~;
#X obj 77 236 *~ 65536;
#X obj 75 339 /~ 65536;
#N canvas 0 22 466 316 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
#X obj 20 130 +;
#X obj 98 87 log;
#X obj 194 84 log;
#X obj 123 123 t b f;
#X obj 123 145 -;
#X obj 20 183 outlet;
#X obj 20 19 inlet;
#X obj 98 23 inlet;
#X obj 194 24 inlet;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 1 1;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 166 260 pd rh_scalelog;
#X msg 284 227 65536;
#X msg 238 227 1;
#X obj 137 371 samphold~;
#X obj 323 285 phasor~ 4400;
#N canvas 0 22 466 316 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
#X obj 20 130 +;
#X obj 98 87 log;
#X obj 194 84 log;
#X obj 123 123 t b f;
#X obj 123 145 -;
#X obj 20 183 outlet;
#X obj 20 19 inlet;
#X obj 98 23 inlet;
#X obj 194 24 inlet;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 1 1;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 321 259 pd rh_scalelog;
#X msg 439 226 44009;
#X msg 391 225 512;
#X obj 135 563 *~;
#X obj 165 127 r \$0-bitdepth;
#X obj 329 157 r \$0-samplerate;
#X obj 167 173 expr pow($f1 \, 4);
#X obj 265 466 r \$0-loadbang;
#X obj 393 198 r \$0-loadbang;
#X obj 238 199 r \$0-loadbang;
#X connect 1 0 2 0;
#X connect 2 0 18 1;
#X connect 3 0 2 1;
#X connect 4 0 2 2;
#X connect 5 0 8 0;
#X connect 6 0 7 1;
#X connect 7 0 9 0;
#X connect 8 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 13 0;
#X connect 10 0 8 1;
#X connect 10 0 9 1;
#X connect 11 0 10 2;
#X connect 12 0 10 1;
#X connect 13 0 18 0;
#X connect 14 0 13 1;
#X connect 15 0 14 0;
#X connect 16 0 15 2;
#X connect 17 0 15 1;
#X connect 18 0 0 0;
#X connect 19 0 21 0;
#X connect 20 0 15 0;
#X connect 21 0 10 0;
#X connect 22 0 3 0;
#X connect 22 0 4 0;
#X connect 23 0 17 0;
#X connect 23 0 16 0;
#X connect 24 0 12 0;
#X connect 24 0 11 0;
#X restore 18 30 pd workings;
#X obj 645 165 loadbang;
#X obj 645 189 t b b;
#X obj 674 214 s \$0-loadbang;
#X obj 125 129 hsl 60 10 0 1 0 0 \$0-a \$0-ra bitdepth -2 -7 0 10 -54745
-262144 -355 0 1;
#X obj 125 152 hsl 60 10 0 1 0 0 \$0-c \$0-rc gain -2 -7 0 10 -54745
-262144 -355 0 1;
#X obj 212 129 hsl 60 10 0 1 0 0 \$0-b \$0-rb samplerate -2 -7 0 10
-54745 -262144 -355 0 1;
#X obj 105 126 cnv 12 15 13 empty empty 0 1 6 0 12 -33289 -262144 0
;
#X obj 105 149 cnv 12 15 13 empty empty 2 1 6 0 12 -33289 -262144 0
;
#X obj 192 126 cnv 12 15 13 empty empty 1 1 6 0 12 -33289 -262144 0
;
#N canvas 361 43 798 581 list-functions 0;
#N canvas 0 22 462 312 list-enumerate 0;
#X obj 107 63 t a b;
#N canvas 473 338 454 304 count 0;
#X obj 131 154 f 0;
#X obj 156 153 + 1;
#X msg 147 133 0;
#X obj 131 183 outlet;
#X obj 131 59 inlet;
#X obj 131 96 b;
#X obj 178 61 inlet;
#X obj 178 98 b;
#X connect 0 0 1 0;
#X connect 0 0 3 0;
#X connect 1 0 0 1;
#X connect 2 0 0 1;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X restore 186 155 pd count;
#X obj 107 113 t a b;
#X obj 107 33 inlet;
#X obj 107 181 list prepend;
#X obj 107 209 outlet;
#X obj 165 209 outlet;
#N canvas 0 22 537 411 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 110 88 pd drip;
#X obj 76 154 list prepend label;
#X connect 0 0 7 0;
#X connect 0 1 1 1;
#X connect 1 0 4 1;
#X connect 2 0 8 0;
#X connect 2 1 1 0;
#X connect 3 0 0 0;
#X connect 4 0 5 0;
#X connect 7 0 2 0;
#X connect 7 1 6 0;
#X connect 8 0 4 0;
#X restore 37 184 pd list-enumerate;
#X obj 37 230 s \$0-controls;
#N canvas 0 22 482 332 list-enumerate 0;
#N canvas 473 338 458 308 count 0;
#X obj 131 154 f 0;
#X obj 156 153 + 1;
#X msg 147 133 0;
#X obj 131 183 outlet;
#X obj 131 59 inlet;
#X obj 131 96 b;
#X obj 178 61 inlet;
#X obj 178 98 b;
#X connect 0 0 1 0;
#X connect 0 0 3 0;
#X connect 1 0 0 1;
#X connect 2 0 0 1;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X restore 186 155 pd count;
#X obj 107 113 t a b;
#X obj 107 33 inlet;
#X obj 107 181 list prepend;
#X obj 112 253 outlet;
#N canvas 0 22 541 415 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 110 88 pd drip;
#X obj 107 63 t a b;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 1 1 0 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 5 0 1 0;
#X connect 6 0 5 0;
#X connect 6 1 0 1;
#X restore 149 183 pd list-enumerate;
#X obj 190 231 808_state \$1/controls;
#N canvas 0 22 498 348 list-enumerate 0;
#N canvas 473 338 458 308 count 0;
#X obj 131 154 f 0;
#X obj 156 153 + 1;
#X msg 147 133 0;
#X obj 131 183 outlet;
#X obj 131 59 inlet;
#X obj 131 96 b;
#X obj 178 61 inlet;
#X obj 178 98 b;
#X connect 0 0 1 0;
#X connect 0 0 3 0;
#X connect 1 0 0 1;
#X connect 2 0 0 1;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X restore 186 155 pd count;
#X obj 107 113 t a b;
#X obj 107 33 inlet;
#X obj 107 181 list prepend;
#X obj 112 253 outlet;
#N canvas 0 22 541 415 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 110 88 pd drip;
#X obj 194 215 t a;
#X obj 106 209 list prepend;
#X obj 107 63 t a b b;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 1 1 0 0;
#X connect 2 0 8 0;
#X connect 3 0 7 0;
#X connect 5 0 1 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 4 0;
#X connect 8 0 5 0;
#X connect 8 1 0 1;
#X connect 8 2 7 1;
#X restore 411 149 pd list-enumerate;
#X obj 102 279 r \$0-controls;
#X obj 272 98 r \$0-values;
#N canvas 283 65 551 703 replacelist 0;
#X obj 164 224 list;
#X obj 327 98 inlet;
#X obj 250 98 inlet;
#X text 331 72 orig;
#X text 256 74 pos;
#X text 77 70 list to insert;
#X obj 85 94 inlet;
#X obj 207 281 list split;
#X obj 85 526 list;
#X obj 85 598 outlet;
#X obj 85 317 list prepend;
#X obj 85 120 t a b a b;
#X obj 85 430 list prepend 0;
#X obj 250 125 t f f;
#X obj 207 524 list prepend;
#X obj 85 469 route 0 1;
#X obj 316 347 f;
#X obj 286 282 t a b;
#X obj 316 377 > 0;
#X obj 122 358 r \$0-init;
#X obj 122 377 0;
#X obj 300 524 r \$0-init;
#X obj 176 317 r \$0-init;
#X obj 118 527 r \$0-init;
#X obj 159 131 s \$0-init;
#X text 47 25 list-replace: Replace the list starting at position POS
with a new list \, overwriting the old elements.;
#N canvas 0 22 458 308 length 0;
#X obj 171 164 + 1;
#X obj 92 127 b;
#X obj 126 204 f;
#X obj 158 138 1;
#X obj 142 166 f 1;
#X obj 216 168 0;
#X obj 136 59 t a b b;
#N canvas 0 22 537 411 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 92 104 pd drip;
#X obj 137 36 inlet;
#X obj 125 238 outlet;
#X connect 0 0 4 1;
#X connect 1 0 4 0;
#X connect 2 0 9 0;
#X connect 3 0 4 1;
#X connect 4 0 0 0;
#X connect 4 0 2 1;
#X connect 5 0 2 1;
#X connect 6 0 7 0;
#X connect 6 1 3 0;
#X connect 6 2 5 0;
#X connect 7 0 1 0;
#X connect 7 1 2 0;
#X connect 8 0 6 0;
#X restore 268 216 pd length;
#X obj 162 254 list split;
#X connect 0 0 27 0;
#X connect 1 0 0 1;
#X connect 2 0 13 0;
#X connect 6 0 11 0;
#X connect 7 1 8 1;
#X connect 7 1 14 1;
#X connect 8 0 9 0;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 11 1 0 0;
#X connect 11 2 26 0;
#X connect 11 3 24 0;
#X connect 12 0 15 0;
#X connect 13 0 27 1;
#X connect 13 1 16 1;
#X connect 14 0 9 0;
#X connect 15 0 8 0;
#X connect 15 1 14 0;
#X connect 16 0 18 0;
#X connect 17 0 14 1;
#X connect 17 0 8 1;
#X connect 17 1 16 0;
#X connect 18 0 12 1;
#X connect 19 0 20 0;
#X connect 20 0 12 1;
#X connect 21 0 14 1;
#X connect 22 0 10 1;
#X connect 23 0 8 1;
#X connect 26 0 7 1;
#X connect 27 0 10 1;
#X connect 27 1 7 0;
#X connect 27 2 17 0;
#X restore 289 199 pd replacelist;
#X obj 423 265 t a;
#X obj 272 130 swap;
#X obj 50 109 inlet;
#N canvas 0 22 545 419 drip2 0;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X obj 64 206 list split 2;
#X connect 0 0 1 0;
#X connect 1 0 12 0;
#X connect 2 0 0 1;
#X connect 8 0 11 0;
#X connect 11 0 0 0;
#X connect 11 1 1 1;
#X connect 12 0 7 0;
#X connect 12 1 1 1;
#X connect 12 2 2 0;
#X connect 12 2 10 0;
#X restore 190 285 pd drip2;
#X obj 253 24 inlet;
#X obj 12 477 r \$0-a;
#X msg 12 502 0 \$1;
#X obj 55 477 r \$0-b;
#X msg 54 501 1 \$1;
#X obj 98 477 r \$0-c;
#X obj 141 477 r \$0-d;
#X msg 98 502 2 \$1;
#X msg 140 501 3 \$1;
#X obj 185 475 r \$0-e;
#X obj 228 475 r \$0-f;
#X obj 271 475 r \$0-g;
#X obj 314 475 r \$0-h;
#X msg 185 500 4 \$1;
#X msg 227 498 5 \$1;
#X msg 271 499 6 \$1;
#X msg 313 499 7 \$1;
#X obj 360 475 r \$0-i;
#X obj 403 474 r \$0-j;
#X obj 445 475 r \$0-k;
#X obj 489 475 r \$0-l;
#X obj 533 473 r \$0-m;
#X msg 360 500 8 \$1;
#X msg 402 499 9 \$1;
#X msg 446 500 10 \$1;
#X msg 488 499 11 \$1;
#X msg 533 498 12 \$1;
#X msg 575 496 13 \$1;
#X msg 618 497 14 \$1;
#X msg 661 497 15 \$1;
#X obj 660 531 s \$0-values;
#X obj 413 202 t a a;
#X obj 412 182 list;
#X obj 257 47 t a b a;
#X obj 294 150 * 2;
#X obj 295 170 + 1;
#X obj 191 253 t a a;
#X obj 11 456 s \$0-ra;
#X obj 61 455 s \$0-rb;
#X obj 109 455 s \$0-rc;
#X obj 157 455 s \$0-rd;
#X obj 204 453 s \$0-re;
#X obj 254 452 s \$0-rf;
#X obj 302 452 s \$0-rg;
#X obj 350 452 s \$0-rh;
#X obj 398 451 s \$0-ri;
#X obj 448 450 s \$0-rj;
#X obj 496 450 s \$0-rk;
#X obj 544 450 s \$0-rl;
#X obj 591 448 s \$0-rm;
#X obj 641 447 s \$0-rn;
#X obj 690 447 s \$0-ro;
#X obj 737 447 s \$0-rp;
#X obj 576 473 r \$0-n;
#X obj 619 473 r \$0-o;
#X obj 662 473 r \$0-p;
#X obj 196 320 route 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 7 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 44 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 81 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 118 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 157 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 194 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 231 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 268 401 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 305 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 342 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 379 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 416 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 455 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 492 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 529 400 pd ch;
#N canvas 0 22 320 189 ch 0;
#X obj 61 32 route label;
#X obj 62 80 select comeonmyselector;
#X obj 208 101 t a a;
#X obj 60 56 list2symbol;
#X msg 209 123 label \$1;
#X obj 149 157 outlet;
#X obj 66 5 inlet;
#X obj 127 123 change -1;
#X connect 0 0 3 0;
#X connect 0 1 7 0;
#X connect 1 1 2 0;
#X connect 2 0 4 0;
#X connect 2 1 1 1;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X restore 566 400 pd ch;
#X connect 0 0 1 0;
#X connect 2 0 1 0;
#X connect 3 0 48 0;
#X connect 4 0 44 1;
#X connect 5 0 68 0;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 7 0 3 1;
#X connect 8 0 7 2;
#X connect 9 0 7 0;
#X connect 9 1 46 0;
#X connect 10 0 0 0;
#X connect 11 0 68 0;
#X connect 12 0 45 0;
#X connect 13 0 14 0;
#X connect 14 0 42 0;
#X connect 15 0 16 0;
#X connect 16 0 42 0;
#X connect 17 0 19 0;
#X connect 18 0 20 0;
#X connect 19 0 42 0;
#X connect 20 0 42 0;
#X connect 21 0 25 0;
#X connect 22 0 26 0;
#X connect 23 0 27 0;
#X connect 24 0 28 0;
#X connect 25 0 42 0;
#X connect 26 0 42 0;
#X connect 27 0 42 0;
#X connect 28 0 42 0;
#X connect 29 0 34 0;
#X connect 30 0 35 0;
#X connect 31 0 36 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 42 0;
#X connect 35 0 42 0;
#X connect 36 0 42 0;
#X connect 37 0 42 0;
#X connect 38 0 42 0;
#X connect 39 0 42 0;
#X connect 40 0 42 0;
#X connect 41 0 42 0;
#X connect 43 0 7 2;
#X connect 43 1 3 1;
#X connect 44 0 43 0;
#X connect 45 0 2 0;
#X connect 45 1 44 0;
#X connect 45 2 4 0;
#X connect 46 0 47 0;
#X connect 47 0 7 1;
#X connect 48 0 11 0;
#X connect 48 1 7 2;
#X connect 65 0 39 0;
#X connect 66 0 40 0;
#X connect 67 0 41 0;
#X connect 68 0 69 0;
#X connect 68 1 70 0;
#X connect 68 2 71 0;
#X connect 68 3 72 0;
#X connect 68 4 73 0;
#X connect 68 5 74 0;
#X connect 68 6 75 0;
#X connect 68 7 76 0;
#X connect 68 8 77 0;
#X connect 68 9 78 0;
#X connect 68 10 79 0;
#X connect 68 11 80 0;
#X connect 68 12 81 0;
#X connect 68 13 82 0;
#X connect 68 14 83 0;
#X connect 68 15 84 0;
#X connect 69 0 49 0;
#X connect 70 0 50 0;
#X connect 71 0 51 0;
#X connect 72 0 52 0;
#X connect 73 0 53 0;
#X connect 74 0 54 0;
#X connect 75 0 55 0;
#X connect 76 0 56 0;
#X connect 77 0 57 0;
#X connect 78 0 58 0;
#X connect 79 0 59 0;
#X connect 80 0 60 0;
#X connect 81 0 61 0;
#X connect 82 0 62 0;
#X connect 83 0 63 0;
#X connect 84 0 64 0;
#X restore 463 293 pd list-functions;
#X connect 0 0 18 0;
#X connect 4 0 7 0;
#X connect 5 0 8 0;
#X connect 6 0 13 0;
#X connect 7 0 13 1;
#X connect 8 0 13 1;
#X connect 11 0 12 0;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 13 2 2 0;
#X connect 16 0 28 0;
#X connect 17 0 28 1;
#X connect 18 0 1 0;
#X connect 19 0 20 0;
#X connect 20 0 17 0;
#X connect 20 1 21 0;
#X coords 0 -1 1 1 180 65 1 100 100;