function tiaoxing(bochang,N,m,L,handles)
m;TekJXm
global n (yeWArQ
global point 7osHKO<?2
k=2*pi/bochang; *o!#5c
a=m*1e+006; 5zyd;y)|'
deltax=2*a/point;%取单位长度 8wEJyAu2
xx=-a:deltax:a; L$"pk{'
L=L*1e+006; DK'S4%;Sp
nn=length(xx); Z Y5Pf
1
u=ones(1,nn); ^>eV}I5ak
jj=1:nn; ,w=u?
for n=1:N %进行迭代 cK\?wZ| Y
[By|3bI
for b=1:nn o3NB3@uj<
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... )(c%QWz
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% NSR][h_
-zzT:C
end E}#&2n8Y
ZsYY)<n
ma=max(uu);%归一化 Q)8I(*
uu=uu./ma; 9Sa6v?sRor
u=uu; dl`{:ZR S
axes(handles.axes1); znIS2{p/`
plot(xx,abs(u)) ^ ]+vtk
axes(handles.axes2); =+[`9
plot(xx,angle(u)) %F}d'TPx
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 nyOmNvZf
End