RosettaCodeData/Task/Find-the-missing-permutation/Icon/find-the-missing-permutation-2.icon

4 lines
241 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
every x := permutes("ABCD") do # generate all permutations
if member(givens,x) then delete(givens,x) # remove givens as they are generated
else insert(givens,x) # add back any not given