\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 -4.30101840923646093 \cdot 10^{98}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.37577225186574925 \cdot 10^{-260}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{elif}\;b \le 6.66645678090455348 \cdot 10^{68}:\\
\;\;\;\;\frac{1 \cdot \left(\frac{1}{\frac{2}{4}} \cdot c\right)}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r66336 = b;
double r66337 = -r66336;
double r66338 = r66336 * r66336;
double r66339 = 4.0;
double r66340 = a;
double r66341 = r66339 * r66340;
double r66342 = c;
double r66343 = r66341 * r66342;
double r66344 = r66338 - r66343;
double r66345 = sqrt(r66344);
double r66346 = r66337 + r66345;
double r66347 = 2.0;
double r66348 = r66347 * r66340;
double r66349 = r66346 / r66348;
return r66349;
}
double f(double a, double b, double c) {
double r66350 = b;
double r66351 = -4.301018409236461e+98;
bool r66352 = r66350 <= r66351;
double r66353 = 1.0;
double r66354 = c;
double r66355 = r66354 / r66350;
double r66356 = a;
double r66357 = r66350 / r66356;
double r66358 = r66355 - r66357;
double r66359 = r66353 * r66358;
double r66360 = -2.3757722518657493e-260;
bool r66361 = r66350 <= r66360;
double r66362 = -r66350;
double r66363 = r66350 * r66350;
double r66364 = 4.0;
double r66365 = r66364 * r66356;
double r66366 = r66365 * r66354;
double r66367 = r66363 - r66366;
double r66368 = sqrt(r66367);
double r66369 = r66362 + r66368;
double r66370 = 1.0;
double r66371 = 2.0;
double r66372 = r66371 * r66356;
double r66373 = r66370 / r66372;
double r66374 = r66369 * r66373;
double r66375 = 6.6664567809045535e+68;
bool r66376 = r66350 <= r66375;
double r66377 = r66371 / r66364;
double r66378 = r66370 / r66377;
double r66379 = r66378 * r66354;
double r66380 = r66370 * r66379;
double r66381 = r66362 - r66368;
double r66382 = r66380 / r66381;
double r66383 = -1.0;
double r66384 = r66383 * r66355;
double r66385 = r66376 ? r66382 : r66384;
double r66386 = r66361 ? r66374 : r66385;
double r66387 = r66352 ? r66359 : r66386;
return r66387;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -4.301018409236461e+98Initial program 47.2
Taylor expanded around -inf 3.9
Simplified3.9
if -4.301018409236461e+98 < b < -2.3757722518657493e-260Initial program 8.5
rmApplied div-inv8.7
if -2.3757722518657493e-260 < b < 6.6664567809045535e+68Initial program 29.1
rmApplied flip-+29.1
Simplified16.2
rmApplied clear-num16.4
Simplified16.0
rmApplied associate-/r*15.8
Simplified9.6
rmApplied *-un-lft-identity9.6
Applied add-sqr-sqrt9.6
Applied times-frac9.6
Applied *-un-lft-identity9.6
Applied *-un-lft-identity9.6
Applied times-frac9.6
Applied add-sqr-sqrt9.6
Applied times-frac9.6
Applied times-frac9.6
Simplified9.6
Simplified9.5
if 6.6664567809045535e+68 < b Initial program 58.7
Taylor expanded around inf 3.5
Final simplification6.8
herbie shell --seed 2020020 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))