list - 从类型列表haskell中删除类型

Question

所以我是 Haskell 的新手，我想知道是否有人可以帮助我。

我有一个自定义数据类型的列表，如下所示:

type Title = String
type Manager = String
type Year = Int
type Fan = String
type Album = (Title, Manager, Year, [Fan])

我有一个预制的专辑静态数据库

albumDatabase :: [Album]
albumDatabase = [(...)]

我有一个函数可以返回经理制作的所有相册:

manAlbum :: String -> [Album] -> [Album]
manAlbum d database = filter ((\(_,album,_,_) -> d == album)) database

我的问题是，从所有经理专辑的这个新列表中，我只需要检索粉丝并删除标题、经理和年份。但是我不确定如何告诉 haskell 我只希望返回自定义数据类型中的这个字段。

Answer 1

如 4caSTLe 所述，您可以使用 map:

getAlbumFans :: [Album] -> [[Fan]]
getAlbumFans database = map (\(_,_,_,fans) -> fans) database

您还可以通过给 manAlbum 函数一个更具描述性的名称，例如 getAlbumsByManager 并将类型签名中的 String 替换为经理。