>>> take 10 $ repeat 17 [17,17,17,17,17,17,17,17,17, 17]
>>> repeat undefined [*** Exception: Prelude.undefined
>>> repeat 17 [17,17,17,17,17,17,17,17,17...
>>> S.print $ S.take 3 $ S.repeat 1 1 1 1
>>> take 20 $ repeat 17 [17,17,17,17,17,17,17,17,17...
>>> R.stdout $ R.take 50 $ R.repeat 60 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< >>> Q.putStrLn $ Q.take 50 $ Q.repeat 'z' zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz
>>> repeat x = Stream.repeatM (pure x)