w_l3.m

激光器典型腔计算

%syms l3;
%s=solve('5/8589934592*527702830840913505^(1/2)*(abs(44436/21025+5846/1576875*l3)/(-118750+2575*l3-4*l3^2)^(1/2))^(1/2)=25e-3','l3')
%记住粘贴过来得表达式中要加“.”，可以用查找替换功能来实现，注意要把光标放在最前面
clear;
l3=76:0.5:1000;
wsesam=25./4294967296.*830980319829944255.^(1./2)./(-1222981875+17714100.*l3-18769.*l3.^2).^(1./4);
wcrytal=25./4294967296.*527702830840913505.^(1./2).*(abs(-850907./126150+18769./3153750.*l3)./(-1222981875+17714100.*l3-18769.*l3.^2).^(1./2)).^(1./2);
ws=1000..*wsesam;         %让单位化成um
wc=1000..*wcrytal;        %让单位化成um
plot(l3,ws,':')
hold on;
plot(l3,wc)
xlabel('l3(mm)'),ylabel('w(um)')