1 files changed, 21 insertions, 0 deletions
diff --git a/3293/CH4/EX4.10/Ex4_10.sce b/3293/CH4/EX4.10/Ex4_10.sce
new file mode 100755
index 000000000..da3093407
--- /dev/null
+++ b/3293/CH4/EX4.10/Ex4_10.sce
@@ -0,0 +1,21 @@
+//page 135
+//Example 4.10
+clc;
+clear;
+close;
+x = poly(0,"x");
+P = x^2 + 1;
+disp(P,'P = ');
+disp('P is reducible over complex numbers as: ');
+disp('=',P);
+disp('(x-i)(x+i)');
+disp('Whereas, P is irreducible over real numbers as:.');
+disp('=',P);
+disp('(ax + b)(a''x + b'')');
+disp('For, a,a'',b,b'' to be in R,');
+disp('aa'' = 1');
+disp('ab'' + ba'' = 0');
+disp('bb'' = 1');
+disp('=> a^2 + b^2 = 0');
+disp('=> a = b = 0');
+//end