\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 -3.157094219357017 \cdot 10^{+135}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\mathbf{elif}\;b \le 9.088113400659685 \cdot 10^{-185}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(c \cdot a\right) \cdot 4} - b}{a \cdot 2}\\
\mathbf{elif}\;b \le 1.8091015183831773 \cdot 10^{+43}:\\
\;\;\;\;\frac{1}{\sqrt{b \cdot b - \left(c \cdot a\right) \cdot 4} + b} \cdot \left(\sqrt{\frac{1}{2}} \cdot \left(\frac{c}{\frac{-1}{4}} \cdot \sqrt{\frac{1}{2}}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;-\frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r8479521 = b;
double r8479522 = -r8479521;
double r8479523 = r8479521 * r8479521;
double r8479524 = 4.0;
double r8479525 = a;
double r8479526 = r8479524 * r8479525;
double r8479527 = c;
double r8479528 = r8479526 * r8479527;
double r8479529 = r8479523 - r8479528;
double r8479530 = sqrt(r8479529);
double r8479531 = r8479522 + r8479530;
double r8479532 = 2.0;
double r8479533 = r8479532 * r8479525;
double r8479534 = r8479531 / r8479533;
return r8479534;
}
double f(double a, double b, double c) {
double r8479535 = b;
double r8479536 = -3.157094219357017e+135;
bool r8479537 = r8479535 <= r8479536;
double r8479538 = c;
double r8479539 = r8479538 / r8479535;
double r8479540 = a;
double r8479541 = r8479535 / r8479540;
double r8479542 = r8479539 - r8479541;
double r8479543 = 9.088113400659685e-185;
bool r8479544 = r8479535 <= r8479543;
double r8479545 = r8479535 * r8479535;
double r8479546 = r8479538 * r8479540;
double r8479547 = 4.0;
double r8479548 = r8479546 * r8479547;
double r8479549 = r8479545 - r8479548;
double r8479550 = sqrt(r8479549);
double r8479551 = r8479550 - r8479535;
double r8479552 = 2.0;
double r8479553 = r8479540 * r8479552;
double r8479554 = r8479551 / r8479553;
double r8479555 = 1.8091015183831773e+43;
bool r8479556 = r8479535 <= r8479555;
double r8479557 = 1.0;
double r8479558 = r8479550 + r8479535;
double r8479559 = r8479557 / r8479558;
double r8479560 = 0.5;
double r8479561 = sqrt(r8479560);
double r8479562 = -0.25;
double r8479563 = r8479538 / r8479562;
double r8479564 = r8479563 * r8479561;
double r8479565 = r8479561 * r8479564;
double r8479566 = r8479559 * r8479565;
double r8479567 = -r8479539;
double r8479568 = r8479556 ? r8479566 : r8479567;
double r8479569 = r8479544 ? r8479554 : r8479568;
double r8479570 = r8479537 ? r8479542 : r8479569;
return r8479570;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -3.157094219357017e+135Initial program 54.4
Simplified54.4
Taylor expanded around -inf 2.8
if -3.157094219357017e+135 < b < 9.088113400659685e-185Initial program 10.8
Simplified10.8
if 9.088113400659685e-185 < b < 1.8091015183831773e+43Initial program 34.4
Simplified34.3
rmApplied clear-num34.4
rmApplied flip--34.5
Applied associate-/r/34.5
Applied *-un-lft-identity34.5
Applied times-frac34.6
Simplified17.1
rmApplied add-sqr-sqrt17.6
Applied *-un-lft-identity17.6
Applied times-frac17.5
Applied *-un-lft-identity17.5
Applied times-frac17.4
Simplified17.4
Simplified7.7
if 1.8091015183831773e+43 < b Initial program 56.4
Simplified56.4
Taylor expanded around inf 4.2
Simplified4.2
Final simplification7.3
herbie shell --seed 2019120
(FPCore (a b c)
:name "Quadratic roots, full range"
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))