Haskell映射元组列表的元组列表

Question

我试图将元组列表映射到不同的元组列表而没有运气。

示例输入：

a = [("eo","th"),("or","he")]

示例输出：

[('e','t'),('o','h'),('o','h'),('r','e')]

我试过了：

map (\(a,b) -> (a!!0,b!!0):(a!!1,b!!1):[]) a

但它会产生：

[[('e','t'),('o','h')],[('o','h'),('r','e')]]

Answer 1

这是一种快速提供输出的方法

simplify = (>>= uncurry zip)