\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{\frac{2 \cdot a}{4 \cdot \left(a \cdot c\right)} \cdot \left(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}double f(double a, double b, double c) {
double r38739 = b;
double r38740 = -r38739;
double r38741 = r38739 * r38739;
double r38742 = 4.0;
double r38743 = a;
double r38744 = r38742 * r38743;
double r38745 = c;
double r38746 = r38744 * r38745;
double r38747 = r38741 - r38746;
double r38748 = sqrt(r38747);
double r38749 = r38740 + r38748;
double r38750 = 2.0;
double r38751 = r38750 * r38743;
double r38752 = r38749 / r38751;
return r38752;
}
double f(double a, double b, double c) {
double r38753 = 1.0;
double r38754 = 2.0;
double r38755 = a;
double r38756 = r38754 * r38755;
double r38757 = 4.0;
double r38758 = c;
double r38759 = r38755 * r38758;
double r38760 = r38757 * r38759;
double r38761 = r38756 / r38760;
double r38762 = b;
double r38763 = -r38762;
double r38764 = r38762 * r38762;
double r38765 = r38757 * r38755;
double r38766 = r38765 * r38758;
double r38767 = r38764 - r38766;
double r38768 = sqrt(r38767);
double r38769 = r38763 - r38768;
double r38770 = r38761 * r38769;
double r38771 = r38753 / r38770;
return r38771;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.7
rmApplied flip-+28.7
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Applied associate-/l*0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2019353 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, narrow range"
:precision binary64
:pre (and (< 1.0536712127723509e-08 a 94906265.62425156) (< 1.0536712127723509e-08 b 94906265.62425156) (< 1.0536712127723509e-08 c 94906265.62425156))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))