文件名称:光波在介质中界面上的反射及透射特性的仿真程序
文件大小:29KB
文件格式:DOC
更新时间:2021-01-07 10:56:48
光波反射透射
hold on end legend('Frp') else subplot(1,3,1) qc=asin(n2./n1); qa=0:0.0001:qc; qb=asin(n1.*sin(qa)./n2); rs=-sin(qa-qb)./sin(qa+qb); rp=tan(qa-qb)./tan(qa+qb); ts=2.*cos(qa).*sin(qb)./sin(qa+qb); tp=2.*cos(qa).*sin(qb)./sin(qa+qb)./cos(qa-qb);