summaryrefslogtreecommitdiff
path: root/1670/CH4/EX4.17/4_17.sce
blob: 659bda4d1c4e5c5e239da00c8b68798c0c57f3ba (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Example 4.17
//Gerschgorin Circles
//Page no. 118
clc;clear;close;

A=[1,2,3;2,4,6;3,6,1];
j=2;
k=3;
printf('The Gerschgorin Circles are : \n\n  A =' )
for i=1:3
    printf('\t|z-%i| = |%i| + |%i| = %i\n',A(i,i),A(i,j),A(i,k),A(i,j)+A(i,k))
    if j~=1 then
        j=j-1
    end
    if i==2 then
        k=k-1
    end
end