| 查看: 361 | 回复: 0 | |||
[交流]
把单缝改多缝，缝之间距离相等
|
clear all;clc;ticdz=0.5e-4; %%define the distance step, unit [m]maxz=0.5e4; %%%%%%%%%%%%%%%%%%%%define the space % grid parameters, the unit is in meterLx=0.6e-2;N=1024; x=-Lx/2:Lx/N:Lx/2-Lx/N; dx=Lx/N; kx=[0:N/2-1 -N/2:-1]*2*pi/Lx;lambda=632.8e-9;k=2*pi/lambda;i=sqrt(-1);w0=0.5e-3;A0=1;E=zeros(1,N);phi=zeros(1,N);N1=fix((-w0/2-(-Lx/2))/dx);N2=fix((+w0/2-(-Lx/2))/dx);E(N1:N2)=A0.*ones(1,N2-N1+1);D=exp(i/(2*k).*(-kx.^2).*dz/2);%plot(x,E)temp=maxz./200; gg=1;for ii=1:maxz %%%%%%%%%%%fft processing UD_h_2_U=fft(E).*D; uD_h_2_U=ifft(UD_h_2_U); UDD_h_U=fft(uD_h_2_U).*D; E=ifft(UDD_h_U); % Ec(ii)=E(N/2);% z(ii)=ii*dz; if mod(ii,temp)==0 IE=sum(abs(E).^2)*dx waveE(gg, =E; zz(gg)=ii*dz; gg=gg+1 endendfigure;mesh(x,zz,abs(waveE).^2);view(0,90);axis tight;发自小木虫Android客户端 |
回复此楼» 猜你喜欢
放榜前的不淡定
已经有18人回复
-
在坚冰还盖着北海的时候，我看到了怒放的梅花。
已经有4人回复
-
某些机构，以效率低为荣，以效率低作为存在感
已经有7人回复
-
什么时候开奖？
已经有13人回复
-
如果此刻你正在为国基感到焦虑，不妨来听听这首《基金之外》
已经有8人回复
-
没有任何消息-是不是就凉了
已经有10人回复
-
人气不行了
已经有11人回复
-
2026国自然函评费到账
已经有22人回复
-
导师吐槽：我怎么摊上了这么个极品研究生！
已经有3人回复
-
2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战
已经有7人回复
20
