\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}-2 \cdot \frac{c}{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 (* -2.0 (/ c (+ 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 -2.0 * (c / (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.6
Simplified28.6
rmApplied flip--_binary64_5228.6
Simplified0.4
Simplified0.4
rmApplied *-un-lft-identity_binary64_770.4
Applied times-frac_binary64_830.3
Applied times-frac_binary64_830.3
Simplified0.3
Simplified0.3
rmApplied add-cbrt-cube_binary64_1100.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2020281
(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)))