#N canvas 99 75 824 496 10;
#X obj 18 44 dsp;
#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X floatatom 18 100 5 0 0 0 - - -;
#X floatatom 33 74 5 0 0 0 - - -;
#X obj 33 293 sig~ 1;
#X obj 100 296 sig~ 2;
#X obj 167 297 sig~ 4;
#X obj 34 366 unsig~;
#X floatatom 34 390 5 0 0 0 - - -;
#X obj 99 364 unsig~;
#X floatatom 99 388 5 0 0 0 - - -;
#X obj 226 320 any;
#X obj 379 320 pp element;
#X obj 379 275 f;
#X floatatom 392 252 4 1 3 0 - - -;
#X obj 369 253 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 167 366 unsig~;
#X floatatom 167 390 5 0 0 0 - - -;
#X floatatom 422 253 5 0 0 0 - - -;
#X obj 34 337 matrix_diag_mul_stat~ 3;
#X msg 226 101 diag 0 0 0;
#X msg 226 125 diag 1 1 1;
#X msg 226 146 diag 1 0 0;
#X msg 226 167 diag 0 0 2;
#X msg 226 188 diag 0 -10 0;
#X obj 379 297 pack 0 0;
#X text 653 16 SIG_OUT = A * SIG_IN;
#X text 70 15 matrix_diag_mul_stat~;
#X text 216 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 672 34 A is quadratic;
#X text 326 95 message "diag";
#X text 337 116 (nr_rows = nr_columns = n) items <float> elements of
main-diagonal of matrix;
#X text 609 51 dim(SIG_OUT) = dim(SIG_IN) = n;
#X text 215 53 the elements of matrix are all zero except the main-diagonal
;
#X text 449 274 message "element";
#X text 463 291 1.) item <float> row_index = column-index (1 .. n)
;
#X text 463 304 2.) item <float> matrix-element at index \, index;
#X text 189 341 1.arg <float> Nr. of inlets = columns = outlets = rows
;
#X text 78 446 IEM KUG;
#X text 62 434 musil;
#X text 92 434 @;
#X text 98 434 iem.at;
#X text 61 456 Graz \, Austria;
#X text 13 423 (c) Thomas Musil 2000 - 2006;
#X connect 0 0 2 0;
#X connect 0 1 3 0;
#X connect 1 0 0 0;
#X connect 4 0 19 0;
#X connect 5 0 19 1;
#X connect 6 0 19 2;
#X connect 7 0 8 0;
#X connect 9 0 10 0;
#X connect 11 0 19 0;
#X connect 12 0 19 0;
#X connect 13 0 25 0;
#X connect 14 0 13 1;
#X connect 15 0 13 0;
#X connect 16 0 17 0;
#X connect 18 0 25 1;
#X connect 19 0 7 0;
#X connect 19 1 9 0;
#X connect 19 2 16 0;
#X connect 20 0 11 0;
#X connect 21 0 11 0;
#X connect 22 0 11 0;
#X connect 23 0 11 0;
#X connect 24 0 11 0;
#X connect 25 0 12 0;