在Haskell中实现库函数`div`

Question

我试图在Haskell中实现我自己版本的库函数div。这是我解决问题的方法，但它没有按照我希望的方式工作，我不确定如何实现它。任何帮助将受到高度赞赏！

div' :: Int -> Int -> Int
div' m n 
  |  n == 0     = 0
  |  n > 0      = div' m (n-1) - m

Answer 1

你应该用0来处理除以？如果是这样，那么为它做一个单独的案例。

除法算法的基本情况应该是当＆lt;湾如果说你有4/7，算法会吐出什么？ 递归情况应该在＆gt; = b时处理。这应该让你开始在自然数字上定义div函数。