Почитав RWH, начинаешь думать немного по-другому - забыл совершенно название функции, берущей список и вставляющей между всеми его элементами заданный элемент. Пришлось пойти логическим путем - у функции два аргумента: первый типа a, второй типа [a]. Возвращает тоже [a].

Т.е. тип функции: a -> [a] -> [a]

Первый же матч в Hoogle: функция intersperse.

Удобно...

p.s. Оно ещё и обратный порядок аргументов понимает.

Update: чуть скорректировал ссылки на матч и поисковик :)