5 lines
157 B
Haskell
5 lines
157 B
Haskell
import Data.List (delete)
|
|
|
|
permutations :: Eq a => [a] -> [[a]]
|
|
permutations [] = [[]]
|
|
permutations xs = [ x:ys | x <- xs, ys <- permutations (delete x xs)]
|