59 lines
1,023 B
C
59 lines
1,023 B
C
#ifndef SOLVE_H
|
|
#define SOLVE_H
|
|
|
|
#include <math.h>
|
|
#include <float.h>
|
|
#include <stdio.h>
|
|
|
|
#define EPS 1e-16
|
|
|
|
static inline double * fpmax (double *pa, double *pb, double fa, double fb, double *max_f_p)
|
|
{
|
|
if ((fa - fb) > DBL_EPSILON)
|
|
{
|
|
*max_f_p = fa;
|
|
return pa;
|
|
} else
|
|
{
|
|
*max_f_p = fb;
|
|
return pb;
|
|
}
|
|
}
|
|
|
|
static inline double * fp_abs_max (double *pa, double *pb, double *fa, double *fb, double **max_f_p)
|
|
{
|
|
if ((fabs(*fa) - fabs(*fb)) > DBL_EPSILON)
|
|
{
|
|
*max_f_p = fa;
|
|
return pa;
|
|
} else
|
|
{
|
|
*max_f_p = fb;
|
|
return pb;
|
|
}
|
|
}
|
|
|
|
static inline int is_equal (const double a, const double b)
|
|
{
|
|
double diff = a - b;
|
|
double max_val = (a > b) ? a : b;
|
|
return (fabs(diff) < (EPS * fabs(max_val)));
|
|
}
|
|
|
|
static inline int is_null (const double a)
|
|
{
|
|
return ((a < 0) ? -a : a) < DBL_EPSILON;
|
|
}
|
|
|
|
static inline int is_eps (const double a, const double eps)
|
|
{
|
|
return (((a < 0) ? -a : a) - eps) < DBL_EPSILON;
|
|
}
|
|
|
|
int t5_solve (
|
|
double (*f) (double),
|
|
double a, double b,
|
|
double eps, int m, double *x
|
|
);
|
|
|
|
#endif
|