相关疑难解决方法(0)

此代码有效:

posToXY :: Float -> Float -> Integer
posToXY a b = do
        let y = a / b
        round y

但这不起作用:

posToXY :: Integer -> Integer -> Integer
posToXY a b = do
        let y = a / b
        round y

据我所知,操作"/"没有定义整型,但我不知道如何解决代码整数参数来工作.