AZEN-SGG/2nd_Sem_Bogachev
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Task 8 is done

Browse source
This commit is contained in:
AZEN-SGG 2025-05-11 09:09:14 +03:00
parent 84233f1e84
commit 0cde98a554
2 changed files with 8 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

50
2025.05.02/08Ex/comp.h
View file

@ -1,50 +0,0 @@
#ifndef COMP_H
#define COMP_H
#include <float.h>
#include <math.h>
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 ((diff < 0) ? -diff : diff) < (DBL_EPSILON * 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;
}
#endif

16
2025.05.02/08Ex/solve.c
View file

@ -33,20 +33,20 @@ int t8_solve (
y_l = y; y_l = y;
x += h; x += h;
y = f(x);
if ((y_l - y) > DBL_EPSILON)
break;
if ((a - x) > DBL_EPSILON || (x - b) > DBL_EPSILON) { if ((a - x) > DBL_EPSILON || (x - b) > DBL_EPSILON) {
*res = x_l; *res = x_l;
return it; return it;
} }
y = f(x); }
if ((y_l - y) > DBL_EPSILON) {
if ((y_l - y) < eps) { if ((y_l - y) < eps) {
*res = x_l; *res = x_l;
return it; return it;
}
break;
}
} }
} }