計(jì)算光波由光密入射到光疏介質(zhì)時(shí)相位變化
*&vySyt @fH?y Z=> clear
}m~2[5q%/ Gu3'<hTlxd close all
N8>;BHBV! ir4uy n1=1.45,n2=1;
Z ~-A*{u? 96.A8o theta=0:0.1:90;
!:[kS1s>M I &e ,R a=theta*pi/180;
XVfp* ` }Dig'vpMx rp=(n2*cos(a)-n1*sqrt(1-(n1/n2*sin(a)).^2))./(n2*cos(a)+n1*sqrt(1-(n1/n2*sin(a)).^2));
G([!(8&2Y *WQ}ucE^# rs=(n1*cos(a)-n2*sqrt(1-(n1/n2*sin(a)).^2))./(n1*cos(a)+n2*sqrt(1-(n1/n2*sin(a)).^2));
*1L;%u| [ om"q[Tudc tp=2*n1*cos(a)./(n2*cos(a)+n1*sqrt(1-(n1/n2*sin(a)).^2));
I<I?ks q?=eD^] ts=2*n1*cos(a)./(n1*cos(a)+n2*sqrt(1-(n1/n2*sin(a)).^2));
b (,X3x* o .}?K>5 arp=angle(rp);
AID}NQ Qj_ xpf\S10e ars=angle(rs);
bm{L6D E {GS7J atp=angle(tp);
`3$S^|v HgwL~vG ats=angle(ts);
?^F#}>C
