diff options
Diffstat (limited to '75/CH9/EX9.14')
| -rwxr-xr-x | 75/CH9/EX9.14/ex_14.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/75/CH9/EX9.14/ex_14.sce b/75/CH9/EX9.14/ex_14.sce new file mode 100755 index 000000000..79f91ae2f --- /dev/null +++ b/75/CH9/EX9.14/ex_14.sce @@ -0,0 +1,8 @@ + // PG (620) + +T = [2 1 0 0 0 0;1 2 1 0 0 0;0 1 2 1 0 0;0 0 1 2 1 0;0 0 0 1 2 1;0 0 0 0 1 2] +lam = spec(T)' +lam1 = lam(1,1) +B = [2-lam1 1 0 0 0 0;1 2-lam1 1 0 0 0;0 1 2-lam1 1 0 0;0 0 1 2-lam1 1 0;0 0 0 1 2-lam1 1;0 0 0 0 1 2] +f0 = abs(det(B)) +f1 = 2-lam1 |