chris@531: #N canvas 115 309 823 465 10;
chris@531: #X obj 24 32 inlet~;
chris@531: #X obj 23 380 outlet~;
chris@531: #X obj 118 380 outlet~;
chris@531: #N canvas 0 166 634 506 input_diffusion 0;
chris@531: #X obj 30 60 inlet~;
chris@531: #X obj 29 295 outlet~;
chris@531: #X obj 337 79 r \$0-input_diffusion1;
chris@531: #X obj 336 170 r \$0-input_diffusion2;
chris@531: #N canvas 393 22 574 578 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 114 149 f 0.75;
chris@531: #X obj 417 262 f 0.75;
chris@531: #X obj 56 491 delwrite~ \$0-tap_13_14 200;
chris@531: #X obj 252 262 *~ 0.75;
chris@531: #X obj 252 53 delread~ \$0-tap_13_14 4.77134;
chris@531: #X obj 417 336 swap 1;
chris@531: #X obj 417 360 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 16 0;
chris@531: #X connect 2 0 15 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 14 0;
chris@531: #X connect 10 0 15 0;
chris@531: #X connect 10 0 17 1;
chris@531: #X connect 11 0 14 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 7 0;
chris@531: #X connect 15 0 3 0;
chris@531: #X connect 17 0 5 0;
chris@531: #X connect 17 0 12 0;
chris@531: #X connect 18 0 17 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 30 99 pd allpass tap_13_14;
chris@531: #N canvas 314 22 579 582 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 114 149 f 0.75;
chris@531: #X obj 417 262 f 0.75;
chris@531: #X obj 252 262 *~ 0.75;
chris@531: #X obj 56 491 delwrite~ \$0-tap_19_20 200;
chris@531: #X obj 252 53 delread~ \$0-tap_19_20 3.5953;
chris@531: #X obj 417 336 swap 1;
chris@531: #X obj 417 360 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 17 0;
chris@531: #X connect 2 0 15 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 14 0;
chris@531: #X connect 10 0 15 0;
chris@531: #X connect 10 0 16 1;
chris@531: #X connect 11 0 14 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 7 0;
chris@531: #X connect 15 0 3 0;
chris@531: #X connect 16 0 5 0;
chris@531: #X connect 16 0 12 0;
chris@531: #X connect 18 0 16 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 30 135 pd allpass tap_19_20;
chris@531: #N canvas 238 22 570 590 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 114 149 f 0.625;
chris@531: #X obj 252 262 *~ 0.625;
chris@531: #X obj 417 262 f 0.625;
chris@531: #X obj 56 491 delwrite~ \$0-tap_15_16 200;
chris@531: #X obj 252 53 delread~ \$0-tap_15_16 12.7348;
chris@531: #X obj 417 336 swap 1;
chris@531: #X obj 417 360 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 17 0;
chris@531: #X connect 2 0 16 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 14 0;
chris@531: #X connect 10 0 15 1;
chris@531: #X connect 10 0 16 0;
chris@531: #X connect 11 0 14 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 7 0;
chris@531: #X connect 15 0 5 0;
chris@531: #X connect 15 0 12 0;
chris@531: #X connect 16 0 3 0;
chris@531: #X connect 18 0 15 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 30 190 pd allpass tap_15_16;
chris@531: #N canvas 238 22 566 586 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 114 149 f 0.625;
chris@531: #X obj 252 262 *~ 0.625;
chris@531: #X obj 417 262 f 0.625;
chris@531: #X obj 56 491 delwrite~ \$0-tap_21_22 200;
chris@531: #X obj 252 53 delread~ \$0-tap_21_22 9.30748;
chris@531: #X obj 417 336 swap 1;
chris@531: #X obj 417 360 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 17 0;
chris@531: #X connect 2 0 16 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 14 0;
chris@531: #X connect 10 0 15 1;
chris@531: #X connect 10 0 16 0;
chris@531: #X connect 11 0 14 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 7 0;
chris@531: #X connect 15 0 5 0;
chris@531: #X connect 15 0 12 0;
chris@531: #X connect 16 0 3 0;
chris@531: #X connect 18 0 15 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 30 230 pd allpass tap_21_22;
chris@531: #X connect 0 0 4 0;
chris@531: #X connect 2 0 4 1;
chris@531: #X connect 2 0 5 1;
chris@531: #X connect 3 0 6 1;
chris@531: #X connect 3 0 7 1;
chris@531: #X connect 4 0 5 0;
chris@531: #X connect 5 0 6 0;
chris@531: #X connect 6 0 7 0;
chris@531: #X connect 7 0 1 0;
chris@531: #X restore 25 208 pd input_diffusion;
chris@531: #N canvas 38 72 501 476 reverberation_tank 0;
chris@531: #X obj 168 85 inlet~;
chris@531: #X obj 43 120 +~;
chris@531: #X obj 255 121 +~;
chris@531: #N canvas 0 22 458 308 z^-4217 0;
chris@531: #X obj 106 55 inlet~;
chris@531: #X obj 105 120 delwrite~ \$0-tap_48_54 141.695;
chris@531: #X text 358 135 4217;
chris@531: #X obj 105 147 delread~ \$0-tap_48_54 141.695;
chris@531: #X obj 106 223 outlet~;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X restore 255 190 pd z^-4217;
chris@531: #N canvas 0 22 458 308 z^-4453 0;
chris@531: #X obj 41 104 delwrite~ \$0-tap_24_30 149.625;
chris@531: #X obj 42 128 delread~ \$0-tap_24_30 149.625;
chris@531: #X text 287 119 4453;
chris@531: #X obj 43 60 inlet~;
chris@531: #X obj 43 168 outlet~;
chris@531: #X connect 1 0 4 0;
chris@531: #X connect 3 0 0 0;
chris@531: #X restore 43 192 pd z^-4453;
chris@531: #N canvas 0 22 466 316 damping 0;
chris@531: #X obj 74 53 inlet~;
chris@531: #X obj 70 222 outlet~;
chris@531: #X obj 73 137 lop~ 22050;
chris@531: #X obj 162 137 r \$0-damping;
chris@531: #X obj 162 159 * 48000;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 2 0 1 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 4 0 2 1;
chris@531: #X restore 44 221 pd damping;
chris@531: #N canvas 0 22 470 320 damping 0;
chris@531: #X obj 74 53 inlet~;
chris@531: #X obj 70 222 outlet~;
chris@531: #X obj 73 137 lop~ 22050;
chris@531: #X obj 162 137 r \$0-damping;
chris@531: #X obj 162 159 * 48000;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 2 0 1 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 4 0 2 1;
chris@531: #X restore 256 221 pd damping;
chris@531: #N canvas 0 22 470 320 decay 0;
chris@531: #X obj 71 66 inlet~;
chris@531: #X obj 71 220 outlet~;
chris@531: #X obj 140 139 r \$0-decay;
chris@531: #X obj 70 140 *~ 0.5;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 2 0 3 1;
chris@531: #X connect 3 0 1 0;
chris@531: #X restore 43 249 pd decay;
chris@531: #N canvas 0 22 470 320 decay 0;
chris@531: #X obj 71 66 inlet~;
chris@531: #X obj 71 220 outlet~;
chris@531: #X obj 140 139 r \$0-decay;
chris@531: #X obj 70 140 *~ 0.5;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 2 0 3 1;
chris@531: #X connect 3 0 1 0;
chris@531: #X restore 257 250 pd decay;
chris@531: #N canvas 0 22 466 316 decay 0;
chris@531: #X obj 71 66 inlet~;
chris@531: #X obj 71 220 outlet~;
chris@531: #X obj 140 139 r \$0-decay;
chris@531: #X obj 70 140 *~ 0.5;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 2 0 3 1;
chris@531: #X connect 3 0 1 0;
chris@531: #X restore 43 87 pd decay;
chris@531: #N canvas 0 22 466 316 decay 0;
chris@531: #X obj 71 66 inlet~;
chris@531: #X obj 71 220 outlet~;
chris@531: #X obj 140 139 r \$0-decay;
chris@531: #X obj 70 140 *~ 0.5;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 2 0 3 1;
chris@531: #X connect 3 0 1 0;
chris@531: #X restore 273 85 pd decay;
chris@531: #N canvas 0 22 498 348 decay_diffusion1 0;
chris@531: #N canvas 232 298 494 344 excursion 0;
chris@531: #X obj 64 192 outlet~;
chris@531: #X obj 62 90 osc~ 1;
chris@531: #X obj 63 143 *~ 0.53761;
chris@531: #X obj 130 109 r \$0-excursion;
chris@531: #X connect 1 0 2 0;
chris@531: #X connect 2 0 0 0;
chris@531: #X connect 3 0 2 1;
chris@531: #X restore 133 120 pd excursion;
chris@531: #X obj 43 32 inlet~;
chris@531: #X obj 44 250 outlet~;
chris@531: #X obj 88 84 r \$0-decay_diffusion1;
chris@531: #N canvas 409 74 612 523 allpassvd 0;
chris@531: #X obj 48 83 inlet~;
chris@531: #X obj 48 296 +~;
chris@531: #X obj 285 142 loadbang;
chris@531: #X obj 285 196 t f f;
chris@531: #X obj 285 220 *;
chris@531: #X obj 229 277 *~;
chris@531: #X obj 216 300 +~;
chris@531: #X obj 94 138 * -1;
chris@531: #X obj 80 163 *~;
chris@531: #X obj 217 401 outlet~;
chris@531: #X obj 392 30 inlet~;
chris@531: #X obj 447 56 sig~;
chris@531: #X obj 447 10 loadbang;
chris@531: #X obj 390 78 +~;
chris@531: #X obj 255 45 inlet;
chris@531: #X obj 94 60 loadbang;
chris@531: #X text 9 6 arguments: delay(ms) feedback(mult);
chris@531: #X text 10 20 inlets: signal feedback(mult) excursion;
chris@531: #X obj 94 114 f 0.7;
chris@531: #X obj 230 152 *~ 0.7;
chris@531: #X obj 285 172 f 0.7;
chris@531: #X obj 391 404 +~;
chris@531: #X text 372 428 excursion;
chris@531: #X obj 48 327 delwrite~ \$0-tap_23_24 100;
chris@531: #X obj 283 101 vd~ \$0-tap_23_24;
chris@531: #X obj 447 33 f 22.5599;
chris@531: #X obj 285 244 swap 1;
chris@531: #X obj 285 268 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 23 0;
chris@531: #X connect 2 0 20 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 26 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 6 0;
chris@531: #X connect 10 0 13 0;
chris@531: #X connect 11 0 13 1;
chris@531: #X connect 12 0 25 0;
chris@531: #X connect 13 0 21 0;
chris@531: #X connect 13 0 24 0;
chris@531: #X connect 14 0 18 0;
chris@531: #X connect 14 0 19 1;
chris@531: #X connect 14 0 20 0;
chris@531: #X connect 15 0 18 0;
chris@531: #X connect 18 0 7 0;
chris@531: #X connect 19 0 1 1;
chris@531: #X connect 19 0 5 0;
chris@531: #X connect 20 0 3 0;
chris@531: #X connect 24 0 19 0;
chris@531: #X connect 25 0 11 0;
chris@531: #X connect 26 0 27 0;
chris@531: #X connect 26 1 27 1;
chris@531: #X connect 27 0 5 1;
chris@531: #X restore 43 150 pd allpassvd;
chris@531: #X connect 0 0 4 2;
chris@531: #X connect 1 0 4 0;
chris@531: #X connect 3 0 4 1;
chris@531: #X connect 4 0 2 0;
chris@531: #X restore 44 156 pd decay_diffusion1;
chris@531: #N canvas 0 22 529 394 decay_diffusion1 0;
chris@531: #N canvas 232 298 482 332 excursion 0;
chris@531: #X obj 65 192 outlet~;
chris@531: #X obj 63 81 osc~ 1;
chris@531: #X obj 64 134 *~ 0.53761;
chris@531: #X obj 139 104 r \$0-excursion;
chris@531: #X connect 1 0 2 0;
chris@531: #X connect 2 0 0 0;
chris@531: #X connect 3 0 2 1;
chris@531: #X restore 138 92 pd excursion;
chris@531: #X obj 49 25 inlet~;
chris@531: #X obj 49 200 outlet~;
chris@531: #X obj 93 60 r \$0-decay_diffusion1;
chris@531: #N canvas 348 52 608 519 allpassvd 0;
chris@531: #X obj 48 83 inlet~;
chris@531: #X obj 48 296 +~;
chris@531: #X obj 285 142 loadbang;
chris@531: #X obj 285 196 t f f;
chris@531: #X obj 285 220 *;
chris@531: #X obj 229 277 *~;
chris@531: #X obj 216 300 +~;
chris@531: #X obj 94 138 * -1;
chris@531: #X obj 80 163 *~;
chris@531: #X obj 217 401 outlet~;
chris@531: #X obj 392 30 inlet~;
chris@531: #X obj 447 56 sig~;
chris@531: #X obj 447 10 loadbang;
chris@531: #X obj 390 78 +~;
chris@531: #X obj 255 45 inlet;
chris@531: #X obj 94 60 loadbang;
chris@531: #X text 9 6 arguments: delay(ms) feedback(mult);
chris@531: #X text 10 20 inlets: signal feedback(mult) excursion;
chris@531: #X obj 48 327 delwrite~ \$0-tap_46_48 100;
chris@531: #X obj 283 101 vd~ \$0-tap_46_48;
chris@531: #X obj 447 33 f 30.5097;
chris@531: #X obj 94 114 f 0.7;
chris@531: #X obj 230 152 *~ 0.7;
chris@531: #X obj 285 172 f 0.7;
chris@531: #X obj 391 404 +~;
chris@531: #X text 372 428 excursion;
chris@531: #X obj 285 244 swap 1;
chris@531: #X obj 285 268 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 18 0;
chris@531: #X connect 2 0 23 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 26 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 6 0;
chris@531: #X connect 10 0 13 0;
chris@531: #X connect 11 0 13 1;
chris@531: #X connect 12 0 20 0;
chris@531: #X connect 13 0 19 0;
chris@531: #X connect 13 0 24 0;
chris@531: #X connect 14 0 21 0;
chris@531: #X connect 14 0 22 1;
chris@531: #X connect 14 0 23 0;
chris@531: #X connect 15 0 21 0;
chris@531: #X connect 19 0 22 0;
chris@531: #X connect 20 0 11 0;
chris@531: #X connect 21 0 7 0;
chris@531: #X connect 22 0 1 1;
chris@531: #X connect 22 0 5 0;
chris@531: #X connect 23 0 3 0;
chris@531: #X connect 26 0 27 0;
chris@531: #X connect 26 1 27 1;
chris@531: #X connect 27 0 5 1;
chris@531: #X restore 48 135 pd allpassvd;
chris@531: #X connect 0 0 4 2;
chris@531: #X connect 1 0 4 0;
chris@531: #X connect 3 0 4 1;
chris@531: #X connect 4 0 2 0;
chris@531: #X restore 256 155 pd decay_diffusion1;
chris@531: #N canvas 327 329 552 336 decay_diffusion2 0;
chris@531: #X obj 37 63 inlet~;
chris@531: #X obj 37 220 outlet~;
chris@531: #N canvas 393 22 582 586 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 252 52 delread~ \$0-tap_31_33 60.4818;
chris@531: #X obj 56 491 delwrite~ \$0-tap_31_33 200;
chris@531: #X obj 114 149 f 0.5;
chris@531: #X obj 252 262 *~ 0.5;
chris@531: #X obj 417 262 f 0.5;
chris@531: #X obj 417 334 swap 1;
chris@531: #X obj 417 358 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 15 0;
chris@531: #X connect 2 0 18 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 16 0;
chris@531: #X connect 10 0 17 1;
chris@531: #X connect 10 0 18 0;
chris@531: #X connect 11 0 16 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 17 0;
chris@531: #X connect 16 0 7 0;
chris@531: #X connect 17 0 5 0;
chris@531: #X connect 17 0 12 0;
chris@531: #X connect 18 0 3 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 36 143 pd allpass tap_31_33;
chris@531: #X obj 191 114 r \$0-decay_diffusion2;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 2 0 1 0;
chris@531: #X connect 3 0 2 1;
chris@531: #X restore 43 277 pd decay_diffusion2;
chris@531: #N canvas 0 22 553 336 decay_diffusion2 0;
chris@531: #X obj 52 38 inlet~;
chris@531: #X obj 54 171 outlet~;
chris@531: #X obj 210 85 r \$0-decay_diffusion2;
chris@531: #N canvas 393 22 586 590 allpass 0;
chris@531: #X obj 56 127 inlet~;
chris@531: #X obj 56 400 +~;
chris@531: #X obj 427 232 loadbang;
chris@531: #X obj 417 286 t f f;
chris@531: #X obj 417 310 *;
chris@531: #X obj 253 364 *~;
chris@531: #X obj 232 394 +~;
chris@531: #X obj 114 177 * -1;
chris@531: #X obj 88 207 *~;
chris@531: #X obj 232 426 outlet~;
chris@531: #X obj 417 129 inlet;
chris@531: #X obj 114 117 loadbang;
chris@531: #X obj 75 365 *~ -1;
chris@531: #X obj 201 364 *~ -1;
chris@531: #X obj 114 149 f 0.5;
chris@531: #X obj 252 262 *~ 0.5;
chris@531: #X obj 417 262 f 0.5;
chris@531: #X obj 56 491 delwrite~ \$0-tap_55_59 200;
chris@531: #X obj 252 52 delread~ \$0-tap_55_59 89.2443;
chris@531: #X obj 417 334 swap 1;
chris@531: #X obj 417 358 -;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 1 0 17 0;
chris@531: #X connect 2 0 16 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 3 1 4 1;
chris@531: #X connect 4 0 19 0;
chris@531: #X connect 5 0 6 1;
chris@531: #X connect 6 0 9 0;
chris@531: #X connect 7 0 8 1;
chris@531: #X connect 8 0 13 0;
chris@531: #X connect 10 0 14 0;
chris@531: #X connect 10 0 15 1;
chris@531: #X connect 10 0 16 0;
chris@531: #X connect 11 0 14 0;
chris@531: #X connect 12 0 1 1;
chris@531: #X connect 13 0 6 0;
chris@531: #X connect 14 0 7 0;
chris@531: #X connect 15 0 5 0;
chris@531: #X connect 15 0 12 0;
chris@531: #X connect 16 0 3 0;
chris@531: #X connect 18 0 15 0;
chris@531: #X connect 19 0 20 0;
chris@531: #X connect 19 1 20 1;
chris@531: #X connect 20 0 5 1;
chris@531: #X restore 55 114 pd allpass tap_55_59;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 2 0 3 1;
chris@531: #X connect 3 0 1 0;
chris@531: #X restore 256 278 pd decay_diffusion2;
chris@531: #N canvas 0 22 454 304 feedback 0;
chris@531: #X obj 43 118 outlet~;
chris@531: #X obj 44 55 delread~ \$0-tap_59_63 106.28;
chris@531: #X connect 1 0 0 0;
chris@531: #X restore 43 49 pd feedback;
chris@531: #N canvas 0 22 454 304 feedback 0;
chris@531: #X obj 81 188 outlet~;
chris@531: #X obj 81 134 delread~ \$0-tap_33_39 124.996;
chris@531: #X connect 1 0 0 0;
chris@531: #X restore 274 51 pd feedback;
chris@531: #N canvas 0 22 458 308 to_left 0;
chris@531: #X obj 48 52 inlet~;
chris@531: #X obj 48 95 delwrite~ \$0-tap_59_63 106.28;
chris@531: #X connect 0 0 1 0;
chris@531: #X restore 255 306 pd to_left;
chris@531: #N canvas 0 22 454 304 to_right 0;
chris@531: #X obj 53 173 delwrite~ \$0-tap_33_39 124.996;
chris@531: #X obj 56 100 inlet~;
chris@531: #X connect 1 0 0 0;
chris@531: #X restore 44 305 pd to_right;
chris@531: #X text 344 190 48_54;
chris@531: #X text 136 193 24_30;
chris@531: #X obj 170 357 outlet~;
chris@531: #X text 242 358 dummy;
chris@531: #X connect 0 0 1 1;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 1 0 11 0;
chris@531: #X connect 2 0 12 0;
chris@531: #X connect 3 0 6 0;
chris@531: #X connect 4 0 5 0;
chris@531: #X connect 5 0 7 0;
chris@531: #X connect 6 0 8 0;
chris@531: #X connect 7 0 13 0;
chris@531: #X connect 8 0 14 0;
chris@531: #X connect 9 0 1 0;
chris@531: #X connect 10 0 2 1;
chris@531: #X connect 11 0 4 0;
chris@531: #X connect 12 0 3 0;
chris@531: #X connect 13 0 18 0;
chris@531: #X connect 14 0 17 0;
chris@531: #X connect 15 0 9 0;
chris@531: #X connect 16 0 10 0;
chris@531: #X restore 25 238 pd reverberation_tank;
chris@531: #N canvas 58 172 593 487 predelay 0;
chris@531: #X obj 97 19 inlet~;
chris@531: #X obj 97 317 outlet~;
chris@531: #X obj 393 56 sel 0;
chris@531: #X obj 96 209 *~ 1;
chris@531: #X obj 110 178 f 1;
chris@531: #X obj 140 179 f 0;
chris@531: #X obj 428 106 t a b;
chris@531: #X obj 377 222 *~ 1;
chris@531: #X obj 402 191 f 0;
chris@531: #X obj 433 191 f 1;
chris@531: #X text 17 210 no delay;
chris@531: #X text 237 212 delay;
chris@531: #N canvas 294 159 273 227 predelay 0;
chris@531: #X obj 35 52 inlet~;
chris@531: #X obj 94 54 inlet;
chris@531: #N canvas 345 153 450 300 dw 0;
chris@531: #X obj 35 52 inlet~;
chris@531: #X obj 35 101 delwrite~ \$0-predelay 1000;
chris@531: #X obj 34 140 outlet~;
chris@531: #X connect 0 0 1 0;
chris@531: #X restore 34 84 pd dw;
chris@531: #N canvas 326 259 416 179 dr 0;
chris@531: #X obj 126 29 inlet;
chris@531: #X obj 49 28 inlet~;
chris@531: #X obj 126 65 delread~ \$0-predelay 1;
chris@531: #X obj 126 88 outlet~;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 2 0 3 0;
chris@531: #X restore 33 116 pd dr;
chris@531: #X obj 33 138 outlet~;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 1 0 3 1;
chris@531: #X connect 2 0 3 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X restore 297 190 pd predelay;
chris@531: #X obj 393 25 r \$0-predelay;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 0 0 12 0;
chris@531: #X connect 2 0 4 0;
chris@531: #X connect 2 0 8 0;
chris@531: #X connect 2 1 6 0;
chris@531: #X connect 3 0 1 0;
chris@531: #X connect 4 0 3 1;
chris@531: #X connect 5 0 3 1;
chris@531: #X connect 6 0 12 1;
chris@531: #X connect 6 1 5 0;
chris@531: #X connect 6 1 9 0;
chris@531: #X connect 7 0 1 0;
chris@531: #X connect 8 0 7 1;
chris@531: #X connect 9 0 7 1;
chris@531: #X connect 12 0 7 0;
chris@531: #X connect 13 0 2 0;
chris@531: #X restore 25 145 pd predelay;
chris@531: #X obj 85 32 inlet~;
chris@531: #N canvas 0 22 458 308 bandwidth 0;
chris@531: #X obj 66 22 inlet~;
chris@531: #X obj 65 183 outlet~;
chris@531: #X obj 65 107 lop~;
chris@531: #X obj 92 44 r \$0-bandwidth;
chris@531: #X obj 92 66 * 48000;
chris@531: #X connect 0 0 2 0;
chris@531: #X connect 2 0 1 0;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 4 0 2 1;
chris@531: #X restore 25 177 pd bandwidth;
chris@531: #N canvas 0 22 458 308 1/2 0;
chris@531: #X obj 102 56 inlet~;
chris@531: #X obj 182 56 inlet~;
chris@531: #X obj 103 138 *~ 0.5;
chris@531: #X obj 103 102 +~;
chris@531: #X obj 103 175 outlet~;
chris@531: #X connect 0 0 3 0;
chris@531: #X connect 1 0 3 1;
chris@531: #X connect 2 0 4 0;
chris@531: #X connect 3 0 2 0;
chris@531: #X restore 25 112 pd 1/2;
chris@531: #N canvas 120 111 856 498 output_taps 0;
chris@531: #X obj 28 409 outlet~;
chris@531: #X obj 30 267 -~;
chris@531: #X obj 31 109 +~;
chris@531: #X obj 30 215 +~;
chris@531: #X obj 29 369 -~;
chris@531: #X text 30 26 left;
chris@531: #X obj 32 55 delread~ \$0-tap_48_54 8.93787;
chris@531: #X obj 51 82 delread~ \$0-tap_48_54 99.9294;
chris@531: #X obj 50 134 delread~ \$0-tap_55_59 64.2787;
chris@531: #X obj 31 163 -~;
chris@531: #X obj 49 188 delread~ \$0-tap_59_63 67.0676;
chris@531: #X obj 50 240 delread~ \$0-tap_24_30 66.866;
chris@531: #X obj 50 293 delread~ \$0-tap_31_33 6.28339;
chris@531: #X obj 30 317 -~;
chris@531: #X obj 49 342 delread~ \$0-tap_33_39 35.8187;
chris@531: #X obj 371 407 outlet~;
chris@531: #X obj 370 105 +~;
chris@531: #X obj 371 261 -~;
chris@531: #X obj 370 208 +~;
chris@531: #X obj 371 365 -~;
chris@531: #X text 370 20 right;
chris@531: #X obj 371 51 delread~ \$0-tap_24_30 11.8612;
chris@531: #X obj 390 78 delread~ \$0-tap_24_30 121.871;
chris@531: #X obj 390 130 delread~ \$0-tap_31_33 41.2621;
chris@531: #X obj 390 181 delread~ \$0-tap_33_39 89.8155;
chris@531: #X obj 391 234 delread~ \$0-tap_48_54 70.9317;
chris@531: #X obj 372 313 -~;
chris@531: #X obj 392 286 delread~ \$0-tap_55_59 11.2563;
chris@531: #X obj 390 338 delread~ \$0-tap_59_63 4.06572;
chris@531: #X obj 370 154 -~;
chris@531: #X obj 161 15 inlet~;
chris@531: #X text 222 15 dummy;
chris@531: #X connect 1 0 13 0;
chris@531: #X connect 2 0 9 0;
chris@531: #X connect 3 0 1 0;
chris@531: #X connect 4 0 0 0;
chris@531: #X connect 6 0 2 0;
chris@531: #X connect 7 0 2 1;
chris@531: #X connect 8 0 9 1;
chris@531: #X connect 9 0 3 0;
chris@531: #X connect 10 0 3 1;
chris@531: #X connect 11 0 1 1;
chris@531: #X connect 12 0 13 1;
chris@531: #X connect 13 0 4 0;
chris@531: #X connect 14 0 4 1;
chris@531: #X connect 16 0 29 0;
chris@531: #X connect 17 0 26 0;
chris@531: #X connect 18 0 17 0;
chris@531: #X connect 19 0 15 0;
chris@531: #X connect 21 0 16 0;
chris@531: #X connect 22 0 16 1;
chris@531: #X connect 23 0 29 1;
chris@531: #X connect 24 0 18 1;
chris@531: #X connect 25 0 17 1;
chris@531: #X connect 26 0 19 0;
chris@531: #X connect 27 0 26 1;
chris@531: #X connect 28 0 19 1;
chris@531: #X connect 29 0 18 0;
chris@531: #X restore 24 268 pd output_taps;
chris@531: #N canvas 228 198 627 317 LICENSE-BSD 0;
chris@531: #X text 121 56 This software is copyrighted by Miller Puckette \, Reality
chris@531: Jockey Ltd. and others. The terms (the "Standard Improved BSD License")
chris@531: apply to all files associated with the software unless explicitly disclaimed
chris@531: in individual files.;
chris@531: #X text 123 148 See the file LICENSE.txt for the full license text.
chris@531: ;
chris@531: #X restore 373 40 pd LICENSE-BSD;
chris@531: #X msg 164 290 \$1 10;
chris@531: #X obj 187 137 inlet dry;
chris@531: #X obj 286 192 s \$0-predelay;
chris@531: #X msg 286 170 0;
chris@531: #X obj 431 192 s \$0-bandwidth;
chris@531: #X obj 431 242 s \$0-damping;
chris@531: #X obj 286 242 s \$0-decay;
chris@531: #X obj 286 292 s \$0-input_diffusion1;
chris@531: #X msg 286 270 0.75;
chris@531: #X msg 431 271 0.7;
chris@531: #X obj 431 292 s \$0-decay_diffusion1;
chris@531: #X obj 431 342 s \$0-decay_diffusion2;
chris@531: #X obj 286 342 s \$0-input_diffusion2;
chris@531: #X msg 286 320 0.625;
chris@531: #X obj 286 392 s \$0-excursion;
chris@531: #X obj 286 142 t b;
chris@531: #X obj 281 87 loadbang;
chris@531: #X obj 281 109 del 2000;
chris@531: #X obj 367 83 r tick;
chris@531: #X obj 367 105 mod 100;
chris@531: #X obj 367 127 sel 0;
chris@531: #X msg 431 171 10000;
chris@531: #X msg 286 370 0;
chris@531: #X msg 431 321 0.84;
chris@531: #X obj 23 347 c_xfade;
chris@531: #X obj 118 349 c_xfade;
chris@531: #X floatatom 542 219 5 0 0 0 - - -, f 5;
chris@531: #X floatatom 543 272 5 0 0 0 - - -, f 5;
chris@531: #X msg 286 220 0.8;
chris@531: #X msg 431 221 3000;
chris@531: #X connect 0 0 8 0;
chris@531: #X connect 0 0 35 1;
chris@531: #X connect 3 0 4 0;
chris@531: #X connect 4 0 9 0;
chris@531: #X connect 5 0 7 0;
chris@531: #X connect 6 0 8 1;
chris@531: #X connect 6 0 36 1;
chris@531: #X connect 7 0 3 0;
chris@531: #X connect 8 0 5 0;
chris@531: #X connect 9 0 35 0;
chris@531: #X connect 9 1 36 0;
chris@531: #X connect 11 0 35 2;
chris@531: #X connect 11 0 36 2;
chris@531: #X connect 12 0 11 0;
chris@531: #X connect 12 0 26 0;
chris@531: #X connect 14 0 13 0;
chris@531: #X connect 19 0 18 0;
chris@531: #X connect 20 0 21 0;
chris@531: #X connect 24 0 23 0;
chris@531: #X connect 26 0 14 0;
chris@531: #X connect 26 0 32 0;
chris@531: #X connect 26 0 39 0;
chris@531: #X connect 26 0 40 0;
chris@531: #X connect 26 0 19 0;
chris@531: #X connect 26 0 20 0;
chris@531: #X connect 26 0 34 0;
chris@531: #X connect 26 0 24 0;
chris@531: #X connect 26 0 33 0;
chris@531: #X connect 27 0 28 0;
chris@531: #X connect 28 0 26 0;
chris@531: #X connect 29 0 30 0;
chris@531: #X connect 30 0 31 0;
chris@531: #X connect 31 0 26 0;
chris@531: #X connect 32 0 15 0;
chris@531: #X connect 33 0 25 0;
chris@531: #X connect 34 0 22 0;
chris@531: #X connect 35 0 1 0;
chris@531: #X connect 36 0 2 0;
chris@531: #X connect 37 0 16 0;
chris@531: #X connect 38 0 17 0;
chris@531: #X connect 39 0 17 0;
chris@531: #X connect 40 0 16 0;