球面柱面螺旋面等各种形式的干涉图.docxVIP

球面柱面螺旋面等各种形式的干涉图.docx

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
球面柱面螺旋面等各种形式的干涉图

设参考光为平面波,则干涉图的强度变化为:其中,为物波面的位相函数。我们希望形成的干涉条纹有径向形状,以反映这种径向位相变化。在回转对称波面的清况下,很自然的就希望有极坐标形式来表示波面的位相变化。两种干涉图:(1)条纹是径向分布的,称为径向条纹干涉图;(2)条纹为圆形分布的,称为圆条纹干涉图。这些干涉图是在极坐标中描述的。上式中,当时出现相消干涉。当我们需要画出干涉图时,如需要画出二元干涉图,那么需要有亮条纹的上下限,即进行二元的硬性限幅。p为一定值时,则r, 的取值满足时,为暗条纹下限;r, 的取值满足时,为暗条纹上限;径向条纹干涉图选择参考光波的位相只沿方位方向变化,则得到的干涉条纹就是径向分布的。(8. 2. 10)其中m为条纹数。干涉条纹的方程式为:下限: 上限其中m为干涉图上的径向条纹总数。画干涉图时,(1) 根据(r, )的范围,确定p的取值范围;(2) 根据干涉条纹的方程式,(fsolve?)求解出下限的(r, )坐标值与上限的(r, )坐标值;(3) 分别拟合同一p值对应的上限值与下限值;(4) 极坐标与直角坐标的转换:cart2pol用contourf函数画出,colormap(gray)contourf(X,Y,Z,100,’linestyle’,’none’)colormap(gray)axis equalcontourf(X,Y,Z,100,linestyle,none)colormap(gray)axis equalaxis off圆条纹干涉图圆条纹干涉图的参考光波位相为其中C为条纹数。那么干涉条纹方程为物光为单位球面波,C = 10时得到螺旋波面的计算全息图螺旋波面的波面方程为取m = 6, M = 30,得到的再现波面的干涉图为由再现波面的干涉图可见螺旋波面的位相变化在方位维是线性的,但外层波面的位相梯度比较小,而向着波面中心移动时,波面的位相梯度就变得很陡。锥形波面的再现波面干涉图取c = 30, C = 10得到的锥形波面的再现波面干涉图如图所示,因为波面在径向的梯度是常数,所以频域中每一衍射级是一个圆,再现波面的干涉图是一系列同心圆。柱状位相物体干涉图柱状物体定义:%%r = 0:0.01:5;th = 0:0.01:2*pi; [th, r] = meshgrid(th, r);[m1,n1] = size(th);%% ì?×′??ì?μ??¨ò?% ?ù2?μ?áùì?£???ì??í1/6*pi ph0 = zeros(m1,n1); % ???¥?í?èw = pi/10; % ×óD±???í?èal = pi/30; % óòD±???í?èar = pi/30; %??ò?á?tt = pi/12; for i=1:m1 for j=1:n1 for k=1:6 if th(i,j) = k*(1/3)*pi - tt th(i,j) k*(1/3)*pi-w - tt ph0(i,j) = 1; elseif th(i,j) k*(1/3)*pi-w -tt th(i,j)= k*(1/3)*pi-w-al - tt ph0(i,j) = 1/al.* (th(i,j) - (k*pi/3 - w - al- tt)); elseif th(i,j) k*(1/3)*pi- tt th(i,j) = k*(1/3)*pi + ar- tt ph0(i,j) = -1/ar.* (th(i,j) - (k*pi/3 + ar- tt)); end end endend %% 2???1a?a?T??D±μ?????2¨phr1 = 1; % ?éé?í?±í′?ê?I1 = 4.* (cos(0.5 .* (ph0 - phr1))).^2; % ??í? [X,Y,Z] = pol2cart(th,r,I1);figure,contourf(X,Y,Z,100,linestyle,none)colormap(gray)axis equalaxis off%% 2???1a?aóD??D±μ?????2¨ /10*pi[x,y] = pol2cart(th,r);phr2 = 5*pi.*y;[x,y,ph01] = pol2cart(th,r,ph0); % ?éé?í?±í′?ê?I2 = 4.* (cos(0.5 .* (ph01 - phr2))).^2; %[r2,th2,I2] = cart2pol(x,y,I2); % ??í? %[X,Y,Z] = pol2cart(th,r,I2);figure,contourf(x,y,I2,100,linestyle,none)colormap(gray)axis equalaxis off%% 2???

文档评论(0)

gangshou + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档