从表中的一列中获取唯一值

问题描述

我是Hashkell和Yesod的初学者，对如何取所有唯一值很感兴趣
来自 MysqL 表中的一列。
一个具体的例子是我有一个 Address 实体，我想取 city 属性的所有值：

Address json
    state Text sqltype=varchar(255)
    city Text sqltype=varchar(255)
    street Text Maybe sqltype=varchar(255)
    number Text sqltype=varchar(255)
    deriving Show Typeable

我想把城市的所有值都捡起来用在表格里。
我想在下拉列表中有这些值：

filters <- runInputPost $ ManFilter
        <$> iopt (selectFieldList city) "City"
    defaultLayout [whamlet | <h1> # {show $ filters} |]
 where
  city :: [(Text,Text)]
  city = [("NY","NY"),("London","London"),("Madrid","Madrid")]

另一个问题是如何从
自动创建元组city :: [(Text,Text)] 我会从数据库中得到的值？

如果有人能提供帮助，我将不胜感激，因为我对表格很着迷。
也写下它是否是一个好的程序，有什么问题，当然欢迎任何建议。谢谢！

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

haskell haskell yesod