与数组关联的F#比较函数

let compareInts (a: int) (b: int) =
    if a < b then -1
    elif a > b then 1
    else 0

let numbers = [|3; 1; 4; 1; 5; 9; 2; 6; 5; 3; 5|]
let sortedNumbers = Array.sortBy compareInts numbers

let compareStrings (a: string) (b: string) =
    if a < b then -1
    elif a > b then 1
    else 0

let strings = [|"banana"; "apple"; "cherry"; "date"|]
let sortedStrings = Array.sortBy compareStrings strings

printfn "%A" sortedStrings

let compareInts (a: int) (b: int) =
    if a < b then -1
    elif a > b then 1
    else 0

let numbers = [|3; 1; 4; 1; 5; 9; 2; 6; 5; 3; 5|]
let sortedNumbers = Array.sortBy compareInts numbers

type Person = {
    Name: string
    Age: int
}

let comparePersons (a: Person) (b: Person) =
    if a.Age < b.Age then -1
    elif a.Age > b.Age then 1
    else 0

let people = [
    { Name = "Alice"; Age = 30 }
    { Name = "Bob"; Age = 25 }
    { Name = "Charlie"; Age = 35 }
]

let sortedPeople = List.sortBy comparePersons people