用法
评论
建议
取 消
确 定
(defun point:in-box (pt1 pt-box1 pt-box2) "判断 pt1 是否在矩形内" "t or nil" (and (>= (car pt1) (car pt-box1)) (<= (car pt1) (car pt-box2)) (>= (cadr pt1) (cadr pt-box1)) (<= (cadr pt1) (cadr pt-box2))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新