| 查看: 327 | 回复: 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客户端 |
回复此楼» 猜你喜欢
265求调剂
已经有9人回复
-
085600材料与化工调剂
已经有20人回复
-
专硕 351 086100 也是考的材科基 本科也是材料
已经有6人回复
-
085600专硕材料与化工348分求调剂
已经有10人回复
-
085600 295分求调剂
已经有21人回复
-
285求调剂
已经有5人回复
-
一志愿安徽大学0817化学工程与技术，求调剂
已经有9人回复
-
一志愿0817化学工程与技术，求调剂
已经有8人回复
-
271分求调剂学校
已经有3人回复
-
生物学308分求调剂（一志愿华东师大）
已经有7人回复
