\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le 7.844448680425584 \cdot 10^{+101}:\\
\;\;\;\;\frac{\frac{1}{2}}{a} \cdot \left(\sqrt{\mathsf{fma}\left(c, \left(a \cdot -4\right), \left(b \cdot b\right)\right)} - b\right)\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}double f(double a, double b, double c) {
double r3528381 = b;
double r3528382 = -r3528381;
double r3528383 = r3528381 * r3528381;
double r3528384 = 4.0;
double r3528385 = a;
double r3528386 = r3528384 * r3528385;
double r3528387 = c;
double r3528388 = r3528386 * r3528387;
double r3528389 = r3528383 - r3528388;
double r3528390 = sqrt(r3528389);
double r3528391 = r3528382 + r3528390;
double r3528392 = 2.0;
double r3528393 = r3528392 * r3528385;
double r3528394 = r3528391 / r3528393;
return r3528394;
}
double f(double a, double b, double c) {
double r3528395 = b;
double r3528396 = 7.844448680425584e+101;
bool r3528397 = r3528395 <= r3528396;
double r3528398 = 0.5;
double r3528399 = a;
double r3528400 = r3528398 / r3528399;
double r3528401 = c;
double r3528402 = -4.0;
double r3528403 = r3528399 * r3528402;
double r3528404 = r3528395 * r3528395;
double r3528405 = fma(r3528401, r3528403, r3528404);
double r3528406 = sqrt(r3528405);
double r3528407 = r3528406 - r3528395;
double r3528408 = r3528400 * r3528407;
double r3528409 = 0.0;
double r3528410 = r3528397 ? r3528408 : r3528409;
return r3528410;
}




Bits error versus a




Bits error versus b




Bits error versus c
| Original | 32.9 |
|---|---|
| Target | 20.2 |
| Herbie | 28.7 |
if b < 7.844448680425584e+101Initial program 25.3
Simplified25.3
rmApplied *-un-lft-identity25.3
Applied div-inv25.3
Applied times-frac25.4
Simplified25.4
Simplified25.4
if 7.844448680425584e+101 < b Initial program 59.0
Simplified59.0
Taylor expanded around 0 39.9
Final simplification28.7
herbie shell --seed 2019133 +o rules:numerics
(FPCore (a b c)
:name "The quadratic formula (r1)"
:herbie-target
(if (< b 0) (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))