int pour flotter Haskell

-- Int to Float
-- Useing (/) 
	(/) :: Fractional a => a -> a -> a

{- The following code works: -}

 	percent :: Int -> Int -> Float 
	percent x y =   100 * ( a / b )
      where a = fromIntegral x :: Float
            b = fromIntegral y :: Float
rng70