mirror of
https://github.com/composewell/streamly.git
synced 2024-09-21 00:20:08 +03:00
7 lines
155 B
Haskell
7 lines
155 B
Haskell
import Data.List (sum)
|
|
import Asyncly
|
|
|
|
main = do
|
|
xs <- toList $ forEachWith (<|) [1..100] $ \x -> return (x * x) :: AsyncT IO Int
|
|
print . sum $ xs
|