haskell - 生成三元组中所有可能的数字组合？

Question

例如，我想构建一个三元组，将 1..100 中的每个数字组合都放入一个三元组中；即:

[(0,0,0),(0,0,1),(0,1,1),(1,1,1),(0,0,2),(0,1,2),(0,2,2),(1,2,2)]

..等等，直到给定的界限(即:100:给我们最后的三元组(100,100,100))；在 haskell 中有什么合理的方法可以做到这一点，或者我最好写一个简单的方法来保存一个边界指针，并递归地增加每个数字，直到它等于它右边的数字？

Answer 1

我认为你的描述最符合列表理解来表达你想做什么:

[(a, b, c) | c <- [0..100],
             b <- [0..c],
             a <- [0..b] ]