\frac{\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \le -4.78285893492843261 \cdot 10^{-126}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b_2}\\
\mathbf{elif}\;b_2 \le 3.6627135292415903 \cdot 10^{111}:\\
\;\;\;\;\left(\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}\right) \cdot \frac{1}{a}\\
\mathbf{else}:\\
\;\;\;\;-2 \cdot \frac{b_2}{a}\\
\end{array}double f(double a, double b_2, double c) {
double r23899 = b_2;
double r23900 = -r23899;
double r23901 = r23899 * r23899;
double r23902 = a;
double r23903 = c;
double r23904 = r23902 * r23903;
double r23905 = r23901 - r23904;
double r23906 = sqrt(r23905);
double r23907 = r23900 - r23906;
double r23908 = r23907 / r23902;
return r23908;
}
double f(double a, double b_2, double c) {
double r23909 = b_2;
double r23910 = -4.7828589349284326e-126;
bool r23911 = r23909 <= r23910;
double r23912 = -0.5;
double r23913 = c;
double r23914 = r23913 / r23909;
double r23915 = r23912 * r23914;
double r23916 = 3.6627135292415903e+111;
bool r23917 = r23909 <= r23916;
double r23918 = -r23909;
double r23919 = r23909 * r23909;
double r23920 = a;
double r23921 = r23920 * r23913;
double r23922 = r23919 - r23921;
double r23923 = sqrt(r23922);
double r23924 = r23918 - r23923;
double r23925 = 1.0;
double r23926 = r23925 / r23920;
double r23927 = r23924 * r23926;
double r23928 = -2.0;
double r23929 = r23909 / r23920;
double r23930 = r23928 * r23929;
double r23931 = r23917 ? r23927 : r23930;
double r23932 = r23911 ? r23915 : r23931;
return r23932;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
Results
if b_2 < -4.7828589349284326e-126Initial program 51.3
Taylor expanded around -inf 11.3
if -4.7828589349284326e-126 < b_2 < 3.6627135292415903e+111Initial program 12.0
rmApplied div-inv12.1
if 3.6627135292415903e+111 < b_2 Initial program 49.7
rmApplied flip--63.3
Simplified62.3
Simplified62.3
Taylor expanded around 0 3.6
Final simplification10.6
herbie shell --seed 2020047
(FPCore (a b_2 c)
:name "quad2m (problem 3.2.1, negative)"
:precision binary64
(/ (- (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))