\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(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}double f(double a, double b, double c) {
double r62863 = b;
double r62864 = -r62863;
double r62865 = r62863 * r62863;
double r62866 = 4.0;
double r62867 = a;
double r62868 = r62866 * r62867;
double r62869 = c;
double r62870 = r62868 * r62869;
double r62871 = r62865 - r62870;
double r62872 = sqrt(r62871);
double r62873 = r62864 + r62872;
double r62874 = 2.0;
double r62875 = r62874 * r62867;
double r62876 = r62873 / r62875;
return r62876;
}
double f(double a, double b, double c) {
double r62877 = 0.0;
double r62878 = 4.0;
double r62879 = a;
double r62880 = c;
double r62881 = r62879 * r62880;
double r62882 = r62878 * r62881;
double r62883 = r62877 + r62882;
double r62884 = 2.0;
double r62885 = r62884 * r62879;
double r62886 = b;
double r62887 = -r62886;
double r62888 = r62886 * r62886;
double r62889 = r62878 * r62879;
double r62890 = r62889 * r62880;
double r62891 = r62888 - r62890;
double r62892 = sqrt(r62891);
double r62893 = r62887 - r62892;
double r62894 = r62885 * r62893;
double r62895 = r62883 / r62894;
return r62895;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.1
rmApplied flip-+28.2
Simplified0.4
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2020035 +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)))