Tengo el siguiente tipo Persona:
data Persona = LaPersona Nombre Edad
type Nombre = String
type Edad = Int
edad :: Persona -> Edad
edad (LaPersona _ edad) = edad
Mi pregunta es: ¿Cómo hago para obtener el listado de edades de todas las personas de la lista de Personas?
Había pensado algo así, pero me quedé trabado.
edadesDePersonas :: [Persona] -> [Edad]
edadesDePersonas []= []
edadesDePersonas (p:ps) = edad p : (edad ps)
Saludos!