Divide Int to Int and return Int

Here's what I did to make my own:

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

Why not just use quot?

quot a b

is the integer quotient of integers a and b truncated towards zero.