data Curso = Curso String Int Int
deriving (Show, Eq)
data Estudiante = Estudiante String Int Int [Curso]
deriving (Show, Eq)
data ParNomCI = ParNomCI String Int
deriving (Show, Eq)
nomCI :: Estudiante->ParNomCI
nomCI (Estudiante nombre ci _ _) = (ParNomCI nombre ci)
Cuando llamo a nomCI en la consola, por ej: nomCI (Estudiante "Bruno" 1 2020 []), me devuelve: ParNomCI "Bruno" 1.
Mi duda es si es correcto que me devuelva el constructor además de los parámetros, y si no lo es, de que forma podría arreglarlo sin tener que usar tuplas como pide la letra.
Saludos.