\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le -1.3599228730895225 \cdot 10^{+90}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{b \cdot b - \left(b \cdot b - \left(a \cdot c\right) \cdot 4\right)} \cdot \left(\sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)} + \left(-b\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\end{array}\\
\mathbf{elif}\;b \le 2.559678284282607 \cdot 10^{+69}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{\sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)}} \cdot \sqrt{\sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)}} + \left(-b\right)}{a \cdot 2}\\
\end{array}\\
\mathbf{elif}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{2 \cdot \left(\frac{a}{\frac{b}{c}} - b\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)} + \left(-b\right)}{a \cdot 2}\\
\end{array}double f(double a, double b, double c) {
double r533591 = b;
double r533592 = 0.0;
bool r533593 = r533591 >= r533592;
double r533594 = 2.0;
double r533595 = c;
double r533596 = r533594 * r533595;
double r533597 = -r533591;
double r533598 = r533591 * r533591;
double r533599 = 4.0;
double r533600 = a;
double r533601 = r533599 * r533600;
double r533602 = r533601 * r533595;
double r533603 = r533598 - r533602;
double r533604 = sqrt(r533603);
double r533605 = r533597 - r533604;
double r533606 = r533596 / r533605;
double r533607 = r533597 + r533604;
double r533608 = r533594 * r533600;
double r533609 = r533607 / r533608;
double r533610 = r533593 ? r533606 : r533609;
return r533610;
}
double f(double a, double b, double c) {
double r533611 = b;
double r533612 = -1.3599228730895225e+90;
bool r533613 = r533611 <= r533612;
double r533614 = 0.0;
bool r533615 = r533611 >= r533614;
double r533616 = 2.0;
double r533617 = c;
double r533618 = r533616 * r533617;
double r533619 = r533611 * r533611;
double r533620 = a;
double r533621 = r533620 * r533617;
double r533622 = 4.0;
double r533623 = r533621 * r533622;
double r533624 = r533619 - r533623;
double r533625 = r533619 - r533624;
double r533626 = r533618 / r533625;
double r533627 = r533622 * r533620;
double r533628 = r533617 * r533627;
double r533629 = r533619 - r533628;
double r533630 = sqrt(r533629);
double r533631 = -r533611;
double r533632 = r533630 + r533631;
double r533633 = r533626 * r533632;
double r533634 = r533617 / r533611;
double r533635 = r533611 / r533620;
double r533636 = r533634 - r533635;
double r533637 = r533615 ? r533633 : r533636;
double r533638 = 2.559678284282607e+69;
bool r533639 = r533611 <= r533638;
double r533640 = r533631 - r533630;
double r533641 = r533618 / r533640;
double r533642 = sqrt(r533630);
double r533643 = r533642 * r533642;
double r533644 = r533643 + r533631;
double r533645 = r533620 * r533616;
double r533646 = r533644 / r533645;
double r533647 = r533615 ? r533641 : r533646;
double r533648 = r533611 / r533617;
double r533649 = r533620 / r533648;
double r533650 = r533649 - r533611;
double r533651 = r533616 * r533650;
double r533652 = r533618 / r533651;
double r533653 = r533632 / r533645;
double r533654 = r533615 ? r533652 : r533653;
double r533655 = r533639 ? r533647 : r533654;
double r533656 = r533613 ? r533637 : r533655;
return r533656;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.3599228730895225e+90Initial program 41.7
Taylor expanded around -inf 9.4
Simplified4.0
Taylor expanded around inf 3.8
rmApplied div-inv3.8
rmApplied flip--3.8
Applied associate-/r/3.8
Applied associate-*r*3.8
Simplified3.8
if -1.3599228730895225e+90 < b < 2.559678284282607e+69Initial program 8.9
rmApplied add-sqr-sqrt8.9
Applied sqrt-prod9.1
if 2.559678284282607e+69 < b Initial program 26.5
Taylor expanded around inf 6.4
Simplified3.4
Final simplification6.7
herbie shell --seed 2019152
(FPCore (a b c)
:name "jeff quadratic root 2"
(if (>= b 0) (/ (* 2 c) (- (- b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))))