\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1 \cdot 4}{\left(2 \cdot a\right) \cdot \frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot c}}double f(double a, double b, double c) {
double r34861 = b;
double r34862 = -r34861;
double r34863 = r34861 * r34861;
double r34864 = 4.0;
double r34865 = a;
double r34866 = r34864 * r34865;
double r34867 = c;
double r34868 = r34866 * r34867;
double r34869 = r34863 - r34868;
double r34870 = sqrt(r34869);
double r34871 = r34862 + r34870;
double r34872 = 2.0;
double r34873 = r34872 * r34865;
double r34874 = r34871 / r34873;
return r34874;
}
double f(double a, double b, double c) {
double r34875 = 1.0;
double r34876 = 4.0;
double r34877 = r34875 * r34876;
double r34878 = 2.0;
double r34879 = a;
double r34880 = r34878 * r34879;
double r34881 = b;
double r34882 = -r34881;
double r34883 = r34881 * r34881;
double r34884 = r34876 * r34879;
double r34885 = c;
double r34886 = r34884 * r34885;
double r34887 = r34883 - r34886;
double r34888 = sqrt(r34887);
double r34889 = r34882 - r34888;
double r34890 = r34879 * r34885;
double r34891 = r34889 / r34890;
double r34892 = r34880 * r34891;
double r34893 = r34877 / r34892;
return r34893;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.3
rmApplied flip-+28.3
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Simplified0.5
Simplified0.5
rmApplied associate-*r/0.5
Applied associate-/l/0.5
Final simplification0.5
herbie shell --seed 2020002
(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)))