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

double remainder;

double *Px = I_p(n);
double *Pt = I_p(n);
double *Pa = I_p(n);
double *Pq = I_p((n-1));

double a[COEFF]={1.,3.,-30.,-6.,56.};

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

 printf(" Verify if %+.3f is a root of P(x)   \n\n",x);
 printf(" If we divide P(x) by : x - (%+.3f)\n\n\n",x);
 remainder = compute_horner(x,Px,Pt,Pa,Pq);
 p_horner(Px,Pt,Pa);
 
 printf(" The synthetic division indicates that P(%+.3f) = %+.3f\n\n",
        x, remainder);
 printf(" So %+.3f is a root of P(x) \n\n",x);
 
 stop();
 
 free(Px);
 free(Pt);
 free(Pa);
 free(Pq);

 return 0;
}