cryptol/tests/issues/issue268.cry
2016-07-13 14:40:44 -07:00

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]