7 lines
258 B
Forth
7 lines
258 B
Forth
hex
|
|
ABCD CABD xor ACDB xor DACB xor BCDA xor ACBD xor
|
|
ADCB xor CDAB xor DABC xor BCAD xor CADB xor CDBA xor
|
|
CBAD xor ABDC xor ADBC xor BDCA xor DCBA xor BACD xor
|
|
BADC xor BDAC xor CBDA xor DBCA xor DCAB xor
|
|
cr .( Missing permutation: ) u.
|
|
decimal
|