Доступ к элементам пользовательского типа данных в Haskell

Скажем, у меня есть следующий пользовательский тип данных и функция в Haskell:

data Person = Person { first_name :: String, 
                       last_name :: String,
                       age :: Int 
                     } deriving (Eq, Ord, Show)

Если я хочу создать функцию print_ageдля вывода возраста человека, например:print_age (Person "John" "Smith" 21), как мне написать print_ageдля доступа к параметру возраста? Я объектно-ориентированный парень, так что я здесь не в своей тарелке. Я в основном ищу эквивалент Person.age.