David Bethel 发表于 2022-7-6 09:47:20

圆弧公式

在普通Autolisp中，我需要计算一些圆弧信息：
 
我有：
 
1） 已知（固定）弦长AB（84”）
2） 指定的管段高度ED（从1“到42”）
 
我寻找弧半径OA/OB和中心角AOB
 
 
我有很多弧公式，但没有这2个。谢谢-大卫

Lee Mac 发表于 2022-7-6 09:58:10


(defun rad ( chrd segh )
(/ (+ (* segh segh) (/ (* chrd chrd) 4.)) (* 2. segh))
)

(defun ang ( chrd segh )
(* 2. (asin (/ chrd (* 2. (rad chrd segh)))))
)

(defun asin ( x )
(if (<= (abs x) 1.0)
   (if (equal (abs x) 1.0 1e-
   (* x pi 0.5)
   (atan (/ x (sqrt (- 1.0 (* x x)))))
   )
)
)

David Bethel 发表于 2022-7-6 10:08:42

谢谢，我会把这一个加书签
 
最终生产使用的是端柜顶部的半径-大卫

Lee Mac 发表于 2022-7-6 10:16:14

你可能不想知道这一点，但长度ED也被称为Sagitta，来自拉丁文中箭头的意思。（看起来像弓箭中的箭）。
 
这个长度ED也称为正版。
 
所有这些名字都有助于在网上搜索信息

David Bethel 发表于 2022-7-6 10:19:16

对
 
我是在1728年看到的。我从com中抓取图像。但是我的拉丁语不是很好-大卫

eldon 发表于 2022-7-6 10:31:36

 
这张图解释了很多关于trig函数的内容：
 
http://upload.wikimedia.org/wikipedia/commons/9/9d/Circle-trig6.svghttp://upload.wikimedia.org/wikipedia/commons/9/9d/Circle-trig6.svg
http://upload.wikimedia.org/wikipedia/commons/9/9d/Circle-trig6.svg

David Bethel 发表于 2022-7-6 10:33:18

将此标记为书签的另一个原因1
 
正割平方+余割平方=正切+余切平方

Lee Mac 发表于 2022-7-6 10:46:56

David Bethel 发表于 2022-7-6 10:50:06

Another reason to bookmark this 1
 
secant squared + cosecant squared = tangent + cotangent squared
页: [1]
查看完整版本: 圆弧公式