#N canvas 279 387 873 767 10; #X obj 31 -13 openpanel; #X msg 31 18 open \$1; #X obj 31 -40 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; #X obj 29 84 readsf~ 2; #X msg 164 82 start; #N canvas 1593 207 773 1082 biquad 1; #X obj 38 63 inlet~; #X obj 36 669 outlet~; #X obj 31 552 biquad~; #X obj 67 328 expr 2*$f2*cos($f1) \; -$f2*$f2; #X text 127 155 poleRadius; #X obj 204 153 expr (2-$f1)/2; #X floatatom 304 188 5 0 0 0 - - -, f 5; #X floatatom 216 222 5 0 0 0 - - -, f 5; #X text 524 355 poleAngle; #X obj 242 262 expr acos(2*$f1*cos($f2)/(1+$f1*$f1)); #X obj 146 47 inlet frequency; #X floatatom 96 277 5 0 0 0 - - -, f 5; #X floatatom 59 374 5 0 0 0 - - -, f 5; #X floatatom 493 192 5 0 0 0 - - -, f 5; #X floatatom 78 428 5 0 0 0 - - -, f 5; #X floatatom 403 215 5 0 0 0 - - -, f 5; #X obj 364 160 t f f; #X obj 278 485 expr (1-$f1*$f1)*sin($f2); #X obj 48 518 pack f f f 0 0; #X floatatom 169 518 5 0 0 0 - - -, f 5; #X obj 369 583 hsl 128 15 0 5 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 1600 1; #N canvas 513 261 964 862 sineLFO 1; #X obj 49 99 inlet frequency; #X obj 81 522 outlet~; #X obj 63 222 osc~; #X obj 219 105 inlet phase; #X msg 239 200 0.01; #X obj 70 353 +~ 0.6; #X obj 67 290 *~ 0.5; #X connect 0 0 2 0; #X connect 2 0 6 0; #X connect 3 0 4 0; #X connect 4 0 2 1; #X connect 5 0 1 0; #X connect 6 0 5 0; #X restore 448 700 pd sineLFO; #X obj 448 820 env~; #X obj 489 872 dbtorms; #X obj 489 917 hsl 100 15 -1 10 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 1131 1; #X obj 410 702 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 441 634 t f f; #X obj 545 626 t b b; #X obj 549 594 loadbang; #X obj 422 902 mtof; #X obj 66 616 hip~; #X obj 116 582 hsl 128 15 0 2000 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 0 1; #X connect 0 0 2 0; #X connect 2 0 30 0; #X connect 3 0 12 0; #X connect 3 1 14 0; #X connect 5 0 7 0; #X connect 6 0 5 0; #X connect 7 0 9 0; #X connect 7 0 3 1; #X connect 7 0 17 0; #X connect 9 0 11 0; #X connect 9 0 17 1; #X connect 11 0 3 0; #X connect 12 0 18 0; #X connect 14 0 18 1; #X connect 15 0 9 1; #X connect 17 0 19 0; #X connect 18 0 2 0; #X connect 19 0 18 2; #X connect 20 0 26 0; #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 22 0 29 0; #X connect 23 0 24 0; #X connect 24 0 6 0; #X connect 24 0 15 0; #X connect 26 0 21 0; #X connect 27 1 21 1; #X connect 28 0 27 0; #X connect 30 0 1 0; #X connect 31 0 30 1; #X restore 31 259 pd biquad; #X obj 282 -3 hsl 128 15 0 15 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 7300 1; #X text 77 176 frequency; #X text 398 145 bandwith; #X obj 385 242 samplerate~; #X obj 311 263 osc~; #X obj 36 600 dac~; #X obj 346 164 t f f; #X obj 162 170 osc~; #X obj 296 61 mtof; #X obj 309 477 dirac~; #X obj 404 317 loadbang; #X obj 404 350 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X msg 350 433 1; #X obj 435 398 metro 250; #X obj 120 496 tabwrite~ array3; #N canvas 0 0 450 300 (subpatch) 0; #X array array3 100 float 3 black black; #A 0 -0.0381314 -0.0282189 -0.0188365 -0.00997851 -0.00164775 0.00614844 0.0133926 0.0200644 0.0261453 0.0316252 0.0365075 0.0408137 0.0445749 0.0478334 0.0506282 0.0529956 0.0549627 0.056549 0.0577638 0.0586088 0.0590807 0.0591788 0.0589078 0.0582852 0.0573438 0.0561261 0.0546836 0.053065 0.0513149 0.0494626 0.0475307 0.0455289 0.0434696 0.0413624 0.0392244 0.0370728 0.0349311 0.0328233 0.0307725 0.0287937 0.0269007 0.0251002 0.0233981 0.0218045 0.0203367 0.0190251 0.0179021 0.016997 0.0163233 0.0158769 0.015633 0.0155559 0.0156047 0.0157397 0.0159325 0.0161629 0.0164243 0.0167214 0.0170661 0.0174763 0.0179691 0.0185627 0.0192703 0.0200971 0.0210435 0.0221057 0.0232862 0.024588 0.0260186 0.0275777 0.0292568 0.0310313 0.0328597 0.0346864 0.0364507 0.0380957 0.0395818 0.0408911 0.0420289 0.0430182 0.0438931 0.0446899 0.0454398 0.046161 0.0468611 0.047542 0.0481915 0.0487928 0.0493266 0.0497738 0.0501219 0.0503622 0.0505011 0.0505495 0.0505161 0.0504069 0.050224 0.049966 0.0496304 0.049212 ; #X coords 0 1 100 -1 200 140 1; #X restore 285 594 graph; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 1 0 4 0; #X connect 2 0 0 0; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 5 0 11 0; #X connect 5 0 11 1; #X connect 5 0 20 0; #X connect 6 0 12 0; #X connect 15 0 5 0; #X connect 16 0 17 0; #X connect 17 0 19 0; #X connect 18 0 15 0; #X connect 19 0 18 0; #X connect 19 0 20 0;