mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-17 04:44:39 +03:00
6 lines
167 B
Plaintext
6 lines
167 B
Plaintext
|
xs : [10]([8],[8])
|
||
|
|
xs = take `{10} zs where zs = [(0,0)] # [ (0, z) | (z,_) <- drop `{1} zs]
|
||
|
|
|
||
|
|
vs : [10]([8],[8])
|
||
|
|
vs = take `{10} zs where zs = [ (0, z) | (z,_) <- zs]
|