5 lines
113 B
Erlang
5 lines
113 B
Erlang
-module(permute).
|
|
-export([permute/1]).
|
|
|
|
permute([]) -> [[]];
|
|
permute(L) -> [[X|Y] || X<-L, Y<-permute(L--[X])].
|