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