Type-preserving rounding in Haskell

Is there a built-in function in Haskell that rounds a real floating-point number to the nearest whole number, without changing the type of said number?

sameTypeRound f == fromIntegral (round f)