![]() |
||||||
|
| Script S3_2_3.m | |||
|
|||
|
%==============================================
%Half-wave retarder 1 %============================================== % % %============================================== %electric field, subtending an angle of 60° %with x axis, when emerges from half-wave retarder %has a direction of 120° from the x axis %============================================== % %vector of linear polarized light along the x axis v1=[1;0] %construction of the matrix of the half-wave %retarder (see Sec.3.1.5) teta60=60*pi/180; c2=cos(2*teta60) s2=sin(2*teta60) m1=[c2 s2;s2 -c2] %the new vector of the linear polarized %light emerging from the retarder %with the intensity I v2=m1*v1 v2t=v2'; I=v2t*v2 %the beam is then incident on a polarizer %whose trasmission axis is parallel to the x axis %the matrix of polarizer p=[1 0;0 0]; %intensity If of the beam emerging from polarizer v3=p*v2; v3t=v3'; If=v3t*v3 % %============================================== %search of the right thickness t %of one millimeter for retarder %and the corresponding value of m %============================================== % %if lambda lambda=0.589; %and refractive indices of quartz ns=1.5534; no=1.5443; %are assigned %the difference between ns and no diff=ns-no; %a range of the integers m between 25 and 35 m=25:1:35 %thickness in micron d=(m*lambda)/(2*diff) %thickness in mm called t t=d/1000 %plot of t in mm function of the integer m plot(m,t,'ro-'),grid on title('t in mm function of the integer m') %============================================== % |
|||
| Top | |||