laser_New 光纤激光器仿真程序

光纤激光器仿真程序，matlab写的,是一个不错的程序

function laser_New                %铒镱共掺光纤激光器的传输方程
global  b1 b2 b3 a1 a2 a3 a4 a5 a6 sigma_12 sigma_21 sigma_56 sigma_65 Ner....
Nyb  alpha_p alpha_s gamma_p gamma_s h c nu_p nu_s  Cup Ccr Acore tau_er tau_yb P0 lambda_s
%参量设置
lambda_p=980*1e-9;     %泵浦光波长
lambda_s=1550*1e-9;    %激光波长
tau_er=11*1e-3;           %Er上能级粒子寿命
tau_yb=1.5*1e-3;          %Yb上能级粒子寿命
sigma_12=6.5*1e-25;    %铒离子的吸收截面面积
sigma_21=9.0*1e-25;    %铒离子的发射截面面积
sigma_56=3.648*1e-25;    %镱离子的吸收截面面积
sigma_65=7.296*1e-25;    %镱离子的发射截面面积
Ner=5.0*1e25;          %铒离子的浓度
Nyb=6.25*1e26;         %镱离子的浓度
alpha_p=4.2;        %双包层光纤对泵浦光的损耗
alpha_s=4.2;      %双包层光纤对激光的损耗
gamma_p=0.0058;       %泵浦光重叠因子
gamma_s=1;          %激光重叠因子
Cup=3.5*（1e-24）+2.41*（1e-49）*（Ner-4.4*1e25）;         %能量上转换系数
Ccr=1*（1e-22）+4.0*（1e-49）*（Ny

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件        2042  2014-03-13 16:36  laser_New.m