嗨,我有这个小功能,找到集合的powerset但我需要所有连续的子列表.[1,2,3] -> [[],[1],[2],[3],[1,2],[2,3],[1,2,3]]并不是[[],[3],[2],[2,3],[1],[1,3],[1,2],[1,2,3]]
有没有办法修复此功能来做我想要的？
sublists :: [a] -> [[a]]
sublists [] = [[]]
sublists (x:xs) = sublists xs ++ map (x:) (sublists xs)