关于高飞鸟大师的“直线与平面相交的问题”

pp521yy · 发表于 2014-9-23 13:42:31

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

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

×

高飞鸟大师发布了关于，直线与平面相交的lisp

pp521yy · 发表于 2014-9-23 13:43:32

(defun PLANE:Line_Inters_Plane (Pa Pb A B C D / h1 h2)
  (setq h1 (Plane:Distance Pa A b c d))
  (setq h2 (plane:distance Pb a b c d))
  (if (and h1 h2)
(cond
   ( (equal h1 0 1e-14) Pa)
   ( (equal h2 0 1e-14) Pb)
   (t (GEO:Proportion Pa Pb (- (/ h1 h2))))
)
  )
)
这个是部分的函数，缺少函数！哪位高手能够补齐了使用！谢谢了

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

[求助] 关于高飞鸟大师的“直线与平面相交的问题”

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