#N canvas 61 0 531 283 10;
#X declare -lib iemmatrix;
#X obj 422 49 matrix;
#X text 292 48 see also help for;
#X obj 103 227 mtx_print;
#X msg 103 130 bang;
#X text 129 20 [mtx_diag];
#X msg 136 157 1 2 3 4 5;
#X text 93 252 diagonal-matrix;
#X obj 103 201 mtx_diag 7 9 8;
#X text 30 89 create a diagonal matrix;
#X obj 300 130 mtx_rand 4;
#X msg 300 108 bang;
#X obj 300 197 mtx_diag;
#X obj 300 231 print diagonal;
#X obj 300 158 t a a;
#X obj 347 159 mtx_print org;
#X text 294 258 diagonal of the matrix;
#X text 276 88 get the diagonal of a matrix;
#N canvas 460 154 494 171 META 0;
#X text 12 105 AUTHOR IOhannes m zmoelnig;
#X text 12 85 OUTLET_0 matrix;
#X text 12 125 HELP_PATCH_AUTHORS IOhannes m zmölnig;
#X text 12 25 LICENSE GPL-2+;
#X text 12 65 INLET_0 matrix;
#X text 12 5 KEYWORDS control matrix;
#X text 12 45 DESCRIPTION create a diagonal matrix;
#X obj 16 147 declare -lib iemmatrix;
#X restore 451 13 pd META;
#X connect 3 0 7 0;
#X connect 5 0 7 0;
#X connect 7 0 2 0;
#X connect 9 0 13 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 13 0 11 0;
#X connect 13 1 14 0;
