function tiaoxing(bochang,N,m,L,handles) AKL~F|t
global n pk"JcUzR
global point 7b
Gzun&
k=2*pi/bochang; 2]Y (<PC
a=m*1e+006; ]=h
Ts%]w
deltax=2*a/point;%取单位长度 if_e$,dh~>
xx=-a:deltax:a; KF7f<
L=L*1e+006; <pi q?:ac
nn=length(xx); !.p!
u=ones(1,nn); HlV3rYh
jj=1:nn; 36lIV,YnU
for n=1:N %进行迭代 gR1X@j$_
BPi>SI0
for b=1:nn u4Vc:n
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... PqvwM2}4
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% 9:@os0^O
?u8+F
end _+^3<MT
n>iPAD
ma=max(uu);%归一化 +R*4`F:QJQ
uu=uu./ma; HqN|CwGgJ:
u=uu; ]`u{^f
axes(handles.axes1); BH*vsxe
plot(xx,abs(u)) <5L!.Ci
axes(handles.axes2); -3KB:K<
plot(xx,angle(u)) 4"7Qz z
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 e {c.4'q
End