function y=preemph(x), y=filter([1 -0.97],1,x); 
