[求助]这个函数怎么理解！

tchen

;判断点是否在多边形内-------------感谢狂刀!

(defun ptinpm (pt lst) ;pt是要判断的点坐标(x y z ) lst是多边形顶点列表((x1 y1 z1) (x2 y2 z2)...)
 (equal
     PI
     (abs
       (apply
  '+
  (mapcar '(lambda (x y)  (rem (- (angle pt x) (angle pt y)) PI))
    (reverse (cdr (reverse (cons (last lst) lst)))) 
   lst
  )
       )
     )
     1e-6
   )
)

我想请问下这个判断点是否在多边形的函数原理是什么？它是根据什么角度相加会等于PI弧度呢？请指点!我可以看懂这段代码但是就是不理解这个算法是什么意思