function tiaoxing(bochang,N,m,L,handles) ACszx\[K3
global n o! a,r3
global point JcAsrtrG]
k=2*pi/bochang; ;%e&6
a=m*1e+006; M0V<Ay\%O
deltax=2*a/point;%取单位长度 n]%-2`}(
xx=-a:deltax:a; Y;i=c6
L=L*1e+006; Ak'=l;
nn=length(xx); $8tk|uh
u=ones(1,nn); 5'2kP{;
jj=1:nn; EVmBLH-a
for n=1:N %进行迭代 )6"}M;v
H 4<"+7
for b=1:nn )Z7Vm2a
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... X9x`i
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% A5<t> 6Y
HsY5wC
end waMF~#PJlt
K<S3gb?0
ma=max(uu);%归一化 l;-Ml{}|0
uu=uu./ma; *z0!=>(
u=uu; fzsy<Vl",
axes(handles.axes1); gx&es\
plot(xx,abs(u)) /jv/qk3i
axes(handles.axes2); \"lz,bT
plot(xx,angle(u)) .9~j%]q
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 =LW!$p
End