\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{0 + 4 \cdot \left(a \cdot c\right)}{\left(2 \cdot a\right) \cdot \left(-b\right) + \left(2 \cdot a\right) \cdot \left(-\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}double f(double a, double b, double c) {
double r33754 = b;
double r33755 = -r33754;
double r33756 = r33754 * r33754;
double r33757 = 4.0;
double r33758 = a;
double r33759 = r33757 * r33758;
double r33760 = c;
double r33761 = r33759 * r33760;
double r33762 = r33756 - r33761;
double r33763 = sqrt(r33762);
double r33764 = r33755 + r33763;
double r33765 = 2.0;
double r33766 = r33765 * r33758;
double r33767 = r33764 / r33766;
return r33767;
}
double f(double a, double b, double c) {
double r33768 = 0.0;
double r33769 = 4.0;
double r33770 = a;
double r33771 = c;
double r33772 = r33770 * r33771;
double r33773 = r33769 * r33772;
double r33774 = r33768 + r33773;
double r33775 = 2.0;
double r33776 = r33775 * r33770;
double r33777 = b;
double r33778 = -r33777;
double r33779 = r33776 * r33778;
double r33780 = r33777 * r33777;
double r33781 = r33769 * r33770;
double r33782 = r33781 * r33771;
double r33783 = r33780 - r33782;
double r33784 = sqrt(r33783);
double r33785 = -r33784;
double r33786 = r33776 * r33785;
double r33787 = r33779 + r33786;
double r33788 = r33774 / r33787;
return r33788;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 43.4
rmApplied flip-+43.4
Simplified0.4
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.4
rmApplied sub-neg0.4
Applied distribute-lft-in0.4
Final simplification0.4
herbie shell --seed 2020056 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, medium range"
:precision binary64
:pre (and (< 1.11022e-16 a 9.0072e+15) (< 1.11022e-16 b 9.0072e+15) (< 1.11022e-16 c 9.0072e+15))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))