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