激光线宽不同表达方式之间的转换
下面是转换激光线宽的Matlab程序(LarLineWidth.m). 需要知道激光波长(比如632.8 nm); 需要输入
线宽用波长, 频率, 或者波数表示的值(只能输入3个中的1个, 其他两个赋值为‐1.)
%LarLineWidth.m
%Thisprogramistoconvertlarlinewidthbetweendifferentforms:
%wavelength(nm),frequency(MHz)andwavenumber(cm^-1)
%larlinewavelengthmustbeknown.
%Inputoneofthethreeformsoflinewidthonly,leavetheothertwo-1.
%Units:<><><>wavelength:nm,frequency:MHz,wavenumber:cm^-1<><><>
clearall;clc;
formatlongg
cc=3e8;%speedoflightinm/s.
lambda=632.8;%wavelengthinnm
%Pleaprovideoneofthefollowing3quantities,leavetheothertwo"-1":
%<><><><><><><><><><><><><><><><><><><><><><><><><>%
Deltalambda=-1;%linewidthinwavelength(nm)
Deltanu=1500;%linewidthinfrequency(MHz=1e6Hz)
Deltanubar=-1;%linewidthinwavenumber(cm^-1)
%<><><><><><><><><><><><><><><><><><><><><><><><><>%
ifDeltalambda>0
Deltanu=(cc/lambda^2)*Deltalambda*1e9*1e-6;
%u1e9toconvert1/nmto1/m;u1e-6toconvertHztoMHz
Deltanubar=(1/lambda^2)*Deltalambda*1e7;
%u1e7toconvert1/nmto1/cm
end
ifDeltanu>0
Deltalamda=(lambda^2/cc)*Deltanu*1e-9*1e6;
%u1e-9toconvert1/mto1/nm;u1e6toconvertMHzto1/s
Deltanubar=(1/cc)*Deltanu*1e-2*1e6;
%u1e-2toconvert1/mto1/cm;u1e6toconvertMHzto1/s
end
ifDeltanubar>0
Deltalambda=lambda^2*Deltanubar*1e-7;
%u1e-7toconvert1/cmto1/nm
Deltanu=cc*Deltanubar*1e2*1e-6;
%u1e2toconvertmtocm;u1e-6toconvertHztoMHz.
end
AllLineWidth={'Deltalambda(nm)''Deltanu(MHz)''Deltanubar(cm^-1)';Deltalambda
DeltanuDeltanubar}
本文发布于:2022-11-12 11:13:38,感谢您对本站的认可!
本文链接:http://www.wtabcd.cn/fanwen/fan/88/4199.html
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。
留言与评论(共有 0 条评论) |