📄 fst.m
字号:
%fst.m
function[f]=fst(v0,v2,r,h)
d=r*h;
d0=h*d;
y=v0+v2*h;
w=d^2+8*r*abs(y);
a0=sqrt(w);
if abs(y)>d0
a=v2+[(a0-d)/2]*sign(y);
else
a=v2+y/h;
end
if abs(a)>d;
f=-r*sign(a);
else
f=-r*a/d;
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -