將Int分配給Int並返回Int

Question

我需要一個獲取兩個Int s（a和b）並返回A/B作爲Int的函數。我確信A/B將始終是一個整數。

這裏是我的解決方案：

myDiv :: Int -> Int -> Int 
myDiv a b = 
     let x = fromIntegral a 
      y = fromIntegral b 
     in truncate (x/y) 

但想找到更簡單的解決方案。類似這樣的：

myDiv :: Int -> Int -> Int 
myDiv a b = a/b 

如何將Int分配給Int並獲取Int？

Answer 1

爲什麼不只是使用quot？

quot a b 

是整數a和b截成零的整數商。

Answer 2

這裏就是我所做的讓我自己：

quot' a b 
     | a<b = 0 -- base case 
     | otherwise = 1 + quot' a-b b