\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{\frac{4 \cdot \left(a \cdot c\right)}{a}}{-\left(b + \sqrt{\mathsf{fma}\left(b, b, 0 - 4 \cdot \left(a \cdot c\right)\right)}\right)}double f(double a, double b, double c) {
double r38183 = b;
double r38184 = -r38183;
double r38185 = r38183 * r38183;
double r38186 = 4.0;
double r38187 = a;
double r38188 = r38186 * r38187;
double r38189 = c;
double r38190 = r38188 * r38189;
double r38191 = r38185 - r38190;
double r38192 = sqrt(r38191);
double r38193 = r38184 + r38192;
double r38194 = 2.0;
double r38195 = r38194 * r38187;
double r38196 = r38193 / r38195;
return r38196;
}
double f(double a, double b, double c) {
double r38197 = 1.0;
double r38198 = 2.0;
double r38199 = r38197 / r38198;
double r38200 = 4.0;
double r38201 = a;
double r38202 = c;
double r38203 = r38201 * r38202;
double r38204 = r38200 * r38203;
double r38205 = r38204 / r38201;
double r38206 = b;
double r38207 = 0.0;
double r38208 = r38207 - r38204;
double r38209 = fma(r38206, r38206, r38208);
double r38210 = sqrt(r38209);
double r38211 = r38206 + r38210;
double r38212 = -r38211;
double r38213 = r38205 / r38212;
double r38214 = r38199 * r38213;
return r38214;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 52.7
rmApplied flip-+52.7
Simplified0.4
rmApplied fma-neg0.4
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
Final simplification0.2
herbie shell --seed 2020001 +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)))