[求助]：如何用lisp求出如图重叠线段的长度？

hnfsf

如何用lisp求出如图重叠线段的长度？

snoopychen

个人思路
得出PL1的所有顶点，表1，个数为i
得出PL2的所有顶点，表2，个数为j
大循环为i，小循环为j
判别某两段是否共线，如有重叠，找出线段长度小者，为表3
依次对表3判别，可以得到各重叠段的长度

hnfsf

那用什么算法判断两线段是否共线呢？
我搜搜看

snoopychen

共线算法应该比较简单啊，先判断斜率，再判断截距，其中特殊情况就是斜率无穷大，那种就判断x值就可以了啊：）

最近去http://www.cad777.com/sdxvc/qmepfhyhsj/
把05年2月之前晓东lisp论坛的所有文章下载回来，作了一个17M的chm文件，现在临时找文章就不用上论坛，直接在chm中查询，比较快。就是不知道这个cad777和晓东什么关系，是晓东的备份还是别人的盗版，比较奇怪。没有什么空间来上传这个chm有点可惜，不过cad777的不是很全，有些程序代码不知道怎么就给砍掉了一部分，还是希望各位版主能出一个官方chm就更好了。

发现晓东兄现在好久不出现了，不知道是怎么回事呢，还记得98年的时候晓东兄在网易发帖子说自己有主页了，然后来这里好好学习了晓东兄对天正1.7内核的重写。晓东兄有空还是多多出来教教各位兄弟啊：）

不好意思了，胡言乱语有点跑题。

hnfsf

感谢楼上兄弟的回复，并指点了一个好地方，
过几天空闲了照您的提示写写看。多谢指点。