path: root/nusmuk-audio/bq~-help.pd

#N canvas 425 30 746 628 10;
#X obj 342 172 mtof;
#X floatatom 342 156 5 0 127 0 - - -;
#X floatatom 477 170 5 0 0 0 - - -;
#N canvas 435 52 535 646 coef_lowShelf_biquad 0;
#X obj 50 32 inlet;
#X text 92 34 f;
#X obj 50 185 * 6.283;
#X obj 106 208 samplerate~;
#X obj 106 186 loadbang;
#X obj 164 187 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 240 /;
#X obj 96 292 cos;
#X obj 69 291 sin;
#X obj 319 36 inlet;
#X text 387 176 A;
#X obj 319 121 pow;
#X msg 319 100 10;
#X obj 319 81 t b f;
#X obj 319 58 / 40;
#X obj 319 212 t f f;
#X obj 319 234 *;
#X obj 319 254 + 1;
#X obj 360 213 - 1;
#X obj 360 234 t f f;
#X obj 360 256 *;
#X obj 319 284 -;
#X text 360 309 beta;
#X obj 319 308 sqrt;
#X obj 319 173 t f f f;
#X obj 50 263 t b f f;
#X obj 50 493 /;
#X obj 50 391 expr -2 * ( ($f2-1) + ($f2+1)*$f4 ) \; ($f2+1) + ($f2-1)*$f4
- $f1*$f3 \; $f2 * ( ($f2+1) - ($f2-1)*$f4 + $f1*$f3 ) \; 2 * $f2 *
( ($f2-1) - ($f2+1)*$f4 ) \; $f2 * ( ($f2+1) - ($f2-1)*$f4 - $f1*$f3
) \; ($f2+1) + ($f2-1)*$f4 + $f1*$f3 \;;
#X obj 50 525 outlet;
#X obj 99 527 outlet;
#X obj 149 528 outlet;
#X obj 199 528 outlet;
#X obj 249 529 outlet;
#X obj 99 493 /;
#X obj 149 496 /;
#X obj 199 494 /;
#X obj 249 497 /;
#X obj 50 73 max 0;
#X obj 50 99 min 21000;
#X obj 319 149 1;
#X obj 353 125 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 357 f;
#X msg 135 281 1;
#X obj 135 302 sqrt;
#X obj 135 257 loadbang;
#X connect 0 0 37 0;
#X connect 2 0 6 0;
#X connect 3 0 6 1;
#X connect 4 0 3 0;
#X connect 5 0 3 0;
#X connect 6 0 25 0;
#X connect 7 0 27 3;
#X connect 8 0 27 2;
#X connect 9 0 14 0;
#X connect 11 0 39 0;
#X connect 12 0 11 0;
#X connect 13 0 12 0;
#X connect 13 1 11 1;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 15 1 16 1;
#X connect 16 0 17 0;
#X connect 17 0 21 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 19 1 20 1;
#X connect 20 0 21 1;
#X connect 21 0 23 0;
#X connect 23 0 27 0;
#X connect 24 0 15 0;
#X connect 24 1 18 0;
#X connect 24 2 27 1;
#X connect 25 0 41 0;
#X connect 25 1 8 0;
#X connect 25 2 7 0;
#X connect 26 0 28 0;
#X connect 27 0 26 0;
#X connect 27 1 33 0;
#X connect 27 2 34 0;
#X connect 27 3 35 0;
#X connect 27 4 36 0;
#X connect 27 5 26 1;
#X connect 27 5 33 1;
#X connect 27 5 34 1;
#X connect 27 5 35 1;
#X connect 27 5 36 1;
#X connect 33 0 29 0;
#X connect 34 0 30 0;
#X connect 35 0 31 0;
#X connect 36 0 32 0;
#X connect 37 0 38 0;
#X connect 38 0 2 0;
#X connect 39 0 24 0;
#X connect 40 0 39 0;
#X connect 41 0 27 0;
#X connect 42 0 43 0;
#X connect 42 0 27 1;
#X connect 43 0 41 1;
#X connect 44 0 42 0;
#X restore 342 192 pd coef_lowShelf_biquad;
#X obj 28 425 hip~ 2;
#N canvas 275 396 358 628 coef_hpf_biquad 0;
#X obj 50 32 inlet;
#X obj 211 31 inlet;
#X text 92 34 f;
#X text 256 31 Q;
#X obj 116 138 samplerate~;
#X obj 116 115 loadbang;
#X obj 173 116 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 170 /;
#X obj 50 339 cos;
#X obj 199 266 sin;
#X obj 211 116 * 2;
#X obj 50 534 outlet;
#X obj 288 474 + 1;
#X obj 139 471 / 2;
#X msg 139 428 1 \$1;
#X obj 184 450 -;
#X obj 229 471 / 2;
#X msg 229 428 1 \$1;
#X obj 50 457 * -2;
#X obj 50 239 t f f;
#X obj 50 509 /;
#X obj 94 510 /;
#X obj 139 510 /;
#X obj 184 509 /;
#X obj 229 510 /;
#X obj 139 534 outlet;
#X obj 94 534 outlet;
#X obj 184 534 outlet;
#X obj 229 534 outlet;
#X obj 50 216 f;
#X obj 211 185 t b f;
#X obj 211 95 + 0.707;
#X msg 94 428 1 \$1;
#X obj 94 473 -;
#X obj 199 320 t f f;
#X obj 139 450 +;
#X obj 229 451 +;
#X msg 184 428 -1 \$1;
#X obj 211 74 max 0;
#X obj 50 73 max 0;
#X obj 50 364 t f f b;
#X obj 50 115 * 3.14159;
#X obj 60 193 min 3.14;
#X obj 199 294 * 0.767;
#X obj 238 254 sinh;
#X msg 211 140 1 \$1;
#X obj 211 162 /;
#X obj 50 144 * 2;
#X obj 50 95 min 21000;
#X connect 0 0 39 0;
#X connect 1 0 38 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 29 0;
#X connect 8 0 40 0;
#X connect 9 0 43 0;
#X connect 10 0 45 0;
#X connect 12 0 20 1;
#X connect 12 0 21 1;
#X connect 12 0 22 1;
#X connect 12 0 23 1;
#X connect 12 0 24 1;
#X connect 13 0 22 0;
#X connect 14 0 35 0;
#X connect 15 0 23 0;
#X connect 16 0 24 0;
#X connect 17 0 36 0;
#X connect 18 0 20 0;
#X connect 19 0 8 0;
#X connect 19 1 9 0;
#X connect 20 0 11 0;
#X connect 21 0 26 0;
#X connect 22 0 25 0;
#X connect 23 0 27 0;
#X connect 24 0 28 0;
#X connect 29 0 19 0;
#X connect 30 0 29 0;
#X connect 30 1 44 0;
#X connect 31 0 10 0;
#X connect 32 0 33 0;
#X connect 33 0 21 0;
#X connect 34 0 32 0;
#X connect 34 1 12 0;
#X connect 35 0 13 0;
#X connect 36 0 16 0;
#X connect 37 0 15 0;
#X connect 38 0 31 0;
#X connect 39 0 48 0;
#X connect 40 0 18 0;
#X connect 40 1 14 0;
#X connect 40 1 37 0;
#X connect 40 1 17 0;
#X connect 40 2 33 0;
#X connect 41 0 47 0;
#X connect 42 0 29 0;
#X connect 43 0 34 0;
#X connect 44 0 43 1;
#X connect 45 0 46 0;
#X connect 46 0 30 0;
#X connect 47 0 7 0;
#X connect 48 0 41 0;
#X restore 147 201 pd coef_hpf_biquad;
#N canvas 269 177 545 625 coef_bpf_biquad 0;
#X obj 50 32 inlet;
#X obj 211 31 inlet;
#X text 92 34 f;
#X text 256 31 Q;
#X obj 119 148 samplerate~;
#X obj 119 125 loadbang;
#X obj 176 126 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 180 /;
#X obj 50 349 cos;
#X obj 199 276 sin;
#X obj 211 126 * 2;
#X obj 50 544 outlet;
#X obj 288 484 + 1;
#X obj 50 467 * -2;
#X obj 50 249 t f f;
#X obj 50 519 /;
#X obj 94 520 /;
#X obj 139 520 /;
#X obj 229 520 /;
#X obj 139 544 outlet;
#X obj 94 544 outlet;
#X obj 184 544 outlet;
#X obj 229 544 outlet;
#X obj 50 226 f;
#X obj 211 195 t b f;
#X msg 94 438 1 \$1;
#X obj 94 483 -;
#X obj 229 481 * -1;
#X msg 184 520 0;
#X obj 199 330 t f b f;
#X obj 211 74 max 0;
#X obj 50 73 max 0;
#X obj 50 122 * 3.14159;
#X obj 211 105 + 0.7;
#X msg 211 148 1 \$1;
#X obj 238 242 sinh;
#X obj 211 170 /;
#X obj 50 148 * 2;
#X obj 50 99 min 21000;
#X obj 199 303 * 0.767;
#X connect 0 0 31 0;
#X connect 1 0 30 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 23 0;
#X connect 8 0 13 0;
#X connect 9 0 39 0;
#X connect 10 0 34 0;
#X connect 12 0 15 1;
#X connect 12 0 16 1;
#X connect 12 0 17 1;
#X connect 12 0 18 1;
#X connect 13 0 15 0;
#X connect 14 0 8 0;
#X connect 14 1 9 0;
#X connect 15 0 11 0;
#X connect 16 0 20 0;
#X connect 17 0 19 0;
#X connect 18 0 22 0;
#X connect 23 0 14 0;
#X connect 24 0 23 0;
#X connect 24 1 35 0;
#X connect 25 0 26 0;
#X connect 26 0 16 0;
#X connect 27 0 18 0;
#X connect 28 0 21 0;
#X connect 29 0 25 0;
#X connect 29 0 17 0;
#X connect 29 0 27 0;
#X connect 29 1 28 0;
#X connect 29 2 12 0;
#X connect 30 0 33 0;
#X connect 31 0 38 0;
#X connect 32 0 37 0;
#X connect 33 0 10 0;
#X connect 34 0 36 0;
#X connect 35 0 39 1;
#X connect 36 0 24 0;
#X connect 37 0 7 0;
#X connect 38 0 32 0;
#X connect 39 0 29 0;
#X restore 158 294 pd coef_bpf_biquad;
#X msg 81 425 clear;
#N canvas 520 123 368 628 coef_lpf_biquad 0;
#X obj 50 32 inlet;
#X obj 211 31 inlet;
#X text 92 34 f;
#X text 256 31 Q;
#X obj 117 137 samplerate~;
#X obj 117 114 loadbang;
#X obj 174 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 170 /;
#X obj 50 369 cos;
#X obj 199 296 sin;
#X obj 211 116 * 2;
#X obj 50 564 outlet;
#X obj 288 504 + 1;
#X obj 139 501 / 2;
#X obj 94 505 -;
#X msg 99 463 1 \$1;
#X msg 139 458 1 \$1;
#X obj 184 480 -;
#X obj 229 501 / 2;
#X msg 229 460 1 \$1;
#X obj 50 487 * -2;
#X obj 139 480 -;
#X msg 184 458 1 \$1;
#X obj 229 481 -;
#X obj 199 350 t f f;
#X obj 50 269 t f f;
#X obj 50 539 /;
#X obj 94 540 /;
#X obj 139 540 /;
#X obj 184 539 /;
#X obj 229 540 /;
#X obj 139 564 outlet;
#X obj 94 564 outlet;
#X obj 184 564 outlet;
#X obj 229 564 outlet;
#X obj 50 246 f;
#X obj 211 185 t b f;
#X obj 211 95 + 0.707;
#X obj 211 74 max 0;
#X obj 50 73 max 0;
#X obj 50 394 t f f b;
#X obj 50 115 * 3.14159;
#X obj 67 206 min 3.14;
#X obj 238 295 sinh;
#X obj 199 325 * 0.767;
#X msg 211 140 1 \$1;
#X obj 211 162 /;
#X obj 50 143 * 2;
#X obj 50 95 min 21000;
#X connect 0 0 39 0;
#X connect 1 0 38 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 35 0;
#X connect 8 0 40 0;
#X connect 9 0 44 0;
#X connect 10 0 45 0;
#X connect 12 0 26 1;
#X connect 12 0 27 1;
#X connect 12 0 28 1;
#X connect 12 0 29 1;
#X connect 12 0 30 1;
#X connect 13 0 28 0;
#X connect 14 0 27 0;
#X connect 15 0 14 0;
#X connect 16 0 21 0;
#X connect 17 0 29 0;
#X connect 18 0 30 0;
#X connect 19 0 23 0;
#X connect 20 0 26 0;
#X connect 21 0 13 0;
#X connect 22 0 17 0;
#X connect 23 0 18 0;
#X connect 24 0 15 0;
#X connect 24 1 12 0;
#X connect 25 0 8 0;
#X connect 25 1 9 0;
#X connect 26 0 11 0;
#X connect 27 0 32 0;
#X connect 28 0 31 0;
#X connect 29 0 33 0;
#X connect 30 0 34 0;
#X connect 35 0 25 0;
#X connect 36 0 35 0;
#X connect 36 1 43 0;
#X connect 37 0 10 0;
#X connect 38 0 37 0;
#X connect 39 0 48 0;
#X connect 40 0 20 0;
#X connect 40 1 16 0;
#X connect 40 1 22 0;
#X connect 40 1 19 0;
#X connect 40 2 14 0;
#X connect 41 0 47 0;
#X connect 42 0 35 0;
#X connect 43 0 44 1;
#X connect 44 0 24 0;
#X connect 45 0 46 0;
#X connect 46 0 36 0;
#X connect 47 0 7 0;
#X connect 48 0 41 0;
#X restore 135 113 pd coef_lpf_biquad;
#X obj 135 137 pack f f f f f;
#X obj 135 91 mtof;
#X floatatom 135 74 5 0 0 0 - - -;
#X floatatom 240 92 5 0 0 0 - - -;
#X obj 147 225 pack f f f f f;
#X obj 147 180 mtof;
#X floatatom 147 162 5 0 0 0 - - -;
#X floatatom 252 180 5 0 0 0 - - -;
#X obj 158 315 pack f f f f f;
#X obj 158 270 mtof;
#X floatatom 158 250 5 0 0 0 - - -;
#X floatatom 263 270 5 0 0 0 - - -;
#X obj 555 135 pack f f f f f;
#X obj 555 90 mtof;
#X floatatom 555 72 5 0 0 0 - - -;
#X floatatom 673 92 5 0 0 0 - - -;
#N canvas 101 71 356 625 coef_notch_biquad 0;
#X obj 50 32 inlet;
#X obj 205 31 inlet;
#X text 92 34 f;
#X text 250 31 Q;
#X obj 119 148 samplerate~;
#X obj 119 125 loadbang;
#X obj 176 126 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 180 /;
#X obj 50 349 cos;
#X obj 199 276 sin;
#X obj 205 126 * 2;
#X obj 50 574 outlet;
#X obj 288 484 + 1;
#X obj 50 467 * -2;
#X obj 50 249 t f f;
#X obj 50 519 /;
#X obj 94 520 /;
#X obj 139 520 /;
#X obj 229 520 /;
#X obj 139 574 outlet;
#X obj 94 574 outlet;
#X obj 184 574 outlet;
#X obj 229 574 outlet;
#X obj 50 226 f;
#X obj 205 195 t b f;
#X msg 94 438 1 \$1;
#X obj 94 483 -;
#X obj 199 330 t f b f;
#X obj 205 74 max 0;
#X obj 50 73 max 0;
#X obj 50 122 * 3.14159;
#X msg 205 148 1 \$1;
#X obj 232 242 sinh;
#X obj 205 170 /;
#X obj 199 303 *;
#X obj 50 148 * 2;
#X msg 139 487 1;
#X msg 231 481 1;
#X obj 50 548 t f f;
#X obj 205 104 + 0.1;
#X obj 50 99 min 21000;
#X connect 0 0 29 0;
#X connect 1 0 28 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 23 0;
#X connect 8 0 13 0;
#X connect 9 0 34 0;
#X connect 10 0 31 0;
#X connect 12 0 15 1;
#X connect 12 0 16 1;
#X connect 12 0 17 1;
#X connect 12 0 18 1;
#X connect 13 0 15 0;
#X connect 14 0 8 0;
#X connect 14 1 9 0;
#X connect 15 0 38 0;
#X connect 16 0 20 0;
#X connect 17 0 19 0;
#X connect 18 0 22 0;
#X connect 23 0 14 0;
#X connect 24 0 23 0;
#X connect 24 1 32 0;
#X connect 25 0 26 0;
#X connect 26 0 16 0;
#X connect 27 0 25 0;
#X connect 27 1 36 0;
#X connect 27 1 37 0;
#X connect 27 2 12 0;
#X connect 28 0 39 0;
#X connect 29 0 40 0;
#X connect 30 0 35 0;
#X connect 31 0 33 0;
#X connect 32 0 34 1;
#X connect 33 0 24 0;
#X connect 34 0 27 0;
#X connect 35 0 7 0;
#X connect 36 0 17 0;
#X connect 37 0 18 0;
#X connect 38 0 11 0;
#X connect 38 1 21 0;
#X connect 39 0 10 0;
#X connect 40 0 30 0;
#X restore 555 113 pd coef_notch_biquad;
#X obj 28 397 noise~;
#X obj 27 520 dac~;
#X obj 135 383 t a;
#X obj 325 135 pack f f f f f;
#X obj 325 90 mtof;
#X floatatom 325 72 5 0 0 0 - - -;
#X floatatom 386 90 5 0 0 0 - - -;
#X obj 325 350 t a;
#N canvas 101 71 356 625 coef_peak_biquad 0;
#X obj 50 32 inlet;
#X obj 206 31 inlet;
#X text 92 34 f;
#X text 251 31 Q;
#X obj 119 148 samplerate~;
#X obj 119 125 loadbang;
#X obj 176 126 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 180 /;
#X obj 50 349 cos;
#X obj 200 276 sin;
#X obj 206 126 * 2;
#X obj 50 574 outlet;
#X obj 283 485 + 1;
#X obj 50 467 * -2;
#X obj 50 249 t f f;
#X obj 50 519 /;
#X obj 94 520 /;
#X obj 139 520 /;
#X obj 229 520 /;
#X obj 139 574 outlet;
#X obj 94 574 outlet;
#X obj 184 574 outlet;
#X obj 229 574 outlet;
#X obj 50 226 f;
#X obj 206 195 t b f;
#X msg 94 458 1 \$1;
#X obj 206 74 max 0;
#X obj 50 73 max 0;
#X obj 50 128 * 3.14159;
#X msg 206 148 1 \$1;
#X obj 233 226 sinh;
#X obj 206 170 /;
#X obj 50 148 * 2;
#X obj 50 548 t f f;
#X obj 206 104 + 0.1;
#X obj 302 32 inlet;
#X text 344 198 A;
#X obj 302 117 pow;
#X msg 302 96 10;
#X obj 302 77 t b f;
#X obj 302 54 / 40;
#X msg 140 460 1 \$1;
#X msg 230 460 1 \$1;
#X obj 230 485 -;
#X obj 200 356 t f f;
#X obj 302 202 t b f;
#X obj 140 485 +;
#X obj 94 483 -;
#X obj 50 99 min 21000;
#X obj 200 406 / 1;
#X obj 230 407 * 1;
#X obj 283 407 / 1;
#X obj 200 303 * 74.2;
#X connect 0 0 27 0;
#X connect 1 0 26 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 23 0;
#X connect 8 0 13 0;
#X connect 9 0 52 0;
#X connect 10 0 29 0;
#X connect 12 0 15 1;
#X connect 12 0 16 1;
#X connect 12 0 17 1;
#X connect 12 0 18 1;
#X connect 13 0 15 0;
#X connect 14 0 8 0;
#X connect 14 1 9 0;
#X connect 15 0 33 0;
#X connect 16 0 20 0;
#X connect 17 0 19 0;
#X connect 18 0 22 0;
#X connect 23 0 14 0;
#X connect 24 0 23 0;
#X connect 24 1 30 0;
#X connect 25 0 47 0;
#X connect 26 0 34 0;
#X connect 27 0 48 0;
#X connect 28 0 32 0;
#X connect 29 0 31 0;
#X connect 30 0 52 1;
#X connect 31 0 24 0;
#X connect 32 0 7 0;
#X connect 33 0 11 0;
#X connect 33 1 21 0;
#X connect 34 0 10 0;
#X connect 35 0 40 0;
#X connect 37 0 45 0;
#X connect 38 0 37 0;
#X connect 39 0 38 0;
#X connect 39 1 37 1;
#X connect 40 0 39 0;
#X connect 41 0 46 0;
#X connect 42 0 43 0;
#X connect 43 0 18 0;
#X connect 44 0 49 0;
#X connect 44 0 50 0;
#X connect 44 1 51 0;
#X connect 45 0 23 0;
#X connect 45 1 49 1;
#X connect 45 1 50 1;
#X connect 45 1 51 1;
#X connect 46 0 17 0;
#X connect 47 0 16 0;
#X connect 48 0 28 0;
#X connect 49 0 25 0;
#X connect 50 0 42 0;
#X connect 50 0 41 0;
#X connect 51 0 12 0;
#X connect 52 0 44 0;
#X restore 325 113 pd coef_peak_biquad;
#X floatatom 447 93 5 0 0 0 - - -;
#X obj 28 493 *~ 0.1;
#X obj 342 215 pack f f f f f;
#X obj 358 277 mtof;
#X floatatom 358 261 5 0 127 0 - - -;
#X floatatom 493 275 5 0 0 0 - - -;
#X obj 358 320 pack f f f f f;
#N canvas 435 52 535 646 coef_highShelf_biquad 0;
#X obj 50 32 inlet;
#X text 92 34 f;
#X obj 50 165 * 6.283;
#X obj 106 188 samplerate~;
#X obj 106 166 loadbang;
#X obj 164 167 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 220 /;
#X obj 96 272 cos;
#X obj 69 271 sin;
#X obj 319 36 inlet;
#X text 387 146 A;
#X obj 319 121 pow;
#X msg 319 100 10;
#X obj 319 81 t b f;
#X obj 319 58 / 40;
#X obj 319 182 t f f;
#X obj 319 204 *;
#X obj 319 224 + 1;
#X obj 360 183 - 1;
#X obj 360 204 t f f;
#X obj 360 226 *;
#X obj 319 254 -;
#X text 360 279 beta;
#X obj 319 278 sqrt;
#X obj 319 143 t f f f;
#X obj 50 243 t b f f;
#X obj 50 493 /;
#X obj 50 525 outlet;
#X obj 99 527 outlet;
#X obj 149 528 outlet;
#X obj 199 528 outlet;
#X obj 249 529 outlet;
#X obj 99 493 /;
#X obj 149 496 /;
#X obj 199 494 /;
#X obj 249 497 /;
#X obj 50 392 expr 2 * ( ($f2-1) - ($f2+1)*$f4 ) \; ($f2+1) - ($f2-1)*$f4
- $f1*$f3 \; $f2 * ( ($f2+1) + ($f2-1)*$f4 + $f1*$f3 ) \; -2 * $f2
* ( ($f2-1) + ($f2+1)*$f4 ) \; $f2 * ( ($f2+1) + ($f2-1)*$f4 - $f1*$f3
) \; ($f2+1) - ($f2-1)*$f4 + $f1*$f3 \;;
#X obj 50 73 max 0;
#X obj 50 99 min 21000;
#X obj 50 357 f;
#X msg 135 281 1;
#X obj 135 302 sqrt;
#X obj 135 257 loadbang;
#X connect 0 0 37 0;
#X connect 2 0 6 0;
#X connect 3 0 6 1;
#X connect 4 0 3 0;
#X connect 5 0 3 0;
#X connect 6 0 25 0;
#X connect 7 0 36 3;
#X connect 8 0 36 2;
#X connect 9 0 14 0;
#X connect 11 0 24 0;
#X connect 12 0 11 0;
#X connect 13 0 12 0;
#X connect 13 1 11 1;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 15 1 16 1;
#X connect 16 0 17 0;
#X connect 17 0 21 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 19 1 20 1;
#X connect 20 0 21 1;
#X connect 21 0 23 0;
#X connect 23 0 36 0;
#X connect 24 0 15 0;
#X connect 24 1 18 0;
#X connect 24 2 36 1;
#X connect 25 0 39 0;
#X connect 25 1 8 0;
#X connect 25 2 7 0;
#X connect 26 0 27 0;
#X connect 32 0 28 0;
#X connect 33 0 29 0;
#X connect 34 0 30 0;
#X connect 35 0 31 0;
#X connect 36 0 26 0;
#X connect 36 1 32 0;
#X connect 36 2 33 0;
#X connect 36 3 34 0;
#X connect 36 4 35 0;
#X connect 36 5 26 1;
#X connect 36 5 32 1;
#X connect 36 5 33 1;
#X connect 36 5 34 1;
#X connect 36 5 35 1;
#X connect 37 0 38 0;
#X connect 38 0 2 0;
#X connect 39 0 36 0;
#X connect 40 0 41 0;
#X connect 40 0 36 1;
#X connect 41 0 39 1;
#X connect 42 0 40 0;
#X restore 358 297 pd coef_highShelf_biquad;
#X text 45 34 y(n) = b0 x(n) + b1 x(n-1) + b2 x(n-2) -a1 y(n-1) -a2
y(n-2);
#N canvas 0 0 450 300 5_line~ 0;
#X obj 80 123 line~;
#X obj 79 147 outlet~;
#X obj 80 73 inlet;
#X obj 136 123 line~;
#X obj 135 147 outlet~;
#X obj 136 73 inlet;
#X obj 193 123 line~;
#X obj 192 147 outlet~;
#X obj 193 73 inlet;
#X obj 247 123 line~;
#X obj 246 147 outlet~;
#X obj 247 73 inlet;
#X obj 304 123 line~;
#X obj 303 147 outlet~;
#X obj 304 73 inlet;
#X msg 80 96 \$1 133;
#X msg 136 96 \$1 133;
#X msg 193 96 \$1 133;
#X msg 247 96 \$1 133;
#X msg 304 96 \$1 133;
#X connect 0 0 1 0;
#X connect 2 0 15 0;
#X connect 3 0 4 0;
#X connect 5 0 16 0;
#X connect 6 0 7 0;
#X connect 8 0 17 0;
#X connect 9 0 10 0;
#X connect 11 0 18 0;
#X connect 12 0 13 0;
#X connect 14 0 19 0;
#X connect 15 0 0 0;
#X connect 16 0 3 0;
#X connect 17 0 6 0;
#X connect 18 0 9 0;
#X connect 19 0 12 0;
#X restore 135 424 pd 5_line~;
#X obj 135 403 unpack f f f f f;
#N canvas 0 0 444 301 oscillo 0;
#X obj 41 25 loadbang;
#X obj 26 223 metro 100;
#X obj 8 -9 inlet~;
#X msg 41 47 1;
#X obj 42 81 tgl 20 0 empty empty Stop 0 -6 0 8 -258699 -1 -1 1 1;
#X obj 118 -3 inlet;
#X msg 147 48 1;
#X msg 115 48 0;
#X obj 118 21 moses 10;
#X obj 19 263 tabwrite~ \$0-oscillo;
#X obj 100 140 cnv 1 300 1 empty empty empty 20 12 0 14 -195568 -66577
0;
#N canvas 0 0 767 419 (subpatch) 0;
#X array \$0-oscillo 300 float 0;
#X coords 0 1 299 -1 300 80 1;
#X restore 100 100 graph;
#X obj 110 75 change;
#X obj 234 62 block~ 640 1 0.25;
#X connect 0 0 3 0;
#X connect 1 0 9 0;
#X connect 2 0 9 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 5 0 8 0;
#X connect 6 0 12 0;
#X connect 7 0 12 0;
#X connect 8 0 7 0;
#X connect 8 1 6 0;
#X connect 8 1 1 1;
#X connect 12 0 1 0;
#X coords 0 -1 1 1 300 80 1 100 100;
#X restore 83 497 pd oscillo;
#X obj 29 466 bq~ ---------;
#X text 27 6 bq~ is a biquad \, but with audio input for the coeficients.
Out out is :;
#X text 43 52 (it's not the same structure than biquad~ ! );
#N canvas 0 98 595 201 bq~ 0;
#X obj 56 60 inlet~;
#X obj 192 58 inlet~;
#X obj 239 58 inlet~;
#X obj 319 59 inlet~;
#X obj 366 59 inlet~;
#X obj 412 58 inlet~;
#X text 323 37 b0;
#X obj 56 156 outlet~;
#X msg 67 84 clear;
#X text 188 34 a1;
#X obj 57 113 fexpr~ $x4[0]*$x1[0] + $x5[0]*$x1[-1] + $x6[0]*$x1[-2]
- $x2[0]*$y1[-1] - $x3[0]*$y1[-2];
#X connect 0 0 10 0;
#X connect 1 0 10 1;
#X connect 2 0 10 2;
#X connect 3 0 10 3;
#X connect 4 0 10 4;
#X connect 5 0 10 5;
#X connect 8 0 10 0;
#X connect 10 0 7 0;
#X restore 19 597 pd bq~ ---;
#X text 101 597 <- drop in remplacement for bq~ \, using fexpr~ (lot's
slower);
#X obj 555 313 t a;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 3 1;
#X connect 3 0 37 0;
#X connect 3 1 37 1;
#X connect 3 2 37 2;
#X connect 3 3 37 3;
#X connect 3 4 37 4;
#X connect 4 0 47 0;
#X connect 5 0 13 0;
#X connect 5 1 13 1;
#X connect 5 2 13 2;
#X connect 5 3 13 3;
#X connect 5 4 13 4;
#X connect 6 0 17 0;
#X connect 6 1 17 1;
#X connect 6 2 17 2;
#X connect 6 3 17 3;
#X connect 6 4 17 4;
#X connect 7 0 47 0;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 8 2 9 2;
#X connect 8 3 9 3;
#X connect 8 4 9 4;
#X connect 9 0 28 0;
#X connect 10 0 8 0;
#X connect 11 0 10 0;
#X connect 12 0 8 1;
#X connect 13 0 28 0;
#X connect 14 0 5 0;
#X connect 15 0 14 0;
#X connect 16 0 5 1;
#X connect 17 0 28 0;
#X connect 18 0 6 0;
#X connect 19 0 18 0;
#X connect 20 0 6 1;
#X connect 21 0 52 0;
#X connect 22 0 25 0;
#X connect 23 0 22 0;
#X connect 24 0 25 1;
#X connect 25 0 21 0;
#X connect 25 1 21 1;
#X connect 25 2 21 2;
#X connect 25 3 21 3;
#X connect 25 4 21 4;
#X connect 26 0 4 0;
#X connect 28 0 45 0;
#X connect 29 0 33 0;
#X connect 30 0 34 0;
#X connect 31 0 30 0;
#X connect 32 0 34 1;
#X connect 33 0 28 0;
#X connect 34 0 29 0;
#X connect 34 1 29 1;
#X connect 34 2 29 2;
#X connect 34 3 29 3;
#X connect 34 4 29 4;
#X connect 35 0 34 2;
#X connect 36 0 27 0;
#X connect 36 0 27 1;
#X connect 37 0 33 0;
#X connect 38 0 42 0;
#X connect 39 0 38 0;
#X connect 40 0 42 1;
#X connect 41 0 33 0;
#X connect 42 0 41 0;
#X connect 42 1 41 1;
#X connect 42 2 41 2;
#X connect 42 3 41 3;
#X connect 42 4 41 4;
#X connect 44 0 47 1;
#X connect 44 1 47 2;
#X connect 44 2 47 3;
#X connect 44 3 47 4;
#X connect 44 4 47 5;
#X connect 45 0 44 0;
#X connect 45 1 44 1;
#X connect 45 2 44 2;
#X connect 45 3 44 3;
#X connect 45 4 44 4;
#X connect 47 0 46 0;
#X connect 47 0 36 0;
#X connect 52 0 33 0;