function tiaoxing(bochang,N,m,L,handles) F!)M<8jL&9
global n hD$p;LF
global point Z6R:
rq
k=2*pi/bochang; YQ@dl
a=m*1e+006; uZo`IK J
deltax=2*a/point;%取单位长度 +%
XhQ
xx=-a:deltax:a; G/fP(o-Wd
L=L*1e+006; (K*/Vp
nn=length(xx); ;5D@kS^
u=ones(1,nn); NF/Ti5y
jj=1:nn; Q"_T2fl]vP
for n=1:N %进行迭代 9iGE`1N%E
M9Nk=s! 3
for b=1:nn hJ;f1dZ7}
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... {1Ju}=69
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% FDVI>HK @
:Hzz{'
end @ .Z[M
*K+jsVDY
ma=max(uu);%归一化 '&-5CpDUs
uu=uu./ma; Mhv1K|4s
u=uu; ]&C:>
axes(handles.axes1); ~U"by_
plot(xx,abs(u)) ]27>a"p59Y
axes(handles.axes2); k5aa>6K
plot(xx,angle(u)) pcI&
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 8h&oSOkQk,
End