[project @ 2001-03-29 14:35:20 by simonmar]
[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)