99 questions/Solutions/15: Difference between revisions
< 99 questions | Solutions
No edit summary |
No edit summary |
||
Line 9: | Line 9: | ||
<haskell> | <haskell> | ||
repli = flip $ concatMap . replicate | repli = flip $ concatMap . replicate | ||
</haskell> | |||
alternatively, without using the <hask>replicate</hask> function: | |||
<haskell> | |||
repli :: [a] -> Int -> [a] | |||
repli xs n = concatMap (take n . repeat) xs | |||
</haskell> | </haskell> |
Revision as of 22:28, 20 December 2010
(**) Replicate the elements of a list a given number of times.
repli :: [a] -> Int -> [a]
repli xs n = concatMap (replicate n) xs
or, in Pointfree style:
repli = flip $ concatMap . replicate
alternatively, without using the replicate
function:
repli :: [a] -> Int -> [a]
repli xs n = concatMap (take n . repeat) xs