Какой идиоматический способ добавления списков в Haskell?

Предположим, я хочу добавить два списка в Haskell. Каков самый обычный способ сделать это?

Вот что я сделал:

addLists :: (Integral a) => [a] -> [a] -> [a]
addLists xs ys = map add $ zip xs ys
    where add (x, y) = x+y