\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{4 \cdot c}{\left(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot 2}double f(double a, double b, double c) {
double r42395 = b;
double r42396 = -r42395;
double r42397 = r42395 * r42395;
double r42398 = 4.0;
double r42399 = a;
double r42400 = r42398 * r42399;
double r42401 = c;
double r42402 = r42400 * r42401;
double r42403 = r42397 - r42402;
double r42404 = sqrt(r42403);
double r42405 = r42396 + r42404;
double r42406 = 2.0;
double r42407 = r42406 * r42399;
double r42408 = r42405 / r42407;
return r42408;
}
double f(double a, double b, double c) {
double r42409 = 4.0;
double r42410 = c;
double r42411 = r42409 * r42410;
double r42412 = b;
double r42413 = -r42412;
double r42414 = r42412 * r42412;
double r42415 = a;
double r42416 = r42409 * r42415;
double r42417 = r42416 * r42410;
double r42418 = r42414 - r42417;
double r42419 = sqrt(r42418);
double r42420 = r42413 - r42419;
double r42421 = 2.0;
double r42422 = r42420 * r42421;
double r42423 = r42411 / r42422;
return r42423;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.4
rmApplied flip-+28.4
Simplified0.4
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.4
rmApplied associate-/r*0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019294
(FPCore (a b c)
:name "Quadratic roots, narrow range"
:precision binary64
:pre (and (< 1.05367121277235087e-8 a 94906265.6242515594) (< 1.05367121277235087e-8 b 94906265.6242515594) (< 1.05367121277235087e-8 c 94906265.6242515594))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))