[Haskell-cafe] double2Float is faster than (fromRational . toRational)