RosettaCodeData/Task/Sort-an-array-of-composite-structures/F-Sharp/sort-an-array-of-composite-structures-1.fs

let persons = [| ("Joe", 120); ("foo", 31); ("bar", 51) |]
Array.sortInPlaceBy fst persons
printfn "%A" persons