1
1
mirror of https://github.com/GaloisInc/cryptol.git synced 2024-12-21 06:51:57 +03:00
cryptol/tests/regression/check14.cry

6 lines
149 B
Plaintext
Raw Normal View History

2014-04-18 02:34:25 +04:00
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]]