Lisp of the Day


(vl-sort list function)

The lisp function of the day is VL-SORT. I have used this in many ways in the past but my most recent application was to find a vertical line that was the furthest to the right based on a common start point where the “Y” value was “0”.

;Selecting filter
(ssget "_x" (list (cons -4 "*,=,*") (list 10 0 0 0)))
(vl-sort xlist '>)

The first element was the furthest line to the right.