TheSwamp

Code Red => AutoLISP (Vanilla / Visual) => Topic started by: mailmaverick on March 16, 2017, 01:36:17 PM

Title: Sort a Dotted Pair of Lists Based on 2nd Value in each List
Post by: mailmaverick on March 16, 2017, 01:36:17 PM

How to Sort a Dotted Pair of Lists Based on 2nd Value in each List.
For example :

(
(<Entity name: 7fffef51d00> . "W 2")
(<Entity name: 7fffef51cf0> . "W 1")
(<Entity name: 7fffef51ce0> . "W 5")
(<Entity name: 7fffef51cd0> . "W 3")
)

be sorted to :

(
(<Entity name: 7fffef51cf0> . "W 1")
(<Entity name: 7fffef51d00> . "W 2")
(<Entity name: 7fffef51cd0> . "W 3")
(<Entity name: 7fffef51ce0> . "W 5")
)

Title: Re: Sort a Dotted Pair of Lists Based on 2nd Value in each List
Post by: ronjonp on March 16, 2017, 01:41:03 PM

Code - Auto/Visual Lisp: [Select]

1. (vl-sort yourlist (function (lambda (a b) (< (cdr a) (cdr b)))))

Similar question HERE (https://www.theswamp.org/index.php?topic=52792.msg576630#msg576630).