summaryrefslogtreecommitdiff
path: root/3293/CH4/EX4.10/Ex4_10.sce
blob: da309340776e5c804a524a799de76898de4e92a2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
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