mirror of
https://github.com/GaloisInc/cryptol.git
synced 2025-01-05 15:07:12 +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
|
||
|
]
|