我很感谢你的回复，但我已经熟悉了这些功能。我试着把所有的事情都写在一份声明中，但没有成功。正如PS_Port建议的那样，我现在将其分为两个语句，效果很好。我想我只是有点累了。
(setq ARAD (TRAN_DTR TANG))
(setq SIDE-c (/ SIDE-a (cos ARAD)))
这对我正在做的事情很有效。
无论如何，谢谢你，
秃鹰 在一项声明中：
(cos (* pi (/ 45. 180.)))
李 秃鹰，
很高兴它对你有用，伙计。
我不是一个Lisp程序的人，只是喜欢数学问题。
这也给了全能的数学Lisp程序的上帝李一个咯咯笑的机会。
李，
我使用的方法工作正常，但我将其缩短为一条语句，将DTR和RTD函数保持为本地函数。
谢谢
Ps_端口
再次感谢，
自从上次使用trig以来，我已经有一段时间了。我带着一点痛苦度过了这一切，但现在已经结束了。我将查看其余部分，看看如何减少冗长的编码。 呵呵谢谢大家
页:
1
[2]