mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-14 08:43:06 +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]]
|