med Prolog , afPehr