（XD::Table:Reflection）将表格MAPPINT映射到具体的表格位置

XDSoft

1. ;|将表格MAPPINT映射到具体的表格位置
   
2. 参数： mapping --- 函数XD::Table:Mapping制作的映射表
   
3.        matrix  --- 变换矩阵
   
4. |;
   
5. (defun XD::Table:Reflection (mapping matrix)
   
6.   (mapcar
   
7.     '(lambda (x)
   
8.        (cons (xdrx_point_transform x matrix) (cdr x))
   
9.      )
   
10.     mapping
    
11.   )
    
12. )
    
13. 
    

;|将表格MAPPINT映射到具体的表格位置<br /> 参数： mapping --- 函数XD::Table:Mapping制作的映射表<br />        matrix  --- 变换矩阵<br /> |;<br /> (defun XD::Table:Reflection (mapping matrix)<br />   (mapcar<br />     '(lambda (x)<br />        (cons (xdrx_point_transform x matrix) (cdr x))<br />      )<br />     mapping<br />   )<br /> )<br /> <br />