{-# LANGUAGE Safe #-} module Data.Enum.Util (enumerate) where enumerate :: (Enum a, Bounded a) => [a] enumerate = [minBound .. maxBound]