9 lines
269 B
Text
9 lines
269 B
Text
perms: [
|
|
"ABCD" "CABD" "ACDB" "DACB" "BCDA" "ACBD" "ADCB" "CDAB" "DABC"
|
|
"BCAD" "CADB" "CDBA" "CBAD" "ABDC" "ADBC" "BDCA" "DCBA" "BACD"
|
|
"BADC" "BDAC" "CBDA" "DBCA" "DCAB"
|
|
]
|
|
|
|
allPerms: map permutate split "ABCD" => join
|
|
|
|
print first difference allPerms perms
|