用法
评论
建议
取 消
确 定
(defun geometry:on-segment (pt segment) "判断一个与线段共线的点是否在线段上。" (and (>= (car pt) (apply (quote min) (mapcar (quote car) segment))) (<= (car pt) (apply (quote max) (mapcar (quote car) segment))) (>= (cadr pt) (apply (quote min) (mapcar (quote cadr) segment))) (<= (cadr pt) (apply (quote max) (mapcar (quote cadr) segment)))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新