summaryrefslogtreecommitdiff
path: root/70/CH6/EX6.3.2/6_3_2.sci
blob: 112a5f7359591ccb7812a546cda5e4826a3ca35c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//332
clear;
close;
clc;
A=[-1 1 0;0 -1 1];
disp(A,'A=');
[U diagnl V]=svd(A);
disp(U,'U=');
disp(diagnl,'Diagonal=');
disp(V','V''=');
disp(U*diagnl*V','A=U*diagonal*V''=')
//end