From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 3293/CH10/EX10.4/Ex10_4.sce | 20 ++++++++++++++++++++
 3293/CH10/EX10.5/Ex10_5.sce | 15 +++++++++++++++
 2 files changed, 35 insertions(+)
 create mode 100755 3293/CH10/EX10.4/Ex10_4.sce
 create mode 100755 3293/CH10/EX10.5/Ex10_5.sce

(limited to '3293/CH10')

diff --git a/3293/CH10/EX10.4/Ex10_4.sce b/3293/CH10/EX10.4/Ex10_4.sce
new file mode 100755
index 000000000..45bc5bd1d
--- /dev/null
+++ b/3293/CH10/EX10.4/Ex10_4.sce
@@ -0,0 +1,20 @@
+//page 363
+//Example 10.4
+clc;
+clear;
+close;
+disp('a = [x1 x2]');
+disp('b = [y1 y2]');
+disp('f(a,b) = x1*y1 + x1*y2 + x2*y1 + x2*y2');
+disp('so, f(a,b) = ');
+disp('[x1  x2]  *  |1   1|  *   |y1|');
+disp('              |1   1|     |y2|');
+disp('So the matrix of f in standard order basis B = {e1,e2} is:');
+fb = [1 1;1 1];
+disp(fb,'[f]B = ');
+P = [1 1;-1 1];
+disp(P,'P = ');
+disp('Thus, [f]B'' = P''*[f]B*P');
+fb1 = P' * fb * P;
+disp(fb1,'[f]B'' = ');
+//end
diff --git a/3293/CH10/EX10.5/Ex10_5.sce b/3293/CH10/EX10.5/Ex10_5.sce
new file mode 100755
index 000000000..86576d316
--- /dev/null
+++ b/3293/CH10/EX10.5/Ex10_5.sce
@@ -0,0 +1,15 @@
+//page 365
+//Example 10.5
+clc;
+clear;
+close;
+n = round(rand() * 10 + 2);
+a = round(rand(1,n) * 10);
+b = round(rand(1,n) * 10);
+disp(n,'n = ');
+disp(a,'a = ');
+disp(b,'b = ');
+f = a * b';
+disp(f,'f(a,b) = ');
+disp('f is non-degenerate billinear form on R^n.');
+//end
-- 
cgit