| 查看: 313 | 回复: 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客户端 |
回复此楼» 猜你喜欢
推荐一本书
已经有7人回复
-
参与限项
已经有4人回复
-
有没有人能给点建议
已经有5人回复
-
假如你的研究生提出不合理要求
已经有12人回复
-
全日制（定向）博士
已经有5人回复
-
萌生出自己或许不适合搞科研的想法，现在跑or等等看？
已经有4人回复
-
Materials Today Chemistry审稿周期
已经有4人回复
-
对氯苯硼酸纯化
已经有3人回复
-
所感
已经有4人回复
-
要不要辞职读博？
已经有7人回复