%FILTRO DE PONDERACIÓN.
%function x=ponder(e)
%Entradas:
%e:excitación residual.
%Salidas:
%x:salida filtrada.
function x=ponder(e)
H=[-134 -374 0 2054 5741 8192 5741 2054 0 -374 -134]/8192; %coeficientes del filtro.
eaux=[zeros(1,5),e,zeros(1,5)];
for k=7:46
   acum=zeros(1,11);
   for i=1:11
      acum(i)=H(i)*eaux(k+5-i);
   end
   xaux(k)=sum(acum);
end
x=xaux(7:46);
