[Haskell] How to get the binary respentation of the Int/Double.