{-# htermination enumFromThenTo :: (Ratio Int) -> (Ratio Int) -> (Ratio Int) -> [(Ratio Int)] #-}