\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{4 \cdot \frac{c}{1}}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}double f(double a, double b, double c) {
double r32368 = b;
double r32369 = -r32368;
double r32370 = r32368 * r32368;
double r32371 = 4.0;
double r32372 = a;
double r32373 = r32371 * r32372;
double r32374 = c;
double r32375 = r32373 * r32374;
double r32376 = r32370 - r32375;
double r32377 = sqrt(r32376);
double r32378 = r32369 + r32377;
double r32379 = 2.0;
double r32380 = r32379 * r32372;
double r32381 = r32378 / r32380;
return r32381;
}
double f(double a, double b, double c) {
double r32382 = 1.0;
double r32383 = 2.0;
double r32384 = r32382 / r32383;
double r32385 = 4.0;
double r32386 = c;
double r32387 = r32386 / r32382;
double r32388 = r32385 * r32387;
double r32389 = b;
double r32390 = -r32389;
double r32391 = r32389 * r32389;
double r32392 = a;
double r32393 = r32385 * r32392;
double r32394 = r32393 * r32386;
double r32395 = r32391 - r32394;
double r32396 = sqrt(r32395);
double r32397 = r32390 - r32396;
double r32398 = r32388 / r32397;
double r32399 = r32384 * r32398;
return r32399;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 52.5
rmApplied flip-+52.5
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied *-un-lft-identity0.4
Applied times-frac0.4
Applied times-frac0.4
Simplified0.4
Simplified0.4
rmApplied associate-/r*0.2
rmApplied *-un-lft-identity0.2
Applied times-frac0.2
Simplified0.2
Simplified0.1
Final simplification0.1
herbie shell --seed 2020056
(FPCore (a b c)
:name "Quadratic roots, wide range"
:precision binary64
:pre (and (< 4.9303800000000003e-32 a 2.02824e+31) (< 4.9303800000000003e-32 b 2.02824e+31) (< 4.9303800000000003e-32 c 2.02824e+31))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))