-- Store a person's name, age, and favourite Thing.
data Person = Person String Int Thing
  deriving Show

brent :: Person
brent = Person "Brent" 31 SealingWax

stan :: Person
stan  = Person "Stan" 94 Cabbage

getAge :: Person -> Int
getAge (Person _ a _) = a

I understand how this works. 

But I wonder if there is no "better" way to get the Age. 

Is it now wise to make  a person data like this : 

data Person = Name : String 
    | Age : Integer 
    | FavThing : String 

And if so , how can I get the age then ?

Roelof