列表清单上的操作| 怎么样

Question

当我在Haskell书中看到concat函数时,我想知道如何在Haskell中展平下面的列表.在Python中,我可以这样做,因为我可以在函数中检查它的类型.但在哈斯克尔,我做不到.我如何压扁下面的列表？

input: [[1, 2], [[2, 3], 5], [[[2, 3], [4, 5]], [2, 3]]]
output: [1, 2, 2, 3, 5, 2, 3, 4, 5, 2, 3]

Answer 1

正如已经指出的那样,你不能在Haskell中拥有任意嵌套列表.最接近的事情(没有使用花式pragma的脏类型hacks)将是这样的:

data Nested a = L a | B [Nested a]

flatten :: Nested a -> [a]
flatten (L x) = [x]
flatten (B xs) = concatMap flatten xs  

print $ flatten $ B[B[L 1,L 2],B[B[L 2,L 3],L 5],B[B[B[L 2,L 3],B[L 4, L 5]],B[L 2,L 3]]]
--[1,2,2,3,5,2,3,4,5,2,3]

Answer 2

你不能在haskell中创建一个具有不同深度的列表.它不会发生变形.[[a]]与...不是同一类型[[[a]]].此功能将解决您的问题,但仅限于具有相同深度的列表.

flat::[[a]] -> [a]
flat [] = []
flat l:ls = l ++ flat ls