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:
alternatively, without using the
repli = flip $ concatMap . replicate
repli :: [a] -> Int -> [a] repli xs n = concatMap (take n . repeat) xs