\frac{\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \le -1.279587145681289 \cdot 10^{-136}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b_2}\\
\mathbf{elif}\;b_2 \le 6.8526453862578789 \cdot 10^{139}:\\
\;\;\;\;\left(\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}\right) \cdot \frac{1}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2} \cdot \frac{c}{b_2} - 2 \cdot \frac{b_2}{a}\\
\end{array}double f(double a, double b_2, double c) {
double r11712 = b_2;
double r11713 = -r11712;
double r11714 = r11712 * r11712;
double r11715 = a;
double r11716 = c;
double r11717 = r11715 * r11716;
double r11718 = r11714 - r11717;
double r11719 = sqrt(r11718);
double r11720 = r11713 - r11719;
double r11721 = r11720 / r11715;
return r11721;
}
double f(double a, double b_2, double c) {
double r11722 = b_2;
double r11723 = -1.279587145681289e-136;
bool r11724 = r11722 <= r11723;
double r11725 = -0.5;
double r11726 = c;
double r11727 = r11726 / r11722;
double r11728 = r11725 * r11727;
double r11729 = 6.852645386257879e+139;
bool r11730 = r11722 <= r11729;
double r11731 = -r11722;
double r11732 = r11722 * r11722;
double r11733 = a;
double r11734 = r11733 * r11726;
double r11735 = r11732 - r11734;
double r11736 = sqrt(r11735);
double r11737 = r11731 - r11736;
double r11738 = 1.0;
double r11739 = r11738 / r11733;
double r11740 = r11737 * r11739;
double r11741 = 0.5;
double r11742 = r11741 * r11727;
double r11743 = 2.0;
double r11744 = r11722 / r11733;
double r11745 = r11743 * r11744;
double r11746 = r11742 - r11745;
double r11747 = r11730 ? r11740 : r11746;
double r11748 = r11724 ? r11728 : r11747;
return r11748;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
Results
if b_2 < -1.279587145681289e-136Initial program 51.1
Taylor expanded around -inf 12.2
if -1.279587145681289e-136 < b_2 < 6.852645386257879e+139Initial program 11.1
rmApplied div-inv11.2
if 6.852645386257879e+139 < b_2 Initial program 57.7
Taylor expanded around inf 2.1
Final simplification10.6
herbie shell --seed 2020089 +o rules:numerics
(FPCore (a b_2 c)
:name "quad2m (problem 3.2.1, negative)"
:precision binary64
(/ (- (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))