#N canvas 272 58 454 512 10; #N canvas 427 191 493 331 olli~ 0; #X obj 264 85 delay~ 1 1; #X obj 264 56 inlet~; #X obj 39 237 outlet~; #X obj 264 239 outlet~; #X text 37 289 y[n]=b1*y[n-1]+b2*y[n-2]+a0*x[n]+a1*x[n-1]+a2*x[n-2] ; #X text 36 270 Pd's biquad:; #X obj 39 112 biquad~ 0 0.161758 0.161758 0 -1; #X obj 39 141 biquad~ 0 0.733029 0.733029 0 -1; #X obj 39 173 biquad~ 0 0.94535 0.94535 0 -1; #X obj 39 200 biquad~ 0 0.990598 0.990598 0 -1; #X obj 264 112 biquad~ 0 0.479401 0.479401 0 -1; #X obj 264 142 biquad~ 0 0.876218 0.876218 0 -1; #X obj 264 174 biquad~ 0 0.976599 0.976599 0 -1; #X obj 264 202 biquad~ 0 0.9975 0.9975 0 -1; #X text 91 238 first phase; #X text 320 238 second phase; #X text 167 238 << 90 degree >>; #X text 40 25 Olli Niemitalo's quadrature transformer coefficients ; #X connect 0 0 10 0; #X connect 1 0 0 0; #X connect 1 0 6 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 2 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 13 0; #X connect 13 0 3 0; #X restore 74 175 pd olli~; #X obj 239 139 osc~ 40; #X obj 74 256 cyclone/Scope~ 130 130 27 3 128 -1 1 0 0 0 0 102 255 51 30 30 30 0; #X obj 239 174 hilbert~; #X obj 239 257 cyclone/Scope~ 130 130 27 3 128 -1 1 0 0 0 0 102 255 51 30 30 30 0; #X msg 30 49 \; pd dsp 1; #X obj 30 21 loadbang; #X msg 30 90 \; pd dsp 0; #X text 74 415 Methods to make a complex signal: two phases which differ by pi/2 radians.; #X floatatom 255 222 5 0 0 0 - - -; #X floatatom 239 105 5 0 0 0 - - -; #X text 291 222 Scope~ refresh; #X connect 0 0 2 0; #X connect 0 1 2 1; #X connect 1 0 0 0; #X connect 1 0 3 0; #X connect 3 0 4 0; #X connect 3 1 4 1; #X connect 6 0 5 0; #X connect 9 0 4 0; #X connect 9 0 2 0; #X connect 10 0 1 0;