/usr/share/puredata/doc/3.audio.examples/H11.shelving.pd is in puredata-doc 0.48.1-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 | #N canvas 23 51 868 421 12;
#N canvas 0 50 450 300 (subpatch) 0;
#X array \$0-tab1 100 float 1;
#A 0 1.99998 1.99615 1.98354 1.97273 1.94837 1.92155 1.88922 1.85405
1.81383 1.77419 1.73664 1.69509 1.65358 1.61326 1.57299 1.53289 1.49512
1.45838 1.42302 1.38912 1.35651 1.32509 1.29507 1.26849 1.24191 1.2166
1.19276 1.17007 1.14862 1.12715 1.10882 1.09048 1.07297 1.0566 1.04086
1.02551 1.01207 0.998698 0.985993 0.973804 0.962185 0.950972 0.940427
0.931409 0.922024 0.912985 0.904622 0.896531 0.888601 0.881476 0.874466
0.867796 0.861337 0.855198 0.849245 0.843319 0.838749 0.833688 0.82883
0.824241 0.81976 0.815126 0.811754 0.80794 0.804292 0.800655 0.797518
0.794358 0.790902 0.788474 0.785708 0.783135 0.780629 0.777961 0.775503
0.773933 0.771912 0.769962 0.768019 0.766577 0.764954 0.763348 0.761933
0.760603 0.759391 0.757962 0.757106 0.756087 0.755174 0.754301 0.753486
0.752921 0.752299 0.751046 0.749353 0.751415 0.751244 0.748086 0.755719
0.795763;
#X coords 0 5 99 0 200 300 1;
#X restore 621 28 graph;
#X obj 29 245 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X floatatom 37 289 3 0 0 0 - - -, f 3;
#X text 676 334 frequency;
#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 60 \; \$1-zero 20;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X restore 289 390 pd startup;
#X floatatom 298 271 3 -99 99 0 - #0-pole -, f 3;
#X text 559 316 gain=0;
#X text 108 34 SHELVING FILTER;
#X obj 29 378 filter-graph2 \$0-tab1;
#X obj 29 266 filter-graph1 100 22050;
#X text 796 330 22050;
#X obj 229 344 rpole~;
#X obj 297 295 / 100;
#X floatatom 250 272 4 -100 100 0 - #0-zero -, f 4;
#X obj 250 295 / 100;
#X obj 229 320 rzero~;
#X text 608 21 5;
#X text 616 327 0;
#X text 604 258 1;
#X text 16 58 This patch demonstrates using the raw filters \, rpole~
and rzero~ (raw \, real-valued one-pole and one-zero filters) \, to
make a shelving filter.;
#X text 14 109 If the pole is at p and the zero is at q \, the gain
at DC is (1-q)/(1-p) and the gain at Nyquist is (1+q)/(1+p). If the
pole location is close to plus or minus one \, this can give large
gains unless q is in the same vicinity. (try \, for example \, p=90%
\, q=70%).;
#X text 11 191 The crossover region varies from DC to Nyquist as p
and q decrease from 100% to -100%.;
#X text 295 247 pole;
#X text 249 249 zero;
#X text 333 271 (in hundredths);
#X text 610 387 updated for Pd version 0.46;
#X connect 1 0 9 0;
#X connect 5 0 12 0;
#X connect 9 0 2 0;
#X connect 9 0 8 0;
#X connect 9 1 8 1;
#X connect 9 1 15 0;
#X connect 9 2 8 2;
#X connect 11 0 8 3;
#X connect 12 0 11 1;
#X connect 13 0 14 0;
#X connect 14 0 15 1;
#X connect 15 0 11 0;
|