Expansion of $(x-a)^n$

The coefficients of the expansion of the polynomial $(x-a)^n$ may be obtained with the procedure

 
INTERVAL_VECTOR Power_Polynomial(INTERVAL &a,int n)

which returns the coefficients