Snatched with Haskell and Ajhc!