\frac{\left(-b_2\right) + \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \le -1.585466010660367 \cdot 10^{+150}:\\
\;\;\;\;\mathsf{fma}\left(-2, \frac{b_2}{a}, \frac{\frac{c}{b_2}}{2}\right)\\
\mathbf{elif}\;b_2 \le 1.3635892865650846 \cdot 10^{-93}:\\
\;\;\;\;\frac{\sqrt{b_2 \cdot b_2 - c \cdot a} - b_2}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b_2}\\
\end{array}double f(double a, double b_2, double c) {
double r844414 = b_2;
double r844415 = -r844414;
double r844416 = r844414 * r844414;
double r844417 = a;
double r844418 = c;
double r844419 = r844417 * r844418;
double r844420 = r844416 - r844419;
double r844421 = sqrt(r844420);
double r844422 = r844415 + r844421;
double r844423 = r844422 / r844417;
return r844423;
}
double f(double a, double b_2, double c) {
double r844424 = b_2;
double r844425 = -1.585466010660367e+150;
bool r844426 = r844424 <= r844425;
double r844427 = -2.0;
double r844428 = a;
double r844429 = r844424 / r844428;
double r844430 = c;
double r844431 = r844430 / r844424;
double r844432 = 2.0;
double r844433 = r844431 / r844432;
double r844434 = fma(r844427, r844429, r844433);
double r844435 = 1.3635892865650846e-93;
bool r844436 = r844424 <= r844435;
double r844437 = r844424 * r844424;
double r844438 = r844430 * r844428;
double r844439 = r844437 - r844438;
double r844440 = sqrt(r844439);
double r844441 = r844440 - r844424;
double r844442 = r844441 / r844428;
double r844443 = -0.5;
double r844444 = r844443 * r844431;
double r844445 = r844436 ? r844442 : r844444;
double r844446 = r844426 ? r844434 : r844445;
return r844446;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
if b_2 < -1.585466010660367e+150Initial program 62.8
Simplified62.8
rmApplied div-inv62.8
Taylor expanded around -inf 2.8
Simplified2.8
if -1.585466010660367e+150 < b_2 < 1.3635892865650846e-93Initial program 11.6
Simplified11.6
rmApplied div-inv11.7
rmApplied un-div-inv11.6
if 1.3635892865650846e-93 < b_2 Initial program 53.0
Simplified53.0
Taylor expanded around inf 9.1
Final simplification9.6
herbie shell --seed 2019165 +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))