{-# htermination enumFromTo :: Ordering -> Ordering -> [Ordering] #-}