diff options
author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2012-10-08 01:02:21 +0000 |
---|---|---|
committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2012-10-08 01:02:21 +0000 |
commit | 5aeafcb5b77b06ef6e14d140db81bd79b2f173c4 (patch) | |
tree | 3b343d232f84196c4b17d662313ffab90a079919 /externals/extra/0.43.3/hilbert~.pd | |
parent | 3391e44d8d82a3e221888d0b8a19b0e4953cb104 (diff) |
tagging extra 0.43.3
svn path=/trunk/; revision=16355
Diffstat (limited to 'externals/extra/0.43.3/hilbert~.pd')
-rw-r--r-- | externals/extra/0.43.3/hilbert~.pd | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/externals/extra/0.43.3/hilbert~.pd b/externals/extra/0.43.3/hilbert~.pd new file mode 100644 index 00000000..152c2082 --- /dev/null +++ b/externals/extra/0.43.3/hilbert~.pd @@ -0,0 +1,27 @@ +#N canvas 269 0 593 306 12; +#X obj 105 92 biquad~ 0.83774 -0.06338 0.06338 -0.83774 1; +#X obj 105 66 biquad~ 1.94632 -0.94657 0.94657 -1.94632 1; +#X obj 86 149 biquad~ -0.02569 0.260502 -0.260502 0.02569 1; +#X obj 86 175 biquad~ 1.8685 -0.870686 0.870686 -1.8685 1; +#X obj 86 39 inlet~; +#X obj 105 121 outlet~; +#X obj 86 202 outlet~; +#X text 34 232 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 obj 502 39 inlet; +#X text 461 13 bang to clear; +#X text 80 16 signal in; +#X msg 502 112 clear; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 4 0 1 0; +#X connect 4 0 2 0; +#X connect 8 0 11 0; +#X connect 11 0 1 0; +#X connect 11 0 0 0; +#X connect 11 0 2 0; +#X connect 11 0 3 0; |