/* ---------------------------------- */
/* save as d02a.c                     */
/* ---------------------------------- */
#include "x_hfile.h"
/* ---------------------------------- */
# define   DEGREE  2
# define   COEFF   DEGREE + 1
/* ---------------------------------- */
int main(void)
{
int    n =  3;
double x =  -1;

double *Px;
double *Pt;
double *Pa;
double *Pq;

double A[3] = {-3,-20,4};

Px = I_p(n);       /* Px = P(x)         */
Pt = I_p(n);       /* Pt = P temporaire */
Pa = I_p(n);       /* Pa = P(a)         */
Pq = I_p((n-1));   /* Pq = P quotien    */

 clrscrn();
 c_a_P(A,Px);
 printf(" If P(x) is : \n\n");
 p_P(Px);

 printf(" The synthetic division indicates"
        " that P(%+.3f) = %+.3f\n\n",
         x, compute_horner(x,Px,Pt,Pa,Pq));
         
 stop();

 free(Px);
 free(Pt);
 free(Pa);
 free(Pq);

 return 0;
}