RosettaCodeData/Task/Sort-an-array-of-composite-structures/PicoLisp/sort-an-array-of-composite-structures-2.l

: (by car sort '(("def" 456) ("abc" 789) ("ghi" 123)))
-> (("abc" 789) ("def" 456) ("ghi" 123))