如何在列表理解中对元组执行功能？哈斯克尔

Question

我有一个名为 image 的类型，它包含一组元组，它们是坐标。我正在尝试进行列表理解，我可以在其中打印出 x 或 y 坐标列表的最大值和最小值。

example :: Image -> (Int,Int)
example e = [ (j,k) | (x,y) <- e, j <- (maximum x), k <- (minimum y)] 

我想打印 (max x, min x) 作为首发。

我不断收到错误，有人可以告诉我正确的方法吗？

编辑：感谢答案，我已将第二行更改为：

example e = [ (j,k) | (x,y) <- e, let j = maximum x, let k = minimum y]

但是得到这个错误：

Couldn't match expected type ‘[a]’ with actual type ‘Int’
Relevant bindings include j :: a (bound at image.hs:69:39)
In the first argument of ‘maximum’, namely ‘x’
In the expression: maximum x

对于 j 和 k

Answer 1

更新答案：

这里是Image和Point的定义：

type Image = [Point]
type Point = (Int,Int)

还有example应该怎么写：

example :: Image -> (Int,Int)
example e = (maximum xs, minimum xs)
  where xs = map fst e   -- xs = list of the x coordinates
        ys = map snd e   -- ys = list of the y coordinates

原答案：

使用let：

example e = [ (j,k) | (x,y) <- e, let j = maximum x, let k = minimum y]