\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{4 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}double f(double a, double b, double c) {
double r30746 = b;
double r30747 = -r30746;
double r30748 = r30746 * r30746;
double r30749 = 4.0;
double r30750 = a;
double r30751 = r30749 * r30750;
double r30752 = c;
double r30753 = r30751 * r30752;
double r30754 = r30748 - r30753;
double r30755 = sqrt(r30754);
double r30756 = r30747 + r30755;
double r30757 = 2.0;
double r30758 = r30757 * r30750;
double r30759 = r30756 / r30758;
return r30759;
}
double f(double a, double b, double c) {
double r30760 = 1.0;
double r30761 = 2.0;
double r30762 = r30760 / r30761;
double r30763 = 4.0;
double r30764 = c;
double r30765 = r30763 * r30764;
double r30766 = b;
double r30767 = -r30766;
double r30768 = r30766 * r30766;
double r30769 = a;
double r30770 = r30763 * r30769;
double r30771 = r30770 * r30764;
double r30772 = r30768 - r30771;
double r30773 = sqrt(r30772);
double r30774 = r30767 - r30773;
double r30775 = r30765 / r30774;
double r30776 = r30762 * r30775;
return r30776;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 52.3
rmApplied flip-+52.3
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied *-un-lft-identity0.4
Applied times-frac0.4
Applied times-frac0.4
Simplified0.4
Simplified0.4
rmApplied associate-/r*0.2
rmApplied *-un-lft-identity0.2
Applied associate-/r*0.2
Simplified0.1
Final simplification0.1
herbie shell --seed 2019354
(FPCore (a b c)
:name "Quadratic roots, wide range"
:precision binary64
:pre (and (< 4.9303800000000003e-32 a 2.02824e+31) (< 4.9303800000000003e-32 b 2.02824e+31) (< 4.9303800000000003e-32 c 2.02824e+31))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))