\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -2.3044033969831823 \cdot 10^{153}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 1.9238883452280037 \cdot 10^{-130}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{elif}\;b \le 4.01993084419163312 \cdot 10^{109}:\\
\;\;\;\;\frac{\frac{0 + 4 \cdot \left(a \cdot c\right)}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r52358 = b;
double r52359 = -r52358;
double r52360 = r52358 * r52358;
double r52361 = 4.0;
double r52362 = a;
double r52363 = r52361 * r52362;
double r52364 = c;
double r52365 = r52363 * r52364;
double r52366 = r52360 - r52365;
double r52367 = sqrt(r52366);
double r52368 = r52359 + r52367;
double r52369 = 2.0;
double r52370 = r52369 * r52362;
double r52371 = r52368 / r52370;
return r52371;
}
double f(double a, double b, double c) {
double r52372 = b;
double r52373 = -2.3044033969831823e+153;
bool r52374 = r52372 <= r52373;
double r52375 = 1.0;
double r52376 = c;
double r52377 = r52376 / r52372;
double r52378 = a;
double r52379 = r52372 / r52378;
double r52380 = r52377 - r52379;
double r52381 = r52375 * r52380;
double r52382 = 1.9238883452280037e-130;
bool r52383 = r52372 <= r52382;
double r52384 = -r52372;
double r52385 = r52372 * r52372;
double r52386 = 4.0;
double r52387 = r52386 * r52378;
double r52388 = r52387 * r52376;
double r52389 = r52385 - r52388;
double r52390 = sqrt(r52389);
double r52391 = r52384 + r52390;
double r52392 = 2.0;
double r52393 = r52392 * r52378;
double r52394 = r52391 / r52393;
double r52395 = 4.019930844191633e+109;
bool r52396 = r52372 <= r52395;
double r52397 = 0.0;
double r52398 = r52378 * r52376;
double r52399 = r52386 * r52398;
double r52400 = r52397 + r52399;
double r52401 = r52384 - r52390;
double r52402 = r52400 / r52401;
double r52403 = r52402 / r52393;
double r52404 = -1.0;
double r52405 = r52404 * r52377;
double r52406 = r52396 ? r52403 : r52405;
double r52407 = r52383 ? r52394 : r52406;
double r52408 = r52374 ? r52381 : r52407;
return r52408;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -2.3044033969831823e+153Initial program 63.5
Taylor expanded around -inf 2.0
Simplified2.0
if -2.3044033969831823e+153 < b < 1.9238883452280037e-130Initial program 11.3
rmApplied associate-/r*11.3
rmApplied div-inv11.3
Applied associate-/l*11.3
Simplified11.3
if 1.9238883452280037e-130 < b < 4.019930844191633e+109Initial program 40.3
rmApplied flip-+40.3
Simplified15.5
if 4.019930844191633e+109 < b Initial program 59.9
Taylor expanded around inf 2.4
Final simplification9.2
herbie shell --seed 2020060 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))