\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\sqrt[3]{{\left(\frac{\left(b \cdot b - \left(4 \cdot a\right) \cdot c\right) - b \cdot b}{b + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\right)}^{3}}}{a \cdot 2}(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))
(FPCore (a b c)
:precision binary64
(/
(cbrt
(pow
(/
(- (- (* b b) (* (* 4.0 a) c)) (* b b))
(+ b (sqrt (- (* b b) (* (* 4.0 a) c)))))
3.0))
(* a 2.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 cbrt(pow(((((b * b) - ((4.0 * a) * c)) - (b * b)) / (b + sqrt((b * b) - ((4.0 * a) * c)))), 3.0)) / (a * 2.0);
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.3
Simplified28.3
rmApplied flip--_binary6428.3
Simplified27.3
Simplified27.3
rmApplied add-cbrt-cube_binary6427.3
Simplified27.3
Final simplification27.3
herbie shell --seed 2020277
(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)))