1 files changed, 85 insertions, 0 deletions
diff --git a/pd/doc/3.audio.examples/H14.all.pass.pd b/pd/doc/3.audio.examples/H14.all.pass.pd
new file mode 100644
index 00000000..d493df7b
--- /dev/null
+++ b/pd/doc/3.audio.examples/H14.all.pass.pd
@@ -0,0 +1,85 @@
+#N canvas 25 22 868 421 12;
+#X obj 25 338 filter-graph2 tab1 tab2;
+#N canvas 0 0 450 300 graph2 0;
+#X array tab1 100 float 1;
+#A 0 0.999994 1.0015 1.00454 0.999907 0.99994 0.999773 1.00002 1.0004
+0.999993 0.998703 1 0.999993 1 0.999699 0.999312 0.99924 0.999999 1
+0.999937 0.999782 0.999733 0.999322 0.9998 1 0.999998 0.999945 0.999998
+0.999779 0.999998 1 0.999991 0.999998 0.999999 0.99949 1 0.999165 1
+0.999991 0.999833 0.999694 1.00014 0.999247 1.00001 0.999976 1.00001
+0.99974 0.999947 0.998428 1.00052 1.00383 1.00011 0.991395 1.0006 1.00077
+0.999952 0.999955 1.00003 0.999937 0.999955 0.999616 0.999266 0.99916
+1 0.999989 0.999831 0.999696 1 0.999239 0.999998 0.999998 0.999993
+0.999998 0.999998 0.999426 0.999998 0.999999 0.999998 0.999916 0.999714
+0.99951 0.999825 0.999998 0.999999 0.999962 0.999837 0.999605 1 0.999164
+0.999996 0.99999 1 0.99999 0.999991 0.998888 1.00002 0.999955 0.999942
+0.999432 1.00007 1.00956;
+#X coords 0 2 99 0 200 140 1;
+#X restore 634 -1 graph;
+#N canvas 0 0 450 300 graph2 0;
+#X array tab2 100 float 3;
+#A 0 8.595e-06 0.0615936 0.127096 0.18809 0.251487 0.314087 0.376949
+0.439804 0.502669 0.565481 0.628309 0.691149 0.753982 0.816816 0.879645
+0.942477 1.00531 1.06814 1.13097 1.1938 1.25663 1.31947 1.3823 1.44513
+1.50796 1.5708 1.63363 1.69646 1.75929 1.82212 1.88496 1.94779 2.01062
+2.07345 2.13628 2.19912 2.26195 2.32478 2.38761 2.45045 2.51327 2.5761
+2.63893 2.70178 2.76457 2.82751 2.89011 2.9535 3.01727 3.08969 3.14147
+3.19331 3.26573 3.3295 3.39289 3.45549 3.51843 3.58122 3.64407 3.7069
+3.76973 3.83255 3.89539 3.95822 4.02105 4.08388 4.14672 4.20955 4.27238
+4.33521 4.39804 4.46088 4.52371 4.58654 4.64937 4.7122 4.77504 4.83787
+4.9007 4.96353 5.02637 5.0892 5.15203 5.21486 5.27769 5.34052 5.40335
+5.46619 5.52902 5.59185 5.65469 5.71752 5.78033 5.8432 5.90605 5.96891
+6.03151 6.09491 6.1559 6.21446;
+#X coords 0 6.283 99 0 200 140 1;
+#X restore 639 200 graph;
+#X text 621 56 1;
+#X text 633 342 0;
+#X text 615 265 pi;
+#X text 608 195 2pi;
+#X obj 25 203 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 33 249 5 0 0 0 - - -;
+#X text 621 -8 2;
+#X text 610 382 updated for Pd version 0.39;
+#X text 691 145 frequency;
+#X text 631 141 0;
+#X text 814 144 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 398 370 pd startup;
+#X text 575 127 gain=0;
+#X text 574 327 phase=0;
+#X obj 25 226 filter-graph1 100 44100;
+#X text 44 202 <-- compute;
+#X text 34 266 index;
+#X text 104 -6 ALL-PASS FILTERS;
+#X floatatom 346 264 3 -99 99 0 - #0-pole -;
+#X obj 239 306 rpole~;
+#X obj 346 287 / 100;
+#X obj 239 281 rzero_rev~;
+#X text 341 240 pole (%);
+#X text 14 20 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 17 0 0 0;
+#X connect 17 0 8 0;
+#X connect 17 1 0 1;
+#X connect 17 1 24 0;
+#X connect 17 2 0 2;
+#X connect 21 0 23 0;
+#X connect 22 0 0 3;
+#X connect 23 0 24 1;
+#X connect 23 0 22 1;
+#X connect 24 0 22 0;