kill(all);

van=facebook.com/LearningCalculus;

p : 8^200 + 8^(-200);

q : 8^200 - 8^(-200);

p^2-q^2;

P : a^n + a^(-n);
Q: a^n - a^(-n);

f(a,n):=''(P^2-Q^2);

expand(f(a,n));

f(x,y);