用法
评论
建议
取 消
确 定
(defun curve:checkarc (en / g) "判断多段线是否有圆弧(凸度/=0)的子段" (setq g (vl-remove-if-not (quote (lambda (x) (= (car x) 42))) (entget en))) (not (vl-every (quote zerop) (mapcar (quote cdr) g))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 747 个
函数库类别: 52 种
上传记录
刷新