在给排水设计的过程中，有时候会遇到求多条线段（例如L线、PL线、弧线、SPL线……）的总长度，如果线段少的时候还好应付，如果线段多了就头痛了，所以一直想找一个会自动计算各线段的总长度的Lisp程序，因为本人不会编程，所以只好求助于各位编程高手了！！！！

PS：虽然我找不到线段自动计算总长度的Lisp程序，但找到了一个自动求各面域总面积的Lisp程序，希望个别高手能从中修改一下，使其成为一个线段计算总长度的Lisp程序！！！！