Home

Introduction

Contents

Scripts

FeedBack

Date 06/09/2010
Script S5_2_5.m
Download Script S5_2_5.m
%==============================================
%Young 4
%==============================================
%
%wavelength in mm
lambda=0.5*1.0e-3;
%distance L between the screen and the Young apparatus in mm
L=1000;
%width h of the slit and the distance d between them in mm
h=0.01;
d=0.1;
%max lateral fringes are considered first
max=10;
%orders of the fringes
m=(eps:1:max)
%alfa is defined
alfa=m*pi*(h/d);
%preliminary calculi for Ir
num=sin(alfa).*sin(alfa);
den=alfa.*alfa;
%Ir
Ir=num./den
%its plot varying m
plot(m,Ir,'ro-'),grid on, title('Relative intensity function of m')
%
%last value of i for which Ir is greater than 0.3
i=0;
for j=1:max
if Ir(j)>0.3
i=i+1;
end
end
%corresponding order m03
m03=i
%first value of Ir less than 0.3
flim=Ir(m03+1)
%corresponding vertical value of y in mm
%for last value of Ir greater than 0.3
teta=asin(m03*lambda/d);
tetag=teta*180/pi
y=L*tan(teta)


Top