|
|
Scilab
模拟杨氏干涉
??
clear;
Lambda=570e-9;
D=1.5;
s=[-0.5,0];
s1=[0.8,0.75e-3];
s2=[0,-0.75e-3];
n=1000;
yMax=4*(570e-9)*(1.5/1.5e-3);
y=linspace(-yMax,yMax,n);
r1=sqrt((s1(1)-s(1))^2 (s1(2)-s(2))^2);
r2=sqrt((s2(1)-s(1))^2 (s2(2)-s(2))^2);
R1=sqrt((y-s1(2)).^2 (D-s1(1))^2);
R2=sqrt((y-s2(2)).^2 (D-s2(1))^2);
L1=r1 R1;
L2=r2 R2;
Delta_L=L2-L1;
Delta_Phi=2*%pi*Delta_L/Lambda;
I0=4*1*(cos(Delta_Phi/2).^2);
I=[I0;I0];
f = scf();
plot3d1([0,yMax]*1e3,y*1e3,I);
f.color_map = graycolormap(64);
f.children(1).rotation_angles = [0,270];
p3d=f.children(1).children(1)
p3d.color_mode= -
p3d.color_mode;
|
|
