function tiaoxing(bochang,N,m,L,handles) )US)-\^
global n IaF79}^
global point vMI \$E&
k=2*pi/bochang; P2Eyqd8
a=m*1e+006; p' gv5\u[w
deltax=2*a/point;%取单位长度 G![1+2p:Tq
xx=-a:deltax:a; g{ a0,B/j
L=L*1e+006; @LmUCP~
nn=length(xx); >3Y&jsh<
u=ones(1,nn); Z2 @&4_P
jj=1:nn; jf2E{48P
for n=1:N %进行迭代 4i19HD_
IWQ8e$N
for b=1:nn ~gAx
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... P~*fZ)\}F@
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% m 8f_w
3whyIXs
end =Vv{ td
~lL($rE
ma=max(uu);%归一化 Av[jFk
uu=uu./ma; l;C_A;y\
u=uu; 2-6-kS)c
axes(handles.axes1); X3>(K1
plot(xx,abs(u)) D;E&;vP6%
axes(handles.axes2); \E30.>%,
plot(xx,angle(u)) HvngjP{>
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 {%$=^XO
End