diff options
Diffstat (limited to '70/CH1/EX1.5.4')
-rwxr-xr-x | 70/CH1/EX1.5.4/1_5_4.sci | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/70/CH1/EX1.5.4/1_5_4.sci b/70/CH1/EX1.5.4/1_5_4.sci new file mode 100755 index 000000000..f532a2bb5 --- /dev/null +++ b/70/CH1/EX1.5.4/1_5_4.sci @@ -0,0 +1,22 @@ +//page 34
+clear;
+close;
+clc;
+a=rand(1);
+b=rand(1);
+c=rand(1);
+L=[1 0 0;a 1 0;b c 1];
+disp(L,'L=');
+U=eye(3,3);
+disp(U,'U=');
+E=[1 0 0;-a 1 0;0 0 1];
+disp(E,'E=');
+F=[1 0 0;0 1 0;-b 0 1];
+disp(F,'F=');
+G=[1 0 0;0 1 0;0 -c 1];
+disp(G,'G=');
+disp('A=inv(E)*inv(F)*inv(G)*U')
+A=inv(E)*inv(F)*inv(G)*U;
+disp(A,'A=');
+disp('When U is identity matrix then L is same as A');
+//end
\ No newline at end of file |