6 lines
157 B
Haskell
6 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)]
|