\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{c \cdot -2}{b + \sqrt{\sqrt[3]{{\left(b \cdot b - c \cdot \left(a \cdot 4\right)\right)}^{3}}}}(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))
(FPCore (a b c) :precision binary64 (/ (* c -2.0) (+ b (sqrt (cbrt (pow (- (* b b) (* c (* a 4.0))) 3.0))))))
double code(double a, double b, double c) {
return (-b + sqrt((b * b) - ((4.0 * a) * c))) / (2.0 * a);
}
double code(double a, double b, double c) {
return (c * -2.0) / (b + sqrt(cbrt(pow(((b * b) - (c * (a * 4.0))), 3.0))));
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.5
Simplified28.5
rmApplied flip--_binary64_209928.6
Simplified0.5
Simplified0.5
rmApplied clear-num_binary64_21230.5
Simplified0.4
rmApplied add-cbrt-cube_binary64_21600.4
Simplified0.4
rmApplied associate-/r/_binary64_20700.5
Applied associate-/r*_binary64_20680.4
Simplified0.3
Final simplification0.3
herbie shell --seed 2020346
(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.0 a) c)))) (* 2.0 a)))