function [W1,W2]=corr(X,Y)

%
% Armazenamento por correlação (Aprendizado de Hebb)
%
% Comando: [W1,W2]=corr(X,Y)
%
% Entradas: X,Y - Matriz com as memorias fundamentais,
%    Saida:   W - Matriz dos pesos sinapticos.
%

W1=Y*X';
W2=X*Y';