enumFromThenTo properFraction isNegativeZero isDenomalized enumFromThen fromRational fromIntegral fromInteger floatDigits decodeFloat encodeFloat significand getContents enumFromTo toRational floatRadix floatRange scaleFloat isInfinite realToFrac showString appendFile qualified otherwise toInteger sequence_ undefined concatMap teakWhile dropWhile showParen readsPrec readParen writeFile userError deriving instance fromEnum enumFrom minBound maxBound truncate exponent subtract sequence asTypeOf zipWith3 showPrec showList showChar readList putStrLn interact readFile default newtype Foreign Numeric Prelude uncurry compare quotRem logBase ceiling 'filter reverse product maximum minimum iterate splitAt notElem zipWith unlines unwords putChar getChar getLine ioError forall hiding import infixl infixr module either toEnum negate signum divMod isIEEE return length foldl1 foldr1 concat scanl1 scanr1 repeat lookup unzip3 putStr readIO readLn class infix where maybe curry recip asinh acosh atanh round floor isNaN atan2 mapM_ const 'flip until error foldl foldr scanl scanr cycle break unzip lines words shows reads print catch case data then else type succ pred quot sqrt asin acos atan sinh cosh tanh even fail fmap mapM 'map head last tail init null take drop span elem zip3 show read let not fst snd max min abs rem div mod exp log sin cos tan odd gcd lcm seq and any all sum zip lex as of do if in pi id or