#N canvas 296 142 819 418 12;
#X obj 103 291 filter-graph2 tab1 tab2;
#N canvas 0 50 450 300 (subpatch) 0;
#X array tab1 100 float 0;
#X coords 0 2 99 0 200 140 1 0 0;
#X restore 552 27 graph;
#N canvas 0 50 450 300 (subpatch) 0;
#X array tab2 100 float 2;
#X coords 0 6.283 99 0 200 140 1 0 0;
#X restore 557 228 graph;
#X text 539 84 1;
#X text 551 370 0;
#X text 533 293 pi;
#X text 526 223 2pi;
#X obj 76 169 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X floatatom 76 224 5 0 0 0 - - -;
#X text 539 20 2;
#X text 65 367 updated for Pd version 0.39;
#X text 609 173 frequency;
#X text 549 169 0;
#X text 732 172 44100;
#N canvas 876 177 375 255 startup 0;
#X obj 22 24 loadbang;
#X obj 22 48 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 22 67 f \$0;
#X text 35 195 This subpatch loads initial;
#X text 31 219 values in number boxes.;
#X msg 22 91 \; \$1-pole 80;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X restore 334 158 pd startup;
#X text 493 155 gain=0;
#X text 492 355 phase=0;
#X obj 76 192 filter-graph1 100 44100;
#X text 48 17 ALL-PASS FILTERS;
#X floatatom 356 243 3 -99 99 0 - #0-pole -;
#X obj 261 263 rpole~;
#X obj 356 266 / 100;
#X obj 261 238 rzero_rev~;
#X text 351 219 pole (%);
#X text 35 49 The all-pass filter has a phase response that depends
on its coefficient \, and a flat frequency response. The coefficient
(p) gives the location of the pole. There is a zero at 1/p \, unless
p=0. If p=0 the filter is effectively a one-sample delay. Negative
values of $p$ are allowed \, as long as p is between -1 and 1;
#X connect 7 0 17 0;
#X connect 8 0 0 0;
#X connect 17 0 8 0;
#X connect 17 1 0 1;
#X connect 17 1 22 0;
#X connect 17 2 0 2;
#X connect 19 0 21 0;
#X connect 20 0 0 3;
#X connect 21 0 22 1;
#X connect 21 0 20 1;
#X connect 22 0 20 0;
