\frac{\left(-b_2\right) + \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \le -3.450829996567047685966692456342790556879 \cdot 10^{138}:\\
\;\;\;\;\mathsf{fma}\left(\frac{1}{2}, \frac{c}{b_2}, \frac{b_2}{a} \cdot -2\right)\\
\mathbf{elif}\;b_2 \le 4.626043257219637986942022736183111936335 \cdot 10^{-62}:\\
\;\;\;\;\frac{\sqrt{b_2 \cdot b_2 - a \cdot c}}{a} - \frac{b_2}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{c}{b_2} \cdot \frac{-1}{2}\\
\end{array}double f(double a, double b_2, double c) {
double r581138 = b_2;
double r581139 = -r581138;
double r581140 = r581138 * r581138;
double r581141 = a;
double r581142 = c;
double r581143 = r581141 * r581142;
double r581144 = r581140 - r581143;
double r581145 = sqrt(r581144);
double r581146 = r581139 + r581145;
double r581147 = r581146 / r581141;
return r581147;
}
double f(double a, double b_2, double c) {
double r581148 = b_2;
double r581149 = -3.450829996567048e+138;
bool r581150 = r581148 <= r581149;
double r581151 = 0.5;
double r581152 = c;
double r581153 = r581152 / r581148;
double r581154 = a;
double r581155 = r581148 / r581154;
double r581156 = -2.0;
double r581157 = r581155 * r581156;
double r581158 = fma(r581151, r581153, r581157);
double r581159 = 4.626043257219638e-62;
bool r581160 = r581148 <= r581159;
double r581161 = r581148 * r581148;
double r581162 = r581154 * r581152;
double r581163 = r581161 - r581162;
double r581164 = sqrt(r581163);
double r581165 = r581164 / r581154;
double r581166 = r581165 - r581155;
double r581167 = -0.5;
double r581168 = r581153 * r581167;
double r581169 = r581160 ? r581166 : r581168;
double r581170 = r581150 ? r581158 : r581169;
return r581170;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
if b_2 < -3.450829996567048e+138Initial program 58.5
Simplified58.5
Taylor expanded around -inf 2.0
Simplified2.0
if -3.450829996567048e+138 < b_2 < 4.626043257219638e-62Initial program 12.1
Simplified12.1
rmApplied div-sub12.1
if 4.626043257219638e-62 < b_2 Initial program 53.7
Simplified53.7
Taylor expanded around inf 8.4
Final simplification9.4
herbie shell --seed 2019174 +o rules:numerics
(FPCore (a b_2 c)
:name "quad2p (problem 3.2.1, positive)"
(/ (+ (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))