A Pokedex made in Prolog