Auto LISP Find Total Length of Objects