RosettaCodeData/Task/Find-the-missing-permutation/K/find-the-missing-permutation-2.k
2016-12-05 22:15:40 +01:00

3 lines
75 B
Text

table:{b@<b:(x@*:'a),'#:'a:=x}
,/"ABCD"@&:'{5=(table p[;x])[;1]}'!4
"DBAC"