似乎无论我用哪种方式写,它的值都是错误的。
(setq BF1# (atan (/ (MD_DTR 90) 4))
(defun MD_DTR (a)(* pi (/ a 180.0)))
返回0.374197 您使用了arctan函数,而不是切线函数 找不到切线函数。 不是内置函数,我已经在第一页为您发布了…'-)
好了,我明白了。
谢谢
完美的这正是我需要的。
再次感谢wizman 很高兴帮你打电话…'-) 你好
好了,没有必要测试余弦是否等于0来避免错误。
cos LISP函数的实现使得(cos(/pi 2))返回6.12323e-017和(cos(*pi 1.5))-1.83697e-016,而不是0。
因此,我目前使用:
(defun tan(a)(/(sin a)(cos a))) 感谢gile提供的信息,有什么原因导致与0的差异或只是acad再次四舍五入?
页:
1
[2]