\frac{2.307529999999999859028321225196123123169 + x \cdot 0.2706100000000000171951342053944244980812}{1 + x \cdot \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right)} - x\frac{1}{\sqrt{1 + x \cdot \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right)}} \cdot \frac{2.307529999999999859028321225196123123169 + x \cdot 0.2706100000000000171951342053944244980812}{\sqrt{1 + x \cdot \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right)}} - xdouble f(double x) {
double r72429 = 2.30753;
double r72430 = x;
double r72431 = 0.27061;
double r72432 = r72430 * r72431;
double r72433 = r72429 + r72432;
double r72434 = 1.0;
double r72435 = 0.99229;
double r72436 = 0.04481;
double r72437 = r72430 * r72436;
double r72438 = r72435 + r72437;
double r72439 = r72430 * r72438;
double r72440 = r72434 + r72439;
double r72441 = r72433 / r72440;
double r72442 = r72441 - r72430;
return r72442;
}
double f(double x) {
double r72443 = 1.0;
double r72444 = 1.0;
double r72445 = x;
double r72446 = 0.99229;
double r72447 = 0.04481;
double r72448 = r72445 * r72447;
double r72449 = r72446 + r72448;
double r72450 = r72445 * r72449;
double r72451 = r72444 + r72450;
double r72452 = sqrt(r72451);
double r72453 = r72443 / r72452;
double r72454 = 2.30753;
double r72455 = 0.27061;
double r72456 = r72445 * r72455;
double r72457 = r72454 + r72456;
double r72458 = r72457 / r72452;
double r72459 = r72453 * r72458;
double r72460 = r72459 - r72445;
return r72460;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-sqr-sqrt0.1
Applied *-un-lft-identity0.1
Applied times-frac0.1
Final simplification0.1
herbie shell --seed 2019326
(FPCore (x)
:name "Numeric.SpecFunctions:invIncompleteGamma from math-functions-0.1.5.2, C"
:precision binary64
(- (/ (+ 2.30753 (* x 0.27061)) (+ 1 (* x (+ 0.99229 (* x 0.04481))))) x))