function tiaoxing(bochang,N,m,L,handles) F3aOKV^
global n uz(3ml^S
global point =Mb1)^m
k=2*pi/bochang; 1@j0kTJ~m
a=m*1e+006; $\0%"S
deltax=2*a/point;%取单位长度 ^=H. .pr
xx=-a:deltax:a; ~JJuM
L=L*1e+006; |hp_<F9.
nn=length(xx); %V>Ss9;/8
u=ones(1,nn); t4a/\{/#9|
jj=1:nn; qH3|x08
for n=1:N %进行迭代 BrdHTk= Vy
`kn 'RZR
for b=1:nn L"w% ew
uu(b)=sqrt(i*exp(-i*k*L)/(bochang*L)).*... #bqc}h9
sum(exp(-i*k*((b-jj)*deltax).^2./(2*L)).*u)*deltax;% x:h0/f
\,-t]$9
end ]}3AP!:
CnJrJ>l
ma=max(uu);%归一化 |a(%a43fC
uu=uu./ma; TTS.wBpR,
u=uu; Oie0cz:>:
axes(handles.axes1); ,X[lC\1a
plot(xx,abs(u)) QJL%J
axes(handles.axes2); pZS0;T]W,
plot(xx,angle(u)) q K sI}X~
set(handles.edit10,'string',num2str(n));%迭代次数显示到面板 U#I8Rd I,
End