哈斯克爾列表理解地圖

Question

我是哈斯克爾的新手。我想知道如果我可以使用map和concat來做以下事情嗎？

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

Answer 1

是：

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

雖然official translation使用concatMap：

concatMap (\x -> concatMap (\y -> concatMap (\z -> [(x,y+z)]) [1..y]) [1..x]) [1..10]