Permutations: Difference between revisions
Content deleted Content added
→{{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 |
% place current member in front of all permutations |
||
% |
% 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 |