IsSymmetric(M: MAT): BOOL
M := Mat([ [1, 2, 3], [2, 4, 5], [3, 5, 6] ]); IsSymmetric(M); TRUE -------------------------------