3

我是 haskell 的新手。我想知道我是否可以只使用 map 和 concat 来做以下事情?

                 [ (x,y+z) | x<-[1..10], y<-[1..x], z<-[1..y] ]
4

1 回答 1

7

是的:

concat $ concat $ map (\x -> map (\y -> map (\z -> (x,y+z)) [1..y]) [1..x]) [1..10]

虽然官方翻译使用的是concatMap:

concatMap (\x -> concatMap (\y -> concatMap (\z -> [(x,y+z)]) [1..y]) [1..x]) [1..10]
于 2011-09-22T09:03:15.400 回答