RosettaCodeData/Task/Permutations/Phix/permutations-2.phix
2016-12-05 23:44:36 +01:00

8 lines
200 B
Text

function permutes(sequence set)
sequence res = repeat(0,factorial(length(set)))
for i=1 to length(res) do
res[i] = permute(i,set)
end for
return res
end function
?permutes("abcd")