function tiaoxing(bochang,N,m,L,handles) ^;]Q,*Q
global n AUvUk<a
global point h1'j1uI
k=2*pi/bochang; }Kc03Ue`%e
a=m*1e+006; mUW4d3tE
deltax=2*a/point;%取单位长度 %uWq)D4r
xx=-a:deltax:a; eL7\})!W
L=L*1e+006; */JMPw&
nn=length(xx); W8R"X~!V
u=ones(1,nn); !xz0zT.
jj=1:nn; 5bKm)|4z6
for n=1:N %进行迭代 UX& ?^]
20XN5dTFT
for b=1:nn o> i`Jq&
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... s;eOX\0
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% p Y[dJxB
:6r)HJ5sg
end v0}R]h~>\H
L]C|&KP
ma=max(uu);%归一化 }pzUHl>
uu=uu./ma; g*nh8
u=uu; mlmp'f
axes(handles.axes1); VS{po:]A
plot(xx,abs(u)) QC+K:jL
axes(handles.axes2); 3h-C&C
plot(xx,angle(u)) w`")^KXi
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 nr t3wqJ
End