mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-15 18:52:13 +03:00
3d68677d42
Fixes #268
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]
|