unison/unison-src/tests/stream/append.u
2018-09-24 13:15:40 -04:00

7 lines
174 B
Plaintext

(++) = Stream.append
sum = Stream.reduce 0 (Nat.+)
left = Stream.take 3 (Stream.from-nat 5)
right = Stream.take 10 (Stream.from-nat 100)
sum (Stream.take 6 (left ++ right))