Adding prolog problems
One more Prolog problem. I think... 8(