Define a function dropOdds :: Int -> Int with the following behaviour.
For any positive number m, dropOdds m is got by dropping all the odd digits
in m. (If all the digits in the number are odd, the answer should be 0.)
dropOdds 0 = 0
dropOdds 8 = 8
dropOdds 1357 = 0