mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-15 18:52:13 +03:00
5 lines
129 B
Plaintext
5 lines
129 B
Plaintext
|
maxSeq' xs = ys
|
||
|
where ys = [0] # [ max x y | x <- xs
|
||
|
| y <- ys
|
||
|
]
|