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

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