\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 -1.98276540088900058 \cdot 10^{134}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 1.1860189201379418 \cdot 10^{-161}:\\
\;\;\;\;\left(\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} - b\right) \cdot \frac{\frac{1}{2}}{a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r66626 = b;
double r66627 = -r66626;
double r66628 = r66626 * r66626;
double r66629 = 4.0;
double r66630 = a;
double r66631 = r66629 * r66630;
double r66632 = c;
double r66633 = r66631 * r66632;
double r66634 = r66628 - r66633;
double r66635 = sqrt(r66634);
double r66636 = r66627 + r66635;
double r66637 = 2.0;
double r66638 = r66637 * r66630;
double r66639 = r66636 / r66638;
return r66639;
}
double f(double a, double b, double c) {
double r66640 = b;
double r66641 = -1.9827654008890006e+134;
bool r66642 = r66640 <= r66641;
double r66643 = 1.0;
double r66644 = c;
double r66645 = r66644 / r66640;
double r66646 = a;
double r66647 = r66640 / r66646;
double r66648 = r66645 - r66647;
double r66649 = r66643 * r66648;
double r66650 = 1.1860189201379418e-161;
bool r66651 = r66640 <= r66650;
double r66652 = r66640 * r66640;
double r66653 = 4.0;
double r66654 = r66653 * r66646;
double r66655 = r66654 * r66644;
double r66656 = r66652 - r66655;
double r66657 = sqrt(r66656);
double r66658 = r66657 - r66640;
double r66659 = 1.0;
double r66660 = 2.0;
double r66661 = r66659 / r66660;
double r66662 = r66661 / r66646;
double r66663 = r66658 * r66662;
double r66664 = -1.0;
double r66665 = r66664 * r66645;
double r66666 = r66651 ? r66663 : r66665;
double r66667 = r66642 ? r66649 : r66666;
return r66667;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.9827654008890006e+134Initial program 56.8
Simplified56.8
Taylor expanded around -inf 3.1
Simplified3.1
if -1.9827654008890006e+134 < b < 1.1860189201379418e-161Initial program 10.3
Simplified10.3
rmApplied *-un-lft-identity10.3
Applied div-inv10.3
Applied times-frac10.5
Simplified10.5
if 1.1860189201379418e-161 < b Initial program 49.7
Simplified49.7
Taylor expanded around inf 13.7
Final simplification10.9
herbie shell --seed 2020047 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))