(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”.
(ssget "_x" (list (cons -4 "*,=,*") (list 10 0 0 0)))
(vl-sort xlist '>)
The first element was the furthest line to the right.