Бесточечный стиль и использование $

Как это сделать объединить с использованием $ и стиля без точек?

Наглядным примером является следующая служебная функция:

times :: Int -> [a] -> [a]
times n xs = concat $ replicate n xs  

Простое написание concat $ replicate приводит к ошибке, аналогично вы не можете напишите concat. реплицировать либо потому, что concat ожидает значение, а не функцию.

Так как бы вы превратили вышеуказанную функцию в безточечный стиль?