附录B 调用Matlab对矩阵做奇异值分解的程序源代码