From 388f7a1df37afeed0dd120f8091614a7f6dd91ab Mon Sep 17 00:00:00 2001 From: Miller Puckette Date: Wed, 18 May 2005 04:28:51 +0000 Subject: Damn, edited this before and lost the update. More data features. Took about 12 patches. svn path=/trunk/; revision=3006 --- pd/extra/hilbert~.pd | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) (limited to 'pd/extra') diff --git a/pd/extra/hilbert~.pd b/pd/extra/hilbert~.pd index 5bc7a550..dfafc942 100644 --- a/pd/extra/hilbert~.pd +++ b/pd/extra/hilbert~.pd @@ -1,12 +1,15 @@ -#N canvas 451 128 556 360 12; -#X obj 117 129 biquad~ 0.83774 -0.06338 0.06338 -0.83774 1; -#X obj 117 103 biquad~ 1.94632 -0.94657 0.94657 -1.94632 1; -#X obj 98 186 biquad~ -0.02569 0.260502 -0.260502 0.02569 1; -#X obj 98 212 biquad~ 1.8685 -0.870686 0.870686 -1.8685 1; -#X obj 98 76 inlet~; -#X obj 117 158 outlet~; -#X obj 98 239 outlet~; -#X text 105 273 This is a pair of all-pass filters whose outputs somehow manage to be about 90 degrees out of phase from each other. I don't know what phase relation they have with the original signal. I adapted this from a 4X patch by Emmanuel Favreau \, circa 1982; +#N canvas 269 0 593 306 12; +#X obj 113 68 biquad~ 0.83774 -0.06338 0.06338 -0.83774 1; +#X obj 113 42 biquad~ 1.94632 -0.94657 0.94657 -1.94632 1; +#X obj 94 125 biquad~ -0.02569 0.260502 -0.260502 0.02569 1; +#X obj 94 151 biquad~ 1.8685 -0.870686 0.870686 -1.8685 1; +#X obj 94 15 inlet~; +#X obj 113 97 outlet~; +#X obj 94 178 outlet~; +#X text 32 210 This is a pair of 4th-order all-pass filters whose outputs +somehow manage to be about 90 degrees out of phase from each other. +Both have different phases from the original. Adapted from a 4X patch +by Emmanuel Favreau \, circa 1982; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 3 0; -- cgit v1.2.1