kill(all)$

van=facebook.com/LearningCalculus$

F(a,r,h,x,y):= (x-h)^a + (y-h)^a=r^a ;

is(equal(F(a,r,h,x,y),F(a,r,h,y,x)));

F(a,r,h,x,y);

count:0;
for a: 1 thru 10 do
    for r: -10 thru 10 do
        for h: -10 thru 10 do
            for s: -10 thru 10 do
            (
                count: count+1,
                if(is(equal(F(a,r,h,s,s),0))) then print(F(a,r,h,s,s))
            );
print("       Searched ", count, " s configurations.")$

count:0;
for a: 1 thru 10 do
    for r: -10 thru 10 do
        for h: -10 thru 10 do
            for t: -10 thru 10 do
            (
                count: count+1,
                if(is(equal(F(a,r,h,0,t),0))) then print(F(a,r,h,0,t))
            );
print("       Searched ", count, " t configurations.")$