#N canvas 106 40 882 682 10;
#X obj 18 44 dsp;
#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X floatatom 18 100 5 0 0 0 - - -;
#X floatatom 33 74 5 0 0 0 - - -;
#X obj 46 322 sig~ 1;
#X obj 96 353 sig~ 2;
#X obj 145 377 sig~ 4;
#X obj 195 402 sig~ 8;
#X obj 234 431 sig~ 16;
#X obj 47 488 unsig~;
#X floatatom 47 512 5 0 0 0 - - -;
#X obj 245 491 unsig~;
#X floatatom 245 515 5 0 0 0 - - -;
#X obj 298 442 any;
#X msg 298 154 bundle 0 0 0 0 0;
#X msg 298 180 bundle 1 1 1 1 1;
#X msg 298 201 bundle 2 2 2 2 2;
#X msg 298 227 bundle 1 0 0 0 0;
#X msg 298 247 bundle 0 1 0 0 0;
#X msg 298 267 bundle 0 0 1 0 0;
#X msg 298 287 bundle 0 0 0 1 0;
#X msg 298 307 bundle 0 0 0 0 1;
#X msg 298 333 bundle 2 0 0 0 0;
#X msg 298 353 bundle 0 2 0 0 0;
#X msg 298 373 bundle 0 0 2 0 0;
#X msg 298 393 bundle 0 0 0 2 0;
#X msg 298 413 bundle 0 0 0 0 2;
#X obj 432 442 pp element;
#X obj 432 419 pack 0 0;
#X obj 432 397 f;
#X floatatom 475 368 4 1 5 0 - - -;
#X floatatom 445 368 4 0 2 0 - - -;
#X obj 422 375 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 706 15 SIG_OUT = A * SIG_IN;
#X text 234 14 multiplies a n-dimensional signal-in-vector with a dynamic
static (like sig~) signal-matrix to a n-dimensional signal-out-vector
;
#X text 725 33 A is quadratic;
#X text 662 50 dim(SIG_OUT) = dim(SIG_IN) = n;
#X text 234 51 each matrix-column has only one one \, the other elements
are zero;
#X text 301 475 2.arg <float> Nr. of outlets = rows;
#X text 301 464 1.arg <float> Nr. of inlets = columns;
#X text 517 336 message "element";
#X text 531 365 2.) item <float> column_index (1 .. nr_columns);
#X text 531 353 1.) item <float> row_index (0 .. nr_rows);
#X text 446 111 message "bundle";
#X text 556 381 where the single one of the column will be placed;
#X text 557 393 if (row-index == 0) -> the column has only zeros;
#X text 449 126 (nr_inlets = nr_columns) <float> row-indices (0 ..
nr_row);
#X text 454 162 if (row-index == 0) -> the column has only zeros;
#X text 453 150 where the single one of each column will be placed
;
#N canvas 176 206 818 475 block_______________________ 0;
#X obj 564 88 block~ 128 2;
#X obj 48 29 inlet~;
#X obj 51 260 outlet~;
#X obj 103 30 inlet~;
#X obj 159 29 inlet~;
#X obj 214 30 inlet~;
#X obj 272 30 inlet~;
#X obj 246 257 outlet~;
#X obj 51 209 spec2_matrix_bundle_stat~ 5 2;
#X obj 350 30 inlet;
#X obj 586 308 for++ 0 127 0.1;
#X obj 586 332 moses 64;
#X msg 586 359 1 \$1;
#X msg 637 358 0 \$1;
#X obj 586 287 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 586 267 loadbang;
#X obj 540 240 table \$0_rect 128;
#X obj 586 385 tabwrite \$0_rect;
#X obj 64 57 tabreceive~ \$0_rect;
#X obj 48 79 *~;
#X obj 116 81 tabreceive~ \$0_rect;
#X obj 100 103 *~;
#X obj 170 103 tabreceive~ \$0_rect;
#X obj 154 125 *~;
#X obj 220 124 tabreceive~ \$0_rect;
#X obj 204 146 *~;
#X obj 270 146 tabreceive~ \$0_rect;
#X obj 254 168 *~;
#X connect 1 0 19 0;
#X connect 3 0 21 0;
#X connect 4 0 23 0;
#X connect 5 0 25 0;
#X connect 6 0 27 0;
#X connect 8 0 2 0;
#X connect 8 1 7 0;
#X connect 9 0 8 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 13 0;
#X connect 12 0 17 0;
#X connect 13 0 17 0;
#X connect 14 0 10 0;
#X connect 15 0 14 0;
#X connect 18 0 19 1;
#X connect 19 0 8 0;
#X connect 20 0 21 1;
#X connect 21 0 8 1;
#X connect 22 0 23 1;
#X connect 23 0 8 2;
#X connect 24 0 25 1;
#X connect 25 0 8 3;
#X connect 26 0 27 1;
#X connect 27 0 8 4;
#X restore 48 463 pd block_______________________;
#X text 50 13 spec2_matrix_bundle_stat~;
#X text 90 575 IEM KUG;
#X text 74 563 musil;
#X text 104 563 @;
#X text 110 563 iem.at;
#X text 73 585 Graz \, Austria;
#X text 25 552 (c) Thomas Musil 2000 - 2006;
#X text 234 83 it calculates matrix only with (blocksize/2 + 1) samples
per signalvector;
#X connect 0 0 2 0;
#X connect 0 1 3 0;
#X connect 1 0 0 0;
#X connect 4 0 49 0;
#X connect 5 0 49 1;
#X connect 6 0 49 2;
#X connect 7 0 49 3;
#X connect 8 0 49 4;
#X connect 9 0 10 0;
#X connect 11 0 12 0;
#X connect 13 0 49 5;
#X connect 14 0 13 0;
#X connect 15 0 13 0;
#X connect 16 0 13 0;
#X connect 17 0 13 0;
#X connect 18 0 13 0;
#X connect 19 0 13 0;
#X connect 20 0 13 0;
#X connect 21 0 13 0;
#X connect 22 0 13 0;
#X connect 23 0 13 0;
#X connect 24 0 13 0;
#X connect 25 0 13 0;
#X connect 26 0 13 0;
#X connect 28 0 27 0;
#X connect 29 0 28 0;
#X connect 30 0 28 1;
#X connect 31 0 29 1;
#X connect 32 0 29 0;
#X connect 49 0 9 0;
#X connect 49 1 11 0;