mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-25 09:17:27 +03:00
13 lines
223 B
Plaintext
13 lines
223 B
Plaintext
(+) = (Int64.+)
|
|
(/) = (Int64./)
|
|
(<) = (Int64.<)
|
|
Stream.to-sequence
|
|
(Stream.take 5
|
|
(Stream.unfold
|
|
(b ->
|
|
if b < +1
|
|
then Optional.Some (b + +1, b / +2)
|
|
else Optional.None
|
|
)
|
|
-2))
|