%
% FILTRE DE WIENER
%
% Ce script Matlab permet
%   - d'initialiser les paramètres du modèle Simulink
%   - calculer la solution des équations de Yule-Walker
%                          G.a = g
%
alpha=0.5;
sigma=0.2;
p=2;
d=2;
d0=(1+alpha^2+sigma^2)*ones(p,1);
d1=alpha*ones(p-1,1);
G=diag(d0)+diag(d1,1)+diag(d1,-1);
g=zeros(p,1);
if d-1<=p,g(d-1)=alpha;end,
if d<=p,g(d)=1;end,
a=(G\g)';