summaryrefslogtreecommitdiff
path: root/1332/CH22/EX22.4/22_4.sce
blob: c740070fc2c2f02b610a6c9e03f021483412f65e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Example 22.4
//Hopfield Neural Network
//Page no. 766
clc;clear;close;

A=[1,2,1;-1,1,1;1,0,-1];
disp(inv(A),'Inverse of A =',A,'A =')
for i=1:3
    for j=1:3
        k=0;
        for l=1:3
            k=k+A(i,l)*A(j,l)
        end
        T(i,j)=k;
    end
end
disp(T,'T =')