Permutations: Difference between revisions

Content added Content deleted
(→‎{{header|Erlang}}: Add zipper implementation)
Line 911: Line 911:
permute([], _) -> [];
permute([], _) -> [];
permute([H|T], R) ->
permute([H|T], R) ->
% place current member in front of all permutation of
% place current member in front of all permutations
% all permutations of rest of set - both sides of zipper
% of rest of set - both sides of zipper
prepend(H, permute(lists:reverse(R, T)))
prepend(H, permute(lists:reverse(R, T)))
% go further in zipper
% go further in zipper