\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{c}{b} \cdot -2\\
\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{\left(-b\right) + \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)}}}{a \cdot 2}\\
\end{array}\\
\mathbf{elif}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(\frac{a}{b} \cdot c - b\right) \cdot 2}\\
\mathbf{else}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\end{array}double f(double a, double b, double c) {
double r677685 = b;
double r677686 = 0.0;
bool r677687 = r677685 >= r677686;
double r677688 = 2.0;
double r677689 = c;
double r677690 = r677688 * r677689;
double r677691 = -r677685;
double r677692 = r677685 * r677685;
double r677693 = 4.0;
double r677694 = a;
double r677695 = r677693 * r677694;
double r677696 = r677695 * r677689;
double r677697 = r677692 - r677696;
double r677698 = sqrt(r677697);
double r677699 = r677691 - r677698;
double r677700 = r677690 / r677699;
double r677701 = r677691 + r677698;
double r677702 = r677688 * r677694;
double r677703 = r677701 / r677702;
double r677704 = r677687 ? r677700 : r677703;
return r677704;
}
double f(double a, double b, double c) {
double r677705 = b;
double r677706 = -1.3599228730895225e+90;
bool r677707 = r677705 <= r677706;
double r677708 = 0.0;
bool r677709 = r677705 >= r677708;
double r677710 = c;
double r677711 = r677710 / r677705;
double r677712 = -2.0;
double r677713 = r677711 * r677712;
double r677714 = a;
double r677715 = r677705 / r677714;
double r677716 = r677711 - r677715;
double r677717 = r677709 ? r677713 : r677716;
double r677718 = 2.559678284282607e+69;
bool r677719 = r677705 <= r677718;
double r677720 = 2.0;
double r677721 = r677720 * r677710;
double r677722 = -r677705;
double r677723 = r677705 * r677705;
double r677724 = 4.0;
double r677725 = r677724 * r677714;
double r677726 = r677710 * r677725;
double r677727 = r677723 - r677726;
double r677728 = sqrt(r677727);
double r677729 = r677722 - r677728;
double r677730 = r677721 / r677729;
double r677731 = sqrt(r677728);
double r677732 = r677731 * r677731;
double r677733 = r677722 + r677732;
double r677734 = r677714 * r677720;
double r677735 = r677733 / r677734;
double r677736 = r677709 ? r677730 : r677735;
double r677737 = r677714 / r677705;
double r677738 = r677737 * r677710;
double r677739 = r677738 - r677705;
double r677740 = r677739 * r677720;
double r677741 = r677721 / r677740;
double r677742 = r677709 ? r677741 : r677716;
double r677743 = r677719 ? r677736 : r677742;
double r677744 = r677707 ? r677717 : r677743;
return r677744;
}



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 0 3.8
Taylor expanded around inf 3.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 26.5
Simplified26.5
Taylor expanded around 0 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))))