\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 -5.58543573862810322 \cdot 10^{150}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.3730540219645598 \cdot 10^{-278}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\mathbf{elif}\;b \le 1.55563303224959 \cdot 10^{106}:\\
\;\;\;\;\frac{1}{\frac{2}{\frac{4}{1} \cdot c} \cdot \left(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r75384 = b;
double r75385 = -r75384;
double r75386 = r75384 * r75384;
double r75387 = 4.0;
double r75388 = a;
double r75389 = r75387 * r75388;
double r75390 = c;
double r75391 = r75389 * r75390;
double r75392 = r75386 - r75391;
double r75393 = sqrt(r75392);
double r75394 = r75385 + r75393;
double r75395 = 2.0;
double r75396 = r75395 * r75388;
double r75397 = r75394 / r75396;
return r75397;
}
double f(double a, double b, double c) {
double r75398 = b;
double r75399 = -5.585435738628103e+150;
bool r75400 = r75398 <= r75399;
double r75401 = 1.0;
double r75402 = c;
double r75403 = r75402 / r75398;
double r75404 = a;
double r75405 = r75398 / r75404;
double r75406 = r75403 - r75405;
double r75407 = r75401 * r75406;
double r75408 = -2.3730540219645598e-278;
bool r75409 = r75398 <= r75408;
double r75410 = 1.0;
double r75411 = 2.0;
double r75412 = r75411 * r75404;
double r75413 = -r75398;
double r75414 = r75398 * r75398;
double r75415 = 4.0;
double r75416 = r75415 * r75404;
double r75417 = r75416 * r75402;
double r75418 = r75414 - r75417;
double r75419 = sqrt(r75418);
double r75420 = r75413 + r75419;
double r75421 = r75412 / r75420;
double r75422 = r75410 / r75421;
double r75423 = 1.55563303224959e+106;
bool r75424 = r75398 <= r75423;
double r75425 = r75415 / r75410;
double r75426 = r75425 * r75402;
double r75427 = r75411 / r75426;
double r75428 = r75413 - r75419;
double r75429 = r75427 * r75428;
double r75430 = r75410 / r75429;
double r75431 = -1.0;
double r75432 = r75431 * r75403;
double r75433 = r75424 ? r75430 : r75432;
double r75434 = r75409 ? r75422 : r75433;
double r75435 = r75400 ? r75407 : r75434;
return r75435;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.9 |
|---|---|
| Target | 20.7 |
| Herbie | 6.9 |
if b < -5.585435738628103e+150Initial program 61.5
Taylor expanded around -inf 2.2
Simplified2.2
if -5.585435738628103e+150 < b < -2.3730540219645598e-278Initial program 8.1
rmApplied clear-num8.3
if -2.3730540219645598e-278 < b < 1.55563303224959e+106Initial program 31.3
rmApplied flip-+31.3
Simplified16.7
rmApplied *-un-lft-identity16.7
Applied *-un-lft-identity16.7
Applied times-frac16.7
Applied associate-/l*16.9
Simplified16.2
rmApplied associate-/l*16.2
Simplified9.9
if 1.55563303224959e+106 < b Initial program 60.3
Taylor expanded around inf 2.7
Final simplification6.9
herbie shell --seed 2020062
(FPCore (a b c)
:name "The quadratic formula (r1)"
:precision binary64
:herbie-target
(if (< b 0.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)))