Lisp Total Length Autocad