Prelude> read "Infinity" :: Float
Infinity
Prelude> read "Infinity" :: Double
Infinity