%******定義時間延遲
%nt=128;
%dt=0.001;
%t_delay=dt*（-64）;
%for?i=1:nt
?%?t=i*dt+t_delay;??
%end


function?wavelet?=?cws_ri