function [y]=eco(x,D,a)
%Entradas
%x --> Se馻l de entrada
%d --> Retardo
%a --> Atenuacion
%Salidas
%y --> Se馻l con eco
%Definir y=(se馻l,retardo,atenuacion)
xt=x';
ax=a*xt;
z=zeros(1,D);
ax2=[z,ax];
x2=[xt,z];
yt=x2+ax2;
y=yt';