RosettaCodeData/Task/Sort-an-array-of-composite-structures/Oforth/sort-an-array-of-composite-structures.fth
2023-07-01 13:44:08 -04:00

1 line
83 B
Forth

[["Joe",5531], ["Adam",2341], ["Bernie",122], ["David",19]] sortBy(#first) println