percent :: Int -> Int -> Float
percent n m = (fromIntegral n / fromIntegral m) * 100
percent :: Int -> Int -> Float
percent n m = (fromIntegral n / fromIntegral m) * 100
percent n m = (fromIntegral n / fromIntegral m) * 100