#N canvas 0 0 632 589 10; #X obj 53 72 cv/#SVD; #X obj 70 94 display; #X obj 53 156 display; #X msg 53 53 2 2 f # 30 40 50 60; #X text 53 33 numbers coming from the equation of an ellipse; #X text 101 75 eigenvectors show the direction of axes of the ellipse ; #X text 63 137 eigenvalues show the square of the length of the axes ; #X obj 23 204 #extract_diagonal; #X obj 36 228 display; #X obj 24 329 display; #X text 99 308 just the radiuses; #X obj 23 309 # sqrt (f #); #X obj 0 0 doc_h; #X obj 3 358 doc_c 0; #X obj 3 398 doc_i 1; #X obj 3 460 doc_o 1; #X obj 14 490 doc_oo 0; #X obj 14 428 doc_ii 0; #X obj 0 555 doc_f; #X obj 97 428 doc_m i0 grid; #X obj 97 490 doc_m o0 grid; #X text 130 203 just keep the main diagonal of the matrix; #X msg 449 169 3 3 # 1 2 3 4 5 6 7 8 9; #X obj 449 188 # +; #X text 474 186 cast to grid; #X obj 449 207 #extract_diagonal; #X obj 456 228 display; #X text 232 428 a Dim(N \, N) grid \, that is \, a square matrix; #X obj 3 535 doc_also; #X obj 103 535 cv/#SVD; #X obj 36 257 #fold +; #X obj 36 278 display; #X text 85 257 this is the Trace of the matrix (sum over main diagonal) ; #X text 232 490 a Dim(N) grid \, the diagonal vector : at position (i) in this grid \, there is element (i \, i) of the input grid.; #X obj 449 249 #fold +; #X text 465 148 SIMPLER EXAMPLE :; #X obj 449 268 display; #X text 497 249 the Trace; #X connect 0 0 2 0; #X connect 0 0 7 0; #X connect 0 1 1 0; #X connect 3 0 0 0; #X connect 7 0 8 0; #X connect 7 0 11 0; #X connect 7 0 30 0; #X connect 11 0 9 0; #X connect 19 1 27 0; #X connect 20 1 33 0; #X connect 22 0 23 0; #X connect 23 0 25 0; #X connect 25 0 26 0; #X connect 25 0 34 0; #X connect 28 1 29 0; #X connect 30 0 31 0; #X connect 34 0 36 0;