aboutsummaryrefslogtreecommitdiff
path: root/abs/mtx_window.pd
diff options
context:
space:
mode:
Diffstat (limited to 'abs/mtx_window.pd')
-rw-r--r--abs/mtx_window.pd221
1 files changed, 221 insertions, 0 deletions
diff --git a/abs/mtx_window.pd b/abs/mtx_window.pd
new file mode 100644
index 0000000..5bd23e6
--- /dev/null
+++ b/abs/mtx_window.pd
@@ -0,0 +1,221 @@
+#N canvas 0 0 839 500 10;
+#X obj 41 9 inlet;
+#N canvas 404 130 450 300 scale_-1...1 0;
+#X obj 126 -4 inlet;
+#X obj 129 274 outlet;
+#X obj 157 50 t f f;
+#X obj 157 228 mtx_linspace;
+#X msg 157 89 1 \$1;
+#X obj 157 108 /;
+#X msg 157 128 1 \$1;
+#X obj 157 148 -;
+#X obj 157 168 t f f;
+#X obj 157 187 * -1;
+#X obj 157 207 pack f f f;
+#X obj 157 70 << 1;
+#X msg 64 50 matrix 1 1 0;
+#X obj 126 21 moses 2;
+#X connect 0 0 13 0;
+#X connect 2 0 11 0;
+#X connect 2 1 10 2;
+#X connect 3 0 1 0;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 8 1 10 1;
+#X connect 9 0 10 0;
+#X connect 10 0 3 0;
+#X connect 11 0 4 0;
+#X connect 12 0 1 0;
+#X connect 13 0 12 0;
+#X connect 13 1 2 0;
+#X restore 48 88 pd scale_-1...1;
+#X obj 48 262 mtx_* 1;
+#N canvas 0 0 450 300 pi 0;
+#X obj 217 64 inlet;
+#X msg 217 84 1;
+#X obj 217 106 atan;
+#X obj 217 127 * 4;
+#X obj 217 148 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 92 220 pd pi;
+#X obj 92 240 / 2;
+#X obj 92 200 loadbang;
+#X obj 48 286 mtx_cos;
+#X obj 48 309 mtx_.^ 2;
+#X obj 48 65 t f b;
+#X msg 90 110 0;
+#X obj 112 262 mtx_* 1;
+#N canvas 0 0 450 300 pi 0;
+#X obj 217 64 inlet;
+#X msg 217 84 1;
+#X obj 217 106 atan;
+#X obj 217 127 * 4;
+#X obj 217 148 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 156 220 pd pi;
+#X obj 156 240 / 2;
+#X obj 156 200 loadbang;
+#X obj 112 286 mtx_cos;
+#X obj 87 65 t f b;
+#X msg 119 110 1;
+#X msg 151 110 2;
+#X obj 127 65 t f b a;
+#X obj 198 285 mtx_* 1;
+#X obj 259 265 *;
+#X obj 298 206 loadbang;
+#X msg 298 226 10;
+#X obj 298 246 log;
+#X obj 198 307 mtx_exp;
+#X msg 259 227 \$2;
+#X obj 259 246 / 20;
+#X obj 127 337 mtx_ones;
+#X msg 127 317 1 \$1;
+#X obj 198 261 mtx_.^ 2;
+#X obj 112 448 outlet;
+#X obj 181 65 t f b;
+#X msg 183 109 3;
+#X obj 356 265 mtx_abs;
+#X obj 356 285 mtx_* -1;
+#X obj 356 306 mtx_+ 1;
+#X obj 419 260 mtx_* 1;
+#N canvas 0 0 450 300 pi 0;
+#X obj 217 64 inlet;
+#X msg 217 84 1;
+#X obj 217 106 atan;
+#X obj 217 127 * 4;
+#X obj 217 148 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 463 218 pd pi;
+#X obj 463 238 / 2;
+#X obj 463 198 loadbang;
+#X obj 419 284 mtx_cos;
+#X obj 419 307 mtx_.^ 2;
+#X obj 221 65 t f b;
+#X msg 223 109 4;
+#X obj 419 350 mtx_./ 1.08;
+#X obj 419 328 mtx_+ 0.08;
+#X obj 260 65 t f b;
+#X msg 264 109 5;
+#X obj 48 131 demux 0 1 2 3 4 5;
+#X text 24 147 hanning;
+#X text 62 162 sine;
+#X text 131 160 rect;
+#X text 173 161 hamming;
+#X obj 579 235 mtx_* 1;
+#N canvas 0 0 450 300 pi 0;
+#X obj 217 64 inlet;
+#X msg 217 84 1;
+#X obj 217 106 atan;
+#X obj 217 127 * 4;
+#X obj 217 148 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 623 213 pd pi;
+#X obj 623 193 loadbang;
+#X obj 609 296 mtx_cos;
+#X text 188 150 blackman;
+#X obj 541 359 mtx_+ 0.42;
+#X obj 579 257 t a a;
+#X obj 609 277 mtx_* 2;
+#X obj 541 297 mtx_cos;
+#X obj 609 317 mtx_* 0.08;
+#X obj 541 317 mtx_* 0.5;
+#X obj 541 338 mtx_+;
+#X text 625 46 part of iemmatrix;
+#X text 549 412 Franz Zotter 2006;
+#X text 93 149 gauss;
+#X obj 48 32 route hanning sine gauss rectangular bartlett hamming
+blackman;
+#X connect 0 0 68 0;
+#X connect 1 0 48 0;
+#X connect 2 0 6 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 1;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 30 0;
+#X connect 8 0 1 0;
+#X connect 8 1 9 0;
+#X connect 9 0 48 1;
+#X connect 10 0 14 0;
+#X connect 11 0 12 0;
+#X connect 12 0 10 1;
+#X connect 13 0 11 0;
+#X connect 14 0 30 0;
+#X connect 15 0 1 0;
+#X connect 15 1 16 0;
+#X connect 16 0 48 1;
+#X connect 17 0 48 1;
+#X connect 18 0 1 0;
+#X connect 18 1 17 0;
+#X connect 18 2 25 0;
+#X connect 19 0 24 0;
+#X connect 20 0 19 1;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 23 0 20 1;
+#X connect 24 0 30 0;
+#X connect 25 0 26 0;
+#X connect 26 0 20 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 19 0;
+#X connect 31 0 1 0;
+#X connect 31 1 32 0;
+#X connect 32 0 48 1;
+#X connect 33 0 34 0;
+#X connect 34 0 35 0;
+#X connect 35 0 30 0;
+#X connect 36 0 40 0;
+#X connect 37 0 38 0;
+#X connect 38 0 36 1;
+#X connect 39 0 37 0;
+#X connect 40 0 41 0;
+#X connect 41 0 45 0;
+#X connect 42 0 1 0;
+#X connect 42 1 43 0;
+#X connect 43 0 48 1;
+#X connect 44 0 30 0;
+#X connect 45 0 44 0;
+#X connect 46 0 1 0;
+#X connect 46 1 47 0;
+#X connect 47 0 48 1;
+#X connect 48 0 2 0;
+#X connect 48 1 10 0;
+#X connect 48 2 29 0;
+#X connect 48 3 33 0;
+#X connect 48 4 36 0;
+#X connect 48 5 53 0;
+#X connect 53 0 59 0;
+#X connect 54 0 53 1;
+#X connect 55 0 54 0;
+#X connect 56 0 62 0;
+#X connect 58 0 30 0;
+#X connect 59 0 61 0;
+#X connect 59 1 60 0;
+#X connect 60 0 56 0;
+#X connect 61 0 63 0;
+#X connect 62 0 64 1;
+#X connect 63 0 64 0;
+#X connect 64 0 58 0;
+#X connect 68 0 8 0;
+#X connect 68 1 15 0;
+#X connect 68 2 18 0;
+#X connect 68 3 28 0;
+#X connect 68 4 31 0;
+#X connect 68 5 42 0;
+#X connect 68 6 46 0;