My 99 Haskell Problems attempt