5 files changed, 78 insertions, 0 deletions
diff --git a/3293/CH2/EX2.1/Ex2_1.sce b/3293/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..366bb7901
--- /dev/null
+++ b/3293/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,11 @@
+//page 29
+//Example 2.1
+clear;
+clc;
+close;
+disp('a and b are n-tuples scalars as:')
+disp('a = (x1,x2,x3,..,xn)');
+disp('b = (y1,y2,y3,..,yn)');
+disp('Then a+b = (x1+y1, x2+y2, x3+y3,.., xn+yn)');
+disp('And a*b = (x1*y1, x2*y2, x3*y3,..,xn*yn)');
+//end
diff --git a/3293/CH2/EX2.19/Ex2_19.sce b/3293/CH2/EX2.19/Ex2_19.sce
new file mode 100644
index 000000000..002acfa84
--- /dev/null
+++ b/3293/CH2/EX2.19/Ex2_19.sce
@@ -0,0 +1,22 @@
+//page 53
+//Example 2.19
+clear;
+clc;
+close;
+disp('P = ');
+disp('cos(thetha)     -sin(thetha)');
+disp('sin(thetha)      cos(thetha)');
+disp('Inverse(P) = ');
+disp('cos(thetha)       sin(thetha)');
+disp('-sin(thetha)      cos(thetha)');
+disp('where, thetha is some real number');
+disp('The basis for R^2 (B'') is the set consisting of vectors (cos(thetha) , sin(thetha)) and (-sin(thetha) , cos(thetha))');
+disp('This basis may be obtained by rotating the standard basis by angle thetha');
+disp('a = [x1 x2]');
+disp('[a]B'' = ');
+disp('|cos(thetha)       sin(thetha)|         *           |x1|');
+disp('|-sin(thetha)      cos(thetha)|                     |x2|');
+disp('or');
+disp('x1'' = x1*cos(thetha) + x2*sin(thetha)');
+disp('x2'' = -x1*sin(thetha) + x2*cos(thetha)');
+//end
diff --git a/3293/CH2/EX2.2/Ex2_2.sce b/3293/CH2/EX2.2/Ex2_2.sce
new file mode 100644
index 000000000..776d79fcb
--- /dev/null
+++ b/3293/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,10 @@
+//page 29
+//Example 2.2
+clear;
+clc;
+close;
+disp('A and B are two m*n matrices where m,n > 0');
+disp('Sum of A and B:  (A+B)(i,j) = A(i,j) + B(i,j)');
+disp('where i and j are index values');
+disp('Product of a scalar c and matrix A:  (c*A)(i,j) = c*A(i,j)');
+//end
diff --git a/3293/CH2/EX2.7/Ex2_7.sce b/3293/CH2/EX2.7/Ex2_7.sce
new file mode 100644
index 000000000..b663f3b2a
--- /dev/null
+++ b/3293/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,12 @@
+//page 36
+//Example 2.7
+clear;
+clc;
+close;
+disp('A = m*n matrix over field F');
+disp('X and Y are n*1 matrices over F');
+disp('A*X = 0, A*Y = 0');
+disp('c is a scalar')
+disp('So, A(cX+Y) = c*A*X + A*Y = 0');
+disp('Hence, the set of all n*1 column matrices is the subspace of space of all n*1 matrices over F');
+//end
diff --git a/3293/CH2/EX2.9/Ex2_9.sce b/3293/CH2/EX2.9/Ex2_9.sce
new file mode 100644
index 000000000..ebb7e2a11
--- /dev/null
+++ b/3293/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,23 @@
+//page 38
+//Example 2.9
+clear;
+clc;
+close;
+disp('W1 = ');
+disp('x    y');
+disp('z    0');
+disp('where, x,y,z are scalars in F');
+disp('W2 = ');
+disp('x    0');
+disp('0    y');
+disp('where, x,y are scalars in F');
+disp('Now, V = W1 + W2');
+disp('This is because,');
+disp('a    b');
+disp('c    d   =  ');
+disp('a    b      +     0    0');
+disp('c    0            0    d');
+disp('And, W1 (intersect) W2) = ');
+disp('x    0');
+disp('0    0');
+//end