pacman com prolog