cryptol/tests/issues/issue150.cry

5 lines
129 B
Plaintext
Raw Normal View History

2014-04-18 02:34:25 +04:00
maxSeq' xs = ys
where ys = [0] # [ max x y | x <- xs
| y <- ys
]