% Peter'sche Funktion.  Beispiel: Berechne p(3,4):
% ?- p(3,4,Z).

p(0,Y,Y1) :- Y1 is Y+1.
p(X1,0,Z) :- X1>0, X is X1-1, p(X,1,Z).
p(X1,Y1,Z) :- X1>0, Y1>0, X is X1-1, Y is Y1-1, p(X1,Y,U), p(X,U,Z).
