

[x,fs]=wavread('AMPIN.WAV');



b=[3 5 3 3];

a=[1];



y=filter(b,a,x);



wavwrite(y,fs,16,'EARIN.WAV');

