Please help me with this haskell program.

#haskell #programming #help

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.)
Test cases:
dropOdds 0 = 0
dropOdds 8 = 8
dropOdds 1357 = 0

Top comments (8)

Phantz • Sep 9 '21

Ok, I won't give you the answer directly since that'd be harmful to your learning. I'll ask 3 questions instead - try to answer them:-

How can you turn a number into a list of "digits".
How can you check if a "digit" is odd?
How do you "drop" certain elements of a list that match a criteria? (hint: filter)

You'll notice the quotes I put around the word "digits". I generally prefer using Char for "digits". But one may just as well use Int. Whichever you use, your answers will depend on it.

Benjioe • Sep 9 '21 • Edited

You can use recursion too :

How can you check if a "digit" is odd?
How can you apply a function only on first digit?
How can you apply that function on each other digits?

Shashwat Seth • Sep 9 '21

Thanks man

Shashwat Seth • Sep 9 '21

Thankyou so much, I got it right!!!!!

Benjioe • Sep 9 '21

...

Shashwat Seth • Sep 9 '21

I'm new to haskell. I want the solution for this so that I can understand the concepts

gopinathvarad • Sep 9 '21

even I want this answer !!

Benjioe • Sep 10 '21

With Recursion :

dropOdds :: Int -> Int
dropOdds x
    | x >= 10 = 10 * dropOdds restDigits + filterDrops firstDigit
    | otherwise = filterDrops x
    where 
      firstDigit = x `mod` 10
      restDigits = x `div` 10


filterDrops x 
    | x `mod` 2 == 0 = x -- x is even => we keep it
    | otherwise = 0 -- x is drop => we 


main =  do
   print(dropOdds 0)
   print(dropOdds 8)
   print(dropOdds 10)
   print(dropOdds 1357)

DEV Community

Please help me with this haskell program.

Top comments (8)

Read next

The 9 types of Programmers in 2024

4 Best Practices for Backend Developers

Code of game engine written in Java: what does it hide?

Empowering Web Privacy with Rust: Building a Decentralized Identity Management System