2 lines
79 B
Haskell
2 lines
79 B
Haskell
powerSet :: [a] -> [[a]]
|
|
powerSet = foldr (\x acc -> acc ++ map (x:) acc) [[]]
|
powerSet :: [a] -> [[a]]
|
|
powerSet = foldr (\x acc -> acc ++ map (x:) acc) [[]]
|