\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le 2.0692694654638998 \cdot 10^{+101}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{\sqrt{\mathsf{fma}\left(\left(a \cdot -4\right), c, \left(b \cdot b\right)\right)}} \cdot \sqrt{\sqrt{\mathsf{fma}\left(\left(a \cdot -4\right), c, \left(b \cdot b\right)\right)}}}{a \cdot 2}\\
\mathbf{else}:\\
\;\;\;\;\frac{c \cdot 2}{\sqrt{\mathsf{fma}\left(\left(a \cdot -4\right), c, \left(b \cdot b\right)\right)} - b}\\
\end{array}\\
\mathbf{elif}\;b \ge 0:\\
\;\;\;\;\frac{\left(-b\right) - b}{a \cdot 2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{c \cdot 2}{\sqrt{\sqrt{\mathsf{fma}\left(\left(a \cdot -4\right), c, \left(b \cdot b\right)\right)} - b}}}{\sqrt{\sqrt{\mathsf{fma}\left(\left(a \cdot -4\right), c, \left(b \cdot b\right)\right)} - b}}\\
\end{array}double f(double a, double b, double c) {
double r827338 = b;
double r827339 = 0.0;
bool r827340 = r827338 >= r827339;
double r827341 = -r827338;
double r827342 = r827338 * r827338;
double r827343 = 4.0;
double r827344 = a;
double r827345 = r827343 * r827344;
double r827346 = c;
double r827347 = r827345 * r827346;
double r827348 = r827342 - r827347;
double r827349 = sqrt(r827348);
double r827350 = r827341 - r827349;
double r827351 = 2.0;
double r827352 = r827351 * r827344;
double r827353 = r827350 / r827352;
double r827354 = r827351 * r827346;
double r827355 = r827341 + r827349;
double r827356 = r827354 / r827355;
double r827357 = r827340 ? r827353 : r827356;
return r827357;
}
double f(double a, double b, double c) {
double r827358 = b;
double r827359 = 2.0692694654638998e+101;
bool r827360 = r827358 <= r827359;
double r827361 = 0.0;
bool r827362 = r827358 >= r827361;
double r827363 = -r827358;
double r827364 = a;
double r827365 = -4.0;
double r827366 = r827364 * r827365;
double r827367 = c;
double r827368 = r827358 * r827358;
double r827369 = fma(r827366, r827367, r827368);
double r827370 = sqrt(r827369);
double r827371 = sqrt(r827370);
double r827372 = r827371 * r827371;
double r827373 = r827363 - r827372;
double r827374 = 2.0;
double r827375 = r827364 * r827374;
double r827376 = r827373 / r827375;
double r827377 = r827367 * r827374;
double r827378 = r827370 - r827358;
double r827379 = r827377 / r827378;
double r827380 = r827362 ? r827376 : r827379;
double r827381 = r827363 - r827358;
double r827382 = r827381 / r827375;
double r827383 = sqrt(r827378);
double r827384 = r827377 / r827383;
double r827385 = r827384 / r827383;
double r827386 = r827362 ? r827382 : r827385;
double r827387 = r827360 ? r827380 : r827386;
return r827387;
}



Bits error versus a



Bits error versus b



Bits error versus c
if b < 2.0692694654638998e+101Initial program 14.6
Simplified14.6
rmApplied add-sqr-sqrt14.6
Applied sqrt-prod14.7
if 2.0692694654638998e+101 < b Initial program 44.7
Simplified44.7
Taylor expanded around 0 3.9
rmApplied add-sqr-sqrt3.9
Applied associate-/r*3.9
Final simplification13.1
herbie shell --seed 2019133 +o rules:numerics
(FPCore (a b c)
:name "jeff quadratic root 1"
(if (>= b 0) (/ (- (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))))))