1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
module App type Person = { Name: string; Age: int } let greet person = sprintf "Hello, %s!" person.Name let people = [ { Name = "Alice"; Age = 30 } { Name = "Bob"; Age = 25 } ] people |> List.map greet |> List.iter (printfn "%s")