Captcha Kata With Haskell