#N canvas 540 164 812 565 12;
#X declare -path lib;
#X floatatom 618 221 5 0 200 0 - - -, f 5;
#X obj 618 243 / 25;
#X floatatom 341 206 5 0 150 0 - - -, f 5;
#X obj 341 228 mtof;
#X obj 342 273 pack 0 50;
#X obj 342 298 line~;
#X floatatom 341 251 7 0 0 0 - - -, f 7;
#X text 610 125 "resonance";
#X text 609 142 (>4 to oscillate);
#X text 358 60 ----- filter parameters ----;
#X obj 618 170 loadbang;
#X msg 618 195 10;
#X obj 617 271 line~;
#N canvas 742 302 417 368 test 0;
#X obj 102 122 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 313 127 min~;
#X obj 357 103 -~ 1;
#X obj 357 128 *~ -50;
#X floatatom 102 102 5 0 128 0 - - -, f 5;
#X obj 235 72 mtof;
#X obj 102 141 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X text 196 32 test signal;
#X text 147 102 pitch;
#X text 119 140 sawtooth;
#X obj 312 70 phasor~ 220;
#X obj 233 107 osc~ 220;
#X obj 102 160 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 121 120 sine;
#X text 120 159 noise;
#X floatatom 103 181 3 0 100 0 - - -, f 3;
#X obj 62 24 loadbang;
#X msg 62 49 57;
#X msg 48 163 80;
#X text 133 180 dB out;
#X msg 60 111 1;
#X obj 362 189 noise~;
#X obj 204 207 *~ 0;
#X obj 316 184 *~ 0;
#X obj 315 217 *~ 0;
#X obj 208 238 +~;
#X obj 178 304 outlet~;
#X obj 176 276 *~;
#X obj 107 209 dbtorms;
#X obj 107 234 pack 0 20;
#X obj 107 259 line~;
#X connect 0 0 22 1;
#X connect 1 0 23 0;
#X connect 2 0 3 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 5 0 10 0;
#X connect 5 0 11 0;
#X connect 6 0 23 1;
#X connect 10 0 1 0;
#X connect 10 0 2 0;
#X connect 11 0 22 0;
#X connect 12 0 24 1;
#X connect 15 0 28 0;
#X connect 16 0 17 0;
#X connect 16 0 18 0;
#X connect 16 0 20 0;
#X connect 17 0 4 0;
#X connect 18 0 15 0;
#X connect 20 0 6 0;
#X connect 21 0 24 0;
#X connect 22 0 25 0;
#X connect 23 0 25 1;
#X connect 24 0 25 1;
#X connect 25 0 27 1;
#X connect 27 0 26 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 27 0;
#X coords 0 -1 1 1 95 100 2 100 100;
#X restore 95 148 pd test;
#X obj 341 157 loadbang;
#X msg 341 182 69;
#X text 62 114 ----- test input ----;
#X msg 326 472 print;
#X text 234 444 filter state;
#X floatatom 93 439 5 1 10 0 - - -, f 5;
#X msg 93 466 oversample \$1;
#X msg 216 470 set;
#X text 230 425 set or print;
#X text 244 403 utility:;
#X text 86 412 oversampling:;
#X obj 279 297 r rk;
#X obj 108 508 s rk;
#X msg 264 470 set 1;
#X obj 357 384 env~ 8192, f 4;
#X floatatom 356 424 5 0 0 0 - - -, f 5;
#X obj 406 386 output~;
#X floatatom 453 215 5 0 150 0 - - -, f 5;
#X obj 453 237 mtof;
#X obj 454 282 pack 0 50;
#X obj 454 307 line~;
#X floatatom 453 260 7 0 0 0 - - -, f 7;
#X obj 453 166 loadbang;
#X msg 453 191 69;
#X text 349 104 cutoff freqs (switched accorging to state), f 22;
#X obj 326 349 rungekutte~ bentbob 2;
#X obj 442 481 declare -path lib;
#X connect 0 0 1 0;
#X connect 1 0 12 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 39 1;
#X connect 6 0 4 0;
#X connect 10 0 11 0;
#X connect 11 0 0 0;
#X connect 12 0 39 3;
#X connect 13 0 39 0;
#X connect 14 0 15 0;
#X connect 15 0 2 0;
#X connect 17 0 26 0;
#X connect 19 0 20 0;
#X connect 20 0 26 0;
#X connect 21 0 26 0;
#X connect 25 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 29 0;
#X connect 31 0 32 0;
#X connect 32 0 35 0;
#X connect 33 0 34 0;
#X connect 34 0 39 2;
#X connect 35 0 33 0;
#X connect 36 0 37 0;
#X connect 37 0 31 0;
#X connect 39 0 28 0;
#X connect 39 0 30 0;
#X connect 39 0 30 1;