mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-11 07:00:49 +03:00
0352dca57a
Renamed old "issue133" to "trac133", indicating that it uses a different numbering system.
6 lines
200 B
Plaintext
6 lines
200 B
Plaintext
example1 : {a} (a >= 1, 2 >= a) => [16*a][8] -> [16][8]
|
|
example1 k = drop`{16} ((zero : [16*(2 - a)][8]) #k)
|
|
|
|
example2 : {a} (a >= 1, 2 >= a) => [16*a][8] -> [16][8]
|
|
example2 k = drop`{16} (zero # k)
|