[0426][求助]：cal命令中的w2u在lisp中该怎样表示呢?

xyz518mm · 发表于 2006-4-26 12:10:45

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

[0426][求助]：cal命令中的w2u在lisp中该怎样表示呢?
如题~
烦请各位高手帮忙解答一下~
谢谢~

LUCAS · 发表于 2006-4-26 15:59:15

;;指令: cal
;;>> 表示式: w2u([100,100,0])
;;(2.22045e-014 100.0 100.0)

;;指令: cal
;;>> 表示式: u2w([0,100,100])
;;(100.0 100.0 2.22045e-014)

_$ (trans '(100 100 0) 0 1)
(2.22045e-014 100.0 100.0)
_$ (trans '(0 100 100) 1 0)
(100.0 100.0 2.22045e-014)

xyz518mm · 发表于 2006-4-26 18:49:51

自己解答一下~如果不对请纠正~
(setq p1 (cdr (assoc 10 en))
p2 (cdr (assoc 11 en))
)

(setq p1 (cal "w2u(p1)")
p2 (cal "w2u(p2)")
)

账号		自动登录	找回密码
密码			立即注册

[求助] [0426][求助]：cal命令中的w2u在lisp中该怎样表示呢?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子