XD::GEOM:LIST-FUZ

newer

1. ;; ------------------------------------------------------------------------
   
2. ;;; 函数名称 / Function Name: XD::GEOM:LIST-FUZ
   
3. ;;;
   
4. ;;; 【功能说明 / Description】
   
5. ;;;     计算点列表的模糊度（fuzz），即边界盒两个对角点的模糊度的最大值。
   
6. ;;;     通过调用 XD::GEOM:LIST-EXTENTS 获取边界盒，再计算两个角点的模糊度。
   
7. ;;;
   
8. ;;; 【参数说明 / Parameters】
   
9. ;;;     lst - (list) 点列表，每个点为二维或三维坐标列表
   
10. ;;;
    
11. ;;; 【返回值 / Return Value】
    
12. ;;;     (number) 边界盒两个对角点模糊度的最大值
    
13. ;;;
    
14. ;;; 【依赖函数 / Dependencies】
    
15. ;;;     - XD::GEOM:LIST-EXTENTS : 计算点列表边界盒
    
16. ;;;     - XD::GEOM:POINT-FUZ   : 计算单个点的模糊度
    
17. ;;;     - max                  : 取最大值
    
18. ;;;
    
19. ;;; 【备注 / Notes】
    
20. ;;;     - 该函数用于获取点集合的整体模糊度，用于几何计算中的容差判断。
    
21. ;;;
    
22. (defun XD::GEOM:LIST-FUZ (lst)
    
23.   ;; 计算点列表的边界盒，返回两个对角点
    
24.   (setq lst (XD::GEOM:LIST-EXTENTS lst))
    
25.   ;; 计算两个对角点的模糊度，返回最大值
    
26.   (max (XD::GEOM:POINT-FUZ (car lst))
    
27.        (XD::GEOM:POINT-FUZ (cadr lst))
    
28.   )
    
29. )
    

;; ------------------------------------------------------------------------<br /> ;;; 函数名称 / Function Name: XD::GEOM:LIST-FUZ<br /> ;;;<br /> ;;; 【功能说明 / Description】<br /> ;;;     计算点列表的模糊度（fuzz），即边界盒两个对角点的模糊度的最大值。<br /> ;;;     通过调用 XD::GEOM:LIST-EXTENTS 获取边界盒，再计算两个角点的模糊度。<br /> ;;;<br /> ;;; 【参数说明 / Parameters】<br /> ;;;     lst - (list) 点列表，每个点为二维或三维坐标列表<br /> ;;;<br /> ;;; 【返回值 / Return Value】<br /> ;;;     (number) 边界盒两个对角点模糊度的最大值<br /> ;;;<br /> ;;; 【依赖函数 / Dependencies】<br /> ;;;     - XD::GEOM:LIST-EXTENTS : 计算点列表边界盒<br /> ;;;     - XD::GEOM:POINT-FUZ   : 计算单个点的模糊度<br /> ;;;     - max                  : 取最大值<br /> ;;;<br /> ;;; 【备注 / Notes】<br /> ;;;     - 该函数用于获取点集合的整体模糊度，用于几何计算中的容差判断。<br /> ;;;<br /> (defun XD::GEOM:LIST-FUZ (lst) <br />   ;; 计算点列表的边界盒，返回两个对角点<br />   (setq lst (XD::GEOM:LIST-EXTENTS lst))<br />   ;; 计算两个对角点的模糊度，返回最大值<br />   (max (XD::GEOM:POINT-FUZ (car lst)) <br />        (XD::GEOM:POINT-FUZ (cadr lst))<br />   )<br /> )<br />