x - \frac{2.307529999999999859028321225196123123169 + x \cdot 0.2706100000000000171951342053944244980812}{1 + \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right) \cdot x}x - \frac{1}{\sqrt{1 + \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right) \cdot x}} \cdot \frac{2.307529999999999859028321225196123123169 + x \cdot 0.2706100000000000171951342053944244980812}{\sqrt{1 + \left(0.992290000000000005364597654988756403327 + x \cdot 0.04481000000000000260680366181986755691469\right) \cdot x}}double f(double x) {
double r69882 = x;
double r69883 = 2.30753;
double r69884 = 0.27061;
double r69885 = r69882 * r69884;
double r69886 = r69883 + r69885;
double r69887 = 1.0;
double r69888 = 0.99229;
double r69889 = 0.04481;
double r69890 = r69882 * r69889;
double r69891 = r69888 + r69890;
double r69892 = r69891 * r69882;
double r69893 = r69887 + r69892;
double r69894 = r69886 / r69893;
double r69895 = r69882 - r69894;
return r69895;
}
double f(double x) {
double r69896 = x;
double r69897 = 1.0;
double r69898 = 1.0;
double r69899 = 0.99229;
double r69900 = 0.04481;
double r69901 = r69896 * r69900;
double r69902 = r69899 + r69901;
double r69903 = r69902 * r69896;
double r69904 = r69898 + r69903;
double r69905 = sqrt(r69904);
double r69906 = r69897 / r69905;
double r69907 = 2.30753;
double r69908 = 0.27061;
double r69909 = r69896 * r69908;
double r69910 = r69907 + r69909;
double r69911 = r69910 / r69905;
double r69912 = r69906 * r69911;
double r69913 = r69896 - r69912;
return r69913;
}



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:invIncompleteBetaWorker from math-functions-0.1.5.2, D"
:precision binary64
(- x (/ (+ 2.30753 (* x 0.27061)) (+ 1 (* (+ 0.99229 (* x 0.04481)) x)))))