文件名称：Fox_li 迭代MATLAB程序
文件大小：20KB
文件格式：DOC
更新时间：2013-12-11 07:00:13
条形腔
模拟激光谐振腔模式 %————初始化—————————————lm=632.8e-9; %波长L=100*lm; %腔长a=25*lm; %腔镜线宽k=2*pi/lm; %波失x1=linspace(-a,a,1000);%取1000个点积分Un_n=zeros(1,1000);Un_n_1=Un_n;%———求解第一次的迭代结果——————for m=1:1000 x=x1(m);y=exp((-i*k*(x-x1).^2)/(2*L));Un_n(m)=sqrt(i/(pi*L)*exp(-i*k*L))*sum(y(1:1000));end%————对第一次的归一化————