Какой хороший способ сгенерировать бесконечный список всех целых чисел в Haskell

Я написал следующую функцию на Haskell, так как она будет перечислять каждое целое число:

integers = (0:)$ concat $ zipWith (\x y -> [x,y]) [1..] (map negate [1..])

Интересно, есть ли лучшие способы сделать это, это кажется слишком сложным

Кроме того, мне интересно, существуют ли стандартные реализации для перечисления всех элементов в целочисленной решетке e размерности $k$.