From 494a07a361fe4ee0e54f77468a976b1a77818770 Mon Sep 17 00:00:00 2001 From: Tom Schouten Date: Fri, 12 Sep 2003 22:26:57 +0000 Subject: creb 0.9.0 svn path=/trunk/externals/creb/; revision=956 --- abs/lpifft~.pd | 61 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 61 insertions(+) create mode 100644 abs/lpifft~.pd (limited to 'abs/lpifft~.pd') diff --git a/abs/lpifft~.pd b/abs/lpifft~.pd new file mode 100644 index 0000000..60dde2d --- /dev/null +++ b/abs/lpifft~.pd @@ -0,0 +1,61 @@ +#N canvas 261 505 536 346 10; +#X obj 407 227 f; +#X obj 351 251 * -1; +#X obj 73 189 *~; +#X obj 104 189 *~; +#X obj 49 41 inlet~; +#X obj 103 42 inlet~; +#X obj 64 242 +~; +#X obj 112 246 -~; +#X obj 361 35 inlet; +#X obj 377 59 fblock \$1; +#X msg 434 38 1; +#X obj 361 85 /; +#X obj 392 299 +~; +#X obj 361 109 moses 1; +#X msg 361 131 1; +#X obj 407 154 t b f; +#X msg 407 176 0.5; +#X obj 409 204 /; +#X obj 407 275 pulsor~ \$1; +#X obj 329 275 pulsor~ \$1; +#X obj 446 15 loadbang; +#X obj 48 315 outlet~; +#X obj 123 312 outlet~; +#X text 18 265 xform s.t. real spectrum = mono; +#X text 18 7 ifft with rectangular lowpass for anti-aliased dynwav +; +#X text 9 18 creation arg = fft size \, right inlet = dynwav cutoff +freq; +#X obj 122 165 +~; +#X obj 73 214 nifft~; +#X connect 0 0 1 0; +#X connect 0 0 18 0; +#X connect 1 0 19 0; +#X connect 2 0 27 0; +#X connect 3 0 27 1; +#X connect 4 0 2 0; +#X connect 5 0 3 0; +#X connect 6 0 21 0; +#X connect 7 0 22 0; +#X connect 8 0 11 0; +#X connect 9 0 11 1; +#X connect 10 0 9 1; +#X connect 11 0 13 0; +#X connect 12 0 26 0; +#X connect 13 0 14 0; +#X connect 13 1 15 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 1 17 1; +#X connect 16 0 17 0; +#X connect 17 0 0 0; +#X connect 18 0 12 1; +#X connect 19 1 12 0; +#X connect 20 0 10 0; +#X connect 26 0 3 1; +#X connect 26 0 2 1; +#X connect 27 0 6 0; +#X connect 27 0 7 0; +#X connect 27 1 6 1; +#X connect 27 1 7 1; -- cgit v1.2.1