雷克子波程序

%******定义时间延迟
%nt=128;
%dt=0.001;
%t_delay=dt*（-64）;
%for i=1:nt
 % t=i*dt+t_delay;  
%end


function wavelet = cws_ri