List 在Haskell中创建列表

我有升级，定义如下：

data Liter = Book { title :: String, author :: String, year :: Int}
           | Magaz { title :: String, month :: Int, year :: Int}
             deriving (Eq, Show)

---

如何创建一个函数，

getTitles

，它接受一个

[l]

并返回一个

[String]

名称。

它是

映射标题

。只要阅读哈斯克尔几乎所有入门教程的开头部分，就可以为您提供答案。在发布问题之前，请显示一些努力。将总和类型与记录相结合是危险的：

month（Book“foo”“bar”1）

将愉快地编译并给出运行时异常。

getTitles :: [Liter] -> [String]
getTitles = map title