\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{4 \cdot c}{-\left(b + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)} \cdot \frac{1}{2}double f(double a, double b, double c) {
double r45277 = b;
double r45278 = -r45277;
double r45279 = r45277 * r45277;
double r45280 = 4.0;
double r45281 = a;
double r45282 = r45280 * r45281;
double r45283 = c;
double r45284 = r45282 * r45283;
double r45285 = r45279 - r45284;
double r45286 = sqrt(r45285);
double r45287 = r45278 + r45286;
double r45288 = 2.0;
double r45289 = r45288 * r45281;
double r45290 = r45287 / r45289;
return r45290;
}
double f(double a, double b, double c) {
double r45291 = 4.0;
double r45292 = c;
double r45293 = r45291 * r45292;
double r45294 = b;
double r45295 = r45294 * r45294;
double r45296 = a;
double r45297 = r45291 * r45296;
double r45298 = r45297 * r45292;
double r45299 = r45295 - r45298;
double r45300 = sqrt(r45299);
double r45301 = r45294 + r45300;
double r45302 = -r45301;
double r45303 = r45293 / r45302;
double r45304 = 1.0;
double r45305 = 2.0;
double r45306 = r45304 / r45305;
double r45307 = r45303 * r45306;
return r45307;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 52.6
rmApplied flip-+52.6
Simplified0.4
rmApplied add-sqr-sqrt0.5
Applied distribute-rgt-neg-in0.5
Applied fma-neg0.4
rmApplied *-un-lft-identity0.4
Applied *-un-lft-identity0.4
Applied times-frac0.4
Applied times-frac0.4
Simplified0.4
Simplified0.2
rmApplied *-un-lft-identity0.2
Applied *-un-lft-identity0.2
Applied times-frac0.2
Simplified0.2
Simplified0.1
Final simplification0.1
herbie shell --seed 2020025 +o rules:numerics
(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)))