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

4 lines
241 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04: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