激光原理课程设计--平行平面腔自再现模Fox-Li数值迭代解法及MATLAB实现.doc

激光原理课程设计--平行平面腔自再现模Fox-Li数值迭代解法及MATLAB实现.doc

  1. 1、本文档共18页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
激光原理课程设计 题目:方形镜平行平面腔自再现模Fox-Li 数值迭代解法及MATLAB实现 院 系 理学院 专业班级 0910101 学生姓名 指导教师 提交日期 2012年4 月 15 日 目 录 一、设计目的 1 二、设计要求和设计指标 1 三、设计内容 1 3.1 Fox-Li平行平面腔的迭代解法 1 3.2 matlab实现 3 3.2.1 迭代解法的过程 3 3.2.2 程序实现 4 3.2.3 自再现模形成的判断 6 3.3 GUI界面的制作 8 四、本设计改进建议 9 五、设计感想 9 六、主要参考文献 9 附录 一、设计目的 为了加深对激光原理中Fox-Li平行平面腔的迭代解法的理解,学习matlab的使用,锻炼运用数值方法解决专业问题的能力。 二、设计要求和设计指标 在matlab用Fox-Li平行平面腔的迭代解法求得激光器腔镜面上的光场分布。 求出距离镜面中点为x处的光场的振幅A和相位P,并作出二维图像。在得出的一维图像的基础上作出镜面上光强的二维分布。 三、设计内容 3.1 Fox-Li平行平面腔的迭代解法 谐振腔是激光器必备条件之一,它使激光反复通过增益物质,从而实现光的自激振荡。在激光的发展史上最早提出的是平行平面腔,又称为F—P腔,它由两块平行平面反射镜组成,第一台红宝石激光器的谐振腔就是用它来做成的。 对于开放式光腔,镜面上稳态场分布的形成可以看成是光在两个界面间往返传播的结果。因此,两个界面上的场必然是互相关联的:一个镜面上的场可以视为由另一个镜面上的场所产生,于是求解镜面上稳态场的分布问题就归结为求解一个积分方程。 考虑在开腔中往返传播的一列波。设初始时刻在镜I上有某一个场分布,则当波在腔中经第一次渡越而到达镜II时,将在镜II上形成一个新的场分布,场经第二次渡越后又将在镜I上形成一个新的场分布。每次渡越时,波都将因为衍射损失一部分能量,并引起能量分布变化,如此重复下去……由于衍射主要是发生在镜的边缘附近,因此在传播过程中,镜边缘附近的场将衰落得更快,经多次衍射后所形成的场分布,其边缘振幅往往都很小(与中心处比较),具有这种特征的场分布受衍射的影响也将比较小。可以预期:在经过足够多次渡越之后,能形成这样一种稳态场:分布不再受衍射的影响,在腔内往返一次后能够“再现”出发时的场分布,即实现了模的“自再现”,具体过程图1所示: 图1 开腔中自再现模的形成 光学中的惠更斯—菲涅尔原理是从理论上分析衍射问题的基础,该原理的严格数学表示是菲涅尔—基尔霍夫衍射积分。设已知空间任意曲面S上光波场地振幅和相位分布函数为,由它所要考察的空间任一点P处场分布为,二者之间有以下关系式: 式中,为与连线的长度,θ为S面上点处的法线和上述连线之间的夹角,为S面上的面积元,k为波矢的模。而对于方形镜平行平面镜 将按,的幂级数展开,当满足和时 从而得到 将上式分离变量。令 得到 方形镜中 。 3.2 matlab实现 3.2.1 迭代解法的过程 本文采用Fox—Li数值迭代法得到了了镜面上自再现模在x方向的分布并推广到整个镜面,最终动态显示每次渡越镜面上光场分布。 虽然是复数积分,但其和实数积分实现方法相同,即取一定步长,用矩形面积的和代替函数的定积分。 下面是程序框图: 3.2.2 程序实现 源程序: clear,clc global steps L k a lamda=input(波长lamda=); L=input(腔长L=); a=input(镜长a=); N=input(渡越次数N=); k=2*pi/lamda; %波失 steps=500; %步长 x=linspace(-a,a,steps); u_=ones(1,steps); for m=1:N for mm=1:steps u0(mm)=QU(x(mm),u_); end; u_=u0/max(abs(u0)); end subplot(2,1,1) plot(x,abs(u0)/abs(u0(steps/2))) xlabel(x);ylabel(相对振幅); angle_u0=angle(u0)/pi*180; angle_u0=angle_u0-angle_u0(steps/2); subplot(2,1,2) plot(x,angle_u0) xlabel(x);ylabel(相对相位); function y=QU(x,u) global steps L k a x_=linspace(-a,a,steps); step_len

文档评论(0)

li455504605 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档