群折色率和频率失谐的关系源码程序,程序员在编程的过程中可以参考学习使用,希望对IT程序员有用,此源码程序简单易懂、方便阅读,有很好的学习价值!
%数据参考Numerical study of all-optical slow-light delays via stimulated Brillouin scattering in an optical fiber
%群折色率和频率失谐的关系 和群折色率与布里渊增益的关系
PI=3.142;
LW=80e6*PI;%增益线宽
C=3e8;%光速
go=5e-11;%线性中心增益系数
I=1e-3;%泵浦光强度
nfg=1.45;
deldaw=-160e6*PI:0.01.*80e6*PI:160e6*PI;%频差
ng=nfg+(C*go*I/LW)*(1-4.*deldaw.^2./LW.^2)./(1+4.*deldaw.^2./LW.^2).^2;%群折色率
g=go.*I./(1+4.*deldaw.^2./LW.^2);%布里渊增益
plot(2.*deldaw./LW,g./(go*I),'r');%布里渊增益函数
hold on
plot(2.*deldaw./LW,(ng-nfg).*LW./(C.*go*I));%群折射率与频率失谐函数
xlabel('2deldaw/LW');
ylabel('(ng-nfg)LW/(CgoI)和g./(go*I)');
%延时脉冲的展宽和布里渊增益的关系
PI=3.142;
pwidthin=120e-9;%输入探测光脉冲宽度
LW=80e6*PI;%增益线宽
g=0:0.01:25;
B= (1+g.*16.*log(2)./(pwidthin.^2.*LW.^2)).^(1/2);%脉冲展宽因子与布里渊增益之间的关系
plot(g,B);
axis([0 25 0.9 1.15]);
%延时脉冲最大时间延时与布里渊增益的关系
LW=80e6*PI;%增益线宽
g=0:0.01:25;
maxtime=g./LW;
plot(g,maxtime);
axis([0 25 -120 80]);