[project @ 2001-08-22 11:45:06 by sewardj]
[ghc-hetmet.git] / ghc / tests / numeric / should_run / num001.hs
1 module Main(main) where
2
3 import Numeric
4 import Ratio
5
6 main = print ((fromRat (132874 % 23849))::Double)