mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-21 06:51:57 +03:00
6 lines
149 B
Plaintext
6 lines
149 B
Plaintext
|
swab xxs = [ [d, c, b, a]
|
||
|
| [a, b, c, d] <- xxs
|
||
|
]
|
||
|
|
||
|
check14 = swab [[0, 1, 2, 3], [4, 5, 6, 7]] == [[3, 2, 1, 0], [7, 6, 5, 4]]
|