#N canvas 0 0 586 346 10; #N canvas 296 357 512 426 companion_matrix 0; #X obj 28 236 mtx_eye; #X obj -109 219 mtx; #X obj 179 87 list length; #X obj 28 214 f; #X obj 115 192 f; #X obj 29 21 inlet; #X obj -67 351 outlet; #X obj 115 234 mtx_zeros; #X obj -109 262 mtx_* -1; #X obj 46 193 - 2; #X obj -110 178 - 1; #X obj 179 110 moses 3; #X obj -207 177 list split 1; #X msg -57 218 \$1; #X obj -109 240 mtx_./ 1; #X obj 28 46 t l b b l; #X obj -68 314 mtx_concat col; #X msg -109 198 size 1 \$1; #X msg 115 213 \$1 1; #X obj 28 281 mtx_concat row; #X connect 0 0 19 0; #X connect 1 0 14 0; #X connect 2 0 11 0; #X connect 3 0 0 0; #X connect 4 0 18 0; #X connect 5 0 15 0; #X connect 7 0 19 1; #X connect 8 0 16 0; #X connect 9 0 3 1; #X connect 9 0 4 1; #X connect 10 0 17 0; #X connect 11 1 10 0; #X connect 11 1 9 0; #X connect 12 1 1 0; #X connect 13 0 14 1; #X connect 14 0 8 0; #X connect 15 0 12 0; #X connect 15 1 3 0; #X connect 15 2 4 0; #X connect 15 3 2 0; #X connect 15 3 13 0; #X connect 16 0 6 0; #X connect 17 0 1 0; #X connect 18 0 7 0; #X connect 19 0 16 1; #X restore 100 135 pd companion_matrix; #X obj 100 47 inlet; #X obj 100 159 mtx_eig; #X obj 182 223 outlet im; #X obj 76 221 outlet re; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 2 0 4 0; #X connect 2 1 3 0;