![]() |
||||||
|
| 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 | |||