pokemon-x-y-icons, but in Haskell