exn528.m

基天子matlab的双缝干涉从单缝(线光源)发出的单色光射到与之平行的双缝上

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第五章例5-2-8程序
% 空间柱面曲面的绘制
% 西安电子科技大学出版社出版  陈怀琛编著 2007年7月
%
clear, close all
u=linspace(-5,5,10)'; 
v=linspace(-5,10,10);
X=u*ones(size(v));
Y=ones(size(u))*v;
Z=2-X.^2;
subplot(1,2,1),
mesh(X,Y,Z),pause
X1=u*ones(size(v));
Y1=2*sqrt(1+X1.^2);
Y2=-2*sqrt(1+X1.^2);
Z1=ones(size(u))*v;
xlabel('x'),ylabel('y'),xlabel('z'),
subplot(1,2,2),
mesh(X1,Y1,Z1),
hold on,
mesh(X1,Y2,Z1)
xlabel('x'),ylabel('y'),xlabel('z'),
set(gcf,'color','w')