1 2 3/** @module matrix */ 4 5/** 6 * upper triangle gets copied to lower triangle 7 * for non-square matrices, the largest square minor is symmetrized 8 * @name matrix.Symmetrize 9 * @param {Matrix} mx - matrix to perform transform on 10 * @returns nothing 11 */ 12lfunction matrix.Symmetrize(mx) { 13 14 copy_dim = Min(Rows(mx), Columns(mx)); 15 16 for (r = 0; r < copy_dim; r += 1) { 17 for (c = r + 1; c < copy_dim; c += 1) { 18 mx[c][r] = mx[r][c]; 19 } 20 } 21 22} 23