>>> repeat 17 [17,17,17,17,17,17,17,17,17...
>>> take 20 $ repeat 17 [17,17,17,17,17,17,17,17,17...
>>> S.print $ S.take 3 $ S.repeat 1 1 1 1
>>> R.stdout $ R.take 50 $ R.repeat 60 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< >>> Q.putStrLn $ Q.take 50 $ Q.repeat 'z' zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz
repeat (Exactly 6) (takeWhile ((/=) ',') <* element ',')## Repeat Between lower `And` upper times
repeat (Between $ 1 `And` 10) (takeWhile ((/=) ',') <* element ',')