Divide Int by Int and return Int

Question

I need a function that takes two Int ( a and b ) and returns A/B as Int . I am sure that A/B will always be an integer.

Here is my solution:

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

But you want to find a simpler solution. Something like that:

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

How can I split Int by Int and get Int?

Answer 1

Why not just use quot ?

 quot ab 

is an integer of integers a and b truncated to zero.

Answer 2

Here is what I did to make my own:

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