Record Patterns

showPerson :: { firstName :: Name, lastName :: Name } -> Name
showPerson { firstName: x, lastName: y } = y <> ", " <> x
> showPerson { firstName = "Phil", lastName = "Freeman" }
"Freeman, Phil"
> showPerson { firstName = "Phil", lastName = "Freeman", location = "Los Angeles" }
"Freeman, Phil"