function x=d_down(u,decimate)
%	x=d_down(u,decimate);
% down sample x, at an integer (decimate)=f_in/f_out
	L=length(u);
	nu=floor((L-1)/decimate);
	x=u(1:decimate:nu*decimate+1);