ft.m

来自「用于计算固体激光器中激光晶体的热焦距」· M 代码 · 共 12 行

clc;
clear;
kc = 0.0054%热传导系数
a = 14.8%吸收系数
dndt=0.00000467%热光系数
L=0.5%长度
w = 0.30%光斑大小
Pph = [10:0.1:18];%泵浦功率
dd = 0.18;%泵浦功率转化成热能的系数 0.18
f=(pi*kc*w^2./(dd*Pph*dndt))*(1/(1-exp(-a*L)));%热焦距
%f=1000./f;
plot(Pph,f)